Also ich habe nun folgendes gemacht:
Delphi-Quellcode:
procedure PostFlush(Table : TIBCTable);
begin
with Table do begin
if (State = dsEdit) or (State = dsInsert) then Post;
if (Connection <> nil) then begin
if Connection.InTransaction then Connection.Commit;
end else begin
Transaction.Commit;
end;
Connection.Open;
Table.Open;
Table.Active := true;
Refresh;
end;
end;
Das funktioniert, aus irgendeinem Grund ist die Datenmenge geschlossen.
Wenn ich nun das Programm laufen lasse, kommt die Fehlermeldung bei der Tabelle tbPacient nicht mehr er geht weiter und bleib dann wieder mit einem 'Ind' nicht gefunden Fehler hängen, diesmal aber an einer anderen Tabelle.
Kann es sein das generell alle Tabellen geschlossen sind oder so?
Schließt das Commit die Datenmenge wieder?
@mkinzler:
Das heist 'Ind'
---------------------------------------------------------------------------
Mein Vista-Kind bringt frischen Wind
Gruß DaRedd aka The Red Dragon