Luke,
check the THintWindow class
rusty example, but oh what the hey
FwHint: THintWindow;
function do-some_hint
var
rect: TRect;
begin
if FwHint = nil then
begin
FwHint := THintWindow.Create(Self);
FwHint.Color := clInfoBk;
end;
rect.Left := 0;
rect.Right := 50;
rect.Top := 0;
rect.Bottom := 50;
FwHint.ActivateHint(rect, 'some message');
end;
procedure DeleteHint;
begin
if FwHint <> nil then
begin
FwHint.ReleaseHandle;
FreeAndNil(FwHint);
end;
end
cheers
moises
__________________________________________________
Do You Yahoo!?
Make international calls for as low as $.04/minute with Yahoo! Messenger
http://phonecard.yahoo.com/
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED]
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
