inputbox

[srvet_claudio]

This should not be necessary:

_HMG_SYSDATA [ 271 ] := .F. // _HMG_IsModalActive, InputBox() is a modal Window

is a deficiency of SET WINDOW MAIN OFF, I'll fix in future releases.

[bpd2000]

is a deficiency of SET WINDOW MAIN OFF, I'll fix in future releases.

We are eagerly waiting for new release

[Javier Tovar]

Hola Pablo César,

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) 

Saludos

Aunque la solución del Dr. Claudio Soto es genial!!!

[Pablo César]

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) 

Si, Javier. Yo apenas alteré lo mismo que vos pusiste para dar ejemplo de que se puede esconder al inves de hacer chiquito.

Aunque la solución del Dr. Claudio Soto es genial!!!

Seguro !