P
peterwangjunyi
Unregistered / Unconfirmed
GUEST, unregistred user!
我在clientsock 的 disconnect 中加入下列代码后
if normaldisconnected=false then //非正常断开
begin
while ((Timer_ctrlnormaldisconnected.Enabled=true)and(connectstatus=false)) do
begin
linkserver(serverip);//连接服务器
end;
if connectstatus then
begin
login_form.progarmformating;//程序初始化
end;
end
else
begin
login_form.progarmformating;
end;
运行程序出现stack overflow 的错误，还请大侠指教
if normaldisconnected=false then //非正常断开
begin
while ((Timer_ctrlnormaldisconnected.Enabled=true)and(connectstatus=false)) do
begin
linkserver(serverip);//连接服务器
end;
if connectstatus then
begin
login_form.progarmformating;//程序初始化
end;
end
else
begin
login_form.progarmformating;
end;
运行程序出现stack overflow 的错误，还请大侠指教