Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.09.30;
Скачать: [xml.tar.bz2];

Вниз

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

 
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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.009 c
1-98027
Alex17
2002-09-17 13:07
2002.09.30
Вопрос по FIBPlus.


14-98327
NeyroSpace
2002-09-05 13:35
2002.09.30
---|Ветка была без названия|---


1-98131
Explorer
2002-09-20 10:22
2002.09.30
Перенос проекта из D3 в D6


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


7-98391
Kick
2002-06-19 13:44
2002.09.30
Как можно программно свернуть все окна?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский