---------------------------------------------------------------------------
| 77 | } |
| 78 | //--------------------------------------------------------------------------- |
| 79 | void __fastcall TMessProcessFr::SelWavCommonButtonClick(TObject *Sender) |
| 80 | { |
| 81 | OpenDialog->Title = "Open sound file"; |
| 82 | OpenDialog->Filter = "Sound files (*.wav)|*.wav|All files (*.*)|*.*"; |
| 83 | OpenDialog->DefaultExt = "wav"; |
| 84 | if( OpenDialog->Execute() ) |
| 85 | SoundFileEdit->Text = OpenDialog->FileName; |
| 86 | } |
| 87 | //--------------------------------------------------------------------------- |
| 88 | void __fastcall TMessProcessFr::PlayButtonClick(TObject *Sender) |
| 89 | { |