码农的笔记

Delphi虽好,但已不流行; 博客真好,可以做笔记

博客园 首页 新随笔 联系 订阅 管理

dbgrideh 数据单元格显示不全 气泡提示_用户1374962962_新浪博客  http://blog.sina.com.cn/s/blog_51f445120102x9i4.html

Step 1: 先將 TDBGridEh 的 ShowHint  Ture
Step 2: 在將 TDBGridEh 其 Columns 之 ToolTips  Ture
Step 3:

procedure TForm.DBGridEh1DataHintShow(Sender: TCustomDBGridEh;
  CursorPos: TPoint; Cell: TGridCoord; InCellCursorPos: TPoint;
  Column: TColumnEh; var Params: TDBGridEhDataHintParams;
  var Processed: Boolean);
begin
 OutputDebugString(pchar(Column.DisplayText));
end;
posted on 2021-05-14 19:14  码农的笔记  阅读(296)  评论(0编辑  收藏  举报