I iceprin1 Unregistered / Unconfirmed GUEST, unregistred user! 2006-06-24 #1 几个小的project都能单独运行,要建个主窗体来调 用他们,生成一个程序 怎么做,要用到些语句!谢谢!
K kinneng Unregistered / Unconfirmed GUEST, unregistred user! 2006-06-24 #3 用 WinExec API函数来启动它们 Declare Function WinExec Lib "kernel32" Alias "WinExec" (ByVal lpCmdLine As String, ByVal nCmdShow As Long) As Long
用 WinExec API函数来启动它们 Declare Function WinExec Lib "kernel32" Alias "WinExec" (ByVal lpCmdLine As String, ByVal nCmdShow As Long) As Long
D duhai_lee Unregistered / Unconfirmed GUEST, unregistred user! 2006-06-24 #4 winexec函数。 还有一个启动函数忘了。。
C cdj000 Unregistered / Unconfirmed GUEST, unregistred user! 2006-06-24 #6 可以用 procedure TForm1.Button1Click(Sender: TObject); begin WinExec('c:/Test.exe',SW_SHOWNORMAL); end; 还可以用 uses ShellAPI; procedure TForm1.Button1Click(Sender: TObject); begin ShellExecute(Handle, 'open', PChar('c:/test/app.exe'), nil, nil, SW_SHOW); end;
可以用 procedure TForm1.Button1Click(Sender: TObject); begin WinExec('c:/Test.exe',SW_SHOWNORMAL); end; 还可以用 uses ShellAPI; procedure TForm1.Button1Click(Sender: TObject); begin ShellExecute(Handle, 'open', PChar('c:/test/app.exe'), nil, nil, SW_SHOW); end;