Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.01;
Скачать: [xml.tar.bz2];




Вниз

Как отуродовать окошко Hint a 


Mikhail   (2002-03-20 18:37) [0]

Уважаемые мастера, если не затруднит, просвятите
как изменить внешний вид окна hint"a?



Pat   (2002-03-20 18:55) [1]

SetWindowRgn()



Mikhail   (2002-03-20 19:13) [2]

Да нет же не то. Возможно не корректно спросил.
1. Возможно ли впаять в это окно картинку?
2. Изменить хотя бы шрифт hint"a?



drpass   (2002-03-20 19:26) [3]

См. исходники TApplication в модуле Forms. Все можно, если захотеть



Mikhail   (2002-03-20 19:35) [4]

Спасибо. Посторонний оптимизм не всегда заразителен...
Впрочем, к исходникам отсылать - не велика помощь. Тем не
менее спасибо, drpass, что напомнили об их существовании.
Возможно кто-нибудь посоветует что-либо поконкретнее.
Заранее благодарен.



Пиноккио   (2002-03-20 22:20) [5]

1. http://www.sources.ru/delphi/gui/hintwindows_with_icons.shtml
2.По поводу шрифта я делал так
Application.OnShowHint := MyProc1

procedure MyProc1 (var HintStr: String;
var CanShow: Boolean; var HintInfo: THintInfo);
...
for I := 0 to Application.ComponentCount - 1 do
if Application.Components[I] is THintWindow then begin
with THintWindow(Application.Components[I]).Canvas do begin
Font.Name := TControl(HintInfo.HintControl).Font.Name;
Font.Size := 10;
Font.Color := TControl(HintInfo.HintControl).Font.Color;
Font.Style := Font.Style + [fsItalic];
HintInfo.HintColor := clGreen; //если хочешь менять этот параметер, то надо переопределять метод Pain THintWindow, там прописано жестко HintInfo.HintColor := clInfoBk;
end;
end;



Набережных С.   (2002-03-20 23:00) [6]

В обработчике Application.OnShowHint :
HintInfo.HintWindowClass: THintWindowClass - можно передать свой класс - потомок THintWindow.



Mikhail   (2002-03-21 19:56) [7]

А вот как раз с THintWindowClass и не проходит.
Вообще путаница какая-то с ним. Разберусь...
Тем неменее, всем большое спасибо.




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.01;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.032 c
3-71              Alexsys               2002-03-08 06:30  2002.04.01  
Как загрузить отчет из текстушки в Qreport?


1-188             madburro              2002-03-18 23:15  2002.04.01  
Print


3-75              SerKom                2002-03-07 18:20  2002.04.01  
Почему для базы на IB (SQL Dialect 3) при использовании типа полей Date или Time


1-233             Ольга                 2002-03-18 16:24  2002.04.01  
Outlook


3-20              SkyR                  2002-03-06 07:38  2002.04.01  
Что за ошибка в IB...