如何解决WIN98中的stack overflow问题?

Question

我在win2000下开发的程序在98中运行时发生stack overflow(栈溢出)问题,如何解决此问题?请教各位大侠.

Answer 1

代码如下:
procedure TForm1.N6Click(Sender: TObject);
begin
if application.MessageBox('真的要退出系统吗?','提示窗口',
mb_iconquestion+mb_yesno+mb_defbutton2)=6 then
begin
adoconnection1.Connected:=false;
form12.ADOConnection1.Connected:=false;
close;
Application.Terminate;
end;
end;

Answer 2

close或者Application.Terminate;去掉试试还有这段代码的逻辑最好放在CloseQuery里面，设置CanClose决定是否关闭窗口而N6Click只需要一句close就可以了