Wieso ist kein Overload bei Prozeduren einer Klasse möglich?

[Shark99]

Ich habe folgenden Code einer Klasse:

Delphi-Quellcode:

TConfigSaver = class
...
public
   procedure WriteString(Section, Ident, Value: string); overload;
   procedure WriteString(Section, Ident, Value: widestring); overload;
...
end;

..

procedure TConfigSaver.WriteString(Section, Ident, Value: string); overload; // fehler an dieser stelle
begin
  if IniFile then FIniFile.WriteString(section,ident,value)
             else FRegistry.WriteString(section+'_'+ident,value);
end;

procedure TConfigSaver.WriteString(Section, Ident, Value: widestring); overload;
begin
  if IniFile then FIniFile.WriteString(section,ident,UTF16ToUTF8(value))
             else FRegistry.WriteString(section+'_'+ident,UTF16ToUTF8(value));
end;

und bekomme unter D7 den Fehler beim Kompilieren:

[Error]: Invalid compiler directive: 'OVERLOAD'

Wieso ist hier kein Overload möglich?