sumar campo y guardar en un edit

[gonza_619]

hola
edit1.text:= Query1.FieldByName('Monto').AsString;

la suma monto es tipo money, sera que al final va .asstring?
gracias

[ecfisa]

Hola.

Si decidís hacerlo con Value, tenés que hacer la conversíon correspondiente:

Código Delphi [-]
 Edit1.Text:= FloatToStr(TableMonto.Value);

En el caso que uses el nombre de campo como te explicó Neftali, el tipo de conversión esta garantizada con AsString.

Pero siempre se debe convertir un valor numérico del tipo que corresponda, al asignarlo a una variable/propiedad de tipo string.


Saludos.

[gonza_619]

hola tambien vi que se puede usar un dbedt y asociarlo a un datasource q ala vez se asocia al tquery, pero no se en que propiedad se coloca SUM OF y me sume una columna y me aparezca en el dbedit, gracais , saben como seria?

[ecfisa]

Hola.

Debés referenciar al sinónimo de sum(MONTO) que en tu caso es: Monto.

Código Delphi [-]
Edit1.Text:= Query1.FieldByName('Monto').AsString;

Saludos.

[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.