1 duvida e 1 pergunta.
boa noite a todos
uso tabelas paradox7, delphi6
estou utilizando componente table1 para armazenar os dados, e o componente query1 para o filtro
1º
isso é possivel? se sim onde está o erro?
procedure TForm_Cadfuncionarios.ComboBox1CloseUp(Sender: TObject);
var i: integer; s: String;
begin
i:=ComboBox1.ItemIndex; // pega a pos. do item selecionado
s:=ComboBox1.Items.Strings[i]; // Pega a String da posiçao i
query1.Close;
query1.SQL.Clear;
query1.SQL.Add(´SELECT * FROM ´funcionarios.db´ ORDER BY ´+s);
query1.open;
2º
alguém aqui conhce ou tem alguma apostila para fazer funcionar uma impressora fiscal redução z, leitura x, cupons fiscais, etc
[url]anjomd@hotmail.com[/url]
uso tabelas paradox7, delphi6
estou utilizando componente table1 para armazenar os dados, e o componente query1 para o filtro
1º
isso é possivel? se sim onde está o erro?
procedure TForm_Cadfuncionarios.ComboBox1CloseUp(Sender: TObject);
var i: integer; s: String;
begin
i:=ComboBox1.ItemIndex; // pega a pos. do item selecionado
s:=ComboBox1.Items.Strings[i]; // Pega a String da posiçao i
query1.Close;
query1.SQL.Clear;
query1.SQL.Add(´SELECT * FROM ´funcionarios.db´ ORDER BY ´+s);
query1.open;
2º
alguém aqui conhce ou tem alguma apostila para fazer funcionar uma impressora fiscal redução z, leitura x, cupons fiscais, etc
[url]anjomd@hotmail.com[/url]
Anjomd
Curtidas 0
Respostas
Joilson_gouveia
27/10/2003
Vc não disse qual é o erro que está dando...
GOSTEI 0
Anjomd
27/10/2003
o erro é que não está filtrando nada
GOSTEI 0
Outl@w
27/10/2003
Ao invés de:
Tente:
[b:e9df33709b]query1.Sql.Add(´SELECT * FROM FUNCIONARIOS WHERE NOMEDOCAMPO = ´+QUOTEDSTR(S));[/b:e9df33709b]
valeu?
Outl@w
query1.SQL.Add(´SELECT * FROM ´funcionarios.db´ ORDER BY ´+s);
Tente:
[b:e9df33709b]query1.Sql.Add(´SELECT * FROM FUNCIONARIOS WHERE NOMEDOCAMPO = ´+QUOTEDSTR(S));[/b:e9df33709b]
valeu?
Outl@w
GOSTEI 0
Fabio.hc
27/10/2003
estou utilizando componente table1 para armazenar os dados, e o componente query1 para o filtro
De qual componente vc esta mostrando os dados (Table ou Query)?
Porque a query estará ordenada após o ComboBox1CloseUp.
GOSTEI 0
Anjomd
27/10/2003
estou utilizando o componente table1 para a visualização dos dados
GOSTEI 0
Fabio.hc
27/10/2003
[quote:d2a1ac436d=´outl@w´]Ao invés de:
Tente:
[b:d2a1ac436d]query1.Sql.Add(´SELECT * FROM FUNCIONARIOS WHERE NOMEDOCAMPO = ´+QUOTEDSTR(S));[/b:d2a1ac436d]
valeu?
Outl@w[/quote:d2a1ac436d]
Depois desta alteração o próximo passo é igualar a table1 com a query1:
Ex:
Table1.Locate(´nomedocampo´,Query1.Fields[0].value,[]);
query1.SQL.Add(´SELECT * FROM ´funcionarios.db´ ORDER BY ´+s);
Tente:
[b:d2a1ac436d]query1.Sql.Add(´SELECT * FROM FUNCIONARIOS WHERE NOMEDOCAMPO = ´+QUOTEDSTR(S));[/b:d2a1ac436d]
valeu?
Outl@w[/quote:d2a1ac436d]
Depois desta alteração o próximo passo é igualar a table1 com a query1:
Ex:
Table1.Locate(´nomedocampo´,Query1.Fields[0].value,[]);
GOSTEI 0
Anjomd
27/10/2003
neste value[] o que devo colocar?
GOSTEI 0
Fabio.hc
27/10/2003
[] - Quando passa todo o conteudo do campo.
ex: ..locate(´Campo´,´FABIO.HC´,[])
[loPartialKey] - Quando passa parte do conteudo do campo.
ex: ..locate(´Campo´,´FAB´,[loPartialKey])
ex: ..locate(´Campo´,´FABIO.HC´,[])
[loPartialKey] - Quando passa parte do conteudo do campo.
ex: ..locate(´Campo´,´FAB´,[loPartialKey])
GOSTEI 0
Anjomd
27/10/2003
existe a possibilidade de vc me dar um exemplo de como ficaria este código?
GOSTEI 0