Page 1 of 1

Ventana de Mensaje Temporal

Posted: Fri Oct 17, 2008 2:56 am
by fchirico
Se podría crear una función que funcione de forma similar a "InputBox" solo que sea un LABEL donde uno pueda mostrar un mensaje por un tiempo determinado por el usuario, similar a la propiedad "cTimeoutValue" de "InputBox", es más hasta se podría usar InputBox creando la propiedad READONLY y la posibilidad de sacar los botones de ACEPTAR y CANCELAR.

Eso es todo por hoy.

Saludos, Fernando Chirico.

Re: Ventana de Mensaje Temporal

Posted: Fri Oct 17, 2008 11:24 am
by Roberto Lopez
fchirico wrote:Se podría crear una función que funcione de forma similar a "InputBox" solo que sea un LABEL donde uno pueda mostrar un mensaje por un tiempo determinado por el usuario, similar a la propiedad "cTimeoutValue" de "InputBox", es más hasta se podría usar InputBox creando la propiedad READONLY y la posibilidad de sacar los botones de ACEPTAR y CANCELAR.

Eso es todo por hoy.

Saludos, Fernando Chirico.

Something like that is in my TODO list from long time ago.

It will be come :)

Regards,

Roberto.

Re: Ventana de Mensaje Temporal

Posted: Fri Oct 17, 2008 12:10 pm
by fchirico
Roberto Lopez wrote:
fchirico wrote:
It will be come :)

Regards,

Roberto.
Thank You Roberto for listen !!!

Saludos, Fernando Chirico.

Re: Ventana de Mensaje Temporal

Posted: Fri Oct 17, 2008 4:01 pm
by Roberto Lopez
fchirico wrote:
Roberto Lopez wrote:
fchirico wrote:
Thank You Roberto for listen !!!
You are welcome!!!

Regards,

Roberto.

Re: Ventana de Mensaje Temporal

Posted: Tue Oct 21, 2008 8:25 pm
by renemr
Gracias: cuando el usuario le da click al boton de "salvar informacion" de mi programa, quiero que le aparezca, por breves segundos, el mensaje de "Registro actualizado", y que dicho mensaje desaparezca solo.
Traté con el LABEL pero tengo que crear un "window" que contenga el label y en consecuencia requiero de una accion del usuario para desactivar la pantalla y salir....como le pongo al label un tiempo de salida y que en automatico desaparezca el mensaje?

Re: Ventana de Mensaje Temporal

Posted: Wed Oct 22, 2008 4:01 am
by Rathinagiri
Googled English:

when the user gives you click the button "save info" on my agenda, I want him to appear, for brief seconds, the message "Register updated," and that the message just disappears.
I tried to LABEL but I have to create a "window" that contains the label and thus require action by a user to turn off the screen and get out .... as I put the label out time and that automatically disappears message?

Answer:

You can use a timer along with a splash window. Please see the HMG samples splashdemo and timer.

Googled Spanish:

Puede utilizar un temporizador junto con una bola de la ventana. Por favor, consulte la HMG muestras splashdemo y el timer.

Re: Ventana de Mensaje Temporal

Posted: Mon Oct 27, 2008 3:48 pm
by renemr
Thanks for the support !!

Re: Ventana de Mensaje Temporal

Posted: Mon Oct 27, 2008 5:14 pm
by renemr
Where can I see the "splashdemo" sample ? I've already checked the samples section but I can´t find it .......thanks

Re: Ventana de Mensaje Temporal

Posted: Tue Oct 28, 2008 9:48 am
by gfilatov
renemr wrote:Where can I see the "splashdemo" sample ? I've already checked the samples section but I can´t find it .......thanks
Hi,

Take a look for the following sample at your folder hmg\Samples\SPLASHDEMO:

Code: Select all

/*
 * MINIGUI - Harbour Win32 GUI library Demo
 *
 * Copyright 2002 Roberto Lopez <harbourminigui@gmail.com>
 * http://harbourminigui.googlepages.com/
*/

#include "minigui.ch"

Function Main

	DEFINE WINDOW Form_Main ;
		AT 0,0 ;
		WIDTH 640 HEIGHT 480 ;
		TITLE 'Main Window' ;
		MAIN ;
		NOSHOW 

	END WINDOW

	DEFINE WINDOW Form_Splash ;
		AT 0,0 ;
		WIDTH 500 HEIGHT 200 ;
		TITLE '';
		TOPMOST NOCAPTION ;
		ON INIT SplashDelay() ;
		ON RELEASE Form_Main.Maximize()

		@ 70,10 LABEL Label_1 ;
		WIDTH 500 HEIGHT 40 ;
		VALUE 'Splash WIndow (Wait a Moment)' ;
		FONT 'Arial' SIZE 24 

	END WINDOW

	CENTER WINDOW Form_Splash

	ACTIVATE WINDOW Form_Splash , Form_Main

Return Nil

Procedure SplashDelay()

Local iTime

	iTime := Seconds()

	Do While Seconds() - iTime < 5
	EndDo

	Form_Splash.Release

Return