Problemas con un MEMO
 

Estoy restringiendo un EDIT para que solo puedan introducir valores númericos,

Código Delphi [-]
begin
 
if not (key in ['0'..'9',#8])then
   key:=#0;
 
end;

Me funciona perfectamente porque no me deja escribir texto en el EDIT pero el texto me lo escribe en un MEMO que tengo colocado al lado.

Gracias por la ayuda.

A ver, a ver, ¿estás diciendo que si tecleas ABC en el edit, aparece ABC en el memo?

:eek:

Si. Tecleo ABC en el EDIT y no me lo escribe pero si en el MEMO. No lo entiendo.

Gracias.

Ademas veo que solo me lo escribe cuando tengo el BLOC.MAYUS DESACTIVADO...rarisimo

Hola, a ver si va a ser que se te queda enganchado la tecla TAB al presionar el Bloqueo de Mayúsculas, por eso, al presionarla pulsa a la vez el tab (al estar enganchada) y se mueve de control (en este caso el Memo), y como ya está en el memo te permite escribir.

Es lo único que se me ocurre que pueda ocurrir. :confused:

Saludos

¿Usas algún tipo de "capturador" del tipo Application.OnMessage o similar en el programa? Podria ser que estubiera activado cuando no lo deberia estar.

¿que eventos usas en el Edit y en el Memo?

No uso ningun evento en el MEMO ni en el EDIT. Tengo habilitado un PANEL con diferentes teclas ( simulando una máquina de escribir ) y usando el evento KeyPress escribo en el MEMO o en el EDIT.

Gracias

Pues por ahí hubiéramos empezado. Si dices que con el evento OnKeyPress del panel escribes tanto en el edit como en el memo entonces el código que pusiste al principio no es todo. ¿Qué tal si lo pones tal cual lo tienes?

// Saludos