[burda_a_m]

Всем привет!

Для одного человека хотел написать программу. У этой программы помимо других функций должны быть реализованы функции для работы с телефонией. По началу я написал пробную программу для набора номера. Сделал это я через открытие СОМ-порта и записи в него ATD-команд. Вот код процедуры набора номера:

Код:

procedure upmodem;
var
  PhoneCommand: string;
  CommPort: string;
  NumberWritten: cardinal;
begin
  PhoneCommand := 'atdt' + FrmCall.TxtNumber.Text + #13 + #10; //Поднять трубку и набрать номер
  CommPort := 'COM'+IntToStr(FrmCall.CmbCOMPort.ItemIndex+1);//Ваш СОМ порт

  //-------------------Открыть порт как файл

  hCommFile := CreateFile(
    PChar(CommPort),
    generic_read or GENERIC_WRITE,
    0,
    nil,
    OPEN_EXISTING,
    FILE_ATTRIBUTE_NORMAL,
    0);                     {}
  if hCommFile = INVALID_HANDLE_VALUE then
  begin
    ShowMessage('Не могу открыть порт ' + CommPort);
    exit;
  end;

  //-------------Выполнить команду по средству записи в файл

  NumberWritten := 0;
  if WriteFile(hCommFile,
    PChar(PhoneCommand)^,
    Length(PhoneCommand),
    NumberWritten,
    nil) = false then
  begin
    ShowMessage('Не могу произвести запись в порт ' + CommPort);
  end;{}
end;

Здесь TxtNumber.Text – текстовое поле, в которое вводится номер телефона, CmbCOMPort – раскрывающийся список (TComboBox) с вариантами СОМ-портов. У меня и других моих знакомых этот код работает, а вот у человека, для которого я и хочу написать программу, вылазит сообщение "Не могу произвести запись в порт". При этом должен заметить, что человек пользуется Виндовским диалером (dialer.exe). Кстати, у человека ноутбук ACER ASPIRE 7738G. В нем встроенный модем (LSI HDA modem-56K ITU V.90 чип-SV92A3). Так вот, Виндовский диалер у него работает, набирает номер и реагирует на входящие звонки, определяя номер вызываемого абонента. Операционка у него стоит Windows 7 Home.

И так. Раз вышеуказанный код не может произвести запись в порт, значит порт на запись занят. Но при этом Виндовская утилита dialer.exe у него работает. Тогда я начал копать в сторону TAPI. В Интернете нашел это материал http://mostinfo.net/article/9/46.htm и на его основе написал пробный вариант программы набора номера. У меня и этот вариант работал на ура. Но вот человек, для которого я и хотел написать программу, говорит, что у него и он не работает. Тогда я попросил своих друзей, у которых стоит Семерка, протестировать этот вариант. У троих из трех этот вариант работал.

Человек постоянно мне твердит, что у него модем какой-то особенный. У него "встроенный модем (LSI HDA modem-56K ITU V.90 чип-SV92A3),позволяет работать находясь в сети(вкл.браузер)и одновременно звонит". Но я не понимаю, в чем его уникальность с точки зрения программирования. Я далеко не гуру и в области программирования, но имею некоторые соображения относительно TAPI. Однако не знаю, верны ли они. Пожалуйста, знающие люди, если следующие мои рассуждения будут не верны, поправьте меня.

Первое - реализация в Delphi 7 функций телефонии через TAPI связана с утилитой dialer.exe. Ведь когда я запустил свой пробный вариант на основе TAPI и дал команду набрать номер, то Windows сама запустила утилиту dialer.exe, и та уже осуществляла набор номера. Следовательно, я сделал такой вывод. Функции телефонии, реализованные через TAPI, взаимодействуют с утилитой dialer.exe. То есть, если утилита dialer.exe работает корректно (набирает номер), то и моя программа должна набирать номер. И это никак не зависит, какой модем у человека. Второе, если у человека при попытке набора номера из моей программы ничего не происходит (то есть компьютер никак не реагирует на команды, которые дает программа через TAPI), значит проблема у него в операционной системе. Возможно, отключена какая-то служба, которая и позволяет осуществлять связь сторонних программ с виндовской телефонией. Еще, я полагаю, что здесь дело не в самом модеме. Модем, его марка и тип, тут не причем.

Пожалуйста, если сделанные мной выводы не верны, поправьте меня. Если указанный модем какой-то особенный, поясните, в чем его особенность. Неужто с ним нельзя работать так, как с другими модемами? Добавлю еще, что VentaFax у него ранее работал корректно. Сейчас он этой программой не пользуется.

Прикрепляю к посту архив с двумя моими пробными проектами на тот случай, если их кто-то захочет посмотреть.

[Bargest]

При этом должен заметить, что человек пользуется Виндовским диалером (dialer.exe). Кстати, у человека ноутбук ACER ASPIRE 7738G. В нем встроенный модем (LSI HDA modem-56K ITU V.90 чип-SV92A3). Так вот, Виндовский диалер у него работает, набирает номер и реагирует на входящие звонки, определяя номер вызываемого абонента. Операционка у него стоит Windows 7 Home.

Первая же возможная причина указана в твоем посте: встроенный модем. Вторая - Windows 7.
Вообще довольно многие девайсы сейчас работают через ВИРТУАЛЬНЫЙ ком-порт, т.е. стоит схемка FTDI которая прикидывается ком-портом, и подключается через USB. Но вот беда: некоторые проги с этим не пашут. Еще сильнее проблема обостряется при использовании Win7. Как исправлять - не знаю, пусть попробует через виртуальную машину с WinXP, там чуть больше вероятность запуска, хотя тоже отнюдь не 100% результат.

Я например купил программатор для USB, и 4 дня мучался, прежде чем смог его запустить на своем ноуте. И то не всё работает, и периодически слетает.

Можешь попробовать поиграться с параметрами файла при открытии. Очень многие юзают FILE_FLAG_OVERLAPPED вместо NORMAL