Einzelnen Beitrag anzeigen

Benutzerbild von Matze
Matze
(Co-Admin)

Registriert seit: 7. Jul 2003
Ort: Schwabenländle
14.929 Beiträge
 
Turbo Delphi für Win32
 
#3

Re: image.picture := imagelist.geticon(0);

  Alt 18. Feb 2004, 17:14
Probier's mal so:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var MyIcon: TIcon;
begin
  ImageList.GetIcon(0, MyIcon);
  Image1.Canvas.Draw(0, 0, MyIcon);
end;
keine Ahnung, ob's geht.
  Mit Zitat antworten Zitat