---------------------------------------------------------------------------
| 352 | } |
| 353 | //--------------------------------------------------------------------------- |
| 354 | void __fastcall TMainForm::GotoNewLine(void) |
| 355 | { |
| 356 | char c; |
| 357 | for(int i=0; i<1024; i++) |
| 358 | { |
| 359 | in >> c; |
| 360 | if( c=='\n' ) break; |
| 361 | } |
| 362 | } |
| 363 | //--------------------------------------------------------------------------- |
| 364 | void __fastcall TMainForm::aMoreLinesExecute(TObject *Sender) |
| 365 | { |
nothing calls this directly
no outgoing calls
no test coverage detected