Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Delphi Sound zusätzlich abspielen ? (https://www.delphipraxis.net/57700-sound-zusaetzlich-abspielen.html)

Vader 25. Nov 2005 11:29


Sound zusätzlich abspielen ?
 
hallo,

ich habe eine digitalanzeige wo eine zahl hochläuft

Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
var
  i : Double;
begin
  i := JvgDigits2.Value;
  i := i + 1;
  JvgDigits2.Value := i;
end;
jetzt möchte einen sound bzw. eine wav_datei mitlaufen lassen mit der optischen
anzeige, wie kann man das realisieren ?
mfg vader

ichbins 25. Nov 2005 12:43

Re: Sound zusätzlich abspielen ?
 
was heisst "mitlaufen lassen"? wenn du nebenbei Musik abspielen willst oder so, dann kannst du das ja per Mediaplayer machen:
Delphi-Quellcode:
mediaplayer1.filename:='C:\file.mp3';
mediaplayer1.open;
mediaplayer1.play;

procedure tform1.mediaplayer1onnotify(sender:tobject);
begin
  mediaplayer1.play;
end;
wenn du ticken willst, dann machst du das eben so:
Delphi-Quellcode:
procedure tform1.formcreate(sender:tobject);
begin
  mediaplayer1.filename:='C:\tick.wav';
  mediaplayer1.open;
end;

procedure tform1.timer1ontimer(sender:tobject);
begin
  [...]
  mediaplayer1.play;
end;

Vader 25. Nov 2005 17:31

Re: Sound zusätzlich abspielen ?
 
hallo,

danke, habs aber anders gelöst, und zwar mit mmsystem - playsound,

ich würde ein geräusch bzw sound für meine digitanzeige brauchen, was so atypisch klingt !
hat wer so eine datei oder downloadlink ?
mfg vader


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:27 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz