Текущий архив: 2004.05.02;
Скачать: CL | DM;
Вниз
Как самому сделать всплывающую подсказку (Hint) Найти похожие ветки
← →
oleg_SYS © (2004-04-12 19:47) [0]Например, при движении по Image нужно сделать, чтоб в виде Hint`a высвечивались координаты мыши. Но хинты показываются только тогда, когда проходит время при простое курсора. Как самому создать хинт или хотя бы заставить высветиться хинту какой-либо компоненты без простоя мыши?
← →
clickmaker © (2004-04-12 20:12) [1]THintWindow
ActivateHint
← →
hgd (2004-04-12 20:55) [2]А как всем этим пользоваться. Воот надо, чтобы hint не исчезал на button
← →
hgd (2004-04-12 21:30) [3]Кто знет как этим воспользоваться для создания долгопоказывающегося hint-а.
← →
Agent13 © (2004-04-12 22:57) [4]
procedure TForm1.Image1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
var Point: TPoint;
begin
GetCursorPos(Point);
Image1.Hint := IntToStr(Point.X) + " " + IntToStr(Point.Y);
Application.ActivateHint(Point);
end;
Страницы: 1 вся ветка
Текущий архив: 2004.05.02;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.037 c
