Einzelnen Beitrag anzeigen

hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.276 Beiträge
 
Delphi 10.4 Sydney
 
#2

Re: Funktionsrückgabe freigeben

  Alt 9. Mär 2007, 17:08
Hallo,

probier mal

Delphi-Quellcode:
Icon:= GetFileIcon('C:\Windows\NotePad.exe');
Image1.Picture.Graphic.Assign(Icon);
Icon.Free;

Heiko
Heiko
  Mit Zitat antworten Zitat