아래의returnString 함수에 var로 선언된 a를 class의 다른함수에서 값을 주고... 함수가 종료됐을때... a는 그 값을 가지고 리턴하고 싶습니다. 이렇게 하면 안되던데... 어떻게 하면 되나요???
혹... 펑션을 쓰라고 하진 마세요... 예제를 간단하게 하느라 이렇게 했지만 실제는 parameter가 2개 입니다.
type tclass = class(TObject)
private
s: ^string;
public
procedure returnString(var a: string);
end;
procedure tclass.returnString(var a: string)
begin
s := a;
returnStringAgain();
end;
procedure tclass.returnStringAgain;
begin
s := '이게 a에 저장되어서 returnString을 호출한놈에서 이 스트링을 받을 수 있을까요?';
end;
바로 쓰면 에러날것 같습니다. 그리고 ^String으로 선언하기보다는 PString으로 선언하시는게
깨끗해 보일듯 싶은데요..
@만 넣으면 될것 같은데...