Ver Mensaje Individual
  #1  
Antiguo 27-05-2006
Dr.Bizarre Dr.Bizarre is offline
Registrado
 
Registrado: abr 2006
Posts: 6
Reputación: 0
Dr.Bizarre Va por buen camino
LabeledEdit.onEnter <-- ayuda

al terminar de tipear caracteres en un TEdit o en TLabeledEdit, quiero presionar enter y llame a un procedimiento:

Código Delphi [-]
procedure TForm1.cambio(Sender: TObject);
begin

  a:=StrToInt(LabeledEdit1.Text);
  Label1.Caption:=IntToStr(a);
  LabeledEdit1.Text:='';
  LabeledEdit1.Visible:=false;
  LabeledEdit2.Visible:=true;
  
end;

cuando lo cargo en el evento OnEnter del TLabeledEdit , todo parece que lo cargara en el OnActivate de la forma.

alguna sugerencia ?
Responder Con Cita