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

Вниз

проблемы с Tregistry.SaveKey   Найти похожие ветки 

 
MMF ©   (2003-05-13 14:01) [0]

Какая-то нездоровая проблема, подкиньте идею, плиз. Есть код:
Reg:=Tregistry.Create();
Reg.RootKey:= HKEY_CURRENT_USER;
KeyName:="SOFTWARE\1C\1CV7\7.7\"+TreeBase1C.Selected.Text;
fileName:=Copy(RegistrySaveDlg.FileName, 1, Length(RegistrySaveDlg.FileName)-4); //это чтобы работало на 98
if Reg.KeyExists(KeyName) then
begin
DeleteFile(fileName); //сюда я попадаю, ключ существует
if Reg.SaveKey(KeyName, fileName) then //возвращает Ложь
варианты указания FileName перебрал всякие, в т.ч. явно "aaa1.reg" или "bb1".


 
clickmaker ©   (2003-05-13 14:27) [1]

Спроси SysErrorMessage(GetLastError) сразу после SaveKey
И мне кажется, что DeleteFile здесь лишнее


 
default ©   (2003-05-13 14:31) [2]

DeleteFile(fileName); // ты же файл тут удалил
if Reg.SaveKey(KeyName, fileName) then
// а здесь на него ссылаешься...


 
MMF ©   (2003-05-13 14:37) [3]

В описании по методу сказано, что файл с таким именем не должен существовать до выполнения метода, в противном случае сохраняться не будет.



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

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

Наверх




Память: 0.47 MB
Время: 0.014 c
3-83371
bss
2003-05-06 10:16
2003.05.26
Добавление заголовков на кнопки DBNavigatora


11-83426
_Avenger_
2002-08-22 19:49
2003.05.26
avl


3-83343
Skalp
2003-05-05 13:49
2003.05.26
При вызове DeleteRecords(arAll) возникает исключение


14-83690
Kulinar
2003-05-06 10:23
2003.05.26
Autorun


7-83769
_sMile
2003-03-24 11:31
2003.05.26
Как убить приложение?