Einzelnen Beitrag anzeigen

tyron78

Registriert seit: 11. Aug 2005
Ort: Düsseldorf
23 Beiträge
 
#1

eigener String in Registry

  Alt 17. Okt 2005, 22:00
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...
  Mit Zitat antworten Zitat