---------------------------------------------------------------------------
| 25 | } |
| 26 | //--------------------------------------------------------------------------- |
| 27 | void __fastcall TShowAlarmForm::ClearButtonClick(TObject *Sender) |
| 28 | { |
| 29 | ListBox->Items->Clear(); |
| 30 | OKButtonClick(Sender); |
| 31 | } |
| 32 | //--------------------------------------------------------------------------- |
| 33 | void __fastcall TShowAlarmForm::OKButtonClick(TObject *Sender) |
| 34 | { |