VCL Delphi

  1. Home
  2. Delphi
  3. VCL
  4. Listboxa icon ekleme
//ListBox nesnesinin yanına icon eklemek için
//Affan KAHYA
procedure TForm1.Button1Click(Sender: TSender);
var
Icon: TIcon;
begin
Icon := TIcon.Create;
Icon.LoadFromFile('icon.ICO');
ListBox1.Items.AddObject('icon', Icon);
end;