[lazarus] StrPCopy bug

[Shane Miller]

It may not be strPCopy.

I have a possibly related question.

I converted all the 

Procedure something(var msg); message 'resize'; 

to

Procedure Something(Var msg); Message LM_RESIZE;

where LM_RESIZE = $101

then instead of doing a DispatchStr('resize') I do a Dispatch(LM_RESIZE).

One problem I found was I had to assign a local variable to LM_RESIZE first, then use that in the Dispatch procedure.  Now I get a 

PANIC : Internal compiler error, exiting
forms.pp(52,5) Fatal: Internal error 9999

Line 52 is the end of the class definition for TFOrms which uses 4 different message procedures.

Is there still an issue when using more than one procedure?  When I comment out the other 3 it compiles.


Shane