procedure TMainForm.FormCreate(Sender: TObject);
begin
if FileExists(ExtractFilePath(Paramstr(0))+'config.ini') then
begin
ShowMessage('檔案已存在')
end
else
begin
ClientMainChild.ShowModal; //打開子表單
end;
end;
//我是想在表單啟動時判斷組態檔是否存在,如果存在的話就直接讀取,如果不存在的話就打開一個子表單,進行設定然后寫入組態檔,現在連第一步都實作不了,這樣子總是出錯。。新手學習。。請指點!
uj5u.com熱心網友回復:
你這樣寫當然會發生錯,如果create的時候,你的要打開表單還沒create,然后你就showmodel會不報錯嗎?uj5u.com熱心網友回復:
在這句代碼(ClientMainChild.ShowModal; //打開子表單)前加一句:ClientMainChild := TFORM.CREATE(APPLICATION);uj5u.com熱心網友回復:
用onformshowuj5u.com熱心網友回復:
MDI子視窗,應先創建,再顯示。具體地說,
1、打開某MDIForm前,要檢查該視窗是否已經打開,
2、打開的話,讓它默認尺寸顯示
3、沒有打開,就創建它并顯示。
轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/70442.html
標籤:非技術區
