Question

Delphi的控件传输数据不太懂，如图所示如何写代码？

如图，如何通过Button按钮把图一的数据传到图二表里的所有Edit控件？我写的代码如下：
begin
with uDataModule.DataModule2.ADO_LXRXX do
begin
edit;
FRM_LXRXX.Edit1.Text := uDataModule.DataModule2.ADO_LXRXX.fieldbyname
('lxrxx_id').AsString;
end;
end;
可执行的时候就出下图这样





Answer 1

把edit;这行拿掉,因为你是给Edit1设置值,不用把ADOQuery设成编辑状态!
也就是变成:
begin
with uDataModule.DataModule2.ADO_LXRXX do
begin
FRM_LXRXX.Edit1.Text := uDataModule.DataModule2.ADO_LXRXX.fieldbyname
('lxrxx_id').AsString;
end;
end;

希望对你有帮助!

Answer 2

uDataModule.，引用了吗

use uDataModule.;

l另外
直接用dbedit就行了

界面没必要和数据完全分离

追问

已经引用了，你的意思是直接Edit1.text....这样么？但要是这样的话，会提示错误，执行不了的！

追答

DELPHI有数据构件，顺序如下
dbconnection->dataset->datasource->dbedit\dbgrid

追问

我的顺序如下：
dbconnection->TADOQuery->datasource->dbgrid

追答

找个 DBEDIT, 连同一个datasource，设置下fieldname

Answer 3

最好
将取出的数据放到ClientDataSet