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

Вниз

Как програмно в реестре записать данные в значение "По умолчанию"   Найти похожие ветки 

 
VeTaL_Programmer   (2004-05-15 12:23) [0]

Не подскажете, как програмно в реестре записать данные в значение "По умолчанию"?
Я пытался так:

procedure TForm1.SpeedButton2Click(Sender: TObject);
var
Reg:TRegistry;

begin

reg:=Tregistry.Create;
reg.RootKey:=HKEY_LOCAL_MACHINE;
reg.OpenKey("Software\Microsoft\Windows\CurrentVersion\Explorer\MyComputer\CleanupPath",true);
reg.WriteExpandString("default","1234") ;
reg.CloseKey;
reg.Destroy;

end;

Но не получается.

Заранее спасибо.


 
GuAV   (2004-05-15 12:29) [1]

Default не "default", а пустая строка, IMHO.


 
GuAV   (2004-05-15 12:32) [2]


> Tregistry.Create


А если не Create ?...


with Tregistry.Create do
try
RootKey:=HKEY_LOCAL_MACHINE;
OpenKey("Software\Microsoft\Windows\CurrentVersion\Explorer\MyComputer\CleanupPath",true);
WriteExpandString("default","1234") ;
CloseKey;
finally
free;
end;


 
VeTaL_Programmer   (2004-05-15 12:37) [3]

Чото не получается !


 
VeTaL_Programmer   (2004-05-15 12:42) [4]

Извиняюсь!
С пустой строкой получилось!



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

Форум: "WinAPI";
Текущий архив: 2004.06.20;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.041 c
14-1086073763
Def
2004-06-01 11:09
2004.06.20
Перспективные направления - ?


1-1086253320
Сергей_И
2004-06-03 13:02
2004.06.20
Помогите создать в гриде чекбокс


4-1084547937
TNewb
2004-05-14 19:18
2004.06.20
Вопрос по ShellExecute


1-1086372975
Канадин Владимир
2004-06-04 22:16
2004.06.20
Как использовать CustomSort


3-1085827922
Denis_Visma
2004-05-29 14:52
2004.06.20
Вопрос по нескольким ДатаСеиам и одной транзакции





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский