델파이 클래스 절차는

Question

이 코드를 고려 과부하. 이제

, 나는이 일을 해요 경우

procedure TForm3.FormCreate(Sender: TObject); 
begin 
TForm3.GetAConn('aaa'); 
TForm3.GetAConn(10); 
end; 

I 얻을 [DCC 오류] Unit3.pas (64) : E2250이 인수로 호출 할 수있는 'GetAConn'의 더 오버로드 된 버전이 없습니다 .

Delphi XE에서 제한되는 것에 대해 뭔가를 찾지 못했습니다.

LE :이 방법으로 노력하고 있습니다 : 당신은 매개 변수 by reference을 전달하는

class procedure TForm3.GetAConn(var res: String); 
begin 
res := res + 'modif'; 
end; 

class procedure TForm3.GetAConn(var res: Integer); 
begin 
res := res + 100; 
end; 
procedure TForm3.FormCreate(Sender: TObject); 
var s:String; 
    i:Integer; 
begin 
s:='aaa'; 
TForm3.GetAConn(s); 
showmessage(s); 
i:=10; 
TForm3.GetAConn(i); 
showmessage(IntToStr(i)) 
end; 

Answer 1

. (당신은 내가 const로 전달하는 것이 좋습니다 문자열 매개 변수를 수정하지 않기 때문에.)

class procedure GetAConn(const res: String); overload; 
class procedure GetAConn(res: Integer); overload; 

당신이 통과하지 수있는 것보다 당신이 실제로 참조 매개 변수를해야 할 경우 : var을 삭제하고 모든 잘해야한다 리터럴 또는 상수, 물론. 하지만 그건 overload을 사용하는 것과 아무런 관련이 없습니다. 오버로드가 오류 메시지를 obsfuscate한다는 사실 외에도.