is a deficiency of SET WINDOW MAIN OFF, I'll fix in future releases.srvet_claudio wrote: _HMG_SYSDATA [ 271 ] := .F. // _HMG_IsModalActive, InputBox() is a modal Window
inputbox
Moderator: Rathinagiri
- srvet_claudio
- Posts: 2193
- Joined: Thu Feb 25, 2010 8:43 pm
- Location: Uruguay
- Contact:
Re: inputbox
This should not be necessary:
Re: inputbox
We are eagerly waiting for new releasesrvet_claudio wrote: is a deficiency of SET WINDOW MAIN OFF, I'll fix in future releases.
BPD
Convert Dream into Reality through HMG
Convert Dream into Reality through HMG
-
- Posts: 1275
- Joined: Tue Sep 03, 2013 4:22 am
- Location: Tecámac, México
Re: Inputbox
Hola Pablo César,
No se de donde sacaste el ejemplo de arriba, pero lo que subi es:
Saludos
Aunque la solución del Dr. Claudio Soto es genial!!!
No se de donde sacaste el ejemplo de arriba, pero lo que subi es:
Code: Select all
#include "hmg.ch"
Function main()
DEFINE WINDOW Form_1 ;
AT 0,0 ;
WIDTH 1 ; //640,480
HEIGHT 1 ;
TITLE 'InputBox Demo' ;
MAIN ;
ON INIT (MsgInfo("Hola"),Form_1.WIDTH := 640, Form_1.HEIGHT:=480)
Aunque la solución del Dr. Claudio Soto es genial!!!
- Pablo César
- Posts: 4059
- Joined: Wed Sep 08, 2010 1:18 pm
- Location: Curitiba - Brasil
Re: Inputbox
Si, Javier. Yo apenas alteré lo mismo que vos pusiste para dar ejemplo de que se puede esconder al inves de hacer chiquito.Javier Tovar wrote:No se de donde sacaste el ejemplo de arriba, pero lo que subi es:
Code: Select all
#include "hmg.ch" Function main() DEFINE WINDOW Form_1 ; AT 0,0 ; WIDTH 1 ; //640,480 HEIGHT 1 ; TITLE 'InputBox Demo' ; MAIN ; ON INIT (MsgInfo("Hola"),Form_1.WIDTH := 640, Form_1.HEIGHT:=480)
Seguro !Javier Tovar wrote:Aunque la solución del Dr. Claudio Soto es genial!!!
HMGing a better world
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein