Подскажите какой командой записываются HEX и DWORD значенния в реестр, в DRKB не нашёл ответ на мой вапрос, а в поисковиках муть какая та...

Fedia спасиб, только одно непонятно, если у меня такое значение hex:00,00,00,00 то как его записать в regedit?

[Error] Unit1.pas(63): Constant object cannot be passed as var parameter 

                                                              

Чёт ему не дравится в этой строчке, что то надо объяыить const, а вот что не ясно?


Это сообщение отредактировал(а) ВоВеЦ - 22.8.2006, 18:50

ВоВеЦ, да также, только длину массива можно сделать равной 4-м и последний параметр процедуры WriteBinaryData также должет быть 4.


Добавлено @ 22:34 

$00000000 - константа, а для процедуры WriteBinaryData нужна переменная.

С нулями то ясно, спасиб за подсказку, но если мне нужно значение $56130000  к примеру то тут как быть? Пробывал так


или задавал константу C = $56130000, строчка записи так выглядела   reg.WriteBinaryData('testBin', С, 4); 
Всё равно вылетает ошибка 2мя постами выше...  

Fedia thank you!

Как то внимания осбого не обратил=)


Это сообщение отредактировал(а) ВоВеЦ - 23.8.2006, 00:27

Нашел еще один способ попроще:

Кто-нибудь знает эффективный способ преобразования значения $56130000 в $00001356 ?

Это сообщение отредактировал(а) Fedia - 23.8.2006, 00:46

bswap, но в данном случае это не нужно - при использовании переменной типа Integer, она в памяти уже "лежит" как надо. т.е. если надо записать $56130000, то так и делать:

Неправда, в этом случае в реестр ляжет 00 00 13 56. Так я сразу попробовал 

ты потом как читать будешь? - как строку чтоль?! 

Могу прочитать как массив. Могу значение для сторонней проги в реестр записать. Согласись, что 00 00 13 56 и 56 13 00 00 нифига не одно и тоже  Требуется одно, а ты предлагаешь другое. Так что суди сам  

Это сообщение отредактировал(а) Fedia - 23.8.2006, 03:24

А что делать если константа имеет длинное значение к примеру



Разбивать их на маленькие константы, а потом соединять их не самая лучшая затея, есть варианты попроще?

ВоВеЦ
С помощью WriteBinaryData.

[Error] Unit1.pas(74): Integer constant too large
[Error] Unit1.pas(74): Constant expression violates subrange bounds

ВоВеЦ, может запихнуть ее в ресурс, в раздел RCDATA, и грузить ее в программе как некий буфер, а затем буфер писать в реестр.

что это вообще за константы такие? 
$$ - тоже неплохо. 

пора рассказывать, что вообще хочешь сделать.  

Что хочу сделать это неважно...
Неужели придётся через массивы их заносить((

А чем ресурс не устраивает?

ВоВеЦ, а с массивом то как раз милое дело. Тем более что такое значение у тебя наверняка в виде текста храниться.


Добавлено @ 23:33 
А как целочисленную переменную такое значение использовать не получиться. Даже тип Int64 имеет значительно меньшую размерность.

Тему можете закрывать, всем спасибо

Это сообщение отредактировал(а) ВоВеЦ - 25.8.2006, 16:29

Похоже тема не закрыта.... Вдруг откуда невозьмись, появилься еррор=) Причём не чего не менял в коде, вчера запускал прогу, сеня уже не запускается... Ошибка из типа не удалось прочитать память по такому то адрессу...

Вообщем я подумал легче будет занести все ключи в фаил .reg, прикрепить его к ресурсам и запустить. Как занести,прикрепить, распаковать, вопросов нет, а вот как через Delphi запустить распакованый фаил, чтоб занести ключи в реестр непонятно.. Подскажите?



Это сообщение отредактировал(а) ВоВеЦ - 28.8.2006, 01:14

, где test.reg - файл, который необходимо занести в реестр.



Что-то все таки поменял...

Это примерно как почесать левое ухо правой рукой. 


Это похоже на попытку обратится к уже уничтоженому или не созданому объекту или к его методу, свойству и т.д. Нужно трасировать код и искать строчку с ошибкой.

Чтоб быдь кодером, надо иметь хорошее нервы, ну где тут может быть ошибка??? 



Debugger Exception Notification

Project Project1.exe raised exception class EccsessViolation with message 'Access violation at adress xxxxxxx in module 'Project1.exe'. Read of adress xxxxxx'.   Process stopped. Use step or Run to continue



Это сообщение отредактировал(а) ВоВеЦ - 28.8.2006, 18:45

Смотрим строчку 24
Используется объект без его создания (reg := TRegistry.Create;)

Добавлено @ 19:41 
После исправления мелких синтаксических ошибок получилось вот так


В результате таки в реестре появились нужные ключи

Товарищи! Если не обязательное условие, что нужно сделать это через ж*пу, то по нормальному можно так:

RideX, к сожалению это условие обязательное   я предлогал же вообще от строк отказатся! И хранить ресурсы там где им положено быть, т.е. в ресурсах. Тогда не нужно вообще ни каких преобразований. Просто бинарник такой как он есть крепится к ресурсу и затем считывается в память также целиком, одним буфером и так же целиком пишется из памяти в реестр.
Чтоб получить 

нужно открыть бинарник в блокноте и скопировать совершенно бессмысленую белиберду в строку которая к тому же имеет ограничение по длине и не смотрится нормально в редакторе, из-за чего ее приходится дробить и конкатинировать. 

Это сообщение отредактировал(а) alexeis1 - 28.8.2006, 20:33

Нам в категоричном тоне отказались описывать стоящую перед создателем ветки задачу, но вот таких строк:

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


Идея, что надо, только прислушаются ли ? 

Незнаю через Ж* или нет я накодил с вашей помощью, но уже в любом случии накодил и пока работает, а это главное, переписывать смысла пока нет

Это сообщение отредактировал(а) ВоВеЦ - 29.8.2006, 03:30

Чтобы посмотреть варианты функций записи в реестр класса TRegistry, набирай reg.Write, жми Ctrl + пробел, выбирай нужную функцию и читай поней help.
PS: каждому, кто помогал тебе по “+”. А то ворчишь только 

Плюсов... да пожаласта мне не жалко, толку ток от них   Не в тему, но всё равно, если делать нечего подскажите как работать с CMD через делфи, кароч команды выполнять

Если звезды зажигают, значит это кому-нибудь нужно. К тому же мелочь, а приятно 


Лучше конечно для этого новую ветку создай. Тебе нужны примеры для консольного приложения или нет ? Если нет, то здесь есть пример. По консольным примеры есть здесь.

Неясно....
Вот пример из DRKB, с удалением файла. Это через ресстор, а без него обойтись можно, а то я уже с ним напахлся

ВоВеЦ, Файл занятый?

Да это не касается никаких файлов, это был просто пример, к примеру cmd>net share c помощью Делфи как выполнить?

Тебе нужно просто реализовать выполнение команд ? Тогда для этого совсем не нужно мучиться с командной строкой. Используй, например, функцию WinExec. Примерно так: