Hallo.
Hab hier schon ne Weile in der Praxis gesucht, aber noch nichts passendes gefunden. Nach meinem (dank Euch) erfolgreichem Versuch mit
Access habe ich mich (auf raten eines Kollegen hin) entschlossen, auf Interbase umzuschenken, bevor meine Anwendung zu umfangreich ist.
Ich habe also (erstmal Manuell) einen Registryeintrag (IBCON) erstellt, der sich wie folgt zusammensetzt:
Dateiname (inkl. Pfad) +'>>'+ Username + '>>'+ Passwort
Dieser wird später wird in die einzelnen Komponenten aufgebröselt und es wird ein connect zur
DB erstellt (klappt soweit auch - habs mal ohne Registry also hardcodiert getestet).
Entspricht zwar keinerlei Security-Richtlinien oder ähnlichem, aber da die Anwendung nur lokal läuft ist das vorerst egal.
Ich versuche mit folgendem Code die Registry auszulesen:
Delphi-Quellcode:
function ReadDSNFromRegistry(DSN: string): string;
var Registry: TRegistry;
Reg_Result: string;
begin
Registry:=TRegistry.Create;
try
Registry.RootKey:=HKEY_LOCAL_MACHINE;
if Registry.KeyExists('\Software\mydir\myapp')=true then begin
if Registry.OpenKey('\Software\mydir\myapp',true)=true then
Reg_Result := Registry.ReadString('IBCON')
else
Reg_Result := '';
end
else
Reg_Result := '';
finally
Registry.Free;
Result := Reg_Result;
end;
end;
Nun bekomme ich bereits beim Start der Anwendung die Fehlermeldung "Kein zulässiger Dateiname". Entferne ich den Teil nach dem Dateinamen (>> etc.) kommt die Fehlermeldung "Nicht erkennbares Datenbankformat". Woran kann das liegen??? Hoffe mir kann hier jemand helfen... Danke im Vorraus.
Tyron
God is integer - until declared real...