[Lazarus] hexboard2.pas(22, 42) Error: Identifier not found "WM_USER"

[Mattias Gaertner]

On Mon, 14 Jun 2010 22:24:54 +1000
Peter E Williams <foss.game.pascal.developer at iinet.net.au> wrote:

> Hi All,
> 
> I have been porting a game written in Delphi 5 Enterprise. 
> 
> I am getting an Identifier not found for WM_USER when assigning it to
> the WM_USER_APPLICATION_MINIMIZE const. What do I do to correct this
> error? I am implementing procedure OnUserAppMin(var M: TMessage);
> 
> from unit hexboard2.pas
> 
> const
>   WM_USER_APPLICATION_MINIMIZE = WM_USER + 1;
>                                  ^^^^^^^  
> hexboard2.pas(22,42) Error: Identifier not found "WM_USER"
> 
> type
>   { Thxboard }
> 
>   Thxboard = class(TForm)
> //...
>   private
>     { Private declarations }
>     procedure OnUserAppMin(var M: TMessage);
>       message WM_USER_APPLICATION_MINIMIZE;
> 
> procedure Thxboard.OnUserAppMin(var M: TMessage);
> begin
>   Application.Minimize;
> end; { OnUserAppMin }

Use Application.AddOnMinimizeHandler instead

Mattias