Fórum Usar, não é para tocar música. #349071

16/11/2007

0

Olá,

Gostaria de mais uma ajuda. Tem como eu usar som no programa? Exemplo: O usuário pressiona a tecla A e o programa emite o som de A, e assim sucessivamente.


Rsa_tche

Rsa_tche

Responder

Posts

16/11/2007

Rodc

Use a função PlaySound() para tocar arquivos Waves. Para saber como usar a função consulte o Help do Delphi.


Responder

Gostei + 0

16/11/2007

Rsa_tche

Ok. Obrigado.


Responder

Gostei + 0

16/11/2007

Mahdak

se voce nao se importar do som ser em ingles voce poderia verificar qual tecla esta sendo pressionada no evento onkeypress e entao mandar o sistema falar fazendo algo do tipo:

uses
ComObj;

procedure TForm1.Memo1KeyPress(Sender: TObject; var Key: Char);
var
voz: OLEVariant;
begin
voz := CreateOLEObject (´SAPI.SpVoice´);
if key=#13 then
begin
  voz.Speak (´Enter´, 0);
end;

end;



Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar