WideStudio/MWT Programming Guide	WideStudio/MWT Index Table of contents

---

파일 선택 대화 상자

---

파일 선택 대화 상자의 표시

파일 선택 대화 상자의 사용봅을 보아봅시다. 파일 선택 대화상자같은 대화 상자에 관에서는 변리한 표시 메서드 popup 가 마련되여있습니다.

[파일 선택 대화 상자]

popup 메서드는 대화 상자를 표시할 뿐만아니라 오퍼레이터가 OK나 취소등을 선택한 결과를 함수 복귀로 돌려줍니다. 따라서 함수를 불러놓는것만으로 대화 상자의 표시부터 대화 상자의 종료한 시점의 선택결과의 취득을 실행할수 있습니다. 파일 선택 대화 상자나 메시지 대화 상자에 관하여 실제의 샘플프로그램을 보아봅시다.

(*----------------------------------------------------------*)
(*Function for the event procedure                          *)
(*----------------------------------------------------------*)
open Swig
open Mwt
open Mwtlib

let btnep2 obj =
  (* 한 응용프로그램에 따라 한개가 미리 마련되여있습니다. *)
  (* 파일 선택 대화 상자의 인스턴스를 접근(access)합니다. *)
  let fs = _WSGIappFileSelect '() in                           (* A *)
  fs->setProperty("maskFileName","ml");                        (* B *)
  fs->setProperty("defaultPosition",_True);                    (* C *)
  let ret = fs->popup() in                                     (* D *)

  (* 한 응용프로그램에 따라 한개가 미리 마련되여있는 *)
  (* 메시지 대화 상자의 인스턴스를 취득합니다.       *)
  let msg = _WSGIappMessageDialog '() in                       (* E *)
  msg->setProperty("width",500);                               (* F *)
  msg->setProperty("height",120);                              (* G *)
  msg->setProperty("defaultPosition",_True);                   (* H *)

  if get_int ret = get_int _WS_DIALOG_OK then begin            (* I *)
    let str = get_string(fs->getFileName()) ^ "  가 선택되였습니다." in
    ignore(msg->setProperty("labelString",(make_string(str))));
    ignore(msg->popup());
  end else
  if get_int ret = get_int _WS_DIALOG_NO then begin            (* J *)
    ignore(msg->setProperty("labelString","선택안되였습니다."));
    ignore(msg->popup());
  end else
  if get_int ret = get_int _WS_DIALOG_CANCEL then begin        (* K *)
    ignore(msg->setProperty("labelString","The selection is canceled."));
    ignore(msg->setProperty("labelString","선택은 취소되였습니다."));
    ignore(msg->popup());
  end;

  ()
let _ = Callback.register "btnep2" btnep2

(A)에서 전역 인스턴스 접근 함수를 사용하여 파일 선택 대화상자의 전역 인스턴스에 접근합니다. 파일 선택 대화 상자등의 클래스에는 미리 언제든지 사용할수 있는 전역 인스턴스가 하나 마련되여있습니다. 그래서 전역 인스턴스 접근 함수에 의하여 접근할수 있도록 되여있습니다.

(B),(C)로 속성을 설정해서 (D) 로 대화 상자를 표시상태로 합니다. 실제로 선택이 실행되면 popup 메서드가 복귀해옵니다.

파일 선택 대화 상자의 선택결과를 메시지 대화 상자를 사용해서 표시하도록 합시다. (E),(F),(G),(H)에서 메시지 대화 상자의 전역인스턴스를 취득해서 속성을 설정합니다.

(I) 에서는 선택된 파일을 메시지 문자열로 표시합니다. (J) 는 파일 선택이 없었던 내용을 메시지 문자열로 표시합니다. (K) 에서는 취소된 내용을 메시지 문자열로 표시합니다.