头又晕了,望各位指点一下! ( 积分: 5 )

  • 主题发起人 主题发起人 zpselect
  • 开始时间 开始时间
Z

zpselect

Unregistered / Unconfirmed
GUEST, unregistred user!
现在我要循环数据集中所有记录,当某个字段的数据不正确时,将光标移到到此笔记录处,请问怎么定位? 望各位纠定,字段为:age
For i:=0 to Query.Recordcount-1 do
begin
if query.Fieldbyname('age').asinteger>150 then
begin
Showmessage('年龄不能超过150');
定位当前记录号,并且将光标移到Age输入处,注意我使用DBGrdeh进行数据输入
abort;
end;
 
当前记录号: query1.RecNo
 
可不可以给出原码?
 
DBGrid十分极其以及特别的不适用于标准化的信息录入
 
我现在想将光标移至不满足条件记录的那一笔记录处!
 
怎么将光标移至不满足条件的那条记录处啊!
 
For i:=0 to Query.Recordcount-1 do
begin
if query.Fieldbyname('age').asinteger>150 then
begin
Showmessage('年龄不能超过150');
定位当前记录号,并且将光标移到Age输入处,注意我使用DBGrdeh进行数据输入
edit;
abort;
end;
next;//这样就不用定位了
end;
 
For i:=0 to Query.Recordcount-1 do
begin
if query.Fieldbyname('age').asinteger>150 then
begin
Showmessage('年龄不能超过150');
将光标移至第十笔不满足条件的记处处;??????????????????
abort;
end;
end;
 
你这人,死性不改
adoQ.First
For i:=0 to Query.Recordcount-1 do
begin
if AdoQ...Asinteger> 150 then
Break
Else
AdoQ.next;
end;
 
adoQ.First
For i:=0 to Query.Recordcount-1 do
begin
if AdoQ...Asinteger> 150 then
Break
Else
AdoQ.next;
end;
这样的写的话,那么在保存数据时DBGrid中的记数会一笔笔的滚动,这样不行!所以要在加
DisableControls and EnableControls,进行控制,这样就不会在滚动时DBGrid中的数据也跟随移动!
如果加了DisableControls and EnableControls,请问怎样将光标不满足条件的记录处?
 
你可以用Query.Locate('主健字段名',主健值,[])定位一下,该记录中的主健
 
多人接受答案了。
 
后退
顶部