B
boysunsight
Unregistered / Unconfirmed
GUEST, unregistred user!
不知道怎么描述问题，把代码贴出来，
library PDocUpdate;
uses
SysUtils,
Classes,
Forms,
do
cUpdate in 'DocUpdate.pas' {FormDocUpdate};
{$R *.res}
functiondo
cupdate(databaseinfo
Char):boolean;stdcall;
begin
databaseinfor:=databaseinfo;
Application.Initialize;
Application.CreateForm(TFormDocUpdate, FormDocUpdate);
Application.Run;
FormDocUpdate.Release;
Result:=UpdateResult;
end;
exports
do
cupdate;
begin
end.
用第三方工具编写的EXE程序第一次调用这个DLL的时候，没有问题，但是在这个EXE程序不退出的情况下，第二次运行DLL文件，就提示“内存不能read”的问题，我觉的是在EXE运行的时候DLL就一直在内存了，然后在第二次调用DLL时，又运行
Application.Initialize;
Application.CreateForm(TFormDocUpdate, FormDocUpdate);
Application.Run;
所以内存冲突，请高手指教，分不够可以加。
library PDocUpdate;
uses
SysUtils,
Classes,
Forms,
do
cUpdate in 'DocUpdate.pas' {FormDocUpdate};
{$R *.res}
functiondo
cupdate(databaseinfo
Char):boolean;stdcall;begin
databaseinfor:=databaseinfo;
Application.Initialize;
Application.CreateForm(TFormDocUpdate, FormDocUpdate);
Application.Run;
FormDocUpdate.Release;
Result:=UpdateResult;
end;
exports
do
cupdate;
begin
end.
用第三方工具编写的EXE程序第一次调用这个DLL的时候，没有问题，但是在这个EXE程序不退出的情况下，第二次运行DLL文件，就提示“内存不能read”的问题，我觉的是在EXE运行的时候DLL就一直在内存了，然后在第二次调用DLL时，又运行
Application.Initialize;
Application.CreateForm(TFormDocUpdate, FormDocUpdate);
Application.Run;
所以内存冲突，请高手指教，分不够可以加。