我如何在fdquery 4上恢复fdquery 7value

时间:2017-05-18 11:22:23

标签: mysql delphi-7 delphi-xe rad

如何整合这两个代码以在fdquery4中插入fdquery7的值?

FDQuery7.SQL.Add ('SELECT nom FROM bases.nomm ');
FDQuery7.open;
FDQuery7.First;
while not FDQuery7.EOF do
begin
  FDQuery7.Fields[0].Value;
  FDQuery7.Next;
end;

FDQuery4.SQL.Add ('INSERT INTO name(firstname)  Values ("fdquery4")');
FDQuery4.execSQL;

showmessage('insert');

1 个答案:

答案 0 :(得分:0)

你可以尝试只使用一个FDQuery来完成这样的工作:

FDQuery4.SQL.Add ('INSERT INTO name (firstname) SELECT nom FROM bases.nomm');
FDQuery4.execSQL;

showmessage('insert');

它将为INSERT表中的每条记录执行bases.nomm