Q&A

  • 외부 프로그램 열어주기
질문있슴당
꼭 리뿔 달아주세요

제가 그동안 짜논 프로그램들을
하나의 프로그램에서 버튼을 통해 실행하려고 합니다.
여러가지 설문 조사 프로그램들이 있는데
너무 산만하게 단축아이콘으로 바탕화면에서 있어서
메뉴얼화 하라고 누가 그러더군요
폼 하나 만들어서 버튼 여러개 달아서
각각의 버튼 클릭하면 각각의 프로그램이 실행되도록 하려구여
그러니까 제가 그동안 짠 프로그램이 외부 프로그램이 되구
새로 짠 버튼 폼에서 불러서 쓰는건뎅...

제가 잘 설명하고 있는거져????
근데 방법으로 몰겠어여
알켜 주심 저엉말 감사스릴께요
꼭 꼭 꼭 리뿔달아주세요~
2  COMMENTS
  • Profile
    델파이탐크루즈 2002.01.24 23:11
    버튼클릭 부분에서
    Api함수를 보시면 WinExec놈이 있습니다.

    WinExec(pChar(GetProcDir+'???.exe'),SW_SHOW);

    게 하시면 되겠죠...

    샬롬...
      

  • Profile
    천상천하 2002.01.24 23:07
    uses  ShellAPI

    var
      Print_Handle : HWND;
           :
           :


         if FileExists('c:notepad.exe') then
         begin
              Print_Handle := Findwindow('notepad폼name', nil);

              if Print_Handle <> 0 then
                 SetForeGroundWindow(Print_Handle)
              else
                  WINEXEC(PCHAR('notepad.exe'),SW_SHOW);
         end else
             MessageDlg('프로그램을 찾을 수 없습니다.', mtinformation, [mbOK], 0);


    이런식으로 하면 됩니다.

    해당 프로그램이 존재하는지 알아보고, 해당 프로그램의 메인폼으로

    프로그램이 실행중인지 알아보고, 실행중이면 화면을 앞으로....

    실행되지 않았으면 실행을 시킵니다.

    실행시키고자 하는 프로그램의 폼Name은 WinSight32 나 Ms 쪽의

    Spy 프로그램을 이용하면 됩니다.

    나머지 궁금한 점이 있으면 예전계시판에서 검색하시면 많은 답변

    얻을 수 있습니다.

    즐거운 하루 보내세요,..