Filtrar o Consultar por mes

[ecfisa]

Hola.

Perdón por la tardanza pero recién entro.

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.

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