我是一个新手 写了一段程序 但执行起来比较慢 不知各位高手有没有办法

Question

我还不明白你这样做有什么道理，干吗不将两条SQL语句合成一条，执行一次查询呢？？？ query1.Close ;
query1.SQL.Clear ;
query1.SQL.Add('select * from oldman where osex = ''''男''''or osex=''''女''''');
query1.Open;
//query1.First ;
table1.EmptyTable ;while not query1.Eof do
begin
   for j:= 0 to query1.FieldCount -1  do
if query1['osex']='男’ then
  .......
else
  ......
 
  query1.Next ;
 end;
或者你把你的项目跟我说一下，我给你写段代码。

Answer 1

用BatchMove
BatchMove.source:=query1;
BatchMove.Destination:=Table1;
....
query1.Open;
BatchMove.Execute;
....