evento keypress

[Minotaure]

Utilizo Delphi 6 y tengo el mismo problema que tenía ronson.
En el evento KeyPress de un edit tengo esto:

  if (( Key = #13 ) {and ( QLinies.State in [dsEdit,dsInsert])}) then
  begin
//codigo
  end;

Pues el problema es que cuando presiono enter ni tan siquiera me entra en el evento KeyPress, tampoco si presiono Mayus+Enter como decían por aquí. En cambio al presionar cualquier otra tecla sí que me entra en el evento (hasta con la tecla de retroceso/borrar).
En el form tengo la propieadad KeyPreview=True.
Yo estoy trabajando en un ordenador de sobremesa, no un portátil.

La verdad es que llevo muchas horas probando esto hasta que he encontrado este hilo. La verdad es que no sé que puede ser. ¿Un error del Delphi 6?

[Minotaure]

Haciendo pruebas con un Form en blanco he descubierto el problema: cuándo había un único componente no había ningún problema: detectaba el enter.
Al haber más de uno lo que hacia en el primer enter pasa el foco al siguiente componente (como un Tab). Esto es porqué está definido en el global aplicación.

Ahora me las intentaré apañar con el evento on exit.

[Minio]

Como dice llonigualker, probar con el evento OnKeyDown y con la siguiente condicion:

Código Delphi [-]
  if Key = VK_RETURN then
    begin
      Key := 0;
      SpeedButtonClick(sender);
    end

Siempre que la propiedad KeyPreview del formulario este a true

[Nereida]

Empezado por Minio

Como dice llonigualker, probar con el evento OnKeyDown y con la siguiente condicion:


Código Delphi [-]
if Key = VK_RETURN then
begin
Key := 0;
SpeedButtonClick(sender);
end





Siempre que la propiedad KeyPreview del formulario este a true

Probé eso que dijiste aunque puede que lo entendiera mal.
Yo puse un:

 
if key=13 then
showmessage('entro');
end;

simplemente de prueba para ver si entraba en un dbedit que tengo.
No me funciona pero en cambio, si le doy a MAYUS + INTRO si que entra en el evento Keypress del dbedit.
Como puedo solucionar esto???

Saludos

[Minio]

Cambia del evento OnKeyPress al OnKeyDown, y recuerda poner la propiedad KeyPreview del formulario a True.

[Nereida]

Empezado por Minio

Cambia del evento OnKeyPress al OnKeyDown, y recuerda poner la propiedad KeyPreview del formulario a True.

Lo termino de cambiar pero sigue sin hacerlo. Si no es con el mayus + intro sigue sin ir

[Minio]

tiene la propiedad KeyPreview del Form a True