В продолжении написания своей программы запнулся на чтении в реестре ветки

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\WinRAR.exe

Параметр по умолчанию D:\Program Files\WinRAR\WinRAR.exe а тип REG_SZ....

Как мне считать из этой ветки (HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\WinRAR.exe) параметр что по умолчанию (D:\Program Files\WinRAR\WinRAR.exe) и занести его в TMemo ну или в TEdit...

кинте пожалуста исходничик... а то с ReadString заморачиваюсь а ничего невыходит...

что именно не выходит?

Цитата(_hunter @ 27.9.2005, 13:40)

что именно не выходит?

прочесть параметр по дефолту и занести его а TMemo.

Цитата(User32 @ 27.9.2005, 13:29)

В продолжении написания своей программы запнулся на чтении в реестре ветки HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\WinRAR.exe Параметр по умолчанию D:\Program Files\WinRAR\WinRAR.exe а тип REG_SZ.... Как мне считать из этой ветки (HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\WinRAR.exe) параметр что по умолчанию (D:\Program Files\WinRAR\WinRAR.exe) и занести его в TMemo ну или в TEdit... кинте пожалуста исходничик... а то с ReadString заморачиваюсь а ничего невыходит...

Чтото слабоват этот форум, или день такой...
вот сам дошёл..

Код

procedure TForm1.Button1Click(Sender: TObject); var Reg:Tregistry; begin Reg:=TRegistry.create; REG.RootKey:=HKEY_LOCAL_MACHINE; Reg.OpenKey('\Software\Microsoft\Windows\CurrentVersion\App Paths\WinRAR.exe', True); Memo1.Text := Reg.ReadString(''); Reg.CloseKey; end;

"что именно не выходит" значит что нужно сказать что делать пытался. а не писать а ничего не выходит

Цитата(User32 @ 27.9.2005, 14:21)

Чтото слабоват этот форум

М	Советую поискать форум "посильнее" в таком случае. Это неуважение к участникам форума!