Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.14;
Скачать: [xml.tar.bz2];




Вниз

НУ ОЧЕНЬ СРОЧНО!!!!!!! 


Hewlping   (2002-02-27 21:21) [0]

Мне нужна срочно помощь, я сохраняю одну ветвь из реестра в файл, но приэтом у меня получается какая-то чушь, т.е. текст в непонятной кодировке если так можно сказать. как мне все это привести в божеский вид.



33   (2002-02-28 00:44) [1]

Не тем способом сохраняешь.



55   (2002-02-28 07:44) [2]

Для D5.

program Project1;
uses Registry,windows,classes;
var
Reg1: TRegIniFile;
ST :TStringList;
begin
st:=TStringList.Create;st.Clear;
Reg1 := TRegIniFile.create;
try with Reg1 do
begin
reg1.ROOTKEY:=HKEY_LOCAL_MACHINE;
reg1.OpenKey("\Software\Microsoft\Windows\CurrentVersion\Uninstall",false);
reg1.ReadSections(st);
st.SaveToFile("Uninst.txt");
end;
finally
reg1.free;
end;
messageBox(0,"Все!","Reg",$40);
end.



LazyTiger   (2002-02-28 10:39) [3]

Во-первых OpenKey возвращает True если key успешно открыт или создан. Это надо проверять иногда.

Во вторых -
Не "\Software\Microsoft\Windows\CurrentVersion\Uninstall"
А "\\Software\\Microsoft\\Windows\\CurrentVersion\\Uninstall"
см. синтаксис определения строковых констант.



Sasha9   (2002-02-28 14:39) [4]

2LazyTiger
> Не "\Software\Microsoft\Windows\CurrentVersion\Uninstall"
> А "\\Software\\Microsoft\\Windows\\CurrentVersion\\Uninstall"

вообще-то 2-й вариант только для с/с++, а в object pascal"е только 1-й вариант




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.14;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.024 c
1-42986           Незнайка              2002-02-25 14:55  2002.03.14  
Windows Address Book ( Глобальная Адресная книга )


7-43188           Kouzmine              2001-12-06 12:08  2002.03.14  
Подскажите или укажите место, где прочитать о определении IP или Имени компьютера


3-42976           Ross                  2002-02-15 22:32  2002.03.14  
Очень нужен ваш совет


3-42967           Dad                   2002-02-09 13:58  2002.03.14  
Как отсортировать поле по убыванию


1-42994           Hewlping              2002-02-27 21:21  2002.03.14  
НУ ОЧЕНЬ СРОЧНО!!!!!!!