Добрый день!
Мне необходимо определить положение трубки USB телефона SkypeMate P4K. Скачал с официального сайта OCX компонент, подключил в Delphi, положил на форму, обращаюсь к нему:
Код:
var
Form1: TForm1;
b: boolean;
s: string;
procedure TForm1.Button1Click(Sender: TObject);
begin
b:=usbphone1.AllOpenPhone(0); //инициализирую телефон
s:=usbphone1.AllGetPhoneSerialNumber; //получаю серийный номер
usbphone1.OnEventPhoneHook(ASender: TObject; bOnHook: WordBool);// эта процедура поидее должна ворачивать положение трубки, но я не понимаю как правильно её оформить???
usbphone1.AllClosePhone;
end;
Admin: Пользуемся тегами для оформления кода!
Телефон видно что реагирует, при подключении у него изменяется надпись на экране, серийный номер считывается без проблем
Покопался в файлах которые создал OCX, нашёл такое описание:
TUSBPHONEEventPhoneHook = procedure(ASender: TObject; bOnHook: WordBool) of object;
не могу понять что же всё таки писать в скобки
Помогите пожалуйста