Hallo.
Ich erhalte folgenden Fehler:
internal gds software consistency check (cannot find tip page (165)).
Ich benutze:
Zeos (Komponente
TZConnection) und
Firebird Embedded Server
So ist das ganze verpakt:
Delphi-Quellcode:
...
// in der Klassendefinition von TForm1
private
ZConnection1 :TZConnection;
...
procedure TForm1.FormCreate(Sender: TObject);
begin
(*ZConnection1.Properties.Add(
'CreateNewDatabase=CREATE DATABASE ''MyDB.fdb'' '+
'PAGE_SIZE=8192 USER ''SYSDBA'' PASSWORD ''masterkey''; '+
'');(**)
ZConnection1.Connect;
ZConnection1.Disconnect;
ZConnection1.Properties.Clear;
ZConnection1.Connect;
end;
Die Einstellungen von ZConnection1 im Objektinspektor sind:
AutoCommit: True
Connected: False
Database: '.\MyDB.fdb'
HostName: ''
Password: 'masterkey'
Protocol: 'firebird-1.5'
ReadOnly: False
TransactionIsolation: tiNone
User: 'SYSDBA'
Vor dem ersten Programm lauf existiert die Datei './MyDB.fdb' nicht.
Im
1. Programmlauf (F9) ist der oben auskommentierte Programmblock nicht auskommentiert. Das Programm startet und
es tritt keine Exception auf. Ich beende das Programm wieder.
Die Datei './MyDB.fdb' existiert und ist 1,04 MB (1.097.728 Bytes) groß.
Im
2. Programmlauf (F9) wird die Prozedur wie oben angegeben ausgeführt.
Es tritt die Exception auf.
Delphi-Debugger-Meldung:
Im Projekt Project1.exe ist eine Exception der Klasse EZSQLException aufgetreten. Meldung: 'SQL Error: internal gds software consistency check (cannot find tip page (165)). Error Code: -902. Unsuccessful execution caused by a system error that precludes successful execution of subsequent statements'. Prozesswurde angehalten. Mit einzelne Anweisung oder Start fortsetzen.
Ich bitte um Hilfe. Ich weiß nicht weiter...
Warum tritt der Fehler auf?
Panthrax