BITBLT cross platform variante für FMX / LINUX

[bernhard_LA]

unter Windows übergebe ich das Handle auf eine Canvas unter FMX hat die Bitmap zwar ein HAndle aber die Canvas nicht .....

Delphi-Quellcode:

unit windows_linunx;





function BitBlt(DestDC: THandle; X, Y, Width, Height: Integer; SrcDC: THandle;
  XSrc, YSrc: Integer; Rop: DWORD): Boolean;
begin
    /// hier fehlt der code :-) 

    CopyFromBitmap ( ...)    /// wäre schon OK - wenn verfügbar   ????  

end;

ich will eine Code variante für beide Platformen, und möglicst die exisierende Variante VCL unverändert .... weil die funktioniert momentan