Hello,
I have been converting an old delphi dxf reader/writer class to Lazarus
but stumbled onto this:
procedure Zoom_panel.Resize;
begin
inherited;
scrollpanel_lr.height := GetSystemMetrics(SM_CYHSCROLL)*2;
scrollpanel_ud.width := GetSystemMetrics(SM_CXVSCROLL);
//... etc
end;
The GetSystemMetrics() call produces an "external sigsegv" exception.
Any idea about the cause and/or a hint how to continue? Anyhow, I was
amazed to see the class compile with so little modification.
Markku
--
[EMAIL PROTECTED]
_________________________________________________________________
To unsubscribe: mail [EMAIL PROTECTED] with
"unsubscribe" as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives
