[Lazarus] Carbon: GetTextExtentPoint and Access Violation

[Bent Normann Olsen]

Hi again,

I tried to make a simple test by reading different components canvas
handles, like:

  Caption := IntToStr(ToolButton1.Canvas.Handle);
  Caption := Caption+' '+ IntToStr(ToolBar1.Canvas.Handle);
  Caption := Caption+' '+ IntToStr(Panel3.Canvas.Handle);
  Caption := Caption+' '+ IntToStr(Panel2.Canvas.Handle);
  Caption := Caption+' '+ IntToStr(Panel1.Canvas.Handle);
  Caption := Caption+' '+ IntToStr(Form1.Canvas.Handle);

They all return the same handle (one component is parent for the next
component), but more interestingly the test crashes on the main application,
and not on a isolated test application. And it only crashes if I read 6
handles, not 5 or less - strange.

And also I tried different compiler options, and I that found if I check
"Use Heaptrc Unit (-gh)" the displaying of hint don't crash no more, neither
does the above test. But the application crash on exit.

Could this be a problem with memories on Carbon for larger applications with
many components? I tried to increase "Heap Size" with no luck.

TIA,
Normann


-----Original Message-----
From: lazarus-bounces at lazarus.freepascal.org
[mailto:lazarus-bounces at lazarus.freepascal.org] On Behalf Of Bent Normann
Olsen
Sent: 16. juni 2008 14:10
To: 'General mailing list'
Subject: Re: [Lazarus] Carbon: GetTextExtentPoint and Access Violation
[snip]