Q&A

  • 하얀까마귀님께 [MDI 폼 에서 전역변수 선언을 ...]다시 한번 자세히...
하얀 까마귀님 안녕하세요?

귀하께서 가르커 주신 방법을 DataModule에선언 및 타입부분에 선언 하는 방법을

시도 하였으나 실패했습니다.제가 사용하는 버전은 4.0 입니다.

관련서적을 및 delphi help의 DataModule도 보았으나 이해가 잘 되지않슴니다.

저는

첫번째 메뉴바의 프로젝트의 Add New Project를선택 하여 DataModule을 선택 하였

지만 어떻게 하는지 알수가 없었습니다.

두번째. 타입 부분의 선언 방법에 관 하여...

메인폼의 타입 및 퍼블릭 부분에 변수명(어레이)을 선언하였지만 다른폼에서 변수를

인식하지 않습니다.

죄송하지만 구체적으로 가르켜 주시면 감사하겠습니다.

여러 사람들의 질문에도 답변을 많이 하시는데 귀찮게 하여드려 죄송합니다.

.

2  COMMENTS
  • Profile
    cos 2000.05.09 07:28
    장형욱 wrote:

    > 하얀 까마귀님 안녕하세요?

    > 귀하께서 가르커 주신 방법을 DataModule에선언 및 타입부분에 선언 하는 방법을

    > 시도 하였으나 실패했습니다.제가 사용하는 버전은 4.0 입니다.

    > 관련서적을 및 delphi help의 DataModule도 보았으나 이해가 잘 되지않슴니다.

    > 저는

    > 첫번째 메뉴바의 프로젝트의 Add New Project를선택 하여 DataModule을 선택 하였

    > 지만 어떻게 하는지 알수가 없었습니다.

    > 두번째. 타입 부분의 선언 방법에 관 하여...

    > 메인폼의 타입 및 퍼블릭 부분에 변수명(어레이)을 선언하였지만 다른폼에서 변수를

    > 인식하지 않습니다.

    > 죄송하지만 구체적으로 가르켜 주시면 감사하겠습니다.

    > 여러 사람들의 질문에도 답변을 많이 하시는데 귀찮게 하여드려 죄송합니다.

    > .



    전역변수 편하게 쓰고 싶으시면...



    Unit MyVar;

    interface

    var

    one, two, three : integer;

    implemetation

    end.



    이렇게 하고.. 이걸쓰고자 하는 모듬폼의 uses 에 포함시키기만 하면 됩니다.

    펑션이나 프로시져도 interface 밑에다 정의하고.. 내용은..

    implemetaion 밑에다가 넣어주면 됩니다....



  • Profile
    DelChobo 2000.05.09 03:35
    장형욱 wrote:

    > 하얀 까마귀님 안녕하세요?

    > 귀하께서 가르커 주신 방법을 DataModule에선언 및 타입부분에 선언 하는 방법을

    > 시도 하였으나 실패했습니다.제가 사용하는 버전은 4.0 입니다.

    > 관련서적을 및 delphi help의 DataModule도 보았으나 이해가 잘 되지않슴니다.

    > 저는

    > 첫번째 메뉴바의 프로젝트의 Add New Project를선택 하여 DataModule을 선택 하였

    > 지만 어떻게 하는지 알수가 없었습니다.

    > 두번째. 타입 부분의 선언 방법에 관 하여...

    > 메인폼의 타입 및 퍼블릭 부분에 변수명(어레이)을 선언하였지만 다른폼에서 변수를

    > 인식하지 않습니다.

    > 죄송하지만 구체적으로 가르켜 주시면 감사하겠습니다.

    > 여러 사람들의 질문에도 답변을 많이 하시는데 귀찮게 하여드려 죄송합니다.

    > .



    꼭 DataModule이 아니어도 관계없습니다.

    보통 공통으로 사용하시는 전역변수, 상수, 함수 등을 한 유닛안에 많이 모아두는데

    그 유닛의 Implement구절 전에 전역변수 선언이 되면 되고

    그 전역변수를 사용하실때는 implement구절 아래던가 아니면 상단의 uses절에만

    유닛화일명 이름을 적어주시고 사용하시면 됩니다.

    uses Unit1;



    Type 절 pulbic 구문에 사용하실때는

    Type TForm1 = class(TForm)

    ...

    public

    ss : integer;

    end;

    var Form1 : TForm1;



    로 선언하시면 되고 이 ss변수를 다른 유닛에서 사용하실때는

    역시 위와 마찬가지로 uses절에 추가하시고

    From1.ss := 10;

    과 같이 사용하시면 됩니다.



    즐코하세요 ^.^