Ajustar Listbox

[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.

[servicomver]

Ya quedó solucionado. con una Función logré dividir el campo y ponerlo sin cortar palabras

[JoseAlvarez]

Ya quedó solucionado. con una Función logré dividir el campo y ponerlo sin cortar palabras

Quizás esta cláusula te sirva para hacerlo mas fácil:

Code: Select all  Expand view

oLbx:lMChange := .F.  / .T.

El usuario puede ajustar el tamaño de todas las columnas desde el encabezado.