[code lang=”delphi”]procedure TForm1.Button1Click(Sender: TSender);
var
Icon: TIcon;
begin
Icon := TIcon.Create;
Icon.LoadFromFile(‘ORANGE.ICO’);
ListBox1.Items.AddObject(‘Orange’, Icon);
end;[/code]
[tags]Delphi, Components, ListBox[/tags]
0 Kommentare zu “Add Icons To ListBox”