Evento DBGrid

Question

Amigos, tenho um sistema com uma tabela �cadastro�.Para evitar cadastrar a mesma pessoa duas vezes nesta tabela, fa�o uma filtragem da seguinte forma:Tenho um Edit para digitar o NOME e um DBGrid que ...

Osocram · Answer

Amigo aconselho vc colocar um bot�o do lado do edit �Validar nome�
e nele vc faz a sua pesquisa e ve se existe ou n�o

Agora uma duvida sobre o que vc esta fazendo, no mundo existe pessoas com o mesmo nome. Por exemplo Jos� da Silva, Jo�o da Silva... Talvez vc esteja validando o campo errado.

Amigos, tenho um sistema com uma tabela �cadastro�. Para evitar cadastrar a mesma pessoa duas vezes nesta tabela, fa�o uma filtragem da seguinte forma: Tenho um Edit para digitar o NOME e um DBGrid que vai filtrando dentre os nomes j� cadastrados, conforme o nome que digita-se no Edit, pois ser� atrav�s do Dbgrid que irei decidir se ser� um novo registro, uma altera��o ou uma inclus�o. A minha d�vida � qual o evento, ou outra op��o que verifica quando o DBGrid fica vazio, pois neste momento terei que habilitar o bot�o NOVO. Utilizo o Delphi 6 , o banco � ACCES e uso acesso � via ADO. Espero que tenham entendido, e me ajudem, pois ainda n�o domino totalmente o DELPHI.

Edilsonlima · Answer

Quanto sua indaga��o n�o fui muito claro, mas � o seguinte:Na verdade essa tabela cadastra processos e existe um N� DE PROCESSO que tamb�m � visualizado junto com o NOME no DBGrid....

Lightshine · Answer

Edilson,O nosso amigo osocram levantou uma situa��o comum e corriqueira, a quest�o dos homonimos. Acredito que uma valida��o por algum n�mero de documento deixaria seu sistema mais preciso. O documento que eu aconselharia seria o CPF. Todo mundo tem, � de abrang�ncia nacional e � impossivel existir duas pessoas com o mesmo CPF.Imagine voc� validando por nome, e acontece de ter no seu cadastro uma pessoa chamada �Jos� da Silva�, e algum tempo depois precisa cadastrar outra pessoa com o mesmo nome? Imagine a salada que isso poderia virar?  Nessa situa��o voc� ao editar o registro perderia os dados do primeiro cadastro, ou o registro poderia estar polu�do com informa��es misturadas das duas pessoas. Isso tiraria a credibilidade do seu sistema.Passa a estrutura da sua tabela para que eu possa tentar lhe ajudar.Lightshine...

Edilsonlima · Answer

[quote:16edc49bf6=�Lightshine�]Edilson,O nosso amigo osocram levantou uma situa��o comum e corriqueira, a quest�o dos homonimos. Acredito que uma valida��o por algum n�mero de documento deixaria seu sistema mais preciso. O documento que eu aconselharia seria o CPF. Todo mundo tem, � de abrang�ncia nacional e � impossivel existir duas pessoas com o mesmo CPF.Imagine voc� validando por nome, e acontece de ter no seu cadastro uma pessoa chamada �Jos� da Silva�, e algum tempo depois precisa cadastrar outra pessoa com o mesmo nome? Imagine a salada que isso poderia virar?  Nessa situa��o voc� ao editar o registro perderia os dados do primeiro cadastro, ou o registro poderia estar polu�do com informa��es misturadas das duas pessoas. Isso tiraria a credibilidade do seu sistema.Passa a estrutura da sua tabela para que eu possa tentar lhe ajudar.Lightshine[/quote:16edc49bf6]Amigos[color=red:16edc49bf6]A minha d�vida � qual o evento, ou outra op��o que verifica quando o DBGrid fica vazio, pois neste momento terei que habilitar o bot�o NOVO.s� isso[/color:16edc49bf6]Se puderem ajudar, N�o poso validar nada (s� visual) o campo unico da tabela seria o N_PROCESSO mas tem v�rios formatos....

Lightshine · Answer

O que voc� pode fazer � no evento OnChange (quando a propriedade edit � alterda) ou no onKeyPess (quando uma tecla � pressionada) do TEdit fazer esta pesquisa e verificar se o grid est� vazio. Exemplo:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
Cadastro.Close;
Cadastro.SQL.Clear;
Cadastro.SQL.Add(�Select * from SuaTabela�);
Cadastro.SQL.Add(�where Campo like ��+edit1.text+�� );
Cadastro.Open;

if Cadastro.RecordCount = 0 then
begin
// Tabela vazia
end else
begin
// Contem registros
end;
end;

Lembrando que:
1 - Se n�o retornou na consulta nenhum registro, logo o grid est� vazio
2 - Cadastro � o nome do componente ADOQuery que voc� est� utilizando.

Danielrsanches · Answer

o DBGrid mostra todos os registros retornados na sua Query ou Table correto ??? ent�o a checagem pode ser feita na Query ou Table ...

if Query.isempty then
showmessage(�vazio�)
else
showmessage(�n�o est� vazio�);

abra�os !!!

Edilsonlima · Answer

Resolvido.Obrigado turma, Testei as duas formas e ambas est�o corretas. Deixei assim:    DataModule2.ADOQNomeProcData.Close;    DataModule2.ADOQNomeProcData.SQL.Clear;    DataModule2.ADOQNomeProcData.SQL.Add(�Select * from processo�);    DataModule2.ADOQNomeProcData.SQL.Add(�where nome like ���+edit2.text+���� �);    DataModule2.ADOQNomeProcData.Open;if DataModule2.ADOQNomeProcData.RecordCount = 0 thenbegin    BbtInserir.Enabled:=true;endelsebegin    BbtInserir.Enabled:=false;end...

Lightshine · Answer

De nada.

S� lembrando que no caso do IF conter apenas uma linha de codigo apos a verifica��o n�o h� necessidade de begin e end... Ou seja, voc� pode usar assim:

if DataModule2.ADOQNomeProcData.RecordCount = 0 then
BbtInserir.Enabled:=true
else
BbtInserir.Enabled:=false;

F�rum Evento DBGrid #371878