KAYO
27-01-2007, 14:02:07
He intando de multiples formas salir de un componente Tedit con felcha abajo y no logro la solucion.... con lo último que intenté fue con esto y nada:
En la propiedad de KeyPreview de la forma la puse en true y en el evento OnKeyPress del TEDIT puse esto:
procedure TFMantenimientoArticulos.EdFiltroKeyPress(Sender: TObject;
var Key: Char);
begin
if key = chr(24) then GSQL.SetFocus
else if key = chr(13) then BtAceptar.Click;
end;
Agradezco nuevamente vuestra ayuda
En la propiedad de KeyPreview de la forma la puse en true y en el evento OnKeyPress del TEDIT puse esto:
procedure TFMantenimientoArticulos.EdFiltroKeyPress(Sender: TObject;
var Key: Char);
begin
if key = chr(24) then GSQL.SetFocus
else if key = chr(13) then BtAceptar.Click;
end;
Agradezco nuevamente vuestra ayuda