Delphi - asignar el resultado de suma de sql a un text

como asigno el resultado de una suma en sql a un campo text


cadena3 := 'select sum(cantidadformulario) from guiasverificadas';
query1.SQL.Clear;
query1.SQL.Add( cadena3 );
query1.Open; //ejecuta la consulta

edit1.Text := inttostr(query1.recordcount);

edit2.Text := resultado de la suma

Facil Solo has lo siguiente

edit2.text := IntToStr(FieldByName('SUM').asInteger);

o de otra manera

edit2.text := IntToStr(Fields[0].asInteger);

Saludos.

No funciona, estoy con delphi 7 y soy nuevo con el lenguaje

Pues sí debería funcionar, porque es así ; )

{copioypego}
cadena3 := 'select sum(cantidadformulario) from guiasverificadas';
query1.SQL.Clear;
query1.SQL.Add( cadena3 );
query1.Open; //ejecuta la consulta
{Ponemos el resultado}
edit2.text := IntToStr(Fields[0].asInteger); {Por ejemplo}

Si así no te sale, ¿Qué pone en el edit2 y que crees que debería poner? A ver si así te podemos ayudar un poco más. Suerte.

edit3.Text := IntToStr(query1.Fields[0].asInteger);

Pues sí, pues sí ; )

mira esta es una manera diferente de hacer lo que quieres hacer, ya lo habia comentado por este foro, en la ultima linea se pone el campo de texto, (dbedit3.text)

modulodatos.QGeneral2.Active := False;
modulodatos.QGeneral2.SQL.Text := 'Select Sum(pago) as total from pagos ';
modulodatos.QGeneral2.ExecSQL;
modulodatos.QGeneral2.Active := True;
formapagos.DBEdit3.Text:=modulodatos.QGeneral2.Fields[0].AsString;

donde qgeneral es el nombre del query ;)
ojala t sirva ;) saludos...