Fórum Como colocar num Edit -gt; select sum(valor) from Banco?? #236542

Como vai mestre5?

se você tiver usando tecnologia de acesso DBExpress, use o seguinte código:

var
ResultSet: TCustomSQLDataSet;
SQLStmt: string;
begin
SQLStmt := ´select sum(valor) as Total from banco´;
ResultSet := nil;
try
tbls.SQLConnection1.Execute(SQLStmt, nil, @ResultSet);
if Assigned(ResultSet) then
Edit1.Text := FloatToStr(ResultSet.fieldByName(´Total´).AsInteger);
Finally
ResultSet.Free;
end;

Espero ter ajudado nessa amigo.

Poeta Noturno