可以用和dbgrid联接的dataset来知道。
比如QUERY.fieldbyname('symbol').asstring;
num:query.recrodcount;
比如QUERY.fieldbyname('symbol').asstring;
num:query.recrodcount;
解决方案 »
- 这个怎么实现?
- 图片坐标定位问题
- 下载组件。。。。。
- 如何才能控制打印不走纸,实现即打即停,???
- 有用过RichView的朋友请进,看有没遇到这样一个源码级的控件错误。
- 谁能告诉我: Delphi4.0, Delphi5.0,Delphi6.0,Delphi7.0的上下兼容问题呢?急!急!
- 主从表中的‘触发器问题’
- 有谁在delphi下用过mirror driver的?
- 有一字段值为字符形,输入为'20m/m*220m/m*220m/m',如何判断此字段中的值有两个'*'符号?
- access数据库,使用sql语句时有没有将字符转换成数值的函数
- messagedlg能不能显示中文?例如显示“确定”,而不是“ok”
- 关于数据库程序打包和SQL的简单问题
2 dbgrid.datasouce.DataSet.RecordCount
begin
first;
repeat;
TempFieldText := Trim(FieldByName('symbol').AsString);
TempBookMark := GetBookMark;
// myDBGrid.SelectedRows.CurrentRowSelected:=true;
next;
if Eof then
begin
FreeBook(TempBookMark);
break;
end;
repeat;
if TempFieldText=Trim(FieldByName(myDict[i].sFieldName).AsString) then
begin
// myDBGrid.SelectedRows.CurrentRowSelected:=true;
showmessage('有重复!');
exit;
end;
next;
until eof;
GotoBook(TempBookMark);
// myDBGrid.SelectedRows.CurrentRowSelected := false;
FreeBook(TempBookMark);
next;
until eof;
end;
可以在dbgrid 的 OnColExit()事件中写相应的判断代码! 我是问怎么取得dbgrid的记录redcord.count和symbol的值啊,,,
我好象都气糊涂了,怎么不大脑转了啊,,//help me
(1)可用n:=table1.recordcount获取recordcount值。
(2)将symbol设为关键词不就可避免重复了?
谢谢,嘿嘿,也是一个思路,不过我已经解决了,可是分还要给的,谢谢
@_@