---------------------------------------------------------------------------
| 1191 | } |
| 1192 | //--------------------------------------------------------------------------- |
| 1193 | void __fastcall TMainForm::ChangeProfileClick(TObject *Sender) |
| 1194 | { |
| 1195 | HP->CurrentProfile = ((TMenuItem *)Sender)->Tag; |
| 1196 | ((TMenuItem *)Sender)->Checked = true; |
| 1197 | LogSG->Invalidate(); |
| 1198 | } |
| 1199 | //--------------------------------------------------------------------------- |
| 1200 | static void OnReceiveMail(TLetter * l) |
| 1201 | { |
nothing calls this directly
no outgoing calls
no test coverage detected