땅주인 님이 쓰신 글 :
: C++ 코드를 델파이로 포팅중인데요..
: TWebBrowser 객체를 TInvoice Class에 파라메터로 전달하고 싶습니다.
: 문법이 뭔 지 몰라서.. ㅜ.ㅜ;;;;
:
:

: unit Invoice;
: 
: interface
: 
: uses GFService, SHDocVw;
: 
: type
:   TInvoice = class
:     private
:       pWebBrowser   : ^TWebBrowser;
:     public
:       function SetWebBrowser(var pWebBrowser : TWebBrowser) : boolean;
:   end;
: 
: implementation
: 
: function TInvoice.SetWebBrowser(var pWebBrowser : TWebBrowser) : boolean;
: begin
:   self.pWebBrowser := pWebBrowser;	// error
:   result := true;
: end;
: end.
: 

:
: 감사합니다.



답변:

델파이에서 클래스는 레퍼런스 타입이니까, 클래스 자체를 C++에서 포인터인 것 처럼 사용하면 됩니다.

type
   TInvoice = class
     private
       WebBrowser   : TWebBrowser;
     public
       function SetWebBrowser(pWebBrowser : TWebBrowser) : boolean;
   end;

implementation

function TInvoice.SetWebBrowser(WebBrowser : TWebBrowser) : boolean;
begin
   self.WebBrowser := WebBrowser;   
   result := true;
end;