Page 1 of 1
Permanecer Visible
Posted: Tue Jul 29, 2014 9:03 pm
by LOUIS
Hola a Todos:
Trabajo en modo console-gui y quisiera vuestra ayuda, el caso es que en la screen de console quiero que aparezca una leyenda programada con un Define Window, pero que la leyenda permanezca mientras puedo crear, actualizar o buscar información de una tabla.
Procedure LEYENDA()
DEFINE WINDOW LEYE1;
AT 0,0 WIDTH 800 HEIGHT 600 BACKCOLOR BLUE NOSIZE
@ 100,10 LABEL Label_1 VALUE "MY SYSTEM" FONT "ARIAL" SIZE 24 BOLD FONTCOLOR GREEN WIDTH 800 HEIGHT 150
END WINDOW
ACTIVATE WINDOW LEYE1
Return
La leyenda debe permanecer visible, pero no me deja pasar a console, si primero no la desaparezco ya sea con .Release , con .Hide, con On Key Escape, o con un Define Timer ...
Hay como dejarla visible y me deje pasar a Console con algún DISABLED, VISIBLE, FOCUS o programando alguna tecla F4 por ejemplo ?
De antemano muchas gracias Amigos.
Permanecer Visible
Posted: Tue Jul 29, 2014 9:08 pm
by Pablo César
Hola Louis, Creo que esto no sea posible. Son dos ambiente completamente diferentes. A no ser que abras las dos ventanas (no fullscreen) y exibirlasd una al lado de la otra.
Re: Permanecer Visible
Posted: Tue Jul 29, 2014 9:44 pm
by danielmaximiliano
Enviando mensajes entre aplicaciones puede llegar a ser.
Code: Select all
SendData ( <cStationName> , <Data> )--> Nil
If is not data available for active station, Nil is returned.
Re: Permanecer Visible
Posted: Tue Jul 29, 2014 10:26 pm
by LOUIS
Estimado Pablo César, eso me interesa ... cómo lo hago ... help me please !
Permanecer Visible
Posted: Wed Jul 30, 2014 12:50 am
by Pablo César
Yo decia algo asi baseado en el ejemplo C:\hmg.3.3.1\SAMPLES\Basics\MIXEDCONSOLE:
Code: Select all
#include "hmg.ch"
REQUEST HB_GT_WIN_DEFAULT
Function Main()
DEFINE WINDOW form_1 AT 100 , 700 WIDTH 200 HEIGHT 200 ;
TITLE "Mixed Mode Demo" MAIN ON INIT TestConsole()
DEFINE LABEL Label_1
ROW 50
COL 40
WIDTH 120
HEIGHT 24
VALUE "Label_1"
END LABEL
END WINDOW
ACTIVATE WINDOW form_1
Return Nil
Function TestConsole()
Local cName:="LOUIS"
Local nAnios:=18
SetMode(25,80)
CLS
@ 10,10 Say 'Nombre:' GET cName
@ 11,10 Say 'Edad:' GET nAnios
Read
Alert(cName+" con "+AllTrim(Str(nAnios)))
Form_1.Release
Return Nil
No sé si te ayuda LOUIS. Para mi todo esto de combinar console con GUI es una tarea muy dificil de conciliar.
Re: Permanecer Visible
Posted: Wed Jul 30, 2014 3:52 am
by Javier Tovar
Hola LOUIS,
Cual es el propósito de poner una alerta como la indicas, en modo consola?, no se puede hacer en solo GUI???, no se, pero como dice Pablo César, es difícil de conciliar esos dos ambientes, No es suficiente GUI???
Son solo preguntas, espero no molestar.
Saludos.
Re: Permanecer Visible
Posted: Wed Jul 30, 2014 3:28 pm
by LOUIS
Estimado Pablo César:
La sentencia ON INIT sólo se la puede usar cuando arranca el programa con Function Main y define el Primer Window en modo Gui ? ... O se puede usar ON INIT en cualquier momento del Programa y con cualquier Window definida en modo Gui ?
Gracias nuevamente x anticipado por vuestro tiempo y respuesta
Re: Permanecer Visible
Posted: Wed Jul 30, 2014 3:37 pm
by LOUIS
Estimado Javier Tovar:
Soy nuevo en ambiente Gui y lo complejo que tengo en Modo Console, de todas formas lo estoy combinando bastante bien, claro está con la ayuda de este maravilloso forum. Y no arranco en modo gui 100% porque creo me volvería loco, como ya ví un comentario de alguien x ahí
Sin embargo, poco a poco, leyendo, preguntando y viendo los ejemplos, voy aprendiendo cada día un poco más.
Disculpad si molesto, creedme que hago lo que puedo
Re: Permanecer Visible
Posted: Wed Jul 30, 2014 3:53 pm
by Javier Tovar
Hola LOUIS,
Ha OK entiendo ahora tu situación, pensé en que luego muchas veces pensamos las cosas caprichosamente y nos aferramos a hacer las cosas a nuestra manera, como quien dice le buscamos "tres patas al gato" (sabiendo que tienen cuatro!).
Bien, creo que tienes la solución en tus manos; y no molestas en lo absoluto!, yo nada más lo poco que se es programar en GUI y desconozco la programación en Consola.
Saludos y suerte!
Re: Permanecer Visible
Posted: Wed Jul 30, 2014 5:01 pm
by Pablo César
LOUIS wrote:La sentencia ON INIT sólo se la puede usar cuando arranca el programa con Function Main y define el Primer Window en modo Gui ? ... O se puede usar ON INIT en cualquier momento del Programa y con cualquier Window definida en modo Gui ?
Si. Se puede usar en cualquier DEFINE del formulário/window en GUI.