DELPHI AREA Forum

Hallo, how with DeAudioPlayer play back set from concrete position? How position extend at spooling out?

Martin

Sorry, I couldn't get the question. Could you please explain with an example?

wow, englisz langłicz!

I decipher: play from given position

that second one I didn't catch

Sorry for my English, it is not my langue. Recording has length 1 minutes . I need start play up from 30 seconds. How with it does? Following code for TMEDIAPLAYER:

Code: Select all

procedure TCRForm.JvSlider1StopChanged(Sender: TObject);
begin
  if (MediaPlayer.Mode=mpOpen)or(MediaPlayer.Mode=mpPlaying)or(MediaPlayer.Mode=mpPaused) then
  begin
    MediaPlayer.Position:=JvSlider1.Position;//<<<<<<<<<<< How???
    Label3.Caption := MS2Str(MediaPlayer.Position, msHMS{msAh});
    MediaPlayer.Play;
  end;
end;


This code I need re-write using TDeAudioOut.

All audio player components (TAudioPlayer, TStockAudioPlayer, and TLiveAudioPlayer) have a Position property that you can use it like Position property of MediaPlayer. The value of Position property is in milliseconds.

Maybe:

"De" means another component which not freeware . (droppy eyes etc..)

cozturk wrote:Maybe:

"De" means another component which not freeware . (droppy eyes etc..)

You are right. Even without "De", TAudioOut is an abstract class in the Wave Audio package.

Here is the link to the source files of the components that zaplik is talking about.
http://leenover.homeip.net/delphi/Projects/lnDS/

I didn't look at the code yet, but seems to be a DirectSound project.

welll then... this has to be moved.