Текущий архив: 2004.07.18;
Скачать: CL | DM;

Вниз

Как показать и скрыть hint объекта Shape когда надо   Найти похожие ветки 

← →
INTAARI   (2004-07-05 12:49) [0]

Добрый день!!!
нашел в документации, показ hint процедурой

application.ActivateHint(point(х,y));

но на форме никакого hintа не видно.
Может нужно использовать дополнительные процедуры?

---

← →
pasha_golub ©   (2004-07-05 12:57) [1]

Application.ShowHint := true;

---

← →
INTAARI   (2004-07-05 13:06) [2]

> pasha_golub ©   (05.07.04 12:57) [1]
> Application.ShowHint := true;


application.ActivateHint(point(50,50));
Application.ShowHint := true;
На форме его все равно нет

---

← →
pasha_golub ©   (2004-07-05 13:32) [3]

Application.ShowHint := true;
В начале программы, например, при создании главной формы.

---

← →
Cosinus ©   (2004-07-05 13:37) [4]

Application.ShowHint := true;
Должно быть ПЕРЕД тем, как вы выводите Hint

---

← →
INTAARI   (2004-07-05 13:55) [5]

> pasha_golub ©   (05.07.04 13:32) [3]
> Application.ShowHint := true;
> В начале программы, например, при создании главной формы.
>
>
> Cosinus ©   (05.07.04 13:37) [4]
> Application.ShowHint := true;
> Должно быть ПЕРЕД тем, как вы выводите Hint


procedure TForm1.FormCreate(Sender: TObject);
begin
Application.Hint:="sdfsdfsdf";
Application.ShowHint := true;
application.ActivateHint(point(50,50));
end;

Без перемен!!!

---

← →
INTAARI   (2004-07-05 14:52) [6]

и тишина!!!

---

← →
pasha_golub ©   (2004-07-05 15:53) [7]

Полный код давай!

---

← →
INTAARI   (2004-07-05 16:21) [8]

> pasha_golub ©   (05.07.04 15:53) [7]
> Полный код давай!

весь пробный код в [5]

---

← →
INTAARI   (2004-07-05 16:22) [9]

Этот код для чтобы понять последовательность действий.

---

← →
pasha_golub ©   (2004-07-05 16:23) [10]


procedure TForm1.FormCreate(Sender: TObject);
begin
Hint:="sdfsdfsdf";
Application.ShowHint := true;
//application.ActivateHint(point(50,50));
end;


---

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

Текущий архив: 2004.07.18;
Скачать: CL | DM;

Наверх

Память: 0.48 MB
Время: 0.022 c