[lazarus] StrPCopy bug

[Michael A. Hess]

Shane Miller wrote:
> 
> This is interesting.
> 
> I am using
> Procedure Something(var msg); Message LM_RESIZE;
> Procedure Something(var msg); Message LM_SHOW;
> Procedure Something(var msg); Message LM_DESTROY;
> Procedure Something(var msg); Message LM_FOCUS;
> 
> in my TForms class.
> 
> In LMessages.pp I declare
> LM_USER = $10;
> LM_RESIZE = LM_USER+1;
> LM_SHOW = LM_USER+15;
> LM_DESTROY = LM_USER+2;
> LM_FOCUS = LM_USER+6;
> 
> When I have the last two commented out, it compiles.  But if I uncomment the LM_DESTROY one, it crashes with
> Panic: Internal compiler error, exiting
> forms(52,5) Fatal: Internal error 9999
> 
> Line 52 is the end of TForms class declaration.
> 
> Thoughts?

You don;t think this has something to do with that can't link static
message with regards do lmessages unit to you?

What if you tried hard coding the numbers into the messages and don't
use the LM_DESTROY, etc.


-- 
==== Programming my first best destiny! ====

Michael A. Hess      Miracle Concepts, Inc.
mhess at miraclec.com   http://www.miraclec.com