Вопрос по реестру...

← →
Yuri20032 (2003-03-25 18:12) [0]

Как из Delphi записать в реестр двоичный параметр?
И кто знает как по параметру NoDrive определить какие диски скрыты?

← →
___ALex___ © (2003-03-25 18:15) [1]

program Primer;
uses
Windows;
var
HOK: HKEY;
Buf: Integer;

begin

Buf := 536871280;
RegOpenKey(HKEY_CLASSES_ROOT,
"CLSID\{645FF040-5081-101B-9F08-00AA002F954E}\ShellFolder", HOK);
RegSetValueEx(HOK, "Attributes", 0, REG_BINARY, @Buf, 4);
RegCloseKey(HOK)

end.

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

← →
Yuri20032 (2003-03-25 18:35) [2]

Как при помощи модуля Registry сделать?
И кто знает как по параметру NoDrive определить какие диски скрыты?

← →
OxOTHuK (2003-03-25 22:18) [3]

Данный параметр является набором битовых флагов. Каждый бит
соответсвует одному из 26 возможных имен дисков.
Бит 0 соответсвует диску A:
бит 1 - диску B: и т.д.
Чтобы скрыть нужные вам диски, нужно
сложить эти биты. Сложность состоит в переводе двоичного значения в шестнадцатиричное. Здесь приводится небольшой список возможных
значений 0x03FFFFFFFF Скрывает все значки

| 0x3 Скрывает только диски A и B
| 0x4 Скрывает только диск C
| 0x8 Скрывает только диск D
| 0x7 Скрывает только диски A, B и C
| 0xF Скрывает только диски A, B, C и D
| 0x0 Видны все диски

Удачи в кодинге.. =)

← →
Yuri20032 (2003-03-26 18:15) [4]

to OxOTHuK: как скрыть я знаю, как по цифре (например 12367) определить какие диски скрыты?

← →
Anatoly Podgoretsky © (2003-03-26 18:20) [5]

ABCDGMN

← →
Yuri20032 (2003-03-26 18:29) [6]

to Anatoly Podgoretsky: каким образом? Напиши алгоритм.

← →
Anatoly Podgoretsky © (2003-03-26 18:37) [7]

Изучай двоичную математику (можно у Зотова), но намек следующий один бит - один диск.

← →
Yuri20032 (2003-03-26 19:09) [8]

to Anatoly Podgoretsky: фэнкс, с дисками разобрался, а как двоичный параметр в реестр записать (например 00 00 00 00 00 00 00 00 03 00 00 00 00 00 5B E0 00 00 5C E0 00 00 00 00)

← →
Anatoly Podgoretsky © (2003-03-26 19:16) [9]

WriteBinaryData

← →
Yuri20032 (2003-03-26 19:32) [10]

Anatoly Podgoretsky: фэнкс еще раз, а случайно не заешь как в
"Моем компьютере" скрыть вкладку "Быстродействие" или хотя бы "Графика"

← →
Anatoly Podgoretsky © (2003-03-26 19:37) [11]

Правая кнопка мыши на рабочем столе

← →
Yuri20032 (2003-03-26 19:40) [12]

to Anatoly Podgoretsky: Не понял

← →
Anatoly Podgoretsky © (2003-03-26 19:42) [13]

Далее - Свойства/Натройка/Быстродействие

← →
Yuri20032 (2003-03-26 19:51) [14]

to Anatoly Podgoretsky: мне ее СКРЫТЬ надо.

Нельзя это пользовательская настройка, не для программиста.

← →
Yuri20032 (2003-03-26 20:17) [16]

to Anatoly Podgoretsky:
стандартной функции перевода десятичных чисел в двоичные в delphi нет?

Ты это решил моно ветку организовать?
Один вопрос одна ветка!
И последнии вопросы стали похожи на персональную поддержку, другие тоже хотят ответить.

← →
Yuri20032 (2003-03-26 20:46) [18]

to all:

стандартной функции перевода десятичных чисел в двоичные в delphi нет?

← →
Боря (2003-03-27 00:10) [19]

Удалено модератором

Yuri20032 (26.03.03 20:46) нет. Вообще не существует двоичных, десятичных, шеснадцатеричных чисел. Есть просто ЧИСЛА.А ещё есть представления этих чисел в двоичном и т д форматах...

Anatoly Podgoretsky © (26.03.03 20:22)

> И последнии вопросы стали похожи на персональную поддержку,
> другие тоже хотят ответить.

Нет, другие тоже захотят Вашей персональй поддержки ;-)

Вопрос по реестру... Найти похожие ветки