Ver Mensaje Individual
  #1  
Antiguo 08-05-2005
Elfoscuro Elfoscuro is offline
Miembro
 
Registrado: mar 2005
Posts: 59
Reputación: 20
Elfoscuro Va por buen camino
Pregunta de novato con un memo

Hola. Tengo una pregunta que seguro que será de novato, pero he estado mirándome la ayuda del delphi sobre los memos y no he encontrado nada que me sirva.

Mi idea es mostrar un form que contiene un memo 'Align'eado al form. En el método show del form hago una serie de cosas, entre ellas, cargar el memo con las líneas. Al hacer ésto pensé que quedaría más "potito" si hiciera el form tan ancho que la barra de desplazamiento inferior se 'disable'ara ella misma. Es decir, que el memo se expandiera de forma que se pudiera leer todo el texto de la línea más larga.

No se si me explico. Lo hago con un ejemplo. En mi memo caben (por ejemplo) 50 letras. Al cargar el memo, una de las líneas ocupa 60, por lo que automáticamente la barra de desplazamiento inferior se activa para que esa línea se pueda leer. Bien, lo que yo quiero es que el memo, al cargar la línea de 60 letras, se agrande en anchura para que entren las 60 letras.

Además, estaría bien que no se agrandara demasiado, no vaya a salir un form de 2000 píxeles ;-)

Lo que yo había pensado es usar el textwidth que uso en los TListBox, pero o no existe esa propiedad en el memo, o no se como llegar a ella. La idea era en el bucle que se encarga de irle tirando líneas al memo, hacer la comprobación con la función textwidth, y actuar en consecuencia.

¿Existe algo así? ¿Qué instrucción debería usar?

Saludos
Responder Con Cita