Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Реестр, Значение констант? :) 
V
    Опции темы
Mephisto
Дата 29.6.2006, 13:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Волкъ
***


Профиль
Группа: Завсегдатай
Сообщений: 1818
Регистрация: 27.8.2003
Где: Питер

Репутация: 2
Всего: 34
Люди, хелп.
Чему равно значение константы REG_DWORD?
У меня доступ только на винград. А тут не нашел. Срочно надо. Пасип. 
PM   Вверх
Naghual
Дата 29.6.2006, 13:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1893
Регистрация: 15.5.2004
Где: Украина, Днепр

Репутация: 26
Всего: 49
Private Const REG_BINARY = 3                     
Private Const REG_DWORD = 4                      
Private Const REG_DWORD_BIG_ENDIAN = 5           
Private Const REG_DWORD_LITTLE_ENDIAN = 4        
Private Const REG_EXPAND_SZ = 2                  
Private Const REG_FULL_RESOURCE_DESCRIPTOR = 9   
Private Const REG_LINK = 6                       
Private Const REG_MULTI_SZ = 7                   
Private Const REG_SZ = 1

Добавлено @ 13:28 
Взято из API-Viewer который в составе VB.
И не нужно дублировать темы. 


--------------------
Я желаю всем Счастья!
PM ICQ Skype   Вверх
mihanik
Дата 29.6.2006, 13:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


-=Белый Медведь=-
****


Профиль
Группа: Комодератор
Сообщений: 4054
Регистрация: 24.4.2006
Где: г. Тверь

Репутация: 11
Всего: 109
Посмотри подробнее здесь

Цитата

Новое_имя, старое_имя 

И еще. Для упрощения читаемости информационных файлов создайте раздел [Srings] . В нем можно назначать различные константы, то есть когда Windows будет просматривать inf-файл и увидит такую константу, она автоматически перейдет в раздел [Strings] и переприсвоет значение константы на ее истинное. Но в основном файле такие константы должны быть окружены знаком процент — %. Это бывает очень удобно при писании больших файлов. 

[Version]
Signature="$CHICAGO$"
Provider=%Prov%
[DefaultInstall]
AddReg=AddInformationToRegistry
[AddInformationToRegistry]
HKLM, Sample, Value, %REG_DWORD%, 56, f1, 00, b2
[DestinationDirs]
file.dll=%A%, "%Source%"
[Strings]
Prov="Crio"
A="16422"
Source="My_Program"
REG_DWORD="00010001"
  

Это сообщение отредактировал(а) mihanik - 29.6.2006, 13:42


--------------------
Программистами не рождаются, - это родовая травма...
user posted imageuser posted image
PM MAIL WWW ICQ   Вверх
Mephisto
Дата 29.6.2006, 13:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Волкъ
***


Профиль
Группа: Завсегдатай
Сообщений: 1818
Регистрация: 27.8.2003
Где: Питер

Репутация: 2
Всего: 34
Naghual, ЗАЧОТ!

Добавлено @ 13:46 
Цитата(mihanik @  29.6.2006,  12:41 Найти цитируемый пост)
Посмотри подробнее здесь

 smile  smile  smile  smile  smile  smile  smile  smile 
Еще раз:

Цитата(Mephisto @  29.6.2006,  12:13 Найти цитируемый пост)
У меня доступ только на винград.

 

Это сообщение отредактировал(а) Mephisto - 29.6.2006, 13:45
PM   Вверх
mihanik
Дата 29.6.2006, 13:47 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


-=Белый Медведь=-
****


Профиль
Группа: Комодератор
Сообщений: 4054
Регистрация: 24.4.2006
Где: г. Тверь

Репутация: 11
Всего: 109

М-дааа...

API-Viewer, действительно выдаёт:
Цитата

Public Const REG_DWORD = 4                      ' 32-bit number


Недоглядел...
 smile  


--------------------
Программистами не рождаются, - это родовая травма...
user posted imageuser posted image
PM MAIL WWW ICQ   Вверх
Mephisto
Дата 29.6.2006, 13:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Волкъ
***


Профиль
Группа: Завсегдатай
Сообщений: 1818
Регистрация: 27.8.2003
Где: Питер

Репутация: 2
Всего: 34
Цитата(Naghual @  29.6.2006,  12:28 Найти цитируемый пост)
Взято из API-Viewer который в составе VB.
И не нужно дублировать темы.  

