Q&A

  • TEXT FILE 인쇄시...
procedure TFrm_main.Button3Click(Sender: TObject);
var
  i,j  : integer;
  eResult : STring;
  File_List : TStringList;
begin
    File_List := TStringList.Create;

// 실제 내용을 eResult 에 넣는곳    
    for i:=1 to 1000 do
    begin
        eResult := '';

        if (i mod 100) = 0 then
            eResult :=  페이지 스킵코드;  // <---- 이부분이 궁금합니다.


        eResult :=  eResult + ' 실제 내용을 넣음';
        File_List.Add(eResult);
    end;

    File_List.SaveToFile('data.txt');
    File_list.Destroy;

end;

///////
종이에 출력
c:> copy data.txt > prn
이런 방법으로 출력 하고싶거든요....
대량의 DM같은것 때문에 그렇거든요...
옛날 cobol에서 그냥 after page하면 되던데...

저의 발상이 이상한것인가요.......

고수님 부탁 드려요...




2  COMMENTS
  • Profile
    이민수 2002.04.21 12:06
    별로 좋은 방법같지는 않지만....
    FormFeed 가 12번이니까... 요거 한번 넣어 보시면 어떨까 싶네요.
    이게 파일을 거쳐 인쇄할때 작동한다면 새 페이지 넘김일거 같은데요...
  • Profile
    이화 2002.04.22 23:44
    감사 합니다.

    아스키코드만으로 세로가로등의 확대시는 프린터마다 다르겠지요...

    근데 저 처럼 대량의 DM같은 경우 어떻게 처리하는지 알수 없을까요..

    10만건이상 된다고 가정하면 .....

    고수님 부탁드려요...