Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**hoika**

Hallo,

probier mal

Delphi-Quellcode:

			Icon:= GetFileIcon('C:\Windows\NotePad.exe');

Image1.Picture.Graphic.Assign(Icon); 

Icon.Free;

Heiko

hoika Registriert seit: 5. Jul 2006 Ort: Magdeburg 8.270 Beiträge Delphi 10.4 Sydney	#2 Re: Funktionsrückgabe freigeben 9. Mär 2007, 16:08 Hallo, probier mal markieren Delphi-Quellcode: Icon:= GetFileIcon('C:\Windows\NotePad.exe'); Image1.Picture.Graphic.Assign(Icon); Icon.Free; Heiko Heiko
	Zitat