Q&A

  • [급한질문]폼끼리 메세지전송문제(코딩소스포함)
코딩은 아래와 같습니다.

물론 관련된 코딩만
1  COMMENTS
  • Profile
    한휘 2001.07.25 20:11
    꼭 그렇게 해야 합니까?



    원래 폼에서 우편번호폼을 모달로 뛰우고..

    그곳의 그리드를 더블클릭했을때..

    본폼에서 그 어떤 값을..

    참조만 할수 있다면 되는것 아닌가요?





    만약

    그렇다면..

    프로젝트>옵션 메뉴의 Forms 태그에서 우편번호 폼을 Available Forms 로 뺀 다음



    본폼에서



    procedure TForm1.Button1Click(Sender: TObject);

    var ZipForm: TZipForm ;

    begin

    ZipForm := TZipForm .Create( self );

    ZipForm.showModal;

    if ZipForm .ModalResult = mrOk then

    showmessage(ZipForm.ZipCodeString);

    ZipForm.free ;

    end;



    이런식으로 우편번호 폼의 변수를 참조할수있고....



    우편번호 폼에서

    ZipCodeString 은 public 에 선언해주고

    그리드 더블클릭했을때..

    ZipCodeString 에 우편번호 넣어주고..

    (물론 다른변수도 만들어서 주소같은 것도 넣어놓을수 있겠지요?)

    ModalResult := mrOK ; 만 보내주면 됩니다.





    위에 처럼 하면 않됩니까??



    음.. 아무튼 도움이 되었으면.. 합니다.















    무식맨 wrote:

    > 코딩은 아래와 같습니다.

    > 물론 관련된 코딩만