Board index » delphi » Show Hints

Show Hints

Hello everybody,

     how do I do to active all hints (all components in the form)
without move the mouse above the component/object ???

best regards,
Evandro

 

Re:Show Hints


Try TApplication.ActivateHint.

Displays a hint window for the control at a specified position.

procedure ActivateHint(CursorPos: TPoint);

Description

ActivateHint locates the control or menu item at the position specified by
CursorPos, where CursorPos represents a screen coordinates in pixels. After
locating the control, ActivateHint displays the control's Hint in a hint
window.

--
Nick Semergey
Kiev, Ukraine

Quote
"Evandro Braga" <evandro_clay...@yahoo.com.br> wrote in message

news:71239f5.0211261048.26c33316@posting.google.com...
Quote
> Hello everybody,

>      how do I do to active all hints (all components in the form)
> without move the mouse above the component/object ???

> best regards,
> Evandro

Re:Show Hints


You want to display the hints for every control on the form at the same
time? Okay..

var n:integer;
begin
for n:=0 to form1.componentcount-1 do
application.ActivateHint(form1.clienttoscreen(point(
  tcontrol(form1.components[n]).left,
  tcontrol(form1.components[n]).top)));
end;

(The wrapping was just so that it would be displayed properly in your news
reader). Compiled but untested.

Cheers,
Nicholas Sherlock

Quote
"Evandro Braga" <evandro_clay...@yahoo.com.br> wrote in message

news:71239f5.0211261048.26c33316@posting.google.com...
Quote
> Hello everybody,

>      how do I do to active all hints (all components in the form)
> without move the mouse above the component/object ???

> best regards,
> Evandro

Other Threads