Soma e Divis�o

Question

TENHO EM UMA GRID OS CAMPOS �DISCIPLINA� E �M�DIA� E FORA DA GRID TENHO UM LABEL QUE CONTA OS REGISTROS NESSA GRID;
GOSTARIA DE POR EM UM EDIT (TAMB�M FORA DA GRID)A SOMA DO CAMPO �M�DIA� DIVIDIDO PELO N� DE REGISTROS NESSA GRID...

O CAMPO M�DIA EST� DEFINIDO COMO CHARACTER !

AGRADE�O QUALQUER AJUDA!

Alexandre Tavares

Machado · Answer

voc� deve fazer um loop para somar os camos e depois converter o resultado para integer ou real (o que lhe for melhor) ex.:

procedure TForm1.SpeedButton1Click(Sender: TObject);
var
vartot:integer;
begin
form_principal.tb_consumo.First;
While Not form_principal.tb_consumo.Eof do
begin
VarTot:=VarTot+form_principal.tb_consumoValoriten.Value;
form_principal.tb_consumo.Next;
end;

para converter

strtoint

Espero ter ajudado

F�rum Soma e Divis�o #183683