¿Cómo puedo dividir un texto en dos campos en power builder?
Mi pregunta es fácil.
¿Tengo un campo de texto a ese campo de texto tengo que agarrar la palabra que se dígito y dividirla en 50% y desplegar la primera parte en un campo de texto y el otro 50% en otro campo de texto?
¿Tengo un campo de texto a ese campo de texto tengo que agarrar la palabra que se dígito y dividirla en 50% y desplegar la primera parte en un campo de texto y el otro 50% en otro campo de texto?
1 Respuesta
Respuesta de davidpy
1
En el evento itemchanged de tu datawindow coloca este script
string ls_texto_largo, ls_parte_uno, ls_parte_dos
integer li_longitud
if this.getcolumnname() = 'nombrecolumna' then
//tomamos la palabra escrita
ls_texto_largo = trim(string(data))
//tomamos la cantidad de caracteres de la palabra
li_longitud = len(ls_texto_largo)
if li_longitud > 0 then
ls_parte_uno = mid(ls_texto_largo, 1, int(li_longitud/2))
ls_parte_dos = mid(ls_texto_largo, (int(li_longitud/2) + 1))
this.setitem(1, "campo_uno", ls_parte_uno)
this.setitem(1, "campo_dos", ls_parte_dos)
end if
end if
Es uno código muy sencillo y MUY MEJORABLE.. pero la idea es que te de un panorama.. ya queda a tu cargo mejorarlo...
string ls_texto_largo, ls_parte_uno, ls_parte_dos
integer li_longitud
if this.getcolumnname() = 'nombrecolumna' then
//tomamos la palabra escrita
ls_texto_largo = trim(string(data))
//tomamos la cantidad de caracteres de la palabra
li_longitud = len(ls_texto_largo)
if li_longitud > 0 then
ls_parte_uno = mid(ls_texto_largo, 1, int(li_longitud/2))
ls_parte_dos = mid(ls_texto_largo, (int(li_longitud/2) + 1))
this.setitem(1, "campo_uno", ls_parte_uno)
this.setitem(1, "campo_dos", ls_parte_dos)
end if
end if
Es uno código muy sencillo y MUY MEJORABLE.. pero la idea es que te de un panorama.. ya queda a tu cargo mejorarlo...
