資料庫更新.... |
答題得分者是:tech_state
|
braveheart
一般會員 發表:35 回覆:62 積分:24 註冊:2003-05-21 發送簡訊給我 |
|
tech_state
版主 發表:44 回覆:638 積分:641 註冊:2003-02-10 發送簡訊給我 |
braveheart, 您好
請將以下的code加入Form2中,試試看
先#include "Unit1.h" void __fastcall TForm2::ADOTable1AfterPost(TDataSet *DataSet) { Form1->Show(); Form1->Label->Caption = ADOTable1->FieldByName("Field1")->AsString; } Field1為您想要顯示的欄位名稱。================================= 涵養怒中氣。謹防順口言。留心忙裡錯。珍惜有時錢。 是非終日有,不聽自然無 天下本無事,庸人自擾之 |
braveheart
一般會員 發表:35 回覆:62 積分:24 註冊:2003-05-21 發送簡訊給我 |
|
tech_state
版主 發表:44 回覆:638 積分:641 註冊:2003-02-10 發送簡訊給我 |
braveheart, 您好
請試試以下的方法。
Foem1的code extern String str; void __fastcall TForm1::Button1Click(TObject *Sender) { Label1->Caption = str; } Foem2的code #include "Unit1.h" String str; // 全域變數 void __fastcall TForm2::ADOTable1AfterPost(TDataSet *DataSet) { Form1->Show(); str = ADOTable1->FieldByName("cd_name")->AsString; }================================= 涵養怒中氣。謹防順口言。留心忙裡錯。珍惜有時錢。 是非終日有,不聽自然無 天下本無事,庸人自擾之 發表人 - tech_state 於 2003/08/09 16:32:48 |
braveheart
一般會員 發表:35 回覆:62 積分:24 註冊:2003-05-21 發送簡訊給我 |
相當感謝先進...這問題以解決了..相當感謝大大..
真的是非常利害...因在按了BUTTON想要立即顯示資料..偶加了一些東西..問題已解決了...謝謝
FORM1
ADOTable1->Filter="ID = 1";
ADOTable1->FindFirst();
if (i==0)
Label1->Caption = ADOTable1->FieldValues["FIELDS"];
else if(i==1)
Label1->Caption = str;
FORM2
i=1;
str = ADOTable1->FieldByName("FIELDS")->AsString;
|
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |