(Gast)
n/a Beiträge
|
Bild aus ImageList laden
30. Jan 2003, 23:55
Delphi-Quellcode:
procedure TWindow.FormCreate(Sender: TObject);
var
Bitmap : TBitmap;
begin
Bitmap := TBitmap.Create;
try
ImageList.GetBitmap(0, Bitmap);
Window.Canvas.Draw(0, 0, Bitmap);
finally
FreeAndNil(Bitmap);
end;
end;
Von Christian Seehase!
Grüsse, Daniel
|
|
Zitat
|