Mega Code Archive

 
Categories / Delphi / Files
 

How to extract WAV files from Audio CD

Title: How to extract WAV files from Audio CD Question: Now a real, professional way, but it works. You can also select what tipe of file to grab (bitrate, mono/stereo, Hz). Answer: Simply use that trick to made your rippers/grabers: (don't know if it work on NT / 2000) Download the substitutive FSCD.VXD from the Net and substitute to your original located in \Windows\System\IOSubSys directory. I suppose it needs a reboot. In your program, in the "Grab" button just put in the function that calculates the location of the file and makes a copy of it. ( probabily this will not work, but it demonstrates how to make) Procedure TfrmMain.cmdGrabClick( Sender : TObject ); Var mHz : String; mBr : String; mStereo : String; mTrack : String; mFile : String; Begin Case rgHz.ItemIndex Of 0 : mHz := '11025kHz'; 1 : mHz := '22050kHz'; 2 : mHz := '44100kHz'; Else mHz := '48000kHz'; End; If ( rgBr.ItemIndex = 0 ) Then mBr := '8bit' Else mBr := '16bit'; If ( chkStereo.Cheched ) Then mStereo := 'Stereo' Else mStereo := 'Mono'; mTrack := 'Track ' + cboTrack.Text + '.wav'; mFile := cboDrive.Text + ':\' + mStereo + '\' + mHz + '\' + mBr + '\' + mTrack; // Copy now the file in mFile. End; An example will be available soon.