Problema urgente por favor, estoy parado

Problema urgente por favor, estoy parado

Postby mjcc » Thu Nov 16, 2006 6:57 pm

Tengo el siguiente codigo RC:
************************************************************
#ifdef _CE
#include "c:\vce\include\arm\windows.h"
#include "c:\vce\include\arm\commctrl.h"
#endif

#define DIALOG_2 2
sub1 DIALOG 1, 2, 125, 99
STYLE WS_CHILD | 4
{
LTEXT "Fecha alta", 10, 82, 2, 26, 8
LTEXT "Codigo", 11, 4, 2, 26, 8
LTEXT "CIF/NIF", 13, 40, 2, 26, 8
EDITTEXT 210, 4, 16, 29, 12}


TestFld DIALOG 3, 6, 131, 124
STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
CAPTION "Ficha cliente"
FONT 8, "System"
{
CONTROL "", 800, "SysTabControl32", 0 | WS_CHILD | WS_VISIBLE, 1, 2, 128, 118
}
sub2 DIALOG 1, 2, 125, 99
STYLE WS_CHILD | 4
{
CONTROL "One", 110, "BUTTON", BS_AUTORADIOBUTTON | WS_GROUP | WS_TABSTOP, 4, 1, 28, 12
CONTROL "Two", 120, "BUTTON", BS_AUTORADIOBUTTON | WS_TABSTOP, 15, 12, 36, 12
CONTROL "Three", 130, "BUTTON", BS_AUTORADIOBUTTON | WS_TABSTOP, 4, 23, 36, 12
}
************************************************************
AHORA TENGO EL SIGUIENTE CODIGO EN UN FICHERO PRG
*************************************************************

FUNCTION ficha_cliente(numero_registro,obmpcli)
local oDlg, oFld, cValue

DEFINE DIALOG oDlg NAME "TestFld"

REDEFINE FOLDER oFld ID 800 OF oDlg;
PROMPTS "General", "Detalles" ;
DIALOGS "sub1", "sub2"

REDEFINE GET ID 210 OF oFld:aDialogs[ 1 ] PICTURE "XXXXXXX"

ACTIVATE DIALOG oDlg ;
ON INIT oFld:InitDialogs()
RETURN 0
*************************************************************
EL PROBLEMA QUE TENGO ES EN LA LINEA DEL REDEFINE, NO SOY CAPAZ DE REALIZAR EL REDEFINE DEL GET DEL FICHERO RC
*************************************************************
REDEFINE GET ID 210 OF oFld:aDialogs[ 1 ] PICTURE "XXXXXXX"


ALGUNO PUEDE AYUARME POR FAVOR ESTOY DESESPERADO.
mjcc
 
Posts: 139
Joined: Fri Apr 07, 2006 9:16 pm

Postby Antonio Linares » Thu Nov 16, 2006 8:40 pm

te falta especificar el nombre de la variable:

local cValue := Space( 20 )

...

REDEFINE GET cValue ID 210 OF oFld:aDialogs[ 1 ] PICTURE "XXXXXXX"
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42079
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Gracias

Postby mjcc » Fri Nov 17, 2006 8:24 am

Gracias me ha ido perfectamente.

Como siempre estais ahi cuando os necesitamos
gracias
mjcc
 
Posts: 139
Joined: Fri Apr 07, 2006 9:16 pm


Return to FiveWin para Pocket PC

Who is online

Users browsing this forum: No registered users and 29 guests