使用BCB開啟EXE執行檔http://delphi.ktop.com.tw/board.php?cid=168&fid=914&tid=97158 |
|
boss.tw
高階會員 ![]() ![]() ![]() ![]() 發表:15 回覆:109 積分:194 註冊:2005-05-17 發送簡訊給我 |
目的:回覆 http://delphi.ktop.com.tw/board.php?cid=168&fid=914&tid=97158
使用BCB開啟EXE執行檔 [code cpp] //--------------------------------------------------------------------------- #include #include #pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { HANDLE hProg; int ret = 0; AnsiString exePath = Application->ExeName; spawnl(P_WAIT, exePath.c_str(), exePath.c_str(), "", "", NULL); } //--------------------------------------------------------------------------- [/code] |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |