如下所示:
f1:='Frm_Sand';
tf1:='TFrm_Sand';
//CreateMyForm(tf1,f1);
if Application.FindComponent(f1)=nil then
begin
if GetClass(Tf1) <> nil then
begin
with TForm(TComponentClass(FindClass(Tf1)).Create(application)) do
begin
name:=f1;
showmodal;
free;
end;
end;
end
else
begin
TForm(Application.FindComponent(f1)).ShowModal;
free;
end;
用以上代碼生成了表單frm_sand,然后在表單frm_sand上又創建打開了一個表單Form1,在FORM1中參考frm_sand.edit1.text的時候出錯,若在參考前創建frm_sand實體,則顯示的值為空
uj5u.com熱心網友回復:
frm_sand是什么?表單變數?uj5u.com熱心網友回復:
1、不可參考動態表單中的值(控制元件的值) 會出現讀取錯誤。2、你可以設定一個全程變數,作為緩沖過度。動態表單將需要的值寫入緩沖變數。再讀取。
uj5u.com熱心網友回復:
form1 uses sand了么uj5u.com熱心網友回復:
可以定義一個全域變數么,釋放的時候記錄edit1的值。uj5u.com熱心網友回復:
是表單的名稱,一個字串
uj5u.com熱心網友回復:
不關參考不參考的事
uj5u.com熱心網友回復:
目前看來沒有更好的辦法了,只能這樣了,還好,用到的資料不多
轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/61684.html
標籤:VCL組件開發及應用
下一篇:求助資料庫鏈接問題!!!!
