dbgrideh 数据单元格显示不全 气泡提示

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;