Bekomme kein INSERT mit FB und IBDAC hin!?!

[RWarnecke]

Probiere es mal so :

Delphi-Quellcode:

procedure TPlanner.PCreateMonthInDB(Month: Byte; Year: Integer);
VAR TMPSQL : TIBCSQL;
    i      : Integer;
begin
  (* Kalender in Datenbank erstellen *)
  TMPSQL := TIBCSQL.Create(nil);

  for I := 1 to 31 do begin
    TMPSQL.SQL.Add('INSERT INTO TBLCALENDAR(ISHOLIDAY,DATUM) VALUES(:Holiday, :Holidaydatum);');
    TMPSQL.ParamByName('Holiday').AsInteger := 0;
    TMPSQL.ParamByName('Holidaydatum').AsDateTime := StrToDateTime('13.07.2010');
  end;
  TMPSQL.AutoCommit := True;
  TMPSQL.Execute;

   (* Abfrage freigeben *)
  TMPSQL.Free;
end;