ExecuteAT

Функция отправляет произвольную АТ команду модему.

Синтаксис
ExecuteAT (Command: String; ComPort: Integer; Timeout: Integer): String
Входные параметры
Имя параметра	Тип параметра	Описание
Command	String	АТ команда
ComPort	Integer	COM-порт модема
Timeout	Integer	Таймаут ожидания ответа от модема
Выходные параметры
Тип параметра		Описание
String		Ответ модема на АТ команду

Var
     res: String;
     COM_PORT: Integer;

Begin
   COM_PORT := 1;
     res := ExecuteAT('*105#', COM_PORT, 5);
end.