Interner Lautsprecher

[delphi-anfänger]

Hallo erstmal!
Ihr kennt doch alle ddie internen lautsprecher eines pc´s, die nur 'piepen'. :-D
ich lasse ihn jetzt mal zum beispiel mit

Code:

windows.beep(4000,2000);

für 2 sekunden mit der frequenz 400hz piepen. wie könnte ich denn das gepiepse unterbrechen?

Bis bald :lol:

[c113plpbr]

Vielleicht könntest du das in einen Thread legen, und diesen dann 'gewaltsam' beenden ... vielleicht geht das ja ... ;) :gruebel:

ciao, Philipp

[Orbmu2k]

oder so

Delphi-Quellcode:

for x := 1 to 20 do
begin
  Application.ProcessMessages;
  if brk then Exit;
  windows.beep(4000,100);
end;

und dann mit

Delphi-Quellcode:

brk := True

abbrechen

[delphi-anfänger]

ok danke funktioniert! :???: