DELPHI 点击按扭显示HINT 怎么做？

DELPHI 点击按扭显示HINT 应该怎么做？
如果是BUTTUN.SHOWHINT := TRUE 那只要鼠标停在上面就显示了，我是想要点击的时候才显示呀，应该怎么做？

hint就是悬停的时候才有效。
点击的时候显示，用一个label来控制吧。
下面是一段把label移到当前光标位置的代码。结合这事件用用跟hint差不多的效果。
var
P: TPoint;
begin
GetCursorPos(P);
Self.Label1.Left:=p.x-self.Left ;
Self.Label1.Top:=p.y-self.Top ;

end;

//本身这个 Hint就是鼠标悬停的功能，是有延时的，你这种要求感觉怪怪的 procedure TForm1.Button1MouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin Button1.ShowHint:=TRUE; Button1.Hint:='显示说明'; end;

delphi按钮自带hint属性,输入内容即可.

可以啊，只要对你要显示的控件showhint true就好了啊，绝对可行的，估计是你设置了颜色之类的属性，让showhint看不见，你检查下

不要用onlick时间，用keypresedown事件就可以了，代码不需改变，很简单的 控件的事件不仅仅是onlick，有很多都很有用的