Hola.
Perdón por la tardanza pero recién entro.
Cita:
Empezado por Matiax
esto lo tengo q poner en un boton?, al query le tengo q poner algo en algun lado?, nunca use query, creo q funciona!
|
Si, podes poner el código en el evento
OnClick de un
TButton.
Cita:
...
yo tengo una tabla q se llama CanGor y los campos son codigo, Nombres, Cantidad, Precio y Fecha... yo lo q quiero es poner en algun lado(como un combobox)...
y poder sumar la cantidad * el Precio de un mes en particular(por ej: el 01/2013).y me devuelva un resultado: en edit o showmwssage o donde sea!.
|
Un ejemplo con un ComboBox:
Código Delphi
[-]
procedure TForm1.FormCreate(Sender: TObject);
var
i: Integer;
begin
with ComboBox1 do
begin
Clear;
for i:= 1 to 12 do Items.Add(LongMonthNames[i]);
end;
end;
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
with Query1 do
begin
Close;
SQL.Clear;
SQL.Add('SELECT SUM(CANTIDAD*PRECIO) AS TOTAL FROM CANGOR');
SQL.Add('WHERE CAST(EXTRACT(MONTH FROM FECHA) AS INTEGER) = :PMES');
ParamByName('PMES').AsInteger:= ComboBox1.ItemIndex + 1;
Open;
ShowMessage(FieldByName('TOTAL').AsString);
end;
end;
En este caso el valor se referencia por el alias
TOTAL (o el nombre que prefieras darle).
Saludos.