virtual; override; Field definition not allowed after method

[yankee]

Hi @ll,

ich habe vollgenden (aufs wesentliche gekürtzten) Quelltext:

Delphi-Quellcode:

TLeanoFloat =class;

TLeanoVar =class
  public
    function ToFloat:TLeanoFloat; virtual; abstract;
    procedure Add(arg:TLeanoVar); virtual;
    procedure Sub(arg:TLeanoVar); virtual;
    procedure Multiply(arg:TLeanoVar); virtual;
    procedure Divide(arg:TLeanoVar); virtual;
end;

TLeanoFloat =class(TLeanoVar)
  public
    procedure Add(arg:TLeanoVar); virtual; override; // <--- HIER
    procedure Sub(arg:TLeanoVar); virtual; override;
    procedure Multiply(arg:TLeanoVar); virtual; override;
    procedure Divide(arg:TLeanoVar); virtual; override;
    value: extended;
    constructor Create(v: extended);
    function ToFloat:TLeanoFloat;
end;

An der markierten Stelle bekomme ich die Fehlermeldung

[Error] UParserVars.pas(35): E2169 Field definition not allowed after methods or properties

WIESO?
Es sind nicht nur keine Field definitions davor, es sind GARKEINE definitions davor. Oder sehe ich da was falsch?

EDIT: Ehe jetzt jemand sagt, ich soll
value:Extended höher verschieben: So war es am Anfang... Gleicher Fehler in gleicher zeile... Ich habe die virtual; override;-Funktionen danach erst hochgeschoben...

EDIT2: Delphi 2k5