---------------------------------------------------------------------------
| 32 | } |
| 33 | //--------------------------------------------------------------------------- |
| 34 | void __fastcall TProcessForm::FormDestroy(TObject *Sender) |
| 35 | { |
| 36 | *AppParams << this << (TStringGrid *)DrawGrid; |
| 37 | if( DrawGrid->Row > 0 ) |
| 38 | LastRuleIndex = DrawGrid->Row - 1; |
| 39 | delete DrawGrid_LivingColumns; |
| 40 | delete localPRL; |
| 41 | localPRL = NULL; |
| 42 | } |
| 43 | //--------------------------------------------------------------------------- |
| 44 | void __fastcall TProcessForm::FillRuleList(int SelectedIndex) |
| 45 | { |
nothing calls this directly
no outgoing calls
no test coverage detected