Registry kulcsok listázása

Registry kulcsok listázása
2007-06-18T23:45:34+02:00
2011-08-06T11:08:32+02:00
2022-11-22T17:35:34+01:00
Astalavista
Hello!
Nem tudná valaki véletnelül megmondani, hogy hogyan lehet (Delphiben) kilistázni a registryből az automatikusan elinduló programokat (Pontosabban a kulcsokat és azok értékeit: elérési útakat)?
(amik itt vannak -->HKEY_LOCAL_MACHINE Software\Microsoft\Windows\CurrentVersion\Run)

Köszi a segítséget előre is!!!
Mutasd a teljes hozzászólást!
Rakj a formra egy gombot meg egy memot. Uses listába Registry.

procedure TForm1.Button1Click(Sender: TObject); var Reg: Tregistry; st: TStringList; i: byte; begin Memo1.Clear; Memo1.Lines[0]:='StartUp:'; Reg := TRegistry.Create; Reg.RootKey := HKEY_LOCAL_MACHINE; Reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Run', False); st := TstringList.Create; try Reg.GetValueNames(st); for i := 0 to st.Count - 1 do Memo1.Lines.Add(reg.Readstring(st.strings[i])); finally st.Free; end; Reg.CloseKey; Reg.free; end;
Mutasd a teljes hozzászólást!

  • Keresővel, vagy a help használatával?
    Mutasd a teljes hozzászólást!
  • Rakj a formra egy gombot meg egy memot. Uses listába Registry.

    procedure TForm1.Button1Click(Sender: TObject); var Reg: Tregistry; st: TStringList; i: byte; begin Memo1.Clear; Memo1.Lines[0]:='StartUp:'; Reg := TRegistry.Create; Reg.RootKey := HKEY_LOCAL_MACHINE; Reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Run', False); st := TstringList.Create; try Reg.GetValueNames(st); for i := 0 to st.Count - 1 do Memo1.Lines.Add(reg.Readstring(st.strings[i])); finally st.Free; end; Reg.CloseKey; Reg.free; end;
    Mutasd a teljes hozzászólást!
  • Köszi, működik!
    Mutasd a teljes hozzászólást!
  • Szia !

    Nem akartam új témát nyitni, hasonló gondom van nekem is, sehogy sem sikerül kiolvasnom, hogy egy kulcs alatt milyen kulcsok vannak még.

    például:
    Ez lenne ami alól ki kellene olvasnom, hogy mi nyílik belőle
    HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Enum\PCI\

    HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Enum\PCI\VEN_168C&DEV_001C&SUBSYS_3067168C&REV_01

    HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Enum\PCI\VEN_10EC&DEV_8136&SUBSYS_110A1734&REV_01

    tehát a vastagabb szöveg (kulcsok nevei ismeretlenek)ezt szeretném listázni.

    köszi!
    Mutasd a teljes hozzászólást!
Tetszett amit olvastál? Szeretnél a jövőben is értesülni a hasonló érdekességekről?
abcd