so sollte es funktionieren:
Delphi-Quellcode:
LDC: TCanvas;
begin
LDC := TCanvas.Create;
LDC.Handle := GetDC(0);
LDC.Draw(0, 0, LImage);
ReleaseDC(0, LDC.Handle);
LDC.Handle := 0;
LDC.Free;
LImage ist bei mir ein TPNGObject welches von TGraphic abgeleitet ist. Es sollte also mit allen Object funktionieren die von TGraphic abgeleitet sind (also auch TBitmap, TJPEGImage etc.)