procedure TForm1.doExec(fPath:string); begin //--- 執行外部程式( 依系統已設定之連結開啟) ShellExecute(Handle, 'open', PChar(fPath),nil, nil, SW_SHOW); end; ...
確定! 回上一頁