Page 1 of 1

Grid as Edit

Posted: Sat Feb 11, 2017 3:35 pm
by LOUIS
Hola Amigos

Aquí con otra inquietud ... cuando defino y muestro el Grid de una DBF, esta generalmente se muestra en modo Horizontal (es igual a BROW en VFP), pero cómo hago si quiero ese mismo Grid verlo en modo Vertical (es igual a EDIT en VFP) ?

Adjunto 2 imágenes para mejor apreciación.

De antemano muchas gracias por vuestro tiempo y ayuda.

Re: Grid as Edit

Posted: Sat Feb 11, 2017 4:13 pm
by gfilatov
LOUIS wrote: Sat Feb 11, 2017 3:35 pm Hola Amigos

Aquí con otra inquietud ... cuando defino y muestro el Grid de una DBF, esta generalmente se muestra en modo Horizontal (es igual a BROW en VFP), pero cómo hago si quiero ese mismo Grid verlo en modo Vertical (es igual a EDIT en VFP) ?
Hola Louis,

It is possible (and many more) with the PropGrid library in the HMG Extended Edition (please take a look for an image below) 8-)

Re: Grid as Edit

Posted: Sun Feb 12, 2017 4:44 pm
by LOUIS
MR gfilatov

Gracias por responder, pero debo decirle que no logro entender cómo hacer su explicación, debido a que lo mío es procedural y no se dónde están esas propiedades :oops:
También debo decirle que trabajo con la versión 3.0.46
Adjunto la codificación ... donde el Grid se ve Horizontal ... qué debo agregar para ver el Grid en forma Vertical ?

Thanks in advance :)

Code: Select all

#include <hmg.ch>

Function Main

aCtrl_1 := {'TEXTBOX','CHARACTER'}
aCtrl_2 := {'TEXTBOX','CHARACTER','9999999999'}
aCtrl_3 := {'TEXTBOX','CHARACTER','9999999999'}

USE XUSERS

DEFINE WINDOW SAMPLE AT 0,0 WIDTH 800 HEIGHT 400 TITLE 'XUSERS' MAIN

   DEFINE GRID GRID_1
      ROW 10
      COL 10
      WIDTH 800
      HEIGHT 400
      WIDTHS { 125, 50, 50 }
      HEADERS {'USUARIO','REVELA','PASSWORD'}
      COLUMNVALID { {|| .t. }, {|| .t. }, {|| .t. } }
      COLUMNCONTROLS { aCtrl_1 , aCtrl_2 , aCtrl_3 }
      ROWSOURCE "XUSERS"
      COLUMNFIELDS {'USUARIO','REVELA','PASSWORD'}
      ALLOWEDIT .T.
      ALLOWAPPEND .T.
      ALLOWDELETE .T.
   END GRID         

   ON KEY ESCAPE ACTION ThisWindow.Release
END WINDOW

sample.center
sample.activate

USE
RETURN

Grid as Edit

Posted: Sun Feb 12, 2017 7:43 pm
by Pablo César
Hola Louis,

Lo que Grigory te está diciendo es que tienes como usar el GRID en forma VERTICAL como tu quieres pero... en Minigui (extended edition) no en HMG porque en HMG no tenemos esto... :|