Главная страница
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.018 c
3-21449
vladimir_12
2002-10-21 12:23
2002.11.07
Поиск в Dataset или DBGrid


1-21487
DN
2002-10-28 17:17
2002.11.07
Работа с TStringList


14-21760
MaximatorVeter
2002-10-15 19:25
2002.11.07
XP


1-21488
Пасечник
2002-10-28 17:54
2002.11.07
Перерисовка формы


3-21358
Toshanius
2002-10-20 14:10
2002.11.07
Помогите програмно очистить Table