Discussion :

[m14w]

J'ai testé le code ici present:
http://delphipage.free.fr/astuces/listico.html

mais quand je teste (avec une icone valide) il ne m'affiche que le texte.
J'ai delphi 7, vous voyez d'ou peut venir le probleme ?


correction:
il m'affiche l'icone en haut à gauche du programme et moins je voudrais une listebox avec:

icone (petit espace) + texte.
Vous voyez comment faire ?

[anapurna]

salut

utilise le ondrawItem

je pense que tu peut t'inspire du defi qui fut lancer pour l'amelioration d'un menu

http://www.developpez.net/forums/viewtopic.php?t=429701

@+ Phil

[m14w]

merci mon probleme est resolu

grosso modo je mets ca:

Code :

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

1
2
3
4
5
6
7
8
 
procedure TForm1.ListBox1DrawItem(Control: TWinControl; Index: Integer;
  Rect: TRect; State: TOwnerDrawState);
 begin
 
   ListBox1.Canvas.Draw(0, 0, icon);
 
end;