Page 1 of 1
Ventanitas emergentes
Posted: Thu Jun 24, 2010 10:07 am
by jfafive
Hola amigos,
No se si existe lo que quiero hacer.
Se trata de poder usar un sistema de ventanas emergentes al estilo de las que tiene el messenger o skype cuando te notifica que un usuario se ha conectado, nos aparece una ventana tipo marco cuadradito que emerge de la barra de inicio de windows esquina inferior derecha.
Pues si se pudiera hacer esto para que una aplicación notificase mensajes de estado, sería estupendo, mi finalidad no es que informe de si un usuario se ha conectado o no. Solo se trata de utilizar ese estilo de ventana emergente en lugar de nuestro ya conocidisimo MsgInfo().
Cualquier sugerencia será agradecida.
Saludos.
Re: Ventanitas emergentes
Posted: Tue Jun 29, 2010 5:42 am
by armando.lagunas
hola:
yo uso esto, es una dialogo que se visualiza mientras termina el tiempo del meter y desaparece, se posiciona en la ventana contenedora en la parte inferior derecha, creo que simula lo que necesitas...
Code: Select all
//----------------------------------------------------------------------
FUNCTION MsgTray( oWnd, cMsg )
LOCAL DlgTray, aRct, oMet
DEFINE DIALOG DlgTray RESOURCE 14 OF oWnd
REDEFINE SAY PROMPT cMsg ID 11 OF DlgTray
REDEFINE BUTTON ID 104 OF DlgTray ACTION DlgTray:End()
oMet := TProgress():Redefine( 13, DlgTray )
ACTIVATE DIALOG DlgTray NOWAIT ;
ON PAINT ( aRct := GetClientRect( DlgTray:hWnd ), GradColor( DlgTray:hDC, aRct, CLR_WHITE, nRGB(10,0,0) ) ) ;
ON INIT ( DlgTray:MOVE((oWnd:nHeight() - 200 ),(oWnd:nWidth() - 305 )), oMet:SetRange(1,700),TrayTimer( DlgTray, 750, oMet ))
RETURN Nil
//----------------------------------------------------------------------
STATIC FUNCTION TrayTimer( DlgT, nInterval, oMet )
LOCAL oTmr
DEFINE TIMER oTmr OF DlgT INTERVAL 1 ACTION ( oMet:nPosition +=1, IIF(oMet:nPosition > nInterval, DlgT:End(), ) )
ACTIVATE TIMER oTmr
RETURN nil
//----------------------------------------------------------------------
Espero que te sirva
saludos desde chile.
Re: Ventanitas emergentes
Posted: Tue Jun 29, 2010 7:10 am
by jfafive
Gracias por la ayuda Armando.
Creo que servirá como punto de partida para lo que necesito.
Saludos,
Javier.
Re: Ventanitas emergentes
Posted: Wed Nov 10, 2010 1:21 pm
by jbrita
Hola Armando.
sabes ando buscando una ventana emergente asi como el messenger me puedes explicar como lo haces
Saludos
Re: Ventanitas emergentes
Posted: Mon Nov 10, 2014 1:34 pm
by Loren
Buenas tardes, compañeros:
Tengo necesidad de implementar este sistema de comunicación con los usuarios a través de mi aplicación. ¿Sabeis si alguien ya tiene implementado este sistema? Lo ideal sería que fuese una ventana emergente, con movimiento, que emerga de abajo hacia arriba.
jfafive (Javier), ¿tú llegaste a hacer algo al respecto?
Mil gracias.
Un saludo.
LORENZO
Desde Cádiz, España