level 8
有些时候进程无法退出,具体原因未定位,有什么方向去定位
现在是在主窗口添加close
2021年02月02日 04点02分
1
level 12
是不是有线程没有退出,每个单元Finalization是不是什么处理有异常;
强制退出可以用ExitCode(0);但是并不建议这样做;
2021年02月02日 11点02分
3
initialization RegisterClass(TXS_Frm); finalization UnregisterClass(TXS_Frm);
2021年02月02日 15点02分
子窗口都是动态注册。
2021年02月02日 15点02分
使用application.terimate 会不会比close好点
2021年02月02日 15点02分
@金陵十三猜 Application.Terminate;跟主窗口Close差别不大,除非你的程序是阻塞在窗体的OnClose或OnDestory里面了;
2021年02月03日 03点02分
level 6
如果不是赶工,建议努力去找找哪里出了问题。否则,可以试试我以下的函数代替你的 Close:
procedure ForceClose();
var
handle:THandle;
begin
handle := GetCurrentProcess();
if(handle <> 0)then
TerminateProcess(handle, 0);
end;
2021年02月24日 11点02分
4
level 7
关闭之前把需要保存的保存好,怎么退出都行,就当杀进程了
2021年02月26日 01点02分
5