[lazarus] inherited in message differs from delphi

[Marc Weustink]

The inherited clause in a message in ppc differs from delphi.

in delphi the following is correct:


procedure LMKillFocus(var Message: TWMSetFocus); message LM_KILLFOCUS;

....

procedure LMKillFocus(var Message: TWMSetFocus); 
begin
  inherited;
end;

OK, ppc doesn't like a single inherited, but when adding the procedure name
like

procedure LMKillFocus(var Message: TWMSetFocus); 
begin
  inherited LMKillFocus(Message);
end;

it complains that the identifier idents no member LMKILLFOCUS

I thing for normal virtual functions this behaviour is correct. For
messages it is somewhat different. There is allways a an ancestor in the
form of the default dispach behaviour, so for messages this ine should
handle inherited.

Is there a change that ppc this will handle this way ? 

Marc