【结贴】DataTreeList 提示问题**

liubin

是否能实现如下图，我鼠标放到意见列上，就出来个类似HINT的提示吧意见中的值 目的：222 提示出来的功能

lixy

http://bbs.justep.com/forum.php?mod=viewthread&tid=25007

liubin

上面的问题搞定，HINT显示的保留时间如何设置？

lixy

http://topic.csdn.net/t/20020812/12/933425.html

liubin

private
    {private declarations}
    Application: TApplication;

procedure TDOC_BFYJ.FormDocCreate(Sender: TObject);
begin
  Application := TApplication.Create(self);
  Application.HintPause := 0;
  Application.HintHidePause := 100000;
end;
不起作用

lixy

是系统内部的全局变量。Forms.Application.

liubin

private
    {private declarations}
    Application: Business.Forms.TApplication;

procedure TDOC_BFYJ.FormDocCreate(Sender: TObject);
begin
  Application := Business.Forms.TApplication.Create(self);
  Application.HintPause := 0;
  Application.HintHidePause := 100000;
end;
还是不起作

lixy

你别声明变量啊，晕。这个是系统自带的变量。

liubin

procedure TDOC_BFYJ.FormDocCreate(Sender: TObject);
begin
  Business.Forms.TApplication.Create(self);
  TApplication.HintPause := 0;//不声明变量，没这方法
  TApplication.HintHidePause := 100000;
end;

lixy

Business.Forms.Forms.Application.HintHidePause