Billeder

Brug OnDrawItem, og sæt csOwnerDrawFixed/csOwnerDrawVariable

undskyld det forstod jeg ikke rigtig jeg er ikke så god til delphi endnu

Lige et øjeblik, jeg er ved at lave et lille eksempel.

kan jeg ikke få dig til at skrive lidt mere trin for trin?????

tak :-)

Læg en ImageList og en ComboBox på en form, fyld nogle billeder i ImageList\'en og lav det samme antal linier i ComboBox\'ens Items, og sæt DropDownCount til dette antal. Sæt ComboBox.Style til csOwnerDrawFixed og lav flg. OnDrawItem handler:

procedure TForm1.ComboBox1DrawItem(Control: TWinControl; Index: Integer;
  Rect: TRect; State: TOwnerDrawState);
begin
  ImageList1.Draw(ComboBox1.Canvas, Rect.Left, Rect.Top,  Index);
  ComboBox1.Canvas.TextOut(Rect.Left + 30, Rect.Top + 2, ComboBox1.Items[Index]);
end;

For at fylde ImageList\'en:

Dobbeltklik så ImageList Editor\'en kommer frem. Klik på Add og gå til mappen Program Files\\Common Files\\Borland Shared\\Images\\Icons og vælg nogle af de .bmp-filer der ligger der.

Hvis du bruger en dansk Windows, så er det naturligvis Programmer\\Fællles Files\\... ;-)

tak