Q&A

  • 여러개의 폼에서 사용될 모듈 만들기
안녕하세요.

모르는것이 있어 이렇게 질문드립니다.



여러개의 폼에 panel를 써서 프로그램 실행되는 도중에 쓰이는 각종 에러 메세지

를 나타내고자 합니다.



가령 form1,form2,form3.... 이 있고 각 폼에는 panel_err 이라는 panel이

존재합니다.

이 panel에 나타낼 메세지를 모듈을 써서 구현하려고 하는데

모듈에 다음과 같이 기술하면

case error

1: panel_err.caption := '자료를 찾지못했습니다.'

2: panel_err.caption := '자료를 찾았습니다.'

.

.

.

panel_err이 선언되지 않았다고 나타나더군요

물론 user 절에 모듈을 선언하였고요.



읽어주셔서 고맙고요

좋은 답변 기다리겠습니다.



2  COMMENTS
  • Profile
    DelChobo 2000.04.06 22:56
    한도규 wrote:

    > 안녕하세요.

    > 모르는것이 있어 이렇게 질문드립니다.

    >

    > 여러개의 폼에 panel를 써서 프로그램 실행되는 도중에 쓰이는 각종 에러 메세지

    > 를 나타내고자 합니다.

    >

    > 가령 form1,form2,form3.... 이 있고 각 폼에는 panel_err 이라는 panel이

    > 존재합니다.

    > 이 panel에 나타낼 메세지를 모듈을 써서 구현하려고 하는데

    > 모듈에 다음과 같이 기술하면

    > case error

    > 1: panel_err.caption := '자료를 찾지못했습니다.'

    > 2: panel_err.caption := '자료를 찾았습니다.'

    > .

    > .

    > .

    > panel_err이 선언되지 않았다고 나타나더군요

    > 물론 user 절에 모듈을 선언하였고요.

    >

    > 읽어주셔서 고맙고요

    > 좋은 답변 기다리겠습니다.

    >

    질문하신 바를 잘 이해했는지 모르겠지만

    panel이 어느 클래스에 속해있는지를 지정을 안하셨는지요..

    같은 폼 클래스가 아니면은 uses에만 추가해서는 안되고

    Form1.panel_err.caption := '...';

    와 같이 폼클래스를 지정하셔야 합니다.



    위와 같은 함수를 만드시려면 panel을 파라미터로 넘기시면 어떠실지요

    procedure sss(pnl_errmsg : TPanel; error:integer)

    begin

    case error of

    1: pnl_errmsg.caption = '...'

    end;



    호출하실때는

    sss(panel_err, 1);

  • Profile
    최은창 2000.04.06 22:55
    질문을 정확하게 이해하지 못했습니다만 panel_err 이란게 어디에서 선언되어 있는지요?

    만약 panel_err이란게 form4에 선언되어 있다면



    panel_err.caption := '자료를 찾지못했습니다.'



    을 아래와 같이 변경하셔야 합니다.



    form4.panel_err.caption := '자료를 찾지못했습니다.';





    좀더 정확한 답변을 원하신다면

    다시 자세히 질문을 주시던지 혹은 소스를 올려주십시오.

    같은 초보가...







    한도규 wrote:

    > 안녕하세요.

    > 모르는것이 있어 이렇게 질문드립니다.

    >

    > 여러개의 폼에 panel를 써서 프로그램 실행되는 도중에 쓰이는 각종 에러 메세지

    > 를 나타내고자 합니다.

    >

    > 가령 form1,form2,form3.... 이 있고 각 폼에는 panel_err 이라는 panel이

    > 존재합니다.

    > 이 panel에 나타낼 메세지를 모듈을 써서 구현하려고 하는데

    > 모듈에 다음과 같이 기술하면

    > case error

    > 1: panel_err.caption := '자료를 찾지못했습니다.'

    > 2: panel_err.caption := '자료를 찾았습니다.'

    > .

    > .

    > .

    > panel_err이 선언되지 않았다고 나타나더군요

    > 물론 user 절에 모듈을 선언하였고요.

    >

    > 읽어주셔서 고맙고요

    > 좋은 답변 기다리겠습니다.

    >