Delphi Overload Procedure

Question

I want to overload the procedure in the class. for this I wrote:

type TMyClass = class(TObject) private... ... public constructor create; destructor destroy; procedure dosomething(filename: string); overload; procedure dosomething(s: string; t: string; u: string); overload; implementation procedure dosomething(filename:string); begin end; procedure dosomething(s: string; t: string; u: string); begin end; 

but delphi tells me an error regarding a forward error or an external declaration ...

why?

early!

Answer 1

You must add a class name ...

 implementation procedure TMyClass.dosomething(filename:string); begin end; procedure TMyClass.dosomething(s: string; t: string; u: string); begin end; 

Answer 2

This probably indicates that you lack the implementation of your constructor and destructor. This program compiles:

 program Project1; {$APPTYPE CONSOLE} type TMyClass = class(TObject) public procedure doSomething(const Filename: string); overload; procedure doSomething(const s, t, u: string); overload; end; {$R *.res} { TMyClass } procedure TMyClass.doSomething(const Filename: string); begin end; procedure TMyClass.doSomething(const s, t, u: string); begin end; begin writeln('blubb'); end.