기관서 wrote:

> 빠른 답변에 대해서 조규춘님께 대단히 감사드립니다.

> 홈페이지 사진두 멋지더군요.. ^^;

>

> 인터페이스 부분에,

> 메소드를 생성해서 파라메터를 전달하는 방법은 잘 알겠습니다.

> 그러나....

> 프로퍼티를 추가하고 그 프로퍼티에 값을 받으려고 하니 그것은 여전히 안되는군요.

> 예에서 써주신 부분을 테스트 해봤습니다.

>

> 그러나 파라메터를 읽어서 이용하는 방법에 문제가 있는지 값을 가져올수가 없습니다.

> 프로터티를 추가하면 ActiveForm에 'Get_xx', 'Set_xx'에서 코딩을 해야할 부분과

> 테그에서 넘겨준 파라메터를 어떻게 읽어올수 있는지 다시한번 여쭙니다...........

>

> 프로퍼티를 추가해서 그 값을 넘겨받을수 있는 부분에 대해서 깊은 조언을

> 다시한번 부탁드립니다.

>

> 다음엔 저두 질문이 아닌 답변으로 봬올수 있으면 하면서

> 좋은하루 .. 맨날 맨날 행복하세요.................. KISS.



ActiveX Form에 Private 구문에 해당 프로퍼티를 기억시킬 변수를 하나 선언해 주셔요.



예) private

FID: String; //상담원 행번

...



그런다음 Type Library에서 해당 프로퍼티 하나를 추가 시키시구요.



전 ID 라는 프로퍼티를 BSTR 형으로 추가 시켰습니다.



그러면



function Get_ID: WideString; safecall;

procedure Set_ID(const Value: WideString); safecall;



이런 식으로 프로퍼티 연결하는 구문이 생성되잖아요..



거기에 직접 코딩해주시면



function TTMMainFormX.Get_ID: WideString;

begin

Result := WideString(FID);

end;



procedure TTMMainFormX.Set_ID(const Value: WideString);

begin

FID := String(Value);

end;



이런 식으로 코딩하신후에 Param으로 들어온 값을 받아서 사용하실려면 Private에 선언한 변수로 사용하시면 되요..



strID = FID;



이런 식으로요.



물론 웹페이지에서 Param 던지는 방법은 알고 계시죠? ^^

최석기님의 글 감사합니다.

나머지 반쪽을 아주 콕찍어 주셨습니다....

대단히 감사합니다.....................



좋은하루 돼세요.......................

다음에도 다시한번 부탁드립니다.......... KISS.