Problemas para capturar valor de OnKeyPress

[CamiloU]

Lepe. Muchas gracias por la colaboracion. Aclaro un poco mas la situacion. i es un contador de preguntas que se incrementa hasta llegar a 160 porque el total de preguntas del formulario es 159, la cual es inicializada en 1 cada vez que se activa el Formulario. Resp es un Edit donde se ingresa la letra que marcó la persona que lleno el formulario.

Me alargo un poquito para ser mas especifico. La aplicacion busca ingresar y validar las respuestas dadas por n numero de personas en un formulario, donde las preguntas son de seleccion multiple, agrupacion y falso y verdadero.

Respecto a la idea de abreviar. Es cierto pero busco que solo se pueda ingresar una tecla por vez, simulando el ReadKey de Pascal. La idea del Clear es limpiar el Edit para el siguiente ingreso (algo que por cierto no hace).

Después de ingresar el dato, busco que se cambie la posicion de la tabla y el proximo ingreso llegue al registro siguiente.

Pero nunca me recibe el valor dado en el Edit Resp.