erp系统,把模块做成单独的exe文件,但只能登陆一次,每个exe就可以在程式内调用,怎么弄,有例子最好,谢谢了(50分)

erp系统,把模块做成单独的exe文件,但只能登陆一次,每个exe就可以在程式内调用,怎么弄,有例子最好,翻了好多资料,查不出来,谢谢了

我有见过别人公司的系统,也是这样子的,只登陆一次就好了,有好几十个exe,不知道怎么弄的

把Exc加上OLE自动化<br>就可以用其它程序调用了

最好是你的exe文件由主窗体调用啊 <br>你在调用的时候传递参数进去啊

把Exc加上OLE自动化<br>就可以用其它程序调用了 &nbsp; &nbsp;这个完全不懂<br><br>最好是你的exe文件由主窗体调用啊 <br>你在调用的时候传递参数进去啊 &nbsp; 怎么传啊,有例子没

再说清楚一点,如果用 人事.exe 登陆了,用的用户名 &nbsp;'张三'<br>我后面的 &nbsp;仓库.exe 进入时就不用再登陆 &nbsp; 直接显示的用户就是 '张三'<br>怎么弄

没弄清你的主题到底是什么意思

你再做一个EXE，从数据库中把用户用到的 所有EXE显示在这个EXE上，选择进入就行了！

这不是和数据库有关吗,做个标记不就可以吗

可以把每个模块做成dll呀，主程序是一个exe，但只是个Shell，真正办事情的是各个DLL。

我们使用的ERP软件，是把各模块做成 .dll文件，主模块做成 .exe 文件。<br>主模块登陆后，其他模块就直接应用了。具体怎么调用的我也不清楚。

参数调用Exe，用友是这么调用的。

参数调用，例如： &nbsp;winexec(Pchar('a.exe username='user1''),sw_normal);<br>大体这样子，嗬嗬，具体忘记了

好几种方式可以实现<br>1.dll共响内存<br>2.bpl共响公共变量<br>3.调用exe时加参数

我这有个相似的例子，不知道对你是否有帮助，本人借鉴了他人的方法，就在在一个程序里向另一个程序发送参数，程序如下：<br>首先要声明：<br>hMapFile: THandle;<br>MapFilePointer: Pointer;<br>在什么地方（每个程序里）调用都要声明，可以不是全局参;<br><br>hMapFile := CreateFileMapping ($FFFFFFFF, nil, page_ReadWrite, 0,10000,'ctaxp'); // 文件名<br> &nbsp;if hMapFile &lt;&gt; 0 then MapFilePointer := MapViewOfFile(hMapFile,File_Map_All_Access,0, 0, 0);<br> &nbsp;StrCopy (PChar (MapFilePointer),PChar ({我在这里用的是一个全局变量，存放操作员的权限}));//写入内存<br> &nbsp; &nbsp;self.Close;<br> &nbsp; &nbsp;Application.Terminate;<br> &nbsp; &nbsp;winexec(pchar('{我的另一个程序}'),SW_ShowNormal);<br><br>　以上代码我是用在一个按扭onclick事件中的，你可以把它做成一个过程，具体的你自己做，呵呵。<br><br>下面的代码是在我运行的另一个程序里的(调用时的代码)。<br>首先要声明一个变量用来存放读取的参数，<br>//以下代码我放在FormCreate里面。你也可以不用下面的ss 局变，而用一个其它的全局参来代替。一样也要先声明hMapFile: THandle; MapFilePointer: Pointer;，我是放在private里的<br><br>var ss:string;<br>begin<br> &nbsp;hMapFile := CreateFileMapping ($FFFFFFFF, nil, page_ReadWrite, 0,10000,'ctaxp'); // 文件名,其中ctaxp就是一个代号，和上面的要一样<br> &nbsp;if hMapFile &lt;&gt; 0 then MapFilePointer := MapViewOfFile(hMapFile,File_Map_All_Access,0, 0, 0);<br>ss:=PChar(MapFilePointer);<br>.......此处代码略<br>end;

以上通过对指定内存的读取来进行程序间的参数传递，希望楼主能用得上，有问题继续交流

使用共享内存，楼上的方法是一个好方法。

多謝了,已ok,前段沒時間看,一拖就是3個月