---------------------------------------------------------------------------
| 18 | TMessProcessFr * MessProcessFr; |
| 19 | //--------------------------------------------------------------------------- |
| 20 | __fastcall TMessProcessFr::TMessProcessFr(TComponent* Owner) |
| 21 | : TFrame(Owner) |
| 22 | { |
| 23 | DefaultRecipient = MainCfg.Letter.recipient; |
| 24 | OpenDialog->InitialDir = WorkDir; |
| 25 | fdb->GetList(SaveFileCB->Items); |
| 26 | |
| 27 | TStorageFile * p = fdb->Get(0); |
| 28 | if( p ) |
| 29 | { |
| 30 | IgnoreCB->Caption = String("Ignore (do not save to the default file \"") + |
| 31 | p->GetDescription() + "\")"; |
| 32 | } |
| 33 | } |
| 34 | //--------------------------------------------------------------------------- |
| 35 | TForm * TMessProcessFr::GetForm(void) |
| 36 | { |
nothing calls this directly
no test coverage detected