var
    A : array[0..1024] of Char;
    szPath: String;
begin
    szPath := ExtractFileDir(Application.ExeName);
    if Sender = Menu1 then
        szPath := szPath + 'Child1.EXE '
    else if Sender = Menu2 then
        szPath := szPath + 'Child2.EXE '
    else if Sender = Menu3 then
        szPath := szPath + 'Child3.EXE '
          .....
     StrPCopy(A, szPath);
     WinExec(A, SW_SHOWNORMAL);
end;

解决方案 »

  1.   

    把各自的程序做成dll,提供统一的调用接口
      

  2.   


    COM、DCOM、COM+,就是这样了!
      

  3.   

    用dll和包有一个问题:如果这个包里启动线程实例会报错!不知各位是否有过体会?
    我现在一直被这个问题困扰,希望各位大虾讨论讨论!
      

  4.   

    to zengyufeng(御风) 
    dll连接,问题是这个计算机怎么调用另一计算机的dll,请讲明些好吗
      

  5.   

    dll当然都在本地,怎么可能去调用另一台机器里的dll呢。既然是一个软件没理由把它分成几部分放到几个机器里啊。
      

  6.   

    to zengyufeng(御风) 
    对不起,问题是这样的,一个大系统分几个人在几台计算机上完成,要问的是在主系统机上怎么调用其它计算机上的子系统程序,需通过什么方法。
      

  7.   

    dll是可以指定路径的哪个说远程的不能调用?
      

  8.   

    to Nizvoo(瓦匠泥),照您的意思,每个子系统的机器都开个共享目录了?这样干法,怎么看怎么不像个程序员干的!to hgj1229(),写一个简单的Socket通讯借口吧,子系统和主系统通过Socket进行参数传递和数据返回