Fórum Tabela em modo de edição #158112
06/05/2003
0
boa tarde, criei um aplicação e preciso fazer com que quando o usuário entrar com algum dado em um Edit meu botão de salvar fique TRUE, estou usando tabela do paradox... gostaria de um exemplo
obrigado
obrigado
Rafael Santana
Curtir tópico
+ 0
Responder
Posts
06/05/2003
Fred
no datasource tem um evento chamado OnStateChange que é chamado toda vez que a tabela muda de estado ai é so fazer como o exemplo abaixo
procedure TFrmFichaPai.DtSrcStateChange(Sender: TObject);
begin
btnIncluir.Enabled:=DtSrc.State in [dsBrowse,dsInactive];
btnGravar.Enabled:=DtSrc.State in [dsInsert,dsEdit];
btnCancelar.Enabled:=DtSrc.State in [dsInsert,dsEdit];
btnExcluir.Enabled:=DtSrc.State in [dsBrowse];
btnProcurar.Enabled:=DtSrc.State in [dsBrowse,dsInactive];
end;
:wink: 8)
procedure TFrmFichaPai.DtSrcStateChange(Sender: TObject);
begin
btnIncluir.Enabled:=DtSrc.State in [dsBrowse,dsInactive];
btnGravar.Enabled:=DtSrc.State in [dsInsert,dsEdit];
btnCancelar.Enabled:=DtSrc.State in [dsInsert,dsEdit];
btnExcluir.Enabled:=DtSrc.State in [dsBrowse];
btnProcurar.Enabled:=DtSrc.State in [dsBrowse,dsInactive];
end;
:wink: 8)
Responder
Gostei + 0
06/05/2003
Werlon Goulart
Tente
btSalvar.Enabled:=Trim(edit1.text)<>´´;
Um Abraço
Werlon Goulart
btSalvar.Enabled:=Trim(edit1.text)<>´´;
Um Abraço
Werlon Goulart
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)