[Lazarus] Owner of a TCanvas

Xiangrong Fang xrfang at gmail.com
Mon Jul 27 11:31:34 CEST 2015


Hi There,

Can I somehow get the object which owns a Canvas? e.g.:

function GetCanvasOwner(ACanvas: TCanvas): TObject;
begin
   Result := ACanvas.Owner;
end;
pb := TPaintBox(GetCanvasOwner(pb.Canvas);

Thanks!
Xiangrong
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20150727/8e9e1054/attachment-0002.html>


More information about the Lazarus mailing list