Delphi-Quellcode:
try
TransferImage:=TImage.Create(nil);
OleGraphic := TOleGraphic.Create;
fs := TFileStream.Create(imagepath, fmOpenRead or fmSharedenyNone);
OleGraphic.LoadFromStream(fs);
TransferImage.Picture.Assign(OleGraphic);
finally
fs.Free;
OleGraphic.Free
end;
aBitmap:=TBitmap.Create;
aBitmap.Width:=32;
aBitmap.Height:=32;
TransferImage.Picture.Bitmap.canvas.StretchDraw(rect(0,0,32,32),abitmap);
//das geht natürlich schief
So ich habe das Bild jetzt in
Image.picture geladen (das kann auch angezeigt werden *freu*)
Aber wie komme ich jetzt an die bitmap.canvas? die scheint leer zu sein, wenn die darauf zugreifen will... ich muss doch irgendwie an das bitmap kommen, weil ich nur das per strechdraw auf die richtige größe ziehen kann und dann in ne imagelist einbauen kann oder?
nochmal grüße und danke!