Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.09.30;
Скачать: CL | DM;

Вниз

Работа с реестром и с ...   Найти похожие ветки 

 
Arkan ©   (2002-09-18 22:03) [0]

Здравствуйте!
У меня такая проблема:
необходима из программы заменить один графический файл(файл1) на
другой(файл2). Только без дополнительный файлов(т.е. чтобы файл2 был в теле exe)!!!
И ещё вопросик: как мне считать из реестра, какие проги пишутся в
"Run". Дело в том, что для readstring нужно указывать параметры, кот-е не известны. Т.е. мне надо узнать, какие проги там прописаны и путь к ним. Подскажите пожалуйста.
Заранее спасибо.


 
Kibitzer   (2002-09-18 22:20) [1]

По поводу записи данных в само себя, клянусь, что видел в каком-то FAQ как это делать. Сначала я не придал этому значения, а когда потерял это FAQ (так и не опробовав), долго пытался его найти, но...

По поводу же реестра, то это просто:
Reg.RootKey:=HKEY_CURRENT_USER;
Reg.OpenKey("\Software\Microsoft\Windows\CurrentVersion\Run\", False);
Reg.GetValueNames(ListBox1.Items);


 
Arkan ©   (2002-09-18 22:30) [2]

Спасибо за ответ. Но он породил другой вопрос :) У меня приложение без формы. Мне надо эти значения в string получить. Это возможно? Пробовал сделать массив string - тож не получилось. Подскажите?


 
Kibitzer   (2002-09-18 22:37) [3]

var List: TStringList;
и далее:
List := TStringList.Create;
Reg.GetValueNames(List);

Всё. :)

И в конце не забудь: List.Free


 
Arkan ©   (2002-09-18 22:43) [4]

Я вас, наверное, уже замучал, но как мне теперь работать с List. Например записать в файл или по одному выводить...
Сорри за ламерские вопросы :)


 
Kibitzer   (2002-09-18 22:54) [5]

Вывод в файл:
List.SaveToFile("C:\RegKeyList.txt");

Вывод поэлементно:
for i := 0 to List.Count-1 do
begin
ShowMessage(List.Strings[i])
end;



> Сорри за ламерские вопросы :)
Слушай, ты не прикалываешься? Вопросы то для "первого класса"? :)


 
Arkan ©   (2002-09-18 22:56) [6]

это я вступительные во второй пишу :)



Страницы: 1 вся ветка

Текущий архив: 2002.09.30;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.012 c
3-98021
BlackTiger
2002-09-10 20:13
2002.09.30
ADO vs BDE vs


1-98130
гончий
2002-09-20 11:46
2002.09.30
Как воссоздать форму?


1-98144
qube
2002-09-17 10:10
2002.09.30
Документ/представление


3-97984
Кракен
2002-09-08 16:13
2002.09.30
Добавить поле в конец бызы


14-98317
VictorT
2002-09-03 14:59
2002.09.30
NT 4.0 & USB