제가 해본 건데요.. window2000에서는 잘되는데 서버에서는 안되네여..
어떻게 해야 되는지 가르쳐 주세여
program shellexe;

uses
  Windows,Messages,ShellAPI;

procedure OpenObject( sObjectPath : string );  //외부프로그램을 찾아서 실행시키기
begin
  ShellExecute( 0, Nil, PChar( sObjectPath ),
                 Nil, Nil, SW_NORMAL );
end;

procedure closeObject(); //외부프로그램 끄기다.. 보통 그파일의 확장명이 handle이다..
var
hd: hWnd;
begin
  hd := FindWindow( nil,'tll'); //(class name, windows name)을 적는다..
  SendMessage(hd, wm_Close, 0, 0); //(HWND,UINT,WPARAM,LPARAM)->핸드러,명령,첫번째파라메터,두번째파라메터
end;

begin
  closeObject();
  OpenObject('c:\test.txt');
end.