On Thu, 2 Mar 2006 17:40:23 -0300
"Felipe Monteiro de Carvalho" <[EMAIL PROTECTED]> wrote:
> On 3/2/06, Mattias Gaertner <[EMAIL PROTECTED]> wrote:
> > How to find out:
> > - add a check to DoSetBounds to raise an error if bounds over 10000
>
> This is already like that on LCL code. This is why the error is
> raised. What I need is to find out why the bounds have wrong values.
>
> > - create a backtrace
>
> Doesn't help much, it's the same from the error message:
>
> Program received signal SIGFPE, Arithmetic exception.
> 0x080ac6f8 in RAISEGDBEXCEPTION (MSG=0xb74e1a1c) at lclproc.pas:737
> 737 lclproc.pas: Arquivo ou diretório não encontrado.
> in lclproc.pas
> Current language: auto; currently pascal
> (gdb) bt
> #0 0x080ac6f8 in RAISEGDBEXCEPTION (MSG=0xb74e1a1c) at lclproc.pas:737
> #1 0x080da7b3 in BOUNDSOUTOFBOUNDS (parentfp=0xbfbb1d38) at
> control.inc:440 #2 0x080da545 in TCONTROL__DOSETBOUNDS (ALEFT=78,
> ATOP=17, AWIDTH=141295429, AHEIGHT=1212909093, this=0xb7443468)
> at control.inc:445
> #3 0x080da1d1 in TCONTROL__CHANGEBOUNDS (ALEFT=78, ATOP=17,
> AWIDTH=141295429, AHEIGHT=1212909093, this=0xb7443468)
> at control.inc:364
> #4 0x080de692 in TCONTROL__SETBOUNDS (ALEFT=78, ATOP=17,
> AWIDTH=141295429, AHEIGHT=1212909093, this=0xb7443468)
> at control.inc:2500
> #5 0x080e1650 in TCONTROL__SETBOUNDSKEEPBASE (ALEFT=78, ATOP=17,
> AWIDTH=141295429, AHEIGHT=1212909093, LOCK=true,
> this=0xb7443468) at control.inc:3641
> #6 0x080f890c in TCUSTOMLABEL__DOAUTOSIZE (this=0xb7443468) at
> customlabel.inc:79
This is:
SetBoundsKeepBase(Left, Top, NewWidth, NewHeight);
... looking what sets NewWidth ...
CalcSize(NewWidth, NewHeight);
... find declaration gives ...
procedure TCustomLabel.CalcSize
...
DrawText
Well? What does DrawText return under qt?
> #7 0x080d9727 in TCONTROL__ADJUSTSIZE (this=0xb7443468) at control.inc:50
> ..........
Mattias
_________________________________________________________________
To unsubscribe: mail [EMAIL PROTECTED] with
"unsubscribe" as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives