AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Mein PC Beep't nicht mehr...

Ein Thema von turboPASCAL · begonnen am 26. Jun 2012 · letzter Beitrag vom 27. Jun 2012
Antwort Antwort
Benutzerbild von turboPASCAL
turboPASCAL

Registriert seit: 8. Mai 2005
Ort: Sondershausen
4.274 Beiträge
 
Delphi 6 Personal
 
#1

Mein PC Beep't nicht mehr...

  Alt 26. Jun 2012, 20:00
Betriebssystem: Win 7
Hallo,

Mein PC piept leider nicht mehr, das heisst nur beim Start des PC's macht es den (bekannten) BIOS - Beep aber
leider bleibt der interne PC-Speaker still wenn man in einem Programm(code) Windows.Beep() aufruft.

Der Ton wird nun nur noch über die Soundkarte ausgegeben was mir absolut nicht gefällt.
Ich bin der Meinung das es unter Win7 32Bit noch richtig funktionierte und dieses Verhalten erst ab Win7 64Bit
auftritt.

Kann das jmd Bestätigen oder gibt es Lösungen ?
Matti
Meine Software-Projekte - Homepage - Grüße vom Rüsselmops -Mops Mopser
  Mit Zitat antworten Zitat
Benutzerbild von Helmi
Helmi

Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.323 Beiträge
 
Delphi XE2 Professional
 
#2

AW: Mein PC Beep't nicht mehr...

  Alt 26. Jun 2012, 20:33
Hallo,

also folgende zwei Beep´er werden über die Soundkarte ausgegeben bei Win7 32bit.

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
  Winapi.Windows.Beep(500, 200);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  Beep;
end;
mfg
Helmi

>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.063 Beiträge
 
Delphi 12 Athens
 
#3

AW: Mein PC Beep't nicht mehr...

  Alt 26. Jun 2012, 20:38
Nja, was wo beepen soll, kann man irgendwo einstellen.

Das SysUtils.Beep geht letzendlich auf MessageBeep(0); und eventuell würde ich dort anfangen mit suchen, eventuell findet sich darüber ja schon die Lösung.
http://msdn.microsoft.com/en-us/libr.../ms680356.aspx


Windows.Beep(f, d); würde standardmäßig direkt auf den Piepser gehn, aber ich glaub das wurde auch schon umgeleitet, wenn es keinen Piepser gibt.
Nur seit Win64 soll es wohl nicht mehr implementiert sein.
http://msdn.microsoft.com/en-us/libr.../ms679277.aspx
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.

Geändert von himitsu (26. Jun 2012 um 20:44 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von turboPASCAL
turboPASCAL

Registriert seit: 8. Mai 2005
Ort: Sondershausen
4.274 Beiträge
 
Delphi 6 Personal
 
#4

AW: Mein PC Beep't nicht mehr...

  Alt 26. Jun 2012, 21:54
Zitat:
...Nur seit Win64 soll es wohl nicht mehr implementiert sein...
Ja, hab's auch gerade im iNet gelesen. Seinbar liegt das an einem Fehler in der Virtualisierung.

Ich werde mal genauer nach vorschen. Seinbar liegt es an dem Treiber, tauscht man den gegen die alte 32Bit Version
soll es wieder funktionieren.
Matti
Meine Software-Projekte - Homepage - Grüße vom Rüsselmops -Mops Mopser
  Mit Zitat antworten Zitat
Benutzerbild von jaenicke
jaenicke

Registriert seit: 10. Jun 2003
Ort: Berlin
9.582 Beiträge
 
Delphi 11 Alexandria
 
#5

AW: Mein PC Beep't nicht mehr...

  Alt 26. Jun 2012, 22:08
Das ist kein Fehler, sondern so gedacht. Das steht ja auch in der Doku:
Zitat:
Eventually because of the lack of hardware to communicate with, support for Beep was dropped in Windows Vista and Windows XP 64-Bit Edition.
In Windows 7, Beep was rewritten to pass the beep to the default sound device for the session. This is normally the sound card, except when run under Terminal Services, in which case the beep is rendered on the client.
Bei mir piept auch die Soundkarte, also alles wie es sein soll.
Sebastian Jänicke
Alle eigenen Projekte sind eingestellt, ebenso meine Homepage, Downloadlinks usw. im Forum bleiben aktiv!
  Mit Zitat antworten Zitat
Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.453 Beiträge
 
Delphi 12 Athens
 
#6

AW: Mein PC Beep't nicht mehr...

  Alt 26. Jun 2012, 22:16
Vielleich kann man ja alternativ das Floppy-Laufwerk als Beeper nutzen: http://www.youtube.com/watch?v=X4SCSGRVAQE
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat
Benutzerbild von Stevie
Stevie

Registriert seit: 12. Aug 2003
Ort: Soest
4.016 Beiträge
 
Delphi 10.1 Berlin Enterprise
 
#7

AW: Mein PC Beep't nicht mehr...

  Alt 27. Jun 2012, 00:19
Vielleich kann man ja alternativ das Floppy-Laufwerk als Beeper nutzen: http://www.youtube.com/watch?v=X4SCSGRVAQE
Dann aber nicht nur mit einem Floppy!
Stefan
“Simplicity, carried to the extreme, becomes elegance.” Jon Franklin

Delphi Sorcery - DSharp - Spring4D - TestInsight
  Mit Zitat antworten Zitat
Furtbichler
(Gast)

n/a Beiträge
 
#8

AW: Mein PC Beep't nicht mehr...

  Alt 27. Jun 2012, 09:29
Vielleich kann man ja alternativ das Floppy-Laufwerk als Beeper nutzen:
Mist, hab kein Floppylaufwerk, geht das auch mit USB-Stick? ?
  Mit Zitat antworten Zitat
Benutzerbild von ibp
ibp

Registriert seit: 31. Mär 2004
Ort: Frankfurt am Main
1.511 Beiträge
 
Delphi 7 Architect
 
#9

AW: Mein PC Beep't nicht mehr...

  Alt 27. Jun 2012, 09:49
Vielleich kann man ja alternativ das Floppy-Laufwerk als Beeper nutzen:
Mist, hab kein Floppylaufwerk, geht das auch mit USB-Stick? ?
ja, wenn du alle Bits gleichzeitig alternierend schaltest und die Eigenfrequenz herausfindest...
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 23:43 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz