Blog de Serge Girard (aka SergioMaster)

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

Il est temps de capeler nos scaphandres autonomes (pour les néophytes : nos bouteilles d'air comprimés, surtout pas d'oxygène comme le pérore certains journalistes peu au fait). Cette plongée peu profonde, pour ...

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):

...