---------------------------------------------------------------------------
| 31 | } |
| 32 | //--------------------------------------------------------------------------- |
| 33 | void __fastcall TShowAlarmForm::OKButtonClick(TObject *Sender) |
| 34 | { |
| 35 | if( TalkingThread ) |
| 36 | TalkingThread->Stop(); |
| 37 | Close(); |
| 38 | } |
| 39 | //--------------------------------------------------------------------------- |