Stored procedure aufruf

[Luciano]

Hi...
Mein Problem hat sich erledig, nachdem sich Delphi aufgehängt hatte und vorher nur noch Müll von sich gegeben hat läuft das ganze jetzt. Vollständigkeitshalber hier alles zum nachlesen wie es funktioniert!

Die stored procedure

SQL-Code:

CREATE PROCEDURE berechne @MONAT int, @JAHR int, @GELD float OUTPUT
AS
SELECT @GELD = SUM(PREIS)
      FROM TANKSTELLE
     WHERE MONTH(DATUM) = @MONAT
       AND YEAR(DATUM) = @JAHR
return

Delphi, Über die Comboboxen wähle ich mir Datum und Jahr aus

Delphi-Quellcode:

procedure TFrmAnzeige.Button3Click(Sender: TObject);
begin
  with DM1.ADOStoredProc1 do
    begin
      Parameters.ParamValues['@Monat'] := ComboBox1.Text;
      Parameters.ParamValues['@JAHR'] := ComboBox2.Text;
      ExecProc;
      Label3.Caption := FloatToStrF(Parameters.ParamValues['@SPRIT'], ffFixed, 10, 2)+' L';
      Label4.Caption := FloatToStrF(Parameters.ParamValues['@GELD'], ffCurrency, 10, 2);
    end;
end;

[edit]Dummheitsfehler entfert[/edit]

Greets

Luciano