Re: [Lazarus] Problem with revision 28344

2010-11-28 Thread Paul Ishenin

29.11.2010 13:58, tim launchbury wrote:


I have done some more investigation on this.

The offending section of code is the following

Begin {GetColor}=== it stops here with runtime error 202
Result := Inherited Color;
End; {GetColor}


Procedure TTrackPlan.SetColor(Value: TColor);
Begin {SetColor}
If Color  Value
Then
Begin
inherited Color := Value;

If Value = clBlack
Then Font.Color := clWhite
Else Font.Color := clBlack;

//all objects
Invalidate;
End;
End; {SetColor}


Please show the TTrackPlan declaration. From what class it inherits from 
and how are GetColor, SetColor and property color are declared.


Best regards,
Paul Ishenin


--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus


Re: [Lazarus] Problem with revision 28344

2010-11-28 Thread Paul Ishenin

29.11.2010 13:58, tim launchbury wrote:


Procedure TTrackPlan.SetColor(Value: TColor);
Begin {SetColor}
If Color  Value
Then
Begin
inherited Color := Value;


Btw, the error is in this line ^

Replace it with: inherited SetColor(Value);.

And the bug is in your code, not in LCL. You probably did not notice 
because TTrackPlan constructor has something like Color := clBtnFace?


Best regards,
Paul Ishenin


--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus


Re: [Lazarus] Problem with revision 28344

2010-11-23 Thread zeljko
On Tuesday 23 November 2010 08:27, tim launchbury wrote:
 Hello all

 When updating from svn, applying revision 28344 causes my app to fail
 with runtime error 202.
 Is there a  problem with this patch or do I need a workround or code
 change in my app?

 It worked fine before this change.

Update to latest svn, rebuild laz , if you get any error please provide your 
widgetset, OS etc.. also some stack trace.

zeljko

--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus


Re: [Lazarus] Problem with revision 28344

2010-11-23 Thread zeljko
On Tuesday 23 November 2010 09:33, zeljko wrote:
 On Tuesday 23 November 2010 08:27, tim launchbury wrote:
  Hello all
 
  When updating from svn, applying revision 28344 causes my app to fail
  with runtime error 202.
  Is there a  problem with this patch or do I need a workround or code
  change in my app?
 
  It worked fine before this change.

 Update to latest svn, rebuild laz , if you get any error please provide
 your widgetset, OS etc.. also some stack trace.

Also, provide fpc version.

zeljko

--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus


Re: [Lazarus] Problem with revision 28344

2010-11-22 Thread Paul Ishenin

23.11.2010 14:27, tim launchbury wrote:


When updating from svn, applying revision 28344 causes my app to fail
with runtime error 202.
Is there a  problem with this patch or do I need a workround or code
change in my app?


Try to find what causes the error. It would be nice to get some back trace.


It worked fine before this change.


Yes, it is a big change. If you want to test lazarus without this change 
then please comment a define in your local version of lcl_defines.inc file.


Best regards,
Paul Ishenin


--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus