---------------------------------------------------------------------------
| 33 | } |
| 34 | //--------------------------------------------------------------------------- |
| 35 | TForm * TMessProcessFr::GetForm(void) |
| 36 | { |
| 37 | if( Parent ) |
| 38 | { |
| 39 | if( dynamic_cast<TForm *>(Parent) ) |
| 40 | return (TForm *)Parent; |
| 41 | if( dynamic_cast<TForm *>(Parent->Parent) ) |
| 42 | return (TForm *)(Parent->Parent); |
| 43 | } |
| 44 | return NULL; |
| 45 | } |
| 46 | //--------------------------------------------------------------------------- |
| 47 | void __fastcall TMessProcessFr::InsertAlarmMessButtonClick(TObject *Sender) |
| 48 | { |
nothing calls this directly
no outgoing calls
no test coverage detected