Fórum Fazer While em Consulta #215377
19/02/2004
0
Olá pessoal,
Tenho em minha consulta asa seguintes informações:
Resposta_____Quant.
Regular______03
Bom_________05
Ótimo________03
Como faço para somar as quantidades e colocá-las em um Label usando o comando While?
Grato,
Ilano.
Tenho em minha consulta asa seguintes informações:
Resposta_____Quant.
Regular______03
Bom_________05
Ótimo________03
Como faço para somar as quantidades e colocá-las em um Label usando o comando While?
Grato,
Ilano.
Ilanocf
Curtir tópico
+ 0
Responder
Posts
19/02/2004
Maicongabriel
var
iRegular, iBom, iOtimo : Integer;
begin
while not {...} do
begin
iBom := iBom + {...} ;
iOtimo := iOtimo + {...} ;
iRegular := iRegular + {...} ;
end;
Label1.Caption := IntToStr(iBom);
Label2.Caption := IntToStr(iOtimo);
Label3.Caption := IntToStr(iRegular);
end;Isso ? [i:c5ab6c036d]Isso é tudo, já que nenhuma outra informação foi passada...[/i:c5ab6c036d]
Responder
Gostei + 0
19/02/2004
Ilanocf
Na verdade, o q eu preciso é somar estes valores desta consulta, assim:
Resposta_____Quant.
Regular______03
Bom_________05
Ótimo________03
[color=red:3700b6bdbe][b:3700b6bdbe]Total: 11[/b:3700b6bdbe][/color:3700b6bdbe]
Responder
Gostei + 0
19/02/2004
Ilanocf
:shock:
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)