Alerta sonoro

[leoprofessor 0]

Quero dar um alerta sonoro e colorir de vermelho ou coisa parecida qdo apresentar a seguinte mensagemif (Pos('QTA',Linha) >0) then begin ShowMessage('A mensagem não foi transmitida!'); break; end ;Alguem pode me ajudar?Rodrigo, Hugo...AjudemmmmmmmmmmmURGENTE

[Rodrigo Miss 1]

beleza fera?!assim naum da?

Application.MessageBox('A mensagem não foi transmitida!','Erro', mb_Ok + mb_iconError);

Quero dar um alerta sonoro e colorir de vermelho ou coisa parecida qdo apresentar a seguinte mensagemif (Pos('QTA',Linha) >0) then begin ShowMessage('A mensagem não foi transmitida!'); break; end ;Alguem pode me ajudar?Rodrigo, Hugo...AjudemmmmmmmmmmmURGENTE