Liberar botão ao alterar qualquer DBEdit
Boa Noite a todos
HEHE, meu primeiro post...
Seguinte, queria saber se alguem tem alguma sugestão para: quando o usuário alterar qualquer um dos DBEdit do meu formulário o botão salvar seja liberado.
Por enquanto é só isso...
Agradeço a atenção
HEHE, meu primeiro post...
Seguinte, queria saber se alguem tem alguma sugestão para: quando o usuário alterar qualquer um dos DBEdit do meu formulário o botão salvar seja liberado.
Por enquanto é só isso...
Agradeço a atenção
Wart
Curtidas 0
Respostas
Minuto
07/07/2004
procedure Tfrmaluno.ds1StateChange(Sender: TObject);
begin
if ds1.State in [dsinsert,dsedit] then
begin
btprocurar.Enabled:=false ;
btnovo.Enabled:=false ;
btexcluir.Enabled:=false;
btgravar.Enabled:=true;
end else
begin
btprocurar.Enabled:=true ;
btnovo.Enabled:=true ;
btexcluir.Enabled:=true;
btgravar.Enabled:=false;
end;
begin
if ds1.State in [dsinsert,dsedit] then
begin
btprocurar.Enabled:=false ;
btnovo.Enabled:=false ;
btexcluir.Enabled:=false;
btgravar.Enabled:=true;
end else
begin
btprocurar.Enabled:=true ;
btnovo.Enabled:=true ;
btexcluir.Enabled:=true;
btgravar.Enabled:=false;
end;
GOSTEI 0
Wart
07/07/2004
valew...
GOSTEI 0