wwdbgrid如何显示行号

Novelty 2005-10-12 02:16:41
wwdbgrid如何显示行号
...全文
206 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
angle097113 2006-04-14
  • 打赏
  • 举报
回复
或者

procedure TFrmLog.DBGridDrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumnEh; State: TGridDrawState);
begin
with DBGrid.DataSource.DataSet do
begin
if DataCol = 0 then
DBGrid.Canvas.TextRect(Rect, Rect.Left + 2, Rect.Top + 2, IntToStr(RecNo));
end;
end;
angle097113 2006-04-14
  • 打赏
  • 举报
回复
对数据集增加一个字段,然后在这个字段的ongettext事件来完成,
在该事件中text := 数据集.recno 当然需要转化为字符串,在需要格外处理的就是如果为-1那么修改为1就OK
summersky204608 2006-04-14
  • 打赏
  • 举报
回复
学习!
ypnet 2005-10-13
  • 打赏
  • 举报
回复
ding
Novelty 2005-10-12
  • 打赏
  • 举报
回复
数据还未保存到数据库.
常遇道 2005-10-12
  • 打赏
  • 举报
回复
在SQL语句里想办法呗
SELECT rowno =
(SELECT count(row)
FROM (SELECT 1 AS row, *
FROM aa) AS a
WHERE a.name<= aa.name), *
FROM aa
ORDER BY name

2,497

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