Forum: Sonstige Fragen zu Delphi
Delphi
by Tommi,
1. Jul 2004
Okay... habs schon rausgekriegt... es soll heißen
RegQueryValueEx(hRootKey,'Profile0',nil,@dwType,PByte(Profile0), pSize)
:mrgreen:
Forum: Sonstige Fragen zu Delphi
Delphi
by Tommi,
1. Jul 2004
Oha... Danke für die Warnung... :pale:
Ich muß mal schaun, weil aus irgendeinem Grund "RegQueryValueEx" nicht in den String "Profile0" reinschreiben will
RegQueryValueEx(hRootKey,'Profile0',nil,@dwType,@Profile0, pSize)
wobei pSize ein Zeiger auf Size : DWord ist... die If-Abfrage sorgt jedenfalls, Deinem Code entsprechend, für einen Abbruch und der String scheint leer zu sein... :?
Forum: Sonstige Fragen zu Delphi
Delphi
by Tommi,
1. Jul 2004
Hehe :oops: hab ich mich doch glatt in der Zeile geirrt...
Noch eine hoffentlich letzte Frage zum Abschluß - wie kann ich diesen Wert wiederum setzen?
Danke!
Forum: Sonstige Fragen zu Delphi
Delphi
by Tommi,
1. Jul 2004
Hmm... Vielen Danke für den Code. Das Ergebnis zeigt mir eine "3" an... ein Blick in die Delphi-Hilfe weist darauf hin, daß der Eintrag also vom Typ "REG_EXPAND_SZ" wär... somit eine Art String, aber wie greif ich nun darauf zu? :gruebel:
Forum: Sonstige Fragen zu Delphi
Delphi
by Tommi,
1. Jul 2004
procedure LoadProfile0;
var reg : TRegistry;
size : integer;
Begin
reg := TRegistry.Create;
reg.RootKey := HKEY_LOCAL_MACHINE;
Profile0 := StringOfChar(#00,177);
If reg.OpenKey ( device_key, false ) Then
Begin
Form1.StaticText1.Caption := Form1.StaticText1.Caption + device_key;
Forum: Sonstige Fragen zu Delphi
Delphi
by Tommi,
1. Jul 2004
Hi,
ich hab ein Problem mit dem Auslesen eines binären Registrywerts mit der Methode ReadBinaryData (unter Delphi 3, Win 2000). Ich weiß durch Blick in regedit, daß der betreffende Wert (eingerichtet von einer WLAN-Karten-Treibersoftware), vom Typ REG_BINARY ist, aber während der Laufzeit erhalte ich die Fehlermeldung "Ungültiger Datentyp für 'Profile0'" - wobei Profile0 der betreffende,...