Page 1 of 1

Ajustar Listbox

Posted: Tue Nov 05, 2024 7:41 pm
by servicomver
Hola, ¿Es posible ajustar una cadena larga al ancho de un Listbox, sin que corte las palabras ?
COLUMNA1 COLUMNA2 COLUMNA3
Clave: 001 Sucursal: Independencia
Codigo: AB1013 Ubicacion: Centro
Fecha: 05/11/2024 Equipo: Refrigerador

El campo de la columna 3 es un Longtext de un RecordSet SQL

@ 3.5, .5 LISTBOX oLbx FIELDS "Folio: " + Transform(oRecordSet:Fields("Id"):value,"9999") + CRLF + "Codigo:" +
IIF(oRecordSet:Fields("Codigo"):value=NIL,"",Transform(oRecordSet:Fields("Codigo"):value,"99999")) + CRLF + "Fecha:",;
"Sucursal:" + oRecordSet:Fields("Sucursal"):value + CRLF + "Ubicacion: " + oRecordSet:Fields("Ubicacion"):value + CRLF + ;
oRecordSet:Fields("Descripcion"):value,;
oRecordSet:Fields("Falla"):value); ///////////////aqui necesito ajustar el texto al ancho de los 3 renglones///////////////
HEADERS "ID","Sucursal", "Falla";
FIELDSIZES 90,200,200;
SIZE 990, 350 OF oWndchild

Gracias, espero haberme explicado correctamente.

Re: Ajustar Listbox

Posted: Tue Nov 05, 2024 8:38 pm
by servicomver
Ya quedó solucionado. con una Función logré dividir el campo y ponerlo sin cortar palabras :D

Re: Ajustar Listbox

Posted: Wed Nov 06, 2024 12:53 pm
by JoseAlvarez
servicomver wrote:Ya quedó solucionado. con una Función logré dividir el campo y ponerlo sin cortar palabras :D
Quizás esta cláusula te sirva para hacerlo mas fácil:

Code: Select all | Expand

oLbx:lMChange := .F.  / .T.
El usuario puede ajustar el tamaño de todas las columnas desde el encabezado.