| Autor |
Beitrag |
Trialtom
Beiträge: 38
|
Verfasst: Di 10.12.02 20:50
hallo,
kann ich mit delphi frequenztöne erstellen?
das heißt in einem bereich von vielleicht 1kHz bis 20 kHZ?
so das ich mir zum beispiel ein 15kHz ton anhören kann, der ja bei 15kHz sehr hoch sein müsste? gibt es da befehle, mit welchen man direkt eine bestimmte frequenz ansteuern kann?
|
|
LCS
Beiträge: 1305
Erhaltene Danke: 1
WIN 7, WIN 8
Delphi XE5, Delphi XE, Delphi 2007
|
Verfasst: Mi 11.12.02 08:46
Hi
es gibt ne Windows-Funktion Beep, bei der du Dauer und Frequenz angeben kannst. Schau einfach mal in der API-Hilfe nach.
Gruss Lothar
_________________ Der BH ist für die Brust, der Plan ist für'n Ar...
|
|
DeCodeGuru
Beiträge: 1333
Erhaltene Danke: 1
Arch Linux
Eclipse
|
Verfasst: Mi 11.12.02 12:58
Müsste aber nur unter NT4, 2000, XP und .NET laufen, da Win 9x die Parameter ignoriert.
_________________ Viele Grüße
Jakob
|
|
Trialtom 
Beiträge: 38
|
Verfasst: Mi 11.12.02 13:41
ja ich habe xp,
aber irgendwie finde ich der delpie hilfe nix was mir weiterhilft, hatte ja auch vorher schon geguckt. mehr als den befehl beep; finde ich nicht 
oder ich weiß nicht was die API hilfe ist.
|
|
LCS
Beiträge: 1305
Erhaltene Danke: 1
WIN 7, WIN 8
Delphi XE5, Delphi XE, Delphi 2007
|
Verfasst: Mi 11.12.02 13:43
Hi
die steht im Hilfe-Menü unter Windows-SDK.
Gruss Lothar
_________________ Der BH ist für die Brust, der Plan ist für'n Ar...
|
|
DeCodeGuru
Beiträge: 1333
Erhaltene Danke: 1
Arch Linux
Eclipse
|
Verfasst: Mi 11.12.02 14:12
für Infos kannste hier gucken.  _________________ Viele Grüße
Jakob
|
|
Trialtom
Beiträge: 38
|
Verfasst: Mi 11.12.02 15:14
mhh, irgendwie bin ich nochnicht viel weiter gekommen.
wenn ich zum beispiel folgenden code habe:
  Quelltext
1:
2:
3:
| BOOL Beep(
DWORD 1000,
DWORD 1000); |
da bringt es fehler, wie beep, statt "(" gefunden, ok behebe ich das, und es bringt den fehler, das bei beep zu viele parameter stehen. dann würde der befehl ja nicht stimmen!? 
dieser befehl geht demzufolge auch nicht:
Quelltext
was bedeutet das "BOOL" überhaupt for den beep, was hat es für eine bedeutung? ich meine, da ist doch nix mit false oder true? oder liege ich das falsch?
|
|
Trialtom
Beiträge: 38
|
Verfasst: Mi 11.12.02 21:25
mit c++ ist das gar kein problem:
beep(1000,1000);
range(37-ca.32000). kein problem, aber ich will nicht mit c++ programmieren, zumindestens das programm nicht.
Mit delphi habe ich mich schon totgesucht nach befehlen, leider kein erfolg
|
|
a.C.k
Beiträge: 93
WIN 2000
Delphi 6 Enterprise ; Delphi 7 Studio
|
Verfasst: Do 12.12.02 09:32
Hast du es mit Windows.beep(1000,1000) versucht?
So geht es auf jeden Fall bei mir....
_________________ Wer nicht gerne denkt, sollte wenigstens von Zeit zu Zeit seine Vorurteile neu gruppieren.
|
|
Hendrik
Beiträge: 324
|
Verfasst: Do 12.12.02 18:16
Hallo
Beep gibt bei Windows 9.X /ME nur den ganz normalen Bing Ton aus, der z.B. auch bei ner Fehlermeldung kommt.
Guck mal auf www.vclcomponents.com , da gibts bei Sound die TTongen Kompo, die dürfte dir helfen.
|
|
a.C.k
Beiträge: 93
WIN 2000
Delphi 6 Enterprise ; Delphi 7 Studio
|
Verfasst: Do 12.12.02 18:23
Das steht aber glaube sogar schon in der Hilfe drinne, das Win9x das nicht kann _________________ Wer nicht gerne denkt, sollte wenigstens von Zeit zu Zeit seine Vorurteile neu gruppieren.
|
|
Trialtom
Beiträge: 38
|
Verfasst: Do 12.12.02 20:48
ok mit windows.beep ging es natürlich, ich hatte bloß nirgens den befehl finden können
also danke!!
|
|
a.C.k
Beiträge: 93
WIN 2000
Delphi 6 Enterprise ; Delphi 7 Studio
|
Verfasst: Fr 13.12.02 09:29
Kleiner Spaß....
Das sollte ungefähr mit O Tannenbaum hinkommen
(So viel zur vorweinachtszeit *g*)
Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
| Windows.Beep(391,500);
Windows.Beep(523,250);
Windows.Beep(523,250);
Windows.Beep(523,500);
Windows.Beep(587,500);
Windows.Beep(659,250);
Windows.Beep(659,250);
Windows.Beep(659,500);
Windows.Beep(659,500);
Windows.Beep(587,500);
Windows.Beep(659,500);
Windows.Beep(698,500);
Windows.Beep(493,500);
Windows.Beep(587,500);
Windows.Beep(523,500); | _________________ Wer nicht gerne denkt, sollte wenigstens von Zeit zu Zeit seine Vorurteile neu gruppieren.
|
|
a.C.k
Beiträge: 93
WIN 2000
Delphi 6 Enterprise ; Delphi 7 Studio
|
Verfasst: Fr 13.12.02 09:29
Schreibt mal, was ihr davon haltet...
_________________ Wer nicht gerne denkt, sollte wenigstens von Zeit zu Zeit seine Vorurteile neu gruppieren.
Zuletzt bearbeitet von a.C.k am Fr 13.12.02 09:31, insgesamt 1-mal bearbeitet
|
|
Trialtom
Beiträge: 38
|
Verfasst: Mo 16.12.02 11:08
ich glaube mit ein paar pausen klingt es besser, ungefähr so...
Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
| windows.beep(262,500);
sleep(100);
windows.Beep(349,250);
sleep(100);
windows.Beep(349,150);
sleep(100);
windows.Beep(349,500);
sleep(500);
windows.Beep(392,500);
sleep(100);
windows.Beep(440,250);
sleep(100);
windows.Beep(440,150);
sleep(100);
windows.Beep(440,500);
sleep(500);
windows.Beep(440,200);
sleep(100);
windows.Beep(392,200);
sleep(100);
windows.Beep(440,200);
sleep(100);
windows.Beep(470,500);
sleep(100);
windows.Beep(330,400);
sleep(100);
windows.Beep(392,450);
sleep(100);
windows.Beep(349,600); |
|
|
