| 
							gargona
							 
								Гость 
							 
						 | 
						
							
								  | 
								
									
									«   : 23-06-2004 05:04 »    | 
								
								 | 
							  
							 
							Никак не могу проиграть файл в модем. Работаю через АТ команды модема. Набираю номер, перевожу в голосовой режим, затем команлой AT+VTX начинаю передавать звук, а вот дальше я не уверена правильно ли. Может сначала надо сконвертировать wav файл (сжать) и только потом передавать? И как правильно прописать  путь к файлу->AT+VTX,,,,,C:\winnt\media\notif.wav
  Кто работал с такой задачей отзовитесь!!!!
  Вот код: var        PhoneNumber : string;        CommPort : string;        NumberWritten : cardinal;      begin        PhoneNumber := 'ATDT57010,,,AT+FCLASS=8,AT+VSM=?,,AT+VLS=2,,AT+VSM=1,AT+VTX,,,,,C:\winnt\media\notif.wav'+ #13 + #10;        CommPort := 'COM2';       {Open the comm port}        hCommFile := CreateFile(PChar(CommPort),                    GENERIC_WRITE,                    0,                    nil,                    OPEN_EXISTING,                    FILE_ATTRIBUTE_NORMAL,                    0);        if hCommFile=INVALID_HANDLE_VALUE then        begin      ShowMessage('Unable to open '+ CommPort);      exit;        end;
        {Dial the phone}        NumberWritten:=0;        if WriteFile(hCommFile,             PChar(PhoneNumber)^,              Length(PhoneNumber),             NumberWritten,            nil) = false then begin      ShowMessage('Unable to write to ' + CommPort);        end;      end; 
						 |