sumar campo y guardar en un edit

[ecfisa]

Hola.

Disculpá Gonza, ahora veo que lo que querés es asignar Monto a un TDBEdit, no a un TEdit.

En ese caso, tenés que asignar lo siguiente. Puede ser en el evento OnCreate del form, como ejemplo:

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
begin
  DBEdit1.DataSource:= DataSource1; // (el que tiene la propiedad DataSet -> al Query)
  DBEdit1.DataField:= 'Monto';
end;

Saludos.

[[Caral]]

Hola
Amigo recapacita, estas seguro que en el evento OnCreate ???.
Saludos

[ecfisa]

Empezado por Caral

Hola
Amigo recapacita, estas seguro que en el evento OnCreate ???.
Saludos

Si totalmente, ¿Algo personal contra ese evento ?

Saludos.

[ecfisa]

Amigo Caral, se a que te estás referiendo con tu observación , ya que si llama Query con otra sentencia que no declare el campo 'Monto' va a generar error. Pero limitándome al ejemplo funciona.

De todas formas y sin lugar a dudas creo que estás acertado, no es seguro hubicar el código ahí.

Saludos.

[Neftali [Germán.Estévez]]

Empezado por ecfisa

no es seguro hubicar el código ahí.

Yo también estoy de acuerdo en ubicarlo en otro sitio.

[ecfisa]

Empezado por Neftali

Yo también estoy de acuerdo en ubicarlo en otro sitio.

Parece que en este hilo no pego una...

Saludos.

[chingolo]

otra opcion es:
Quer1.SQL.Text:='Select sum(MONTO) as Monto from TABLAPAGO where CODCLIENTE = :numeroclie ';
Query1.Params[0].asinteger=1;
Query1.open;
edit1.text:= Floattostr(Query1.fields[0].AsFloat);//no hace falta el alias

tambien podes usar un currencyedit y asignar el campo como float a la propiedad value del currency
respecto de donde quieres q vaya tu codigo es depende de como lo necesites, en mi caso por ejemplo abro todas mis consultas en el OnCreate y si es algo especifico lo ubico en el Onshow cuando ya esta creado y lo llama otra form.

Si no queres sorpresas pone todo en un bloque try except.

Nota: No me gusta usar los DBEdits, prefiero tener el control de lo q se escribe, (desde mi punto de vista no recargo el servidor manteniendo conexiones activas) y usando consultas (puro SQL) y luego asignado a los ditintos componentes, ademas de ahorrar en componentes, no hace mal escribir un poco je