Como filtrar campos em um table digitando so a aprimeira letra
19/02/2013
0
alguem poderia me dar uma força????
Flavio Oliveira
Posts
20/02/2013
Perivaldo Martins
alguem poderia me dar uma força????
Como você está fazendo, e qual tipo desse campo descrição? Porque você não usa Query?
Boa sorte e bons códigos!
20/02/2013
Flavio Oliveira
segue oscodigos que eu implementei.
obrigado por enquanto.
begin
ibTable1.filtered := false;
if (edit2.Text<> '') then
begin
ibTable1.filter := 'descricao = '+ QuotedStr(Edit2.text);
ibTable1.filtered := true;
ibTable1.locate('descricao',Edit2.Text,[ locaseinsensitive,lopartialkey ]);
end;
end;
end.
20/02/2013
Douglas
concordo com você. Se ele fizer isto
o código ficaria assim.
begin
QryExemplo.Close;
QryExemplo.SQL.Clear;
QryExemplo.SQL.Add('SELECT * FROM EXEMPLO');
QryExemplo.SQL.Add('WHERE NOMEEXEMPLO LIKE' + QuotedStr(edit2.Text) +'%');
QryExemplo.Open;
// DAQUI EM DIANTE É SÓ CARREGAR O RESULTADO DA QUERY NO QUE VOCÊ QUER.
EX : LABEL1.CAPTION := QryExemplo.FieldByName('NOMEEXEMPLO').AsString;
Obs: Deixando claro que o código acima é apenas um exemplo
Boa Sorte.
20/02/2013
Douglas
concordo com você. Se ele fizer isto
o código ficaria assim.
begin
QryExemplo.Close;
QryExemplo.SQL.Clear;
QryExemplo.SQL.Add('SELECT * FROM EXEMPLO');
QryExemplo.SQL.Add('WHERE NOMEEXEMPLO LIKE' + QuotedStr(edit2.Text+'%')); // Acerte este ponto para não ter problema.
QryExemplo.Open;
// DAQUI EM DIANTE É SÓ CARREGAR O RESULTADO DA QUERY NO QUE VOCÊ QUER.
EX : LABEL1.CAPTION := QryExemplo.FieldByName('NOMEEXEMPLO').AsString;
Obs: Deixando claro que o código acima é apenas um exemplo
Boa Sorte.
Clique aqui para fazer login e interagir na Comunidade :)
