如何使用showmodal傳送string |
答題得分者是:change.jian
|
JamesLiang
初階會員 發表:54 回覆:78 積分:31 註冊:2003-02-13 發送簡訊給我 |
請教先進..我透過showmodal的方式將user選取的data傳回主表單,但因為showmodal只能回傳integer,因此我在主表單再次利用傳回的直去收詢另一個字串欄位.有沒有方法可解決此問題?
主表單..
if SearchForm.ShowModalItemNo = mrOK then
begin
Datamodule1.Item.Edit;
Datamodule1.ItemNo.Value := SearchForm.ItemNo
end;
SearchForm:
function SearchForm.ShowModalItemNo : Integer;
begin
result := showmodal;
end;
我希望的itemno是 string; Thanks
|
change.jian
版主 發表:29 回覆:620 積分:439 註冊:2003-06-02 發送簡訊給我 |
您可以依據需要,在SearchForm裡增加自定的property,如下:
Type TSearchForm = class(TForm) .... private FResultString:String; //儲存要回傳的字串 public property ResultString:String read FResultString; end;然後在主表單裡如下寫法: if (SearchForm.ShowModal = mrOK) then begin DataModule1.Item.Edit; DataModule1.ItemNo.Value:=SearchForm.ResultString; ... end; |
ko
資深會員 發表:28 回覆:785 積分:444 註冊:2002-08-14 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |