Школоло / Говнокод #21297 Ссылка на оригинал

0

  1. 1
  2. 2
  3. 3
  4. 4
  5. 5
  6. 6
  7. 7
  8. 8
  9. 9
  10. 10
  11. 11
  12. 12
  13. 13
  14. 14
  15. 15
  16. 16
  17. 17
  18. 18
  19. 19
  20. 20
  21. 21
  22. 22
  23. 23
  24. 24
  25. 25
  26. 26
  27. 27
  28. 28
  29. 29
  30. 30
  31. 31
  32. 32
  33. 33
  34. 34
  35. 35
  36. 36
  37. 37
function WRITESTRINGINREG(HK:HKEY;Key:string;CanCreate:boolean;Name:string;Value:string):boolean;

var

reg: TRegistry;

begin

Result:=false;

reg := TRegistry.Create;

reg.RootKey := HK;

reg.LazyWrite := false;

if reg.OpenKey(Key,CanCreate)=true then

begin

reg.WriteString(Name,Value);

Result:=true;

end else

begin

Result:=false;

end;

reg.CloseKey;

reg.free;

end;

Ололо ковыряется в реестре.

http://zedcreate.narod.ru/pages/clauses/clause001.htm

Запостил: voodoodal16 voodoodal16, (Updated )

Комментарии (6) RSS

  • ava barop # Ссылка на оригинал 0

    >>- В Windows 95/98 –это файлы SYSTEM.DAT и USER.DAT, находящиеся в каталоге Windows.
    >>- В Windows Me был добавлен еще один файл CLASSES.DAT.

    а у тебя какой?
    Ответить

      • ava barop # Ссылка на оригинал 0 ⇈

        а дельфи последних версий не работает под 3.1
        он не умеет 16ти битный код небось

        там нужен был паскаль и OWL
        Ответить

        • ava inkanus-gray # Ссылка на оригинал 0 ⇈

          И то верно. А как в Windows 3.1 32-разрядные программы работают с реестром через Win32s, я точно не помню. Обращение к ключу HKEY_CLASSES_ROOT из Win32s-ного advapi32.dll точно переадресовывалось к API Win16 (user.exe, следовательно, и к REG.DAT). А другие ключи... кажется, тоже лежали в REG.DAT, но в скрытой ветке, которая не видна приложениям Win16.

          А ещё, чтобы приложение, скомпилированное в Дельфи, запустилось в Win32s, нужно было настроить встроенный линкер Дельфей, чтобы он не отрезал таблицу релокейшнов, иначе не запустится. И всё равно был шанс обломаться, если программа использовала какую-нибудь функцию Win32, которую Win32s не умело эмулировать.
          Ответить

Добавить комментарий

Из-за тебя ушел bormand, guest!

    А не использовать ли нам bbcode?

    ↑
    8
    ↓