Windows.Beep. Ex:
procedure TForm1.Button1Click(Sender: TObject); var zCont : Integer; begin for zCont := 1000 to 5000 do windows.Beep(zCont,1); for zCont := 5000 downto 1000 do windows.Beep(zCont,1) end; ----- Original Message ----- From: Lucas Lima To: delphi-br@yahoogrupos.com.br Sent: Monday, March 05, 2007 12:40 PM Subject: [delphi-br] Beep na placa-mãe Olá a todos, O comando Beep emite um som através da saída da placa de som. Mas eu preciso que o speaker da placa-mãe emita este som. Isso é possível ? Agradeço desde já a atenção. Abraços, Lucas Skåld. __________________________________________________ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]