Ir al contenido


Foto

Mostrar mensaje emergente (balloontip) en el systray (junto al reloj).


  • Por favor identifícate para responder
No hay respuestas en este tema

#1 monchito_elroro

monchito_elroro

    Advanced Member

  • Miembros
  • PipPipPip
  • 259 mensajes

Escrito 23 julio 2012 - 08:24

Buenas con todos, quisiera compartirles este pequeño código que puede que les sirva,
resulta que una vez quize saber como mostrar esos mensajitos tipo pensamiento en el
systray (osea junto al reloj)... recuerdo que una vez lo hice pero se me olvido, hoy
practicando otra vez logró encontrar de nuevo la manera y se los comparto:

Teniendo el componente “Trayicon” ponemos el siguiente código:



delphi
  1. procedure TForm1.Button1Click(Sender: TObject);
  2. begin
  3.   TrayIcon1.BalloonTitle:='Monchito';
  4.   TrayIcon1.BalloonHint:='Hola amigos como están .....!!!';
  5.   TrayIcon1.ShowBalloonHint;  // este era el principal
  6. End;



Me alegra encontrar esta manera tan simple de hacerla y se que a alguien le servirá.

Saludos.  :) :)
  • 0




IP.Board spam blocked by CleanTalk.