Hallo Delphi-Datenbank-Freunde!!!
Ich habe wohl ein mächtiges Problem...
Bei mir kommen die dubiosesten Fehler (Bsp.: EOIeError,Variante referenziert keinen Automatisierungstyp, ...).
Dazu hab ich hier auch noch nichts gefunden.
Aber naja, vielleicht liegt der Fehler einfach bei mir.
Vielleicht könnt ihr mir jetzt mit einer Lösung helfen.
Ich habe eine Paradox7-Tabelle ohne Alias:
Buchungen {ID, Zimmer, Kunde, Anreise, Abreise,...}
Zimmer ist ein Alpha-Wert, Kunde ist Integer und An- und Abreise sind Datum-Werte.
Ich habe weiter in mein Formular ein TQuery (BuchungenQuery) eingebaut.
Nun möchte ich gern aus der Tabelle abfragen, ob ein bestimmtes Zimmer an einem Bestimmten Tag frei ist...
Delphi-Quellcode:
with BuchungenQuery
do
begin
active := false;
sql.clear;
sql.add('
SELECT COUNT(id) AS belegt FROM daten\buchungen.db WHERE Zimmer=:zimmernummer AND anreise<=:pdatum AND abreise>:pdatum');
ParamCheck := true;
ParamByName ('
pdatum').AsDate := datum;
ParamByName ('
zimmernummer').AsString := zimmerObj[i].zimNum;
active := true;
open;
first;
blgt := BuchungenQuery.FieldValues['
belegt'].AsInteger;
close;
end;
Hier muss irgend wo schon der erste Fehler liegen.
Danach soll, wenn das Zimmer frei ist, geschaut werden, wie lange es noch frei ist, bzw. für wann die nächste Buchung vorliegt.
Wie gesagt, mein Delphi bombadiert mich mit undefinierbarenn Fehlermeldungen, selbst wenn ich einfach nur Test werte eingebe und ihne Parameter arbeite.
Deshalb denke ich schon, das da was im Code nicht stimmt. Komischerweise haben aber schon abfregen über das
Query funktioniert. Hab aber leider keine Ahnung, was ist soll ist.
Deshalb würde ich mich auch freuen, wenn ihr mir einen neuen Ansatz bzw. Lösungsvorschlag geben könntet.
Diese
Paradox-
SQL ist ja sehr abgespeckt. Doch ich weiss leider auch nicht, was alles zuläßig ist, und was nicht...
Schon einmal Danke für euere hoffentlich umfangreiche Hilfe...