Hi,
ich habe ein Problem bei dem ich nicht wirklich dahintersteige, irgend eine Einstellung ist wahrscheinlich falsch, aber ich finde sie nicht
Folgender Aufbau. Ich habe eine FDConnection, die geht auf eine bestehende
ODBC Verbindung (
DBMS Firebird, sollte ja aber eigentlich egal sein, wegen
ODBC)
Hab ein Datenmodul in dem ich die Connection und 2 Querys liegen habe.
Alles wunderbar soweit.
Die erste
Query frägt die Tabelle nach einer Spalte ab. Nenn wir die Tabelle Nummernkreise und die Spalte Zähler.
Erster
Query Ablauf sieht also so aus:
Delphi-Quellcode:
procedure HolDieNummer;
begin
Query1.sql := '
Select zaehler from Nummernkreise where Spalte1 = :Kriterium1 and Spalte2 = :Kriterium2';
Query1.parambyname('
Spalte1').AsString:='
Hotehü';
Query1.parambyname('
Spalte2').AsString:='
Bliblablubb';
Query1.open;
if Query1.isEmpty
then
raise Exception.create('
Mach nicht so, dass kann gar nicht passieren!!');
GlobaleNummer := Query1.fieldbyname('
zaehler').asInteger;
Query1.close;
end;
Die Kriterien begrenzen die Abfrage immer auf genau einen Datensatz.
Erster durchlauf alles Toll, ich bekomme z.B. Die Zahl 1234 zurück.
Die Zahl nehme ich addiere 1 und speichere sie mit der 2.
Query in die gleiche Tabelle zurück. Das geht so:
Delphi-Quellcode:
Query2.sql := 'Select zaehler from Nummernkreise where Spalte1 = :Kriterium1 and Spalte2 = :Kriterium2';
Query2.parambyname('Spalte1').AsString:='Hotehü';
Query2.parambyname('Spalte2').AsString:='Bliblablubb';
Query2.open;
Query2.Edit;
Query2.Fieldbyname('zaehler').asinteger := GlobaleNummer+1;
Query2.Post;
Wenn ich jetzt in die Datenbank schaue dann steht in der Datenbank die 1235 drin. Alles fein. Lass ich jetzt aber die Funktion in einer SChleife lauf dann wirft mir "HoldieNummer" immer 1234 als Ergebnis raus und ich versteh nicht warum. Wenn ich das Programm beende und wieder neu aufrufe, bringt mir die Procedure 1235 als Ergebnis und beim nächsten Neustart 1236 usw. aber innerhalb des gleichen Programmaufrufs nicht.
Es muss was mit der 1.
Query zu tun haben, aber ich komm nicht drauf....
Grüße
PJM