Конференция VBStreets

**homA** » 19.01.2005 (Ср) 17:42

Надо сделать так, чтоб при нажатии CTRL+Alt+S+R
Показывалась секретная форма
Как это сделать?
Заранее спасибо

**Морфий** » 19.01.2005 (Ср) 19:17

**homA** » 19.01.2005 (Ср) 20:05

Чёт он не запускается, ошибка в
WithEvents m_cHotKey As cRegHotKey

user defined type not defined

**homA** » 19.01.2005 (Ср) 20:06

Похоже класса не хватает((((
vbAccelerator VB6 subclassing and timer assistant(

**Морфий** » 19.01.2005 (Ср) 20:12

**homA** » 19.01.2005 (Ср) 21:17

AttachMessage Me, m_hWnd, WM_HOTKEY

ActiveX component can't create object

)) а с этим что делать?

**Морфий** » 19.01.2005 (Ср) 21:28

скопируй SSubTmr6.dll в system32, а потом зайди в VB и залинкуй его с проектом. (Проект->Ссылки), и все будет пучком.

**Александр80** » 19.01.2005 (Ср) 22:17

А может можно по другому…? Наверняка можно. Неужели нельзя?
У меня не получилось… :cry:

Помогите!

BV » 20.01.2005 (Чт) 1:18

А как на счёт этого:

Код: Выделить всё: Private Declare Function GetAsyncKeyState Lib "user32.dll" (ByVal vKey As Long) As Integer Private Const VK_MENU As Long = &H12 Private Const VK_CONTROL As Long = &H11

Вроде должно помочь.

**Александр80** » 20.01.2005 (Чт) 15:27

Точно

, пойду пробовать... :wink:

BV, спасибо... :lol:

Секретная форма и сочетание клавиш