Cambiar el picture de un get en teimpo de ejecución

[nicinf]

Hola.
Me gustaría cambiar en tiempo de ejecución un Get (oSeek) que tiene un picture de texto "@!" a uno de fecha "99/99/9999". Lo he probado con oSeek:cPicture := "99/99/9999" y aunque no me dá ningún tipo de error, no me modifica el picture. Dá lo mismo que lo refresque o actualize (oSeek:Refresh(), oSeek:Update().
Alguna idea de por qué no dá error pero no hace nada y sigue admitiendo texto y no formato fecha???
Muchas gracias.

[Enrico Maria Giordano]

This is a working sample:

Code: Select all  Expand view

#include "Fivewin.ch"


FUNCTION MAIN()

    LOCAL oDlg, oGet

    LOCAL cVar1 := ""
    LOCAL xVar2 := SPACE( 35 )

    LOCAL cPic

    DEFINE DIALOG oDlg

    @ 1, 1 COMBOBOX cVar1;
           ITEMS { "C", "N" };
           ON CHANGE ( IF( cVar1 = "C", ( xVar2 := SPACE( 35 ), cPic := REPLICATE( "X", 35 ) ), ),;
                       IF( cVar1 = "N", ( xVar2 := 0, cPic := "9999" ), ),;
                       oGet:cPicture := cPic,;
                       oGet:Refresh() )

    @ 3, 1 GET oGet VAR xVar2

    ACTIVATE DIALOG oDlg;
             CENTER

    RETURN NIL

EMG

[carlos vargas]

April 2020
==========
* XIMAGE
- New DATA lMnuSave, allow hide menu options for save image
- Implemented styles 2007, 2010, 2013, 2015 for menu popup
- Added traduction Popup menu

* New: FUll support to easily build your PRGs from Microsoft free vscode. Just open
a PRG from FWH\samples and build it using Ctrl + Shift + B

* New: samples/photos.prg lets you take photos using the webcam. Thanks to many that
have contributed to it:

http://forums.fivetechsupport.com/viewt ... 79&start=0

* GET:
- New method Reset( uVal/bNewSetGet, [cPic] ) --> nil
Allows to reset the get with a new variable of a different data type
and optionally use a new picture.