Q&A

  • Ms-Word Viewer작성하고 싶은데~~
제가 MS-WORD VIEWER를 작성하고 싶습니다. 그러니까 *.DOC 문서화일을 불러와서 보기와 프린터만 되게 하려고 하는데 예제나 하는 방법 좀 부탁드립니다. 고수님들 도와주세요~~

1  COMMENTS
  • Profile
    정성훈 2001.06.27 18:11
    다롱이 wrote:

    > 제가 MS-WORD VIEWER를 작성하고 싶습니다. 그러니까 *.DOC 문서화일을 불러와서 보기와 프린터만 되게 하려고 하는데 예제나 하는 방법 좀 부탁드립니다. 고수님들 도와주세요~~



    퀵리포트에다가 RichEdit 컴퍼넌트를 놓으시구 불러오면 될듯 싶네요.



    //== 퀵 리포트

    procedure TViewF.FormShow(Sender: TObject);

    begin

    RichEdit1.Lines.LoadFromFile( '불러올파일.doc' )

    end;



    //=== 메인화면

    procedure TMainF.Button1Click(Sender: TObject);

    begin

    try

    ViewF := TViewF.Create( Application );

    if ID_YES = Application.MessageBox( '미리보기를 실행할까요?','확인',MB_YESNO+MB_ICONQUESTION ) then ViewF.QuickRep1.Preview

    else ViewF.QuickRep1.Print;

    finally

    ViewF.Free;

    end;

    end;