線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1307
推到 Plurk!
推到 Facebook!

Delphi 2010 執行外部程式問題

答題得分者是:cancer
n4chen
一般會員


發表:9
回覆:7
積分:3
註冊:2011-05-12

發送簡訊給我
#1 引用回覆 回覆 發表時間:2011-05-14 14:14:13 IP:59.104.xxx.xxx 訂閱
 Hi  我是Delphi 初學者
我有學過一些VB
先看一下圖


請問上圖是神麼意思 我不太懂英文

unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
T執行外部程式 = class(TForm)
Label1: TLabel;
執行: TButton;
procedure 執行Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
執行外部程式: T執行外部程式;
implementation
{$R *.dfm}
uses
ShellAPI;
procedure T執行外部程式.執行Click(Sender: TObject);
begin
ShellExecute(handle, 'open', 'calc.exe', nil, nil, SW_SHOWNORMAL)
end;
end.
編輯記錄
n4chen 重新編輯於 2011-05-14 00:16:43, 註解 無‧
n4chen 重新編輯於 2011-05-14 00:16:44, 註解 無‧
n4chen 重新編輯於 2011-05-14 00:17:18, 註解 無‧
n4chen 重新編輯於 2011-05-14 02:21:08, 註解 無‧
cancer
高階會員


發表:58
回覆:319
積分:190
註冊:2004-07-31

發送簡訊給我
#2 引用回覆 回覆 發表時間:2011-05-16 09:04:24 IP:220.128.xxx.xxx 未訂閱
Hello, 我想您開錯專案類型了,[Warning]的地方有寫 Package1,您開了 Package 專案,要開 .exe 才行,開專案選 ....Application 就 OK。
n4chen
一般會員


發表:9
回覆:7
積分:3
註冊:2011-05-12

發送簡訊給我
#3 引用回覆 回覆 發表時間:2011-05-17 22:31:42 IP:203.70.xxx.xxx 訂閱
 喔 感謝    原來我用錯專案了

procedure TForm1.Button1Click(Sender: TObject);
var
nullh: HWND;
begin
ShellExecute(nullh, 'open', Pchar(Edit1.Text), nil, nil, SW_SHOWNORMAL)
end;
編輯記錄
n4chen 重新編輯於 2011-05-17 08:37:52, 註解 無‧
系統時間:2024-03-29 6:47:57
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!