Autor
Mensagem
Postado em: 16/3/2012 9:04:24 AM
Bom pessoal, criei um programa de cadastro com conexão acesss ado e criei um campo de pesquisa para pesquisar no dbgrid só que eu precisso que ele retorne a pesquisa para que mostre novamente todos os cadastros.
o codigo de pesquisa é esse:
Form1.ADOTable1.Filter :=MAC LIKE +QuotedStr(%+selecione.text+%);
Form1.ADOTable1.Filtered := true;
o codigo de pesquisa é esse:
#Código
Form1.ADOTable1.Filter :=MAC LIKE +QuotedStr(%+selecione.text+%);
Form1.ADOTable1.Filtered := true;
Postado em: 16/3/2012 9:21:42 AM
Citação:
Bom pessoal, criei um programa de cadastro com conexão acesss ado e criei um campo de pesquisa para pesquisar no dbgrid só que eu precisso que ele retorne a pesquisa para que mostre novamente todos os cadastros.
o codigo de pesquisa é esse:
Form1.ADOTable1.Filter :=MAC LIKE +QuotedStr(%+selecione.text+%);
Form1.ADOTable1.Filtered := true;
Bom pessoal, criei um programa de cadastro com conexão acesss ado e criei um campo de pesquisa para pesquisar no dbgrid só que eu precisso que ele retorne a pesquisa para que mostre novamente todos os cadastros.
o codigo de pesquisa é esse:
#Código
Form1.ADOTable1.Filter :=MAC LIKE +QuotedStr(%+selecione.text+%);
Form1.ADOTable1.Filtered := true;
Tente assim:
#Código
Form1.ADOTable1.locate(MAC,selecione.text,[lopartialkey,locasesensitive]);
[\CODE]
Postado em: 16/3/2012 9:25:27 AM
da erro nesse codigo
Postado em: 16/3/2012 9:54:31 AM
Citação:
Tente assim:
Form1.ADOTable1.locate(MAC,selecione.text,[lopartialkey,locasesensitive]);
[\CODE]
Form1.ADOTable1.locate(MAC,selecione.text,[lopartialkey,locasesensitive]);
Citação:
Bom pessoal, criei um programa de cadastro com conexão acesss ado e criei um campo de pesquisa para pesquisar no dbgrid só que eu precisso que ele retorne a pesquisa para que mostre novamente todos os cadastros.
o codigo de pesquisa é esse:
Form1.ADOTable1.Filter :=MAC LIKE +QuotedStr(%+selecione.text+%);
Form1.ADOTable1.Filtered := true;
Bom pessoal, criei um programa de cadastro com conexão acesss ado e criei um campo de pesquisa para pesquisar no dbgrid só que eu precisso que ele retorne a pesquisa para que mostre novamente todos os cadastros.
o codigo de pesquisa é esse:
#Código
Form1.ADOTable1.Filter :=MAC LIKE +QuotedStr(%+selecione.text+%);
Form1.ADOTable1.Filtered := true;
Tente assim:
#Código
Form1.ADOTable1.locate(MAC,selecione.text,[lopartialkey,locasesensitive]);
[\CODE]
Form1.ADOTable1.locate(MAC,selecione.text,[lopartialkey,locasesensitive]);
Postado em: 16/3/2012 9:56:33 AM
ta dando erro e aparece a barra ao lado de mac
Postado em: 16/3/2012 9:59:26 AM
agora a barra foi para o slecione.txt e continua erro
Postado em: 16/3/2012 10:07:26 AM
Explicando este código...
Form1.ADOTable1.locate(MAC,selecione.text,[lopartialkey,locasesensitive]);
Nao consigo colocar aspas aqui.... Bom é o seguinte o codigo locate encontra no seu dbgrid o dado que voc~e quiser em tempo de execução. se você tem uma tabema com 1000 clientes, você utiliza este codigo para acha-lo pelo nome por exemplo, como configura este código. é bem simples a primeira parte você orienta o seu buton ou edit (edit no evento on-change) você seta sua base/tabela e depois seta o comando locate para localisar um campo na sua tabela que esta aberta, o campo de sua tabela (asapa campodatabela aspa , edit com o dado a ser localizado,[lpartialkey,locasesensitive]); ou seja ira pegar por partes do nome e por digitos case sensitive. no caso onde diz selecione.text será um edit.text.
Form1.ADOTable1.locate(MAC,selecione.text,[lopartialkey,locasesensitive]);
Nao consigo colocar aspas aqui.... Bom é o seguinte o codigo locate encontra no seu dbgrid o dado que voc~e quiser em tempo de execução. se você tem uma tabema com 1000 clientes, você utiliza este codigo para acha-lo pelo nome por exemplo, como configura este código. é bem simples a primeira parte você orienta o seu buton ou edit (edit no evento on-change) você seta sua base/tabela e depois seta o comando locate para localisar um campo na sua tabela que esta aberta, o campo de sua tabela (asapa campodatabela aspa , edit com o dado a ser localizado,[lpartialkey,locasesensitive]); ou seja ira pegar por partes do nome e por digitos case sensitive. no caso onde diz selecione.text será um edit.text.
2013 - Todos os Direitos Reservados a web-03