| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Hints исключительно на WIN API [D5, D6, Win95/98]

Klev.J ©   (2002-09-09 19:30:00) 

Hi all!Вот какая проблема: Пишу прогу исключительно на WIN API. Создаю окно, на нем - кнопку. Хотелось бы добавить к этой кнопке Hint, точнее TOOLTIP.
Делаю следующее:
getwindowrect(button,r);
with TI do
begin
cbSize:=SizeOf (TI);
uFlags:=TTF_CENTERTIP;
hWnd:=button;
uId:=0;
rect.Left:= R.Left;
rect.Top:= R.Top;
rect.Right:= R.Right;
rect.Bottom:= R.Bottom;
hInst:=0;
lpszText:=Pchar("I am here!");
end;
SendMessage (HintWnd,TTM_ADDTOOL,0,lparam(@TI));

И ни фига!
Hint не показывается.
Почему он не показывается? Что не так?

---

Klev.J   (2002-09-20 16:34:00) [1]

Проверял. Функция SizeOfвозвращает 44.
Пробовал ставить другие значения, но ничего не получилось.
Всплывающие подсказки никак не всплывают. Что же делать?

---

KK   (2002-09-14 15:38:00) [2]

Может быть проблема в cbSize?
Попробуй где нибудь поискать истинный размер структуры TI,
не используя функцию Sizeof().

---

Наверх