Tous les billets

Ce billet fait suite à https://www.developpez.net/forums/bl...-1-decouverte/

Il est temps de retenir un peu son souffle (pas d'inquiètude les deux premières seront courtes) et apprendre quels sont les moyens de remplissage d'un TControlList.
La première, vu lors de notre découverte, ne nécessitait aucun code. Il existe également la manière plus "codeur" que nous allons explorer ici.
Retirons ...

Pourquoi carnet de plongées ? Parce que, pour moi, c'est un peu comme lorsque je découvre un nouveau spot de plongée : un petit tour d'observation du site en mode "snorkling", une première découverte en apnée puis hop, l'équipement amateur pour explorer les différentes zones et, pour finir et si le jeu en vaut la chandelle, l'équiment lourd du scaphandrier pour travaux de forte compétence. Rassurez-vous, ici pas de plongée professionnelle, juste des plongées vacances.

Pour ...

À mon âge on ne se refait pas et comme je commence à avoir une petite réputation en ce domaine, je ne voudrais pas la faire mentir.
Après la sortie du livre d'Andrea Magni : "Delphi GUI Programmming with FireMonkey" dès mon achat.

Au passage, je recommande la lecture de cet ouvrage au débutant Delphi comme aux experts VCL chevronnés qui souhaitent faire le pas FMX.

Après une première lecture diagonale, je me suis rué sur les chapitres qui m'apparaissaient ...

La première chose est d'avoir une fonction qui permettra de calculer la hauteur nécessaire à l'objet texte que l'on veut agrandir. Le mieux est d'avoir une unité indépendante. Je vous propose celle-ci, sortie de mes recherches sur le net, puis modifiée pour prendre en compte un petit bogue tenace avec certains styles Android (évidemment les styles par défaut!)

Code Delphi :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
uses FMX.TextLayout, FMX.Math;
 
function GetTextHeight(const D: TListItemText; const Width: single):

...

Souvent, dans mes applications je propose à l'utilisateur le choix d'un style différent à partir d'une liste ou en recherchant un fichier d'extension style.
Il y a plusieurs manières de procéder pour appliquer le style choisi soit en chargeant le TStyleBook de la forme soit en utilisant le TSyleManager mais là n'est pas mon propos.

Je voulais montrer la dominance de couleur d'un style avant même de l'appliquer au programme. Pas si simple quand l'on se penche sur le contenu ...