Código Delphi [-] if (ActiveControl is TEdit) then dato := TEdit(ActiveControl).Text;
if (ActiveControl is TEdit) then dato := TEdit(ActiveControl).Text;