API-Viewer у меня нет. :/ Спрашивал бы еслиб был.  smile И в нете посмотреть не могу.
Про темы ты прав. В другой ответа нет. И помечена она закрытой. 
PM   Вверх
Naghual
Дата 29.6.2006, 14:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1893
Регистрация: 15.5.2004
Где: Украина, Днепр

Репутация: 26
Всего: 49
Цитата(Mephisto @  29.6.2006,  13:50 Найти цитируемый пост)
API-Viewer у меня нет.

Как так? 


--------------------
Я желаю всем Счастья!
PM ICQ Skype   Вверх
Mephisto
Дата 29.6.2006, 14:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Волкъ
***


Профиль
Группа: Завсегдатай
Сообщений: 1818
Регистрация: 27.8.2003
Где: Питер

Репутация: 2
Всего: 34
Мне с Ёкселя в локал нужно. smile 6-го дистрибутива не имею. Выход в нет только на винград. smile Короче гемороя полно. 
PM   Вверх
Naghual
Дата 29.6.2006, 14:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1893
Регистрация: 15.5.2004
Где: Украина, Днепр

Репутация: 26
Всего: 49
ясно.
тему закрываем. 


--------------------
Я желаю всем Счастья!
PM ICQ Skype   Вверх
Mephisto
Дата 29.6.2006, 14:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Волкъ
***


Профиль
Группа: Завсегдатай
Сообщений: 1818
Регистрация: 27.8.2003
Где: Питер

Репутация: 2
Всего: 34
Разница между FAQ и САБЖ
Код

Declare Function RegQueryValueEx Lib "advapi32" Alias "RegQueryValueExA" (ByVal hKey As Long, _
ByVal lpValueName As String, ByVal lpReserved As Long, ByRef lpType As Long, ByVal szData As Long, _
ByRef lpcbData As Long) As Long
.......

Public Function RegGetValue(Root As Long, SubKey As String, Key As String) As String
    Dim Buffer As Long, hKey As Long, nType As Long, nSize As Long
    RegGetValue = ""
    If Not RegOpenKeyEx(Root, SubKey, 0&, KEY_READ, hKey) Then
        nSize = 0
        RegQueryValueEx hKey, Key, 0, nType, Buffer, nSize
        If hKey And nSize > 0 And nType = REG_DWORD Then
            RegQueryValueEx hKey, Key, 0&, nType, VarPtr(Buffer), nSize
            RegGetValue = Buffer ', nSize - 1)
            RegCloseKey hKey
        End If
    End If
End Function


Закрываем. ;) 
PM   Вверх
Akina
Дата 29.6.2006, 14:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454
Цитата(Mephisto @  29.6.2006,  14:50 Найти цитируемый пост)
API-Viewer у меня нет. 

А Immediate Windows (Ctrl-G) у тебя есть? А набрать там 
Код
? REG_DWORD
трудно? 


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.
PM MAIL WWW ICQ Jabber   Вверх
Mephisto
Дата 29.6.2006, 14:53 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Волкъ
***


Профиль
Группа: Завсегдатай
Сообщений: 1818
Регистрация: 27.8.2003
Где: Питер

Репутация: 2
Всего: 34
Цитата(Akina @  29.6.2006,  13:43 Найти цитируемый пост)
А Immediate Windows (Ctrl-G) у тебя есть? А набрать там 

и.....??????
Что это даст  smile

Добавлено @ 14:54 
Понимаю что если определить эту константу. Это не стандартная константа барсика. Откуда он ее подхватит?  smile  
PM   Вверх
Akina
Дата 29.6.2006, 16:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454
Цитата(Mephisto @  29.6.2006,  15:53 Найти цитируемый пост)
Откуда он ее подхватит?

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

Добавлено @ 16:52 
Ну и вот тут можно посмотреть было. 


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.
PM MAIL WWW ICQ Jabber   Вверх
Mephisto
Дата 30.6.2006, 10:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Волкъ
***


Профиль
Группа: Завсегдатай
Сообщений: 1818
Регистрация: 27.8.2003
Где: Питер

Репутация: 2
Всего: 34
Цитата(Akina @  29.6.2006,  15:49 Найти цитируемый пост)
Либо он ее подхватил уже - тогда и значение он тебе покажет

Это понятно. Но только такой константы в барсике нет. Зато есть в С. И в API-Vewer ее значение можно посмотреть. smile Но у меня его нет, к сожалению.

А за сцилочку пасип. ;) 
PM   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB6 | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.1338 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.