desactivar evento para escribir en un dbedit

[ecfisa]

Hola.

Una forma puede ser:

Código Delphi [-]
procedure TForm1.btnActivarClick(Sender: TObject);
begin
  DBEdit1.ReadOnly:= False; // permite escribir
end;

procedure TForm1.btnDesactivarClick(Sender: TObject);
begin
  DBEdit1.ReadOnly:= True; // prohibe escribir
end;

Saludos.