Como activar un ScrollBars de un TDBMemo

[hook]

Hola a todos, tengo un TDBMemo que cuando lo consultan esta enabled=false para que no puedan escribir nada, pero cuando esta en este estado el ScrollBars tambien esta inactivo impidiendo poder ver todo el contenido del Memo. Mi pregunta es, como puedo tener el Memo desactivado para que no escriban y a la vez tener el ScrollBars activado para que puedan leerlo completamente?
NOTA --> Cuando le dan a un boton la propiedad enabled pasa a true podiendo escribir y borrar en el memo.
Un saludo y gracias.

[reevil]

ya probaste con la propiedad readonly = true ??

saludos

[hook]

Pero esa propiedad lo que hace es convertir el memo en solo lectura y yo necesito poder escribir ... no me sirve, gracias.

[[Lepe]]

Podrías intentar (no lo he probado) a poner en el onKeyDown del TDBMemo:

key := #0 ó Key := 0

con eso anulas lo que se pulse, pero puede usar el portapapeles de windows... cuidadín (para esto puedes asociarle un popupmenú que no tenga elementos, así se inhabilita el de windows).

El evento OnKeyDown lo puedes asignar por código y quitarlo asignándole nil, así puedes escribir despues.

Código Delphi [-]
  if necesito_escribir then
     DBMemo1.OnkeyDown := nil
  else
     DBMemo1.OnkeyDown := DBMemo1KeyDown // este evento tiene el Key := 0 para que no acepte las teclas

Edito: Aver ... igual que haces con Enabled que lo pones a true o false... tambien puedes hacerlo con ReadOnly como te dijo reevil ¿no? es más fácil que mi solución.


Saludos

[hook]

eso tampoco me ha funcionado.....

[[Lepe]]

La idea de reevil si me funciona, comprobado.