「ヒント」が表示される時間を変更するには

解決

めるめる 2006-09-02 18:10:15 No: 23085

いつもお世話になります。

現在、Form1 に Panel1 を貼り付け、
Panel1.Hint := 'hogehoge';
Panel1.ShowHint := True;
としていますが、この Panel1 にマウスカーソルを位置づけると
一応'hogehoge'と表示されますが、約３秒弱で消えてしまいます。
この表示時間を１０秒とかに変更したいのですが、方法がわかりません。
どなたかご教授頂けないでしょうか。よろしくお願いいたします。

みんみん 2006-09-02 19:08:20 No: 23086

TApplicationのプロパティで設定できると思います。

procedure TForm1.FormCreate(Sender: TObject);
begin
  Application.HintPause :=0;
  //ヒントが表示されるまでの時間  （単位はms 1000ms =１秒）
  Application.HintHidePause :=10000;
  //ヒントが非表示になるまでの時間
end;

上の例で ShowHint :=true; のコントロールの上にマウスを乗せると
ヒントがすぐに表示され１０秒たったら消えるようになります。

めるめる 2006-09-03 10:59:42 No: 23087

希望通りの結果となりました。
ありがとうございました。