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?

[DeddyH]

Bei der Implementation wird das Wörtchen "overload" weggelassen, der Compiler weiß ja schon, dass die Methode überladen ist.

[Shark99]

Danke, das wars! Ich wollte noch anmerken wenn Prozeduren/Funktionen sich ausserhalb von Klassen befinden, das overload in der Implementation NICHT angemekert wird.

[haentschman]

Hallöle...

Zitat:

Prozeduren/Funktionen sich ausserhalb von Klassen befinden

...das macht man aber auch nicht.
[/Scherz Ende]

[Blup]

Kein Scherz, wenn man das sowohl bei der Deklaration, als auch Implementation normaler Prozeduren oder Funktionen overload angibt, kann das irgendwann interne Compilerfehler geben und man sucht sich dumm und dämlich nach der Ursache (zumindest in meiner Delphiversion).