---------------------------------------------------------------------------
| 101 | } |
| 102 | //--------------------------------------------------------------------------- |
| 103 | void __fastcall THighlightForm::DelButtonClick(TObject *Sender) |
| 104 | { |
| 105 | if( DrawGrid->RowCount < 2 ) |
| 106 | return; |
| 107 | int ARow = DrawGrid->Row - 1; |
| 108 | TMessHighlightList * p = localHPL->GetCurrentProfile(); |
| 109 | if( p ) |
| 110 | { |
| 111 | p->Del(ARow); |
| 112 | DrawGrid->RowCount = 1 + p->Count; |
| 113 | DrawGrid->OnClick(this); |
| 114 | } |
| 115 | } |
| 116 | //--------------------------------------------------------------------------- |
| 117 | void __fastcall THighlightForm::UpButtonClick(TObject *Sender) |
| 118 | { |
nothing calls this directly
no test coverage detected