Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.11.07;
Скачать: CL | DM;

Вниз

Ошибка при инициализаци клавы,маши...   Найти похожие ветки 

 
Daniil   (2002-07-14 18:08) [0]

Беру уже энный исходник с вашего сайта по использованию DirectX(8,7,6) и там везде одна и таже ошибка : инициализация вводных
устройств (мыши, клавы) один из параметров - переменная а не указатель на неё, и Delfi об этом сообщает. Когда при помощи оператора @ подставляю указатель, при запкске - сооющение :Error
in reading adress FFFFFFFF. Что делать? Помогите!


 
NailMan ©   (2002-07-15 01:13) [1]


Var
DInput : IDIRECTINPUT8 = nil;
DIMouse : IDIRECTINPUTDEVICE8 = nil;
DIKeyBoard : IDIRECTINPUTDEVICE8 = nil;


Procedure Init;
Var C:TDIDataFormat;
begin
C:=c_dfDIMouse2;
DirectInput8Create(hInstance, DIRECTINPUT_VERSION, IID_IDirectInput8, DInput, nil);
DInput.CreateDevice(GUID_SysMouse, DIMouse, nil);
DIMouse.SetDataFormat(C);
DIMouse.SetCooperativeLevel(Handle, DISCL_NONEXCLUSIVE or DISCL_BACKGROUND);
C:=c_dfDIKeyboard;
DInput.CreateDevice(GUID_SysKeyboard, DIKeyboard , nil)
DIKeyboard.SetDataFormat(C);
DIKeyboard.SetCooperativeLevel(Handle, DISCL_NONEXCLUSIVE or DISCL_BACKGROUND);
DiMouse.Acquire;
Dikeyboard.Acquire;
end;


У меня вот так инициализируются клава и мыш. И проблем не возникало.



Страницы: 1 вся ветка

Текущий архив: 2002.11.07;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.014 c
3-21446
dim-
2002-10-18 22:52
2002.11.07
Вопрос о базе данных


7-21840
Terrible
2002-09-04 15:19
2002.11.07
Проверяем наличие администраторских привилегий.


3-21387
arkara
2002-10-17 13:39
2002.11.07
Компоненты InfoPower


7-21843
Terrible
2002-09-04 17:13
2002.11.07
Сервис на Delphi и Форма


3-21444
Макз
2002-10-19 05:02
2002.11.07
Field description