Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Registry Fehler (https://www.delphipraxis.net/75948-registry-fehler.html)

hedie 27. Aug 2006 17:11


Registry Fehler
 
Hallo

Ich habe ein Problem


Ich möchte mit volgendem code den Registry wert einer registry lesen

Delphi-Quellcode:
if fileexists(efile) = true then begin
Form4.memo1.Lines.LoadFromFile(efile);
// Registry Teil
regist:=TRegistry.Create;
  regist.RootKey:=HKEY_CURRENT_USER;
  regist.OpenKey ('Software/HedigerElektronik/PlayNow/MusicSource/', true);
  file1 := (EFILE);
  Form5.ScrollBar1.Position := REGIST.Readinteger ('Software/HedigerElektronik/PlayNow/MusicSource/' + file1);

 // Registry Free //
  regist.free;
// Registry //
doch es zeigt mir immer an

fehler beim hohlen der daten für Software/HedigerElektronik/PlayNow/MusicSource/Filename

weshalb kann er den registry eintrag nicht lesen?

mkinzler 27. Aug 2006 17:13

Re: Registry Fehler
 
Hast du es schon mit backSlashes versucht?

hedie 27. Aug 2006 17:15

Re: Registry Fehler
 
ja also mit diesen \ hier ja

geht auch nicht

Zacherl 27. Aug 2006 17:17

Re: Registry Fehler
 
Entweder du hast keine Rechte, um diesen Wert anzuzeigen, oder der Wert existiert nicht, oder der Wert ist kein Integer ...

fkerber 27. Aug 2006 17:17

Re: Registry Fehler
 
Hi!

Es hat zwar nichts mit deinem Problem zu tun, aber:

Man sollte bei der if-Bedingung nicht auf = true prüfen. Gründe dafür finden sich hier im Forum einige.

Also besser wäre:

Delphi-Quellcode:
 if fileexists(efile) then begin

Ciao, Frederic

mkinzler 27. Aug 2006 17:18

Re: Registry Fehler
 
Was steht in efile?

hedie 27. Aug 2006 17:20

Re: Registry Fehler
 
in efile steht der Musiktitelname + .txt so wie auch der registry eintrag


Der eintrag existiert 100% weil ich ihn mit regedit auch anzeigen kann und das merkwürdige er zeigt den richtigen fpad obwohl er die daten
nicht anzeigen kann.

Rechte habe ich weil an anderer stelle des programm die abfrage ohne probleme klappt.

hedie 27. Aug 2006 17:23

Re: Registry Fehler
 
ok hat geklappt den fehler hab ich nicht entdeckt aber der funktionierende code sieht so aus

Delphi-Quellcode:
regist:=TRegistry.Create;
  regist.RootKey:=HKEY_CURRENT_USER;
  regist.OpenKey('Software\HedigerElektronik\PlayNow\MusicSource', true);
scroll := regist.ReadInteger (efile);


  regist.free;

  Form5.ScrollBar1.Position := scroll;

xaromz 27. Aug 2006 17:48

Re: Registry Fehler
 
Hallo,

Dein Fehler war, dass Du dem Namen Deines Wertes noch einmal den Schlüsselnamen vorangestellt hast.

Gruß
xaromz


Alle Zeitangaben in WEZ +1. Es ist jetzt 08:17 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz