第一次放这么多的分>>>>>>>>>>请进来看看(一周以内结帖) 今天朋友要我给他做一个数据库的软件.我现在的基本思路是:用bde连接几个表,在文本编辑控件中输入SQL语句,查找出结果以后显示在dbgride中,现在还有一点,没有想出来怎么办,朋友要求可以把查找出来得的内容可以导出到一个表中,本来我估计研究研究应该不难,可是小弟这几天还在考试,实在是没有时间,所以来这里请大家帮忙,最好给出比较全一些的代码,谢谢了! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 insert into TableName1Select FieldA,FieldB from tableName2 where .. 用TBATCHMOVE即可,BATCHMOVE。SOURCE=QUERY1,BATCHMOVE。DESTINATIONE=TABLE1. 只要QUERY连到DBGRID里,QUERY里有SQL的执行结果就行了 先用QUERY1把结果查出来while not Query1.Eof dobegin Table1.Insert; Table1.Fields[0].AsString:=Query1.Fields[0].AsString; . . . . Table1.Post; Query1.Next;end; 是导出到一个Excel表中吧, 这样的例子倒是不少 DELPHI5 怎么实现XML文件编程 学了Delphi快一年了,如何向精通迈进,望有经验的大侠指教,顺便讲下我自己的历程 刚过高程,赶紧散分!! 菜鸟提问,GGMM看过来 初级学者的问题,谢谢! 初学者提问 delphi 中table 怎么实现多条件查询 indy发送邮件时如何显示进度? 谁知道如何使用teamsource 小妹我请教大家一个关于制作上下文敏感帮助系统的问题(紧急) 怎么得到一个字符串中每个字符的ascii并分别保存在一个数组中? 如果我在网上下来一个控件,我应该怎么安装并用这个按件呢? 请教:关于web broker开发的问题,up有分
Select FieldA,FieldB from tableName2 where ..
while not Query1.Eof do
begin
Table1.Insert;
Table1.Fields[0].AsString:=Query1.Fields[0].AsString;
.
.
.
.
Table1.Post;
Query1.Next;
end;