ISAPI中如何使用多執行緒 |
尚未結案
|
kulius
一般會員 發表:13 回覆:23 積分:17 註冊:2002-03-15 發送簡訊給我 |
各位大大好
小弟試了許多一直發生錯誤才來這請教
下列程式是可以執行的,但在二人同時存取時,會在Report1.LoadFromFile及Report1.PrepareReport卡住,所以才想使用多執行緒,試了許久還是不行,小弟袛會最基本的EXCUTE,在ISAPI中執行多執行緒要注意哪些事項 procedure TWebModule1.WebModule1WebActionItem8Action(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
LoadSys(Request.Query);
if Report1.LoadFromFile(ReportPath '\Design\HIT預算總表.frf') then begin
BebingWebString; //載入相關參數
ReportName := '預算總表' AInput[0] '.frp';
ReportDir := '預算表';
if Report1.PrepareReport then begin
Report1.SavePreparedReport(ReportPath '\' ReportDir '\' ReportName);
Response.Content := PageProducer1.Content;
end;
end;
end;
|
pcplayer99
尊榮會員 發表:146 回覆:790 積分:632 註冊:2003-01-21 發送簡訊給我 |
引言: 各位大大好 小弟試了許多一直發生錯誤才來這請教 下列程式是可以執行的,但在二人同時存取時,會在Report1.LoadFromFile及Report1.PrepareReport卡住,所以才想使用多執行緒,試了許久還是不行,小弟袛會最基本的EXCUTE,在ISAPI中執行多執行緒要注意哪些事項 procedure TWebModule1.WebModule1WebActionItem8Action(Sender: TObject; Request: TWebRequest; Response: TWebResponse; var Handled: Boolean); begin LoadSys(Request.Query); if Report1.LoadFromFile(ReportPath '\Design\HIT預算總表.frf') then begin BebingWebString; //載入相關參數 ReportName := '預算總表' AInput[0] '.frp'; ReportDir := '預算表'; if Report1.PrepareReport then begin Report1.SavePreparedReport(ReportPath '\' ReportDir '\' ReportName); Response.Content := PageProducer1.Content; end; end; end;你的REPORT是什么元件?FASTREPORT? |
kulius
一般會員 發表:13 回覆:23 積分:17 註冊:2002-03-15 發送簡訊給我 |
|
Ktop_Robot
站務副站長 發表:0 回覆:3511 積分:0 註冊:2007-04-17 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |