Hi zusammen
Um in meinem aktuellen Projekt SQLite-Tabellen anzulegen, wollte ich in früheren Projekten nachsehen, wie ichs da gemacht habe. Eines dieser Projekte verwendet das Synedit. Und dieses widerum eine Klasse TBetterregistry, die von TRegistry abgeleitet ist.
Auf meiner Suche bin ich nun auf folgenden Code gestossen:
Delphi-Quellcode:
{$IFNDEF SYN_COMPILER_4_UP}
TBetterRegistry = class(TRegistry)
function OpenKeyReadOnly(const Key: string): Boolean;
end;
{$ELSE}
TBetterRegistry = TRegistry;
{$ENDIF}
Der Witz daran ist: Das TRegistry in der Klassendeklaration (Zeile 1) wird nicht angemeckert, jenes zwischen {$ELSE} und {$ENDIF} aber schon, und der Compilierungsvorgang bricht mit einer Fehlermeldung ab ([dcc32 Fehler] SynEditMiscClasses.pas(388): E2003 Undeklarierter Bezeichner: 'TRegistry').
Was ist da falsch?
Gruss
Delbor