evento keypress

[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

[Minio]

Mira he probado esto, con el OnKeyPress y funciona:

Formulario donde insertas el DBEdit
KeyPreview -> True

DBEdit en el Evento OnKeyPress

Código Delphi [-]
if key = #13 then
  ShowMessage('Entra');

Y no me hace nada raro, el evento OnKeyDown es prácticamente igual pero cambiamos #13 por VK_RETURN