ListBox OwnerDraw

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : ListBox OwnerDraw

AGA

La boîte à Bokeh!

Salut,

je cherche un tutorial sur la manière de dessiner soi-même une listbox? Alterance de couleur de fond 1 sur 2 par exemple.

Je ne trouve pas ou seulement des trucs pour VB.

Merci.

Publicité

cpdump

Il faut definir une fonction qui sera appeller chaque item, j'avais une url mais je la retrouve pas

Voila ce que j'utilise pour mettre en gras l'element par défaut d'une liste. Je recupère l'objet associé à l'entrée grace à Items.Objects[Index]

Code :

//
// Affiche le profil en gras si profil par défaut
//
procedure TFormProfilSelect.ListBoxProfilDrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State: TOwnerDrawState);
begin
with Control as TListBox do
begin
Canvas.FillRect(Rect);
// Mettre en gras si Profile par défaut
if PProfilEntry(Items.Objects[Index]).peDefault then
Canvas.Font.Style := [fsBold]
else
Canvas.Font.Style := [];
Canvas.TextOut(Rect.Left + 2, Rect.Top, Items[Index]);
end;
end;

Message édité par cpdump le 14-04-2004 à 18:45:10

Whiler

Code :

procedure TForm1.ListBox1DrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State: TOwnerDrawState);
begin
with Control as TListBox do
begin
if (index mod 2 = 0) then
Canvas.Brush.Color := clGradientInactiveCaption
else
Canvas.Brush.Color := clWindow;
Canvas.FillRect(Rect);
Canvas.TextOut(Rect.Left + 2, Rect.Top, Items[Index]);
end;
end;

Avec le

Style

du ListBox à

lbOwnerDrawVariable

FORUM HardWare.fr

Programmation

Delphi/Pascal

ListBox OwnerDraw

Sujets relatifs
ListBox Unicode	[résolu]pour chaque élement sélectionné de ma listbox fair...
export listbox (vba)	ListBox et Image
ListBox : scrollbar horizontale automatique ?	Connaitre les éléments d'une ListBox ?
élément d'une listbox	[VB] ListBox sans ascenseur ?
[Borland] Récupérer une chaine de char contenue dans une listbox	[Access][VBA] Selectionner automatiquement une valeur d'une listbox ?
Plus de sujets relatifs à : ListBox OwnerDraw

Page générée en 0.043 secondes