Asignar un Texto de 655 caracteres a editbox VFP
Hola, tengo un problema con la asignacion de un texto que traigo de una bd y se lo quiero asignar a un EditBox.
El codigo genera tantos editbox como registros tenga el cursor, y a cada uno de los editbox le asigna los datos que tenga el registro. Me anda bien con todos menos con los que su largo es grande por ejemplo 655 caracteres. Me da un error "command contains unrecognized phrase/keyword"
El codigo es el sig:
SELECT (l_nombre_cursor) &&detalle es un campo del cursor
nContador=0
DO WHILE !EOF()
nContador =nContador +1
IF NOT ISNULL(detalle) AND NOT EMPTY(detalle)
l_detalle= "detalle" + AllTrim( Str( nContador ) )
THISFORM.AddObject(l_detalle,"editbox")
l_com="THISFORM." +l_detalle+".value='"+ ALLTRIM(detalle)+"'"
&l_com
ENDIF
SKIP
ENDDO
Ojala me puedan ayudar
desde ya mcuhas gracias
El codigo genera tantos editbox como registros tenga el cursor, y a cada uno de los editbox le asigna los datos que tenga el registro. Me anda bien con todos menos con los que su largo es grande por ejemplo 655 caracteres. Me da un error "command contains unrecognized phrase/keyword"
El codigo es el sig:
SELECT (l_nombre_cursor) &&detalle es un campo del cursor
nContador=0
DO WHILE !EOF()
nContador =nContador +1
IF NOT ISNULL(detalle) AND NOT EMPTY(detalle)
l_detalle= "detalle" + AllTrim( Str( nContador ) )
THISFORM.AddObject(l_detalle,"editbox")
l_com="THISFORM." +l_detalle+".value='"+ ALLTRIM(detalle)+"'"
&l_com
ENDIF
SKIP
ENDDO
Ojala me puedan ayudar
desde ya mcuhas gracias
1 Respuesta
Respuesta de Jerry Ortiz
-1