Hint TrayIcon

14/01/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]


Rudá

Respostas

14/01/2006

Bruno Belchior

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...


Responder Citar

14/01/2006

Rudá

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


Responder Citar

14/01/2006

Bruno Belchior

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)...


Responder Citar

14/01/2006

Rudá

Onde coloco essa função???


Responder Citar

14/01/2006

Bruno Belchior

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


Responder Citar

14/01/2006

Rudá

Eu entendi isso.

Eu coloquei essa função depois de var

var
  Form1: TForm1;

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


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


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


Responder Citar

15/01/2006

Bruno Belchior

Não precisa redeclará-la, é um método do Objeto TCoolTrayIcon (componente) basta você chamá-lo...
CoolTrayIcon.ShowBalloonHint(´Título´,´Teste´,bitError,10);



Responder Citar