Q&A

  • 메모컴포넌트의 내용을 프린터로...
이런곳이 있었군요.....정말 많은 분들이 수고 하고 계셔서 안심이 됩니다..

메모 컴포넌트에 있는 내용을 프린터로 바로 출력하고 싶은데요..

어떻게 하면 되나요?.....부탁드립니다...

이 게시물을
1  COMMENTS
  • Profile
    Mr.Q • 2000.07.26 00:10
    왕델초보 wrote:

    > 이런곳이 있었군요.....정말 많은 분들이 수고 하고 계셔서 안심이 됩니다..

    > 메모 컴포넌트에 있는 내용을 프린터로 바로 출력하고 싶은데요..

    > 어떻게 하면 되나요?.....부탁드립니다...



    1>

    var

    i:integer;

    begin

    printer.begindoc;

    printer.canvas.Font.size:=10;

    printer.canvas.font.name:='굴림체';

    for i:=0 to Memo1.Lines.Count-1 do

    printer.canvas.textout(15, 15+i*50, memo1.Lines[i]);

    printer.enddoc;



    2>

    var

    i:integer;

    PFH:TextFile;

    begin

    AssignPrn(PFH);

    Rewrite(PFH);

    for i:=0 to memo1.Lines.Count-1 do

    Writeln(PFH, Memo1.Lines[i]);

    CloseFile(PFH);

    end;
←First Page
2344 2345 2346 2347 2348 2349 2350 2351 2352 2353
Last Page→
한델 로그인 하기