Toon posts:

[Delphi] Register uitlezen.

Pagina: 1
Acties:

Verwijderd

Topicstarter
Ik wil de install directory van Unrel Tournament uitlezen uit het register.
Door te zoeken ben ik achter stuk code gekomen. Heb nu de waarden ingevuld alleen hij doet niks (code1).
Ik heb dezelfde code, alleen nu voor de naam van je processor (Code2) , staat onder hardware ipv software en die doet het wel.

Code1, welke niet werkt.
code:
1
2
3
4
5
6
7
8
9
10
11
begin
  with TRegistry.Create do
    try
      RootKey := HKEY_LOCAL_MACHINE;
      if OpenKey('\HKEY_LOCAL_MACHINE\SOFTWARE\Unreal Technology\Installed Apps\UnrealTournament', False) then begin
        ShowMessage(ReadString('Folder'));
        CloseKey;
      end;
    finally
      Free;
    end;


Code2, welke wel werkt
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
begin
  with TRegistry.Create do
    try
      RootKey := HKEY_LOCAL_MACHINE;
      if OpenKey('\Hardware\Description\System'
          + '\CentralProcessor\0', False) then begin
        ShowMessage(ReadString('Identifier'));
        CloseKey;
      end;
    finally
      Free;
    end;
end;


Ik weet niet meer waar het aan ligt (Heb al gegoogled en GeGOTted. Iemand een idee?

  • Reptile209
  • Registratie: Juni 2001
  • Laatst online: 02:19

Reptile209

- gers -

de enige verschillen die ik zo zie zijn: bij de eerste begin je nog een keer met HKLM, bij de tweede niet, daar zit het (ook) al in de RootKey. Bij de tweede zitten er geen spaties in je pad, moeten er dan bij de eerste soms dubbele quotes omheen?

Zo scherp als een voetbal!


Verwijderd

Topicstarter
Reptile209 schreef op 15 June 2003 @ 17:03:
de enige verschillen die ik zo zie zijn: bij de eerste begin je nog een keer met HKLM, bij de tweede niet, daar zit het (ook) al in de RootKey. Bij de tweede zitten er geen spaties in je pad, moeten er dan bij de eerste soms dubbele quotes omheen?
Had al van alles geprobeerd, blijkt het antwoord zo verhipte simpel! |:(

Die HKEY_LOCAL_MACHINE moest ervoor weg..... |:(

Hee thx, kan ik eindelijk weer gewoon verder!!

  • Reptile209
  • Registratie: Juni 2001
  • Laatst online: 02:19

Reptile209

- gers -

Verwijderd schreef op 15 June 2003 @ 17:05:
[...]
Had al van alles geprobeerd, blijkt het antwoord zo verhipte simpel! |:(
LOL @ EagleMax :P

Zo scherp als een voetbal!