isapi 中的等待问题 救命!!!!!(100分)

  • 主题发起人 主题发起人 bell
  • 开始时间 开始时间
B

bell

Unregistered / Unconfirmed
GUEST, unregistred user!
小弟在做一 isapi 在用户提交请求后
要等待其他处理的完成,在返回信息,如下:
procedure TWebModule1.WebModule1WebActionItem1Action(Sender: TObject;
Request: TWebRequest;
Response: TWebResponse;
var Handled: Boolean);
begin

tncnx1.connect//tncnx1控件完成其他处理
//tncnx1有事件处理程序.需接受消息.
这需要代码等待 tncnx1 处理完成.
response.concent:='<html>........
.........
end;
等待的代码,不能用
while truedo
begin
processmessage //isapi 没有
end;
该怎样写?
谢谢各位大虾,焦急的等待您的回信.
 
不知用sleep(number_of_milliseconds)可以不?
 
另外,如果你在程序的uses里加上Forms,Forms.Application.Processmessages就
可以用了,webApplication里也有Application这个对象,故引用时加上单元名称。
 
谢谢houyg大虾,先说明 sleep() 不行.
因为实在主进程中sleep(),使这一程序的其他部分
也不接受消息了.其结果同 while turedo
begin
end;
一样.
至于加上 form单元, 在 d3 Web application object
中,有个 warning :不让加,这样做有什麽麻烦吗?
 
d3 help 中 web application object 项
 
它的意思是说二者的名字相同,在引用时容易引起错误,不过在Application前面加上
它所在的单元名称,比如Forms.Application应当没问题,我以前试过。您可以测试
一下再看。
 
Application.ProcessMessage 不行吗?
 
thanks a lot
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
后退
顶部