怎么样用个主窗体调用其它project(216分)

  • 主题发起人 主题发起人 iceprin1
  • 开始时间 开始时间
I

iceprin1

Unregistered / Unconfirmed
GUEST, unregistred user!
几个小的project都能单独运行,要建个主窗体来调 用他们,生成一个程序
怎么做,要用到些语句!谢谢!
 
用 WinExec API函数来启动它们

Declare Function WinExec Lib "kernel32" Alias "WinExec" (ByVal lpCmdLine As String, ByVal nCmdShow As Long) As Long
 
winexec函数。 还有一个启动函数忘了。。
 
详细点好吗?
 
可以用
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;
 
后退
顶部