table1,table2
while not (table1.eof or table2.eof) do
begin
if table1.fieldbyname('1')=table2.filedbyname('1') then
...
else
...
table1.next;
table2.next;
end;
while not (table1.eof or table2.eof) do
begin
if table1.fieldbyname('1')=table2.filedbyname('1') then
...
else
...
table1.next;
table2.next;
end;
解决方案 »
- 有人说像希特勒,有人说像雪村....
- 寻求熟悉二次元测量软件的高手合作!
- DBAdvGrid单元格数据无法代码直接改写
- 帮忙看下代码有什么问题
- 大家有这样写过程序吗?功能实现了,但我感觉代码很奇怪,还附带2个问题!
- 日期字段转星期,各位来帮帮忙吧.
- 200分求解一个很简单的难题,大家看看...
- devExpress中的CXGRID做EXCEL输出时怎么控制输出字体跟CXGRID上的字体一致,谢谢
- 如何操作intnet上的数据库?
- ComponentToString,StringToComponent D5,D6 的问题?
- 问一个简单问题,在三层结构中,你们想在客户端提取一些数据显示,一般是用什么方法呢?
- question
if table1.fieldbyname('1')=table2.filedbyname('1') then
table1.fieldbyname('1').asxxx=table2.filedbyname('1').asxxx
while not (table1.eof or table2.eof) do
begin
if table1.fieldbyname('1')=table2.filedbyname('1') then
...
else
...
table1.next;
table2.next;
end;
table1,table2
table1.first;
while not table1.eof do
begin
table2.first;
while not table2.eof do
begin
if table1.FieldValues['l']=table2.FieldValues['l'] then
...
else
...
table2.next;
end;
table1.next;
end;
From table1, table2
where table1.l=table2.l
table1.first;
while not table1.eof do
begin
table2.first;
while not table2.eof do
begin
if table1.FieldValues['l']=table2.FieldValues['l'] then
...
else
...
table2.next;
end;
table1.next;
end;
方法一:
可以在表A中循环,从表B中用
'select l from tableb where l='''+tablea.fieldbyname('l').asstring+''''
找到就有,没找到就没得啦,至少比你用两层循环快多了
方法二:
也可以先选出两个表中字段l相同的记录,
select tablea.*,tableb.l as bl from tablea left outer join tableb on tablea.l=tableb.l
数据集中bl有值的就是有相同的了,反之就是你要找的记录了