Änderungen in Forms.pas -> Wie compilieren?

[scp]

Delphi-Quellcode:

procedure myProcessMessage;
Var
  M         : TMsg;
Begin
  If PeekMessage(M, 0, 0, 0, pm_Remove) then
    Begin
      TranslateMessage(M); DispatchMessage(M);
    End;
End;