Duncan, what Lazarus version are you using?

In earlier versions of Carbon widget set, WindowRef could be acquired
in the style Andrew has described.

var
 AWindow: WindowRef;
..
begin
...
AWindow  := WindowRef(TCarbonWidget(Form1.Handle).Widget);
...
end;

it was recently changed, so Widget property of TCarbonWindow is also
HIViewRef control. You should use the following code, if you use
latest svn version of LCL:

var
 AWindow: WindowRef;
..
begin
...
AWindow  := TCarbonWindow(Form1.Handle).Window;
...
end;

Thanks,
Dmitry
_______________________________________________
Lazarus mailing list
[email protected]
http://www.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply via email to