Displaying 2 results from an estimated 2 matches for "ops_callbacks".
2004 Apr 12
3
Decoding with 8 bit-samples
Hi!
I'd like to make a stereo 8-bit wav file
from a stereo (16 bit) ogg vorbis file
(in delphi, with the vorbisfile).
I use:
ret := ov_open_callbacks(filein,vf,nil,0,ops_callbacks);
if ret = 0 Then
begin
fileOut := TFileStream.Create(savedlg.FileName,fmCreate);
repeat
ret := ov_read(VF, pcmout, BufferSize, 0, 1, 1, nil); //'cause of the 8-bit
fileOut.Write(pcmout,ret);
until ret = 0;
end;
The result will be cracking.... et...
2003 Jun 23
3
Cannot get ogm infos
..._open_callbacks" it generates a message error.
Here is my procedure in pascal:
code:
_____
procedure GetOGMInfo;
var
F : TFileStream;
vf: OggVorbis_File;
res: integer;
begin
F := TFileStream.Create("OGM FileName", fmOpenRead);
res := ov_open_callbacks(F, vf, nil, 0, ops_callbacks);
if res < 0 then // always return -132 !! No Vorbis info/file
begin
F.Free;
exit;
end;
**** code to get info ****
end;
_____
<p><p>What call must I use to open the "FileName".ogm file & get the video
stream info (duration, bitrate, etc...) ?...