var  fhMsg                                        : TextFile;
       jmmenu,jsoo,mga                        : string;


                     jmenu   :=   Format('%-24s', [jmenu]) ;
                      jsoo    :=   Format('%-04s', [jsoo]);
                      mga     :=   Format('%9s',  [mga]);

                      write(fhMsg,   jmenu);
                      write(fhMsg,   jsoo)  ;
                      writeLn(fhMsg,  mga)  ;


  델7에선    -----------------------------------------------------
                 제품명                  수량           가격
                ------------------------------------------------------
                 옥수수콘                    1               2,800
                 팝콘                          1               3,500
                 날개다리치킨s           1             12,000


델 2010에선
                -----------------------------------------------------
                 제품명                  수량           가격
                ------------------------------------------------------
                 옥수수콘                    1             2,800
                 팝콘                       1             3,500
                 날개다리치킨s               1            12,000 


이렇게 인쇄 가 됩니다

혹시 2010에선 무엇을 달리 해주어야 하는건지 알고계시다면
한수 부탁합니다.