Скачать: CL | DM;

Как заставить появиться Hint?   Найти похожие ветки 

← →
Alex_C ©   (2006-05-10 14:27) [0]

Делаю так:

procedure TForm1.Button1Click(Sender: TObject);
var
   MousePos : TPoint;
begin
   Application.Hint := "Hint!";
   GetCursorPos( MousePos );
   Application.ActivateHint( MousePos );
end;

Но ночего не происходит. Что не так?

---

← →
Loginov Dmitry ©   (2006-05-10 16:00) [1]

ShowHint = True для компонента, над которым находится указатель мыши

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.026 c