一个特别搞笑的问题(是关于Form中传递数据的)。(200分)

  • 主题发起人 主题发起人 rainM
  • 开始时间 开始时间
R

rainM

Unregistered / Unconfirmed
GUEST, unregistred user!
其实我这个问题挺简单的,就是想问一下,如何在不通的FORM中传递数据库中的数据,
比如说ADOTable1连接的是数据库1,ADOTable2连接的是数据库2,而这两个数据库之间有
个关联字段ID,我首先建立FORM1,在FORM1中使用ADOTable1中的数据并且FORM1中有个
按钮可以打开FORM2,如何做到打开FORM2的时候可以显示符合ADOTable1
和ADOTable2的数据内容(用ID作关联),
希望各位大侠可以给点提示或帮助,小弟我在这先谢过了。
 
呵呵,用DataModule呀
数据的来源和Form是不相干的。

把ADOTable1,ADOTable2都放到DataModule中呀
 
你在form2的oncreate里对adotable2做一下查询不就行了么?
 
這個其實真的很簡單,你只需要把你的數据表放到Data Module數据控件表單中
再分別在這個Data Module中加入兩Query控件,並在主表中的SQL中寫道
Select * from 主表
再在明細表中的SQL中寫道
select * from 明細表 where isseql=:itseql
並把明細表的Query控件的DataSource屬性值指向主表的dataSource
再在你要使用到這兩數據表的Form的Uses中加入Data Module的名就可以了
這樣當你運行這個程式時便打開這兩數據表,那麼你的要求相信就以經達到了,我是這樣解決的!
 
用DataModule就行了!
 
同意Activer。 养成良好的习惯, 使用非可视化的数据控件时,用Datamodule
在两个Form对应的Unit中都引用这个Datamodule的unit就可以了。
 
做个公共模块,比如用DataModule。把所有数据库连接控件都放上。
这样其它窗体用时都可以共享。
 
procedure TForm1.btnOkClick(sender: Tobject)
begin
Form2:=TForm2.Create(Self);
Form2.ADOTable2.SQL.Add('SELECT * FROM m WHERE id='+Self.ADOTable1.FieldByName('id').AsString;
Form2.ShowModal;
end;
--------
proceduree TForm2.FormCreate(Sender: TObject);
begin
ADOTable2.Open;
end;
---
 
谢谢,真的十分感谢,但是,我是一个新手,还不大了解data module,能不能说的在具体一些呢
,比如在FORM中如何使用DATA MODULE中的内容呢?
 
象窗体一样用就可以了,也需要用uses datamoudle1 先.
 
我是来混分的
 
用主从表不行吗?
 
我用uses datamodule1这个方法试了,但是不新,老是有错,噢,我是直接在uses后写
上去的,这样好像不行噢,还有,如果我在FORM1中添加了一个dbedit1,我想在里面
显示datamodule1中adotable1的id字段的数据,该如何作呢,
不好意思,新学,有些不大明白。
 
DATA MODULE---一般翻译为“数据模块” [:)]
 
救救我啊,我可要晕了,各位大侠可否说的详细一些啊,我可是把200分全押上了,
如果那为大哥可以说个详细的方法,我愿意把分值全部奉上。
 
运行delhpi后选择File->new->data modules属性页->ok
这样就可以建成一个数据模板
 
谢谢各位的帮助,现在开始发分了
 
后退
顶部