Discussion :

[ameno_123]

Bonjour,
Je cherche un composant vcl pour insérer une liste des familles genre:


Merci

[retwas]

Je suis pas calé sur les composants mais j'ai fait un peu pareil sur un TForm.

J'ai mis un Panel, puis un Panel en bas, puis un Label (avec 2 property pour le caption et la couleur).
Ensuite j'appel je recréé des Form pour avoir cette apparence.

[ShaiLeTroll]

Il y a sinon le TCategoryPanelGroup qui ressemble à un OutLookBar ou TCategoryButtons qui gère automatiquement des couleurs mais il lui manque une propriété columnCount

Si le TTabControl ou TPageControl, on peut redessiner complètement les onglets dans le OnDrawTab

[Paul TOTH]

voir aussi TFlowPanel et/ou TGridPanel...

NB: personnellement j'utilise simplement des boutons personnalisés qui sont positionnés par code dans le OnResize du conteneur cela me permet aussi de calculer un nombre de colonne optimal avec une taille de bouton dynamique.

[foetus]

Avec Virtual TreeView

Tu fais une grille multi colonnes et un espacement entre chaque colonne et chaque ligne, et une sélection non ligne complète (full-row)

Mais tu vas passer un peu de temps pour faire le truc

Tu prends un TVirtualDrawTree et tu surcharges les évènements:

• OnBeforeItemErase pour mettre la couleur du fond
• OnDrawNode pour afficher une cellule avec des TCanvas.TextOutW, TCanvas.MoveTo, TCanvas.LineTo .... Fais attention à la fonte du canvas Canvas.Font = Font
• OnGetNodeDataSize pour déterminer la taille en octets des données d'une cellule. J'ai l'impression qu'elle n'est pas appelée et qu'il faut passer par l'évènement OnInitNode ou la propriété NodeDataSize
• OnInitNode, avec CheckType = ctNone par exemple
• OnMeasureItem, au cas où tu veux que tes cellules ont des hauteurs différentes