Sound Befehl: beep;

[Foxi1896]

Hey,
wollte wenn eine Schleife beendet ist das mein Programm dreimal Piept... habe also:
beep;
beep;
beep;
gemacht ... aber es kommt nur einmal? Wieso?

Ah und da fällt mir auch gleich noch eine Frag ein. Kann man unterschiedliche Beep Töne haben?

Gruß
Foxi

[indianer-frank]

Du hörst nur einen scheinbaren Beep, weil zwischen den drei wirklichen Beeps keine Pause ist und sie in einander übergehen. Pause geht mit sleep in sysutils (was Du offensichtlich wg. beep eh schon hast):

Code: Alles auswählen

uses 
  sysutils;
begin
  beep; sleep(500);
  beep; sleep(500);
  beep;
end.
 

[Foxi1896]

ah ok,
habe nun versucht das so einzufügen aber er bringt Fehlermeldung:
Syntax error, "Begin" expected but "identifier SYSUTILS" found.

edit: habe es jetzt ohne uses gemacht und es gehts DANKE =)

[MAC]

die ersten zwei Zeilen die indianer-frank dir geschrieben haben kommen ganz nach oben bei uses und nicht mitten in die procedure rein.
Und wenn da schon sysutils bei uses drinn steht, dann muss man das auch nicht noch ein zweites mal reinschreiben...