Porque se perderá el Enfoque al Limpiar Edit????
Por ejemplo:
Hago la prueba con un Edit y al presionar F10 mando a llamar la siguiente instruccion para limpiar el Edit:
Código Delphi
[-]
LimpiaCampo(ActiveControl)
procedure LimpiaCampo(Control:tWinControl);
begin
if Control is TEdit then
tEdit(Control).clear
else if Control is TDBEdit then
tdbEdit(Control).Clear
else if Control is TMaskEdit then
tMaskEdit(Control).Clear
end;
Al Limpiarme el Edit el enfoque se pierde y tengo que presionar 2 veces cualquier tecla para que vuelva tener el enfoque, hice la prueba sin el procedimiento solo mando llamar
Edit1.clear y me sucede lo mismo.
Agradezco cualquier sugerencia.