第一次放这么多的分>>>>>>>>>>请进来看看(一周以内结帖) 今天朋友要我给他做一个数据库的软件.我现在的基本思路是:用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表中吧, 这样的例子倒是不少 为什么程序启动时,窗口显示后自动关闭,然后程序就退出了? 目前较新的delphi版本是哪一个? 选择groupbox里的checkbox控件,小问题,请教高手…… 我这样做有错吗? 动态调用DLL是出现的问题,棘手中,待解决。 UPDATE问题 急急 问一个小问题,谁帮我解决呀!在线等待.... 如何将TTabSet竖着放 Delphi可以用来开发B\S模式吗??? TQRChart怎么使用? 如果我在网上下来一个控件,我应该怎么安装并用这个按件呢? 请教:关于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;