eigener String in Registry

**tyron78**

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:

zusammenfalten · markieren

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

eigener String in Registry

eigener String in Registry

Forumregeln