play wav file

[drak]

Hello. For me does not turn out to lose created by me wav file.  A voice file is created normally.  A telephone number is caused... All ok. But! At a procedure of Call call for me the program does not get in procedure of Onlineconnected; In procedure Onlineconnected wrote such code of:
begin
PlayMyFile;
end;
In both forms of yunity in uses declared.
Procedure PlayMyFile in other units created:

procedure PlayMyFile;
begin
with Frmmain do 
begin 
if fileexists(wavefile) then 
nrwave1.PlayFileName:=wavefile;
nrwave1.PlayStart;
end;
end;

[Roman Novgorodov]

Hello

Does Demos\Voice\voicedemo.dpr work correctly with your modem?

If voicedemo is ok, please check that your WAV file has following sound format:
PCM, 16bit, 8kHz, Mono

It is ordinal format for serial sound driver.

Roman Novgorodov
DeepSoftware.Com

[drak]

Hello

Does Demos\Voice\voicedemo.dpr work correctly with your modem?

If voicedemo is ok, please check that your WAV file has following sound format:
PCM, 16bit, 8kHz, Mono

It is ordinal format for serial sound driver.

Roman Novgorodov
DeepSoftware.Com

Hello. Yes, a demo version works. Wav create a file in such format:
try
      TSW:=TSpFileStream.Create(nil);
      TSW.Format.type_:=SAFT8kHz16BitMono;
  ...
      finally
      Tsw.Close;
      end;

[Roman Novgorodov]

Hello

We know nothing about your TSpFileStream class.

We used ordinary windows sound recorder app for create WAV file in necessary format.

Roman Novgorodov
DeepSoftware.Com