Pesquisa....AJUDA POR FAVOR!!
PessoALL,
Dá uma olhada no codigo abaixo.....após a pesquisa quero que coloque ordem nos dados, como segue o ´ORDER BY´, mas nada acontece, os dados ficam na ordem em que forma cadatrados..
EX:
mesmo que o ultimo professor cadastro tenha mais pontos que todos ele fica em ultimo lugar.....
Preciso fazer mais alguma coisa...mexer na QUERY..sei lá..!!
[]´s junior
***************************************************************************
procedure TUCFaixa.BitBtn1Click(Sender: TObject);
begin
QryProfessores.close;
QryProfessores.sql.clear;
QryProfessores.sql.add(´Select * from Professores Where Faixa=:Faixa AND Situacao=:Situacao AND Disciplina=:Disciplina AND Categoria=:Categoria ORDER BY pontucao,datanascimento,filhos ´);
QryProfessores.ParamByName(´Faixa´).Value := DbLookUpComboBox1.KeyValue;
QryProfessores.ParamByName(´Situacao´).Value := DbLookUpComboBox2.KeyValue;
QryProfessores.ParamByName(´Disciplina´).Value := DbLookUpComboBox3.KeyValue;
QryProfessores.ParamByName(´Categoria´).Value := DbLookUpComboBox4.KeyValue;
QryProfessores.open;
DbGrid1.DataSource:= DSProfessores;
end;
Dá uma olhada no codigo abaixo.....após a pesquisa quero que coloque ordem nos dados, como segue o ´ORDER BY´, mas nada acontece, os dados ficam na ordem em que forma cadatrados..
EX:
mesmo que o ultimo professor cadastro tenha mais pontos que todos ele fica em ultimo lugar.....
Preciso fazer mais alguma coisa...mexer na QUERY..sei lá..!!
[]´s junior
***************************************************************************
procedure TUCFaixa.BitBtn1Click(Sender: TObject);
begin
QryProfessores.close;
QryProfessores.sql.clear;
QryProfessores.sql.add(´Select * from Professores Where Faixa=:Faixa AND Situacao=:Situacao AND Disciplina=:Disciplina AND Categoria=:Categoria ORDER BY pontucao,datanascimento,filhos ´);
QryProfessores.ParamByName(´Faixa´).Value := DbLookUpComboBox1.KeyValue;
QryProfessores.ParamByName(´Situacao´).Value := DbLookUpComboBox2.KeyValue;
QryProfessores.ParamByName(´Disciplina´).Value := DbLookUpComboBox3.KeyValue;
QryProfessores.ParamByName(´Categoria´).Value := DbLookUpComboBox4.KeyValue;
QryProfessores.open;
DbGrid1.DataSource:= DSProfessores;
end;
Anonymous
Curtidas 0
Respostas
Nebrio
20/03/2003
Experimente apenas usar a propriedade Value do DBLookupComboBox e não a KeyValue.
Nébrio
Nébrio
GOSTEI 0
Anonymous
20/03/2003
mas isso tem algo a haver com o a nao ordenação dos dabos..??
[]´s junior
[]´s junior
GOSTEI 0
Marcelo Saviski
20/03/2003
Este código esta certo, ele ordena os registros pela pontuação, e é claro que os professores que tem mais pontos vão ficar por último, porque ele oredena dos menores para os maiores.
Experimente isto:
[color=blue:f34a31668b][b:f34a31668b]ORDER BY pontucao desc[/b:f34a31668b][/color:f34a31668b]
Experimente isto:
[color=blue:f34a31668b][b:f34a31668b]ORDER BY pontucao desc[/b:f34a31668b][/color:f34a31668b]
GOSTEI 0