關於 SHOWMODAL |
|
尚未結案
|
|
QOO10
初階會員   發表：59 回覆：89 積分：29 註冊：2002-12-25 發送簡訊給我 |
請教各位高手我明明有設 Visible is true 但為何還是有如下
錯誤 'Cannot make a visible window modal' !!是否還有其他原
因??謝謝?? try
try
FSLS_DOClose:=TFSLS_DOClose.create(nil);
FSLS_DOClose.visible:=true;
FSLS_DOClose.ShowModal;
except
ts_syserror('CREATE FROM ERROR [DOCLOSE]');
end;
finally
FreeAndNil(FSLS_DOClose);
end;
|
|
chih
版主 發表：48 回覆：1186 積分：639 註冊：2002-04-02 發送簡訊給我 |
|
|
QOO10
初階會員 發表：59 回覆：89 積分：29 註冊：2002-12-25 發送簡訊給我 |
|
|
chih
版主 發表：48 回覆：1186 積分：639 註冊：2002-04-02 發送簡訊給我 |
|
|
QOO10
初階會員 發表：59 回覆：89 積分：29 註冊：2002-12-25 發送簡訊給我 |
引言: Project裡面要先有一個FSLS_DOClose的Form喔..引言:有ㄚ且會 SHOW 出但有 EXCEPTION ??引言: FSLS_DOClose.visible:=true; 這一句拿掉就OK了謝謝您!!但是拿掉還是不行 |
|
chih
版主 發表：48 回覆：1186 積分：639 註冊：2002-04-02 發送簡訊給我 |
FSLS_DOClose不要設為AutoCreate..
我開了二個新Form
procedure TForm1.Button1Click(Sender: TObject);
begin
try
try
Form2:=TForm2.create(nil);
Form2.ShowModal;
except
SHOWMESSAGE('CREATE FROM ERROR [DOCLOSE]');
end;
finally
FreeAndNil(Form2);
end;
end;
這樣子開Form2不會有錯誤ㄋ..不知道你的FSLS_DOClose裡面有做了什麼
|
|
P.D.
版主  發表：603 回覆：4038 積分：3874 註冊：2006-10-31 發送簡訊給我 |
引言: 請教各位高手我明明有設 Visible is true 但為何還是有如下 錯誤 'Cannot make a visible window modal' !!是否還有其他原 因??謝謝?? try try FSLS_DOClose:=TFSLS_DOClose.create(nil); FSLS_DOClose.visible:=true; FSLS_DOClose.ShowModal; except ts_syserror('CREATE FROM ERROR [DOCLOSE]'); end; finally FreeAndNil(FSLS_DOClose); end;查一下你的FSLS_DOClose中的oncreate event中是否有寫到任何setfocus的語法 如果有, 拿到 onactive 上就不會有錯誤了! |
|
QOO10
初階會員 發表：59 回覆：89 積分：29 註冊：2002-12-25 發送簡訊給我 |
引言: FSLS_DOClose不要設為AutoCreate.. 我開了二個新Form procedure TForm1.Button1Click(Sender: TObject); begin try try Form2:=TForm2.create(nil); Form2.ShowModal; except SHOWMESSAGE('CREATE FROM ERROR [DOCLOSE]'); end; finally FreeAndNil(Form2); end; end; 這樣子開Form2不會有錯誤ㄋ..不知道你的FSLS_DOClose裡面有做了什麼原本此功能是OK的但因規格變動不要 CHEQUE AMOUNT 欄,我怕客戶後悔所 以我只將此欄之 VISIBLE 設成 FALSE 從此惡夢就來了 |
|
chih
版主 發表：48 回覆：1186 積分：639 註冊：2002-04-02 發送簡訊給我 |
|
|
T.J.B
版主 發表：29 回覆：532 積分：497 註冊：2002-08-14 發送簡訊給我 |
引言:引言: FSLS_DOClose不要設為AutoCreate.. 我開了二個新Form procedure TForm1.Button1Click(Sender: TObject); begin try try Form2:=TForm2.create(nil); Form2.ShowModal; except SHOWMESSAGE('CREATE FROM ERROR [DOCLOSE]'); end; finally FreeAndNil(Form2); end; end; 這樣子開Form2不會有錯誤ㄋ..不知道你的FSLS_DOClose裡面有做了什麼原本此功能是OK的但因規格變動不要 CHEQUE AMOUNT 欄,我怕客戶後悔所 以我只將此欄之 VISIBLE 設成 FALSE 從此惡夢就來了
------
天行健 君子當自強不息~~@.@ |
|
pgdennis
資深會員 發表：41 回覆：526 積分：443 註冊：2002-05-23 發送簡訊給我 |
引言: 請教各位高手我明明有設 Visible is true 但為何還是有如下 錯誤 'Cannot make a visible window modal' !!是否還有其他原 因??謝謝?? try try FSLS_DOClose:=TFSLS_DOClose.create(nil); FSLS_DOClose.visible:=true; FSLS_DOClose.ShowModal; except ts_syserror('CREATE FROM ERROR [DOCLOSE]'); end; finally FreeAndNil(FSLS_DOClose); end;其實我也愈過這個問題說....我是呼叫form1:=Tform.create(nil); 就會show出來了,如果後面再加form1.show或form1.showmodal則會出現 qoo1234遇到的問題....當然我的form1是local var..Tform這個UNIT也 沒有放在auto-create中執行.. 更測的是...只有這個form1才會發生這種錯誤..接下來寫新的form..就不會有問題了...
------
星期一,二...無窮迴圈＠＠ |
|
QOO10
初階會員 發表：59 回覆：89 積分：29 註冊：2002-12-25 發送簡訊給我 |
引言:引言:謝謝各位!!引言: FSLS_DOClose不要設為AutoCreate.. 我開了二個新Form procedure TForm1.Button1Click(Sender: TObject); begin try try Form2:=TForm2.create(nil); Form2.ShowModal; except SHOWMESSAGE('CREATE FROM ERROR [DOCLOSE]'); end; finally FreeAndNil(Form2); end; end; 這樣子開Form2不會有錯誤ㄋ..不知道你的FSLS_DOClose裡面有做了什麼原本此功能是OK的但因規格變動不要 CHEQUE AMOUNT 欄,我怕客戶後悔所 以我只將此欄之 VISIBLE 設成 FALSE 從此惡夢就來了 |
|
starlee3333
一般會員  發表：0 回覆：1 積分：0 註冊：2005-11-05 發送簡訊給我 |
try
try FSLS_DOClose:=TFSLS_DOClose.create(nil); FSLS_DOClose.visible:=true; FSLS_DOClose.Hide; <加這行看看 FSLS_DOClose.ShowModal; except ts_syserror('CREATE FROM ERROR [DOCLOSE]'); end; finally FreeAndNil(FSLS_DOClose); end; 我最近也是遇到這問題，不過我的MDI Child是預設Visible=False的 Show 加完資料 Hide(ShowModal之前要先Hide) ShowModal |
|
l630521
資深會員 發表：15 回覆：349 積分：372 註冊：2003-02-17 發送簡訊給我 |
===================引 用 文 章=================== 請教各位高手我明明有設 Visible is true 但為何還是有如下錯誤 'Cannot make a visible window modal' !!是否還有其他原因??謝謝?? try try FSLS_DOClose:=TFSLS_DOClose.create(nil); FSLS_DOClose.visible:=true; FSLS_DOClose.ShowModal; except ts_syserror('CREATE FROM ERROR [DOCLOSE]'); end; finally FreeAndNil(FSLS_DOClose); end; 請把FSLS_DOClose.visible:=true; 這一行程式碼拿掉！ |
|
eaglewolf
資深會員 發表：4 回覆：268 積分：429 註冊：2006-07-06 發送簡訊給我 |
Cannot make a visible window modal !! <---- 不能對可視的視窗作modal
把 FSLS_DOClose.visible:=true 改成 FSLS_DOClose.visible:=false 應該就可以了
------
先查HELP 再查GOOGLE 最後才發問 沒人有義務替你解答問題 在標題或文章中標明很急 並不會增加網友回答速度 Developing Tool: 1.Delphi 6 2.Visual Studio 2005 3.Visual Studio 2008 DBMS: MS-SQL |
發表時間：2003-04-22 10:35:10
IP:61.229.xxx.xxx 未訂閱
系統時間：2024-05-11 3:53:06
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |