Já me deparei com um caso desses.
crie um campo e atribua 1 para quem teve nota na redação acima ou igual a
10, e 0 para quem ficou abaixo disso, depois coloque o campos na ordem antes
da média.
----- Original Message -----
From: "Eduardo Silva ®" <[EMAIL PROTECTED]>
To: <delphi-br@yahoogrupos.com.br>
Sent: Thursday, December 08, 2005 1:58 PM
Subject: RES: [delphi-br] Consulta em ordem decrescente
Não seria depois do Where
SQL.Add('AND NOTAREDACAO >= 10');
-----Mensagem original-----
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Topolniak
Enviada em: quinta-feira, 8 de dezembro de 2005 10:29
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Consulta em ordem decrescente
Olá pessoal, bom dia.
Me deparei com um problema de última hora aqui e resolvi pedir a ajuda de
vcs..
Estou fazendo uma lista de classificação de alunos no vestibular...essa
lista tem que ser ordenada em ordem decrescente por média...mas se o cara
tirou nota menor que 10 (dez) na prova de redação, independente da média
dele ele tem que ir pro final da lista pois está reprovado....
Segue o meu sql abaixo:
with Module.Mestre do
Begin
Close;
SQL.Clear;
SQL.Add('select nomealuno, opcao1, NPESCRITA, NOTAREDACAO, SOMA,
MEDIA');
SQL.Add('from candidato');
SQL.Add('where opcao1 =:Curso');
SQL.Add('and anosemestre=:anosemestre');
SQL.Add('and treineiro=''Não''');
SQL.Add('order by Media DESC,NOTAREDACAO');
ParamByName('Curso').AsString:=DBCurso.Text;
ParamByName('anosemestre').AsString:=FVestiba.Anovigente.Text;
Open;
TIBOFloatField(module.Mestre.FieldByName('MEDIA')).DisplayFormat :=
'0.00';
end;
Então, ele traz a NOTAREDACAO, SOMA e MEDIA, ordena-se por média...mas um
aluno que tirou zero em uma redação apareçe com media maior...preciso que
ele vá para o final da lista...
Se alguém puder ajudar...agradeço.
[]'s
Topolniak.
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Yahoo! Grupos, um serviço oferecido por:
PUBLICIDADE
----------------------------------------------------------------------------
--
Links do Yahoo! Grupos
a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
Serviço do Yahoo!.
__________ NOD32 1.1315 (20051207) Information __________
This message was checked by NOD32 antivirus system.
http://www.nod32.com
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Links do Yahoo! Grupos
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
