Ĺadny brzuch
Jak mogę wywołać wszytkie dźwięki windowsa? Znam tylko jeden
beep;. Jeśli ktoś potrafi pozostałe to będe wdzięczny.
Tak na marginesie, to Beep() wydawany jest z głośniczka komputerowego ;)
Użyj TMediaPlayer i odtwarzaj dźwięki takie jak opróżnianie kosza czy 'powitalna muzyczka', które znajdują się w katalogu C:\WINDOWS\Media :)
Przykład na dźwięk opróżniania kosza w XP:
MediaPlayer1.FileName := 'C:\WINDOWS\Media\recycle.wav'; MediaPlayer1.Play;
Użytkownik Coldpeer edytował ten post 03 marzec 2006, 15:16
Tak na marginesie, to Beep() wydawany jest z głośniczka komputerowego ;)
Użyj TMediaPlayer i odtwarzaj dźwięki takie jak opróżnianie kosza czy 'powitalna muzyczka', które znajdują się w katalogu C:\WINDOWS\Media :)
Przykład na dźwięk opróżniania kosza w XP:
MediaPlayer1.FileName := 'C:\WINDOWS\Media\recycle.wav'; MediaPlayer1.Play;
Nie o to mi chodziło. Podstawowe dźwięki Windows z pewnościa da się wywołać inaczej. Tak samo jak: beep; a pozostałe jak?
Na przykład po to, żeby nie musieć korzystać z tej dość obszernej kontrolki.
W każdym razie proszę bardzo:
uses MMSystem; PlaySound(PChar('SYSTEMSTART'), 0, SND_ASYNC);
Inne rzeczy, które możesz wpisać zamiast SYSTEMSTART:
SYSTEMSTART
SYSTEMEXIT
SYSTEMHAND
SYSTEMASTERISK
SYSTEMQUESTION
SYSTEMEXCLAMATION
SYSTEMWELCOME
SYSTEMDEFAULT
p.s. Nie muszą być pisane wielkimi literami.
Użytkownik Chmurek edytował ten post 03 marzec 2006, 15:49
O proszę, a jednak :)
Na przykład po to, żeby nie musieć korzystać z tej dość obszernej kontrolki.
Obszernej, ale którą można bardzo prosto wykorzystać ;)
Użytkownik Coldpeer edytował ten post 03 marzec 2006, 15:49
Dzięki
Do Coldpeer - nie wszytko co daje się łatwo wykorzystać jest dobre. Musiał bym załadować do projektu duży komponent Mediaplayer i tylko po to aby wydał 1 krótki dźwięk. Bez sensu.
Użytkownik statjacek edytował ten post 03 marzec 2006, 17:15
Na przykład po to, żeby nie musieć korzystać z tej dość obszernej kontrolki.
W każdym razie proszę bardzo:
uses MMSystem; PlaySound(PChar('SYSTEMSTART'), 0, SND_ASYNC);
Inne rzeczy, które możesz wpisać zamiast SYSTEMSTART:
SYSTEMSTART
SYSTEMEXIT
SYSTEMHAND
SYSTEMASTERISK
SYSTEMQUESTION
SYSTEMEXCLAMATION
SYSTEMWELCOME
SYSTEMDEFAULT
p.s. Nie muszą być pisane wielkimi literami.
Albo MessageBeep(MB_OK). Inne wartości:
@Coldpeer: Beep() wydawany jest z głośniczka komputerowego, ale w delphi jest też inna procedura Beep w SysUtils:
procedure Beep; begin  MessageBeep(0); end;
Żeby użyć tej o której mówisz, trzeba napisać Windows.Beep.
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
beep;. Jeśli ktoś potrafi pozostałe to będe wdzięczny.
Tak na marginesie, to Beep() wydawany jest z głośniczka komputerowego ;)
Użyj TMediaPlayer i odtwarzaj dźwięki takie jak opróżnianie kosza czy 'powitalna muzyczka', które znajdują się w katalogu C:\WINDOWS\Media :)
Przykład na dźwięk opróżniania kosza w XP:
MediaPlayer1.FileName := 'C:\WINDOWS\Media\recycle.wav'; MediaPlayer1.Play;
Użytkownik Coldpeer edytował ten post 03 marzec 2006, 15:16
Tak na marginesie, to Beep() wydawany jest z głośniczka komputerowego ;)
Użyj TMediaPlayer i odtwarzaj dźwięki takie jak opróżnianie kosza czy 'powitalna muzyczka', które znajdują się w katalogu C:\WINDOWS\Media :)
Przykład na dźwięk opróżniania kosza w XP:
MediaPlayer1.FileName := 'C:\WINDOWS\Media\recycle.wav'; MediaPlayer1.Play;
Nie o to mi chodziło. Podstawowe dźwięki Windows z pewnościa da się wywołać inaczej. Tak samo jak: beep; a pozostałe jak?
Na przykład po to, żeby nie musieć korzystać z tej dość obszernej kontrolki.
W każdym razie proszę bardzo:
uses MMSystem; PlaySound(PChar('SYSTEMSTART'), 0, SND_ASYNC);
Inne rzeczy, które możesz wpisać zamiast SYSTEMSTART:
SYSTEMSTART
SYSTEMEXIT
SYSTEMHAND
SYSTEMASTERISK
SYSTEMQUESTION
SYSTEMEXCLAMATION
SYSTEMWELCOME
SYSTEMDEFAULT
p.s. Nie muszą być pisane wielkimi literami.
Użytkownik Chmurek edytował ten post 03 marzec 2006, 15:49
O proszę, a jednak :)
Na przykład po to, żeby nie musieć korzystać z tej dość obszernej kontrolki.
Obszernej, ale którą można bardzo prosto wykorzystać ;)
Użytkownik Coldpeer edytował ten post 03 marzec 2006, 15:49
Dzięki
Do Coldpeer - nie wszytko co daje się łatwo wykorzystać jest dobre. Musiał bym załadować do projektu duży komponent Mediaplayer i tylko po to aby wydał 1 krótki dźwięk. Bez sensu.
Użytkownik statjacek edytował ten post 03 marzec 2006, 17:15
Na przykład po to, żeby nie musieć korzystać z tej dość obszernej kontrolki.
W każdym razie proszę bardzo:
uses MMSystem; PlaySound(PChar('SYSTEMSTART'), 0, SND_ASYNC);
Inne rzeczy, które możesz wpisać zamiast SYSTEMSTART:
SYSTEMSTART
SYSTEMEXIT
SYSTEMHAND
SYSTEMASTERISK
SYSTEMQUESTION
SYSTEMEXCLAMATION
SYSTEMWELCOME
SYSTEMDEFAULT
p.s. Nie muszą być pisane wielkimi literami.
Albo MessageBeep(MB_OK). Inne wartości:
@Coldpeer: Beep() wydawany jest z głośniczka komputerowego, ale w delphi jest też inna procedura Beep w SysUtils:
procedure Beep; begin  MessageBeep(0); end;
Żeby użyć tej o której mówisz, trzeba napisać Windows.Beep.