THintWindow

← →
servs © (2003-08-06 12:36) [0]

Кто использовал сабж, подскажите как сделать чтобы рамочка у него была такая же как у обычного виндового хинта, т.е тоненькая черная.

← →
Семен Сорокин © (2003-08-06 12:44) [1]

А разве она не такая?

← →
servs © (2003-08-06 15:58) [2]

Нет. По крайней мере у меня (Д7 + ХР) она трехнерная, и тенью.

← →
Семен Сорокин © (2003-08-06 16:05) [3]

ну не знаю поменяй так:
THintWindow.Canvas.Pen.Style = psSolid;
THintWindow.Canvas.Pen.Size = 1;
THintWindow.Canvas.Pen.Color = clBlack;

← →
Игорь Шевченко © (2003-08-06 16:18) [4]

procedure THintWindow.CreateParams(var Params: TCreateParams); begin inherited CreateParams(Params); with Params do begin Style := WS_POPUP or WS_BORDER; WindowClass.Style := WindowClass.Style or CS_SAVEBITS; if NewStyleControls then ExStyle := WS_EX_TOOLWINDOW; ( ExStyle) procedure THintWindow.CreateParams(var Params: TCreateParams); begin inherited CreateParams(Params); with Params do begin Style := WS_POPUP or WS_BORDER; WindowClass.Style := WindowClass.Style or CS_SAVEBITS; if NewStyleControls then ExStyle := WS_EX_TOOLWINDOW; AddBiDiModeExStyle(ExStyle); end; end;

← →
servs © (2003-08-06 17:39) [5]

2 Семен Сорокин

Не катит

2 Игорь Шевченко

Я не понял, можно прокоментировать?

У меня эта функция имеет несколько другой вид. Там есть еще:
if CheckWin32Version(5, 1) then
WindowClass.Style := WindowClass.style or CS_DROPSHADOW;

Но тень мне не мешает на самом деле. Непонятно почему у Винды все границы черные, а у меня верхняя и левая - серые, нижняя и правая - черный.

← →
TButton © (2003-08-06 18:01) [6]

эээ... а чо ето за хрень? обычный ShowHint=true нас уже не устраивает? вы поди и не знаете как люди в свое время над многострочными хинтами бились....

servs © (06.08.03 17:39)

Сделать наследник THintWindow, перекрыть ему метод CreateParams и убрать в перекрытом методе эту строчку :)

2 TButton

Я то же так умею. Только у нас ситуация:

Есть СОМ сервер, висит в трее. Когда клиент вызвал его метод, он должен показать хинт возле иконки своей, что бы уведомить юзера о произошедшем событии (он там для этого собственно и висит).
Ну что, куда будем писать ShowHint=true?

THintWindow Найти похожие ветки