[Azury]

Сообщение от RODMAN91

Подскажите пожалуйста, какую строчку вставить, чтобы проигрывался звуковой файл при заточке или остановке?
Например вот в этом куске кода я так понял происходит остановка при полученой заточке. Можно тут как то звук вставить?

if (strtoint(Edit2.text)>=strtoint(Edit1.Text)) then begin
msg.Lines.Add('Достигли требуемого уровня улучшения! Прервано!');
debugmsg('Достигли требуемого уровня улучшения! Прервано!');
ButtonStartEnchant.Enabled:=true;
ButtonStopEnchant.Enabled:=false;
exit;
end;


А вобще сам скрипт взят отсюда

if (strtoint(Edit2.text)>=strtoint(Edit1.Text)) then begin
    msg.Lines.Add('Достигли требуемого уровня улучшения! Прервано!');
    debugmsg('Достигли требуемого уровня улучшения! Прервано!');
// думаю в этом месте по логике можно поставить звук
    ButtonStartEnchant.Enabled:=true;
    ButtonStopEnchant.Enabled:=false;
    exit;
  end;