|
TDBEdit
Tengo un TDBEdit y quiero que cuando ponga sobre él un determinado texto se me activen otros edit que tengo con la propiedad enabled a false. Lo he hecho de la siguiente manera y no funciona
procedure TFEntradas.ERepresentanteExit(Sender: TObject);
begin
if ERepresentante.Text = 'S' then begin
ENifRepresentante.Enabled := true;
ENRepresentante.Enabled := true;
SBARepresentante.Enabled := true;
end else
Erepresentante.text := 'n';
ENifRepresentante.Enabled := false;
ENRepresentante.Enabled := false;
SBARepresentante.Enabled := false;
end;
Lo he probado con los eventos OnChange y OnExit y con ninguno funciona
Un Abraaaaaaaazo a Todos
|