Grid as Edit

[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.

[gfilatov]

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)

[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
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

[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...