Forum: Multimedia
Delphi
by Matze,
18. Feb 2004
Geht mein letztes Beispiel auch nicht?
Forum: Multimedia
Delphi
by Matze,
18. Feb 2004
Vielleicht so:
procedure TForm1.Button1Click(Sender: TObject);
var MyIcon: TIcon;
begin
ImageList.GetIcon(0, MyIcon);
Image1.picture.assign(MyIcon);
end;
Forum: Multimedia
Delphi
by Matze,
18. Feb 2004
Probier's mal so:
procedure TForm1.Button1Click(Sender: TObject);
var MyIcon: TIcon;
begin
ImageList.GetIcon(0, MyIcon);
Image1.Canvas.Draw(0, 0, MyIcon);
end;
Forum: Multimedia
Delphi
by Matze,
18. Feb 2004
Bitte entferne erstmal die ganzen Fragezeichen aus dem Titel, so antwortet keiner gern.
Delphitags schaden auch nicht. ;)