Array
(
)

Hint TrayIcon

Rudá
   - 14 jan 2006

Estou usando o TrayIcon do RxLib e queria fazer igual a imagem, tem como???

[img:fec8f0a876]http://www.startmobile.com.br/hint.gif[/img:fec8f0a876]


Bruno Belchior
   - 14 jan 2006

Existe [url=http://downloads.delphi32.com/2726/5086/cooltray.zip]esse[/url] componente (CoolTrayIcon), que na minha opinião é o melhor do segmento, que utiliza [url=http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/commctls/tooltip/reflist.asp]essa[/url] API documentada no MSDN...


Rudá
   - 14 jan 2006

Instalei ele mas como faço para mandar a msg?


Bruno Belchior
   - 14 jan 2006

#Código

function ShowBalloonHint(Title: String; Text: String; IconType: TBalloonHintIcon; TimeoutSecs: TBalloonHintTimeOut): Boolean
Essa é uma função booleana que faz o que você quer, título e text são respectivamente o título que vem em negrio e a mensagem propriamente dita, TimeoutSecs é o tempo que ela vai ficar visível sem a intervenção do usuário (em segundos) e IconType é para definir qual o ícone que irá aparecer (bitNone, bitInfo, bitWarning, bitError)...


Rudá
   - 14 jan 2006

Onde coloco essa função???


Bruno Belchior
   - 14 jan 2006

Ai depende de você, quando você quiser que o balão apareça basta chamar a função...


Rudá
   - 14 jan 2006

Eu entendi isso.

Eu coloquei essa função depois de var

#Código

var
Form1: TForm1;

function ShowBalloonHint(Title: String; Text: String; IconType: TBalloonHintIcon; TimeoutSecs: TBalloonHintTimeOut): Boolean


E coloquei no button:
#Código
ShowBalloonHint(´Título´,´Teste´,bitError,´10´);


Mas o problema quando vou copilar da erro:
Undeclared identifier: ´TBalloonHintIcon´
Undeclared identifier: ´TBalloonHintTimeOut´


Bruno Belchior
   - 15 jan 2006

Não precisa redeclará-la, é um método do Objeto TCoolTrayIcon (componente) basta você chamá-lo...#Código

CoolTrayIcon.ShowBalloonHint(´Título´,´Teste´,bitError,10);