1樓：匿名使用者
過載介面的create函式。
例如：constructor create(填寫不同的引數即可); overload;
2樓：匿名使用者
session相當於delphi全域性變數,你可以用全域性變數，但建議，最好方法，就是寫個帶引數的方法，呼叫時傳入即可
如你可以在你要呼叫的這樣寫
private
fmyvalue: string;
public
procedure setparam(myvalue: string);
.....
procdure tform1.setparam(myvalue: string);
begin
fmyvalue := myvalue;
end;
myvalue 就你要傳入的引數, 值被傳到fmyvalue中;
呼叫：form1 := tform1.create(nil);
tryform1.setparam('你好，世界世界！');
form1.showmodual;
finally
form1.free;
end;
//這樣，「你好，世界世界！」就被傳到fmyvalue中啦
3樓：匿名使用者
你可以定義乙個全域性變數來傳遞
在delphi中窗體間怎麼傳遞引數
4樓：匿名使用者
通常，在 delphi 的窗體間傳遞引數，可以通過窗體類裡新增類屬性成員的辦法。
比如，需要 forma 傳遞給 formb 乙個字串變數 curname，則可以在 formb 的 public 裡定義：
傳遞引數通常如下：
在delphi中窗體之間 如何傳遞資料？
5樓：匿名使用者
我作了乙個統一修改和查詢的窗體，統一修改中有乙個listcheckbox控制項，顯示要修改的職工，我在這個窗體中呼叫查詢的窗體，在查詢窗體中進行相應的查詢，查詢完之後我希望查詢的結果能夠在統一修改的窗體listcheckbox控制項中顯示出查詢的結果：這樣窗體之間該如何傳遞？我首先在統一修改的窗體中寫了這樣的程式：
public procedure setparams(sql:string); end;var frm_tyxg: tfrm_tyxg; v_sql:
string;implementationuses u_chaxun;procedure tfrm_tyxg.setparams(sql:string);begin v_sql:
=sql;end;procedure tfrm_tyxg.label5click(sender: tobject);begin with tfrm_chaxun.
create(self) do begin show; end;end;然後在查詢的窗體的查詢按鈕中寫了這樣的程式：with tfrm_tyxg.create(self) do begin setparams(sql_str); show; end; close;這樣確實可以得到查詢的語句v_sql，但是我在統一修改的窗體的關閉按鈕中：
close;則要關閉兩次，如果我要寫上form1.close 就會出錯怎麼會事？
6樓：匿名使用者
hoho,好好考慮一下。
7樓：匿名使用者
關閉時還是出現那樣的問題
delphi 請問在delphi中窗體間怎麼傳遞引數？
8樓：曉楓是神
在form create之後沒有show之前可以對窗體的屬性進行設定。所以不需要象pb那般對視窗傳遞引數 檢視原帖》
窗體中包含的窗體稱為，什麼是窗體和視窗
窗體中包含的窗體稱為子窗體。子窗體是指插入到其他窗體中的窗體。主要窗體稱為主窗體，窗體中包含的窗體稱為子窗體。窗體 子窗體的組合有時被稱為分層窗體 大綱 細節窗體或父 子窗體。要顯示具有一對多關係的表或查詢中的資料時，使用子窗體特別有效。一對多關係是指兩個表之間的關聯，其中主表中每個記錄的主鍵值對應...
delphi中當stringgrid中的值變化時字型顏色跟著
很簡單，在ondrawcell事件中填寫 當內容為 123 時會變色 varkeyword string 123 procedure tform1.stringgrid1drawcell sender tobject acol,arow integer rect trect state tgridd...
VB如何從標題為空的窗體獲取該窗體的控制代碼
findwindow 類名，不是跟 findwindow 類名，0 一樣的嗎?當然不一樣了 findwindow 類名，這個寫法表示有標題的但只是標題沒有名字不是沒有標題 而findwindow 類名，0 當中 0 的意思就是null屬性缺省會返回第乙個同類名的視窗控制代碼 當然不一樣了你看 fin...
vb中如何實現多窗體的切換顯示 每個窗體都有 下一步 按鈕
這是6.0的方法 用先在每個窗體上畫乙個 下一步 按鈕 然後用窗體名稱.show的方法 切換窗體 例如 form1.show 就可以啟用form1窗體 全域性變數建議定義在模組 moudle 中 建立模組的方法是單擊選單 工程 新增模組 命令新增 然後用public 變數 as 型別 語句來定義全域...
delphi中DBGrid與memo問題，其中資料庫用的是SQL Server
var s string begin memo1.clear while not adoquery1.eof do begin if adoquery1.fieldbyname 姓名 text then begin s adoquery1.fieldbyname 姓名 text if strtoin...