도트프린터로 여러줄을 찍어내는 프로그램을 하나 만들었어요
이 구문을 이용
procedure TfrmDay.Print(str: String);
var
lpt : TextFile; // LPT 포트
begin
{$I-}
// 출력을 위해 LPT1 Port를 연다.
AssignFile( lpt, 'LPT1');
// LPT1 Port를 초기화 한다.
Rewrite(lpt);
Write(lpt, str);
CloseFile(lpt);
{$I+}
end;
윈도우xp에서 사용을 하는데 도트프린터 드라이버가 안잡혀 있는경우(프린터 폴더에 도트프린터가 없는경우)에는 몇십줄이고 아무 무리없이 찍어내는데요
드라이버가 잡혀있는경우에는 두세줄만 찍고 더이상 찍질 않아요
드라이버를 삭제해버리면 아무 이상없이 다시 잘 찍어냅니다.
아무래도 충돌이 일어나는듯 한데..(잘은 모르겠지만;;)
근데 드라이버를 삭제해버리면 안될경우에는 어떻게 처리를 해야 하나요?
그리고 프린터가 컴퓨터에 연결이 되어 있지 않았을때 출력을 할려고 하면 프로그램 자체가 멈춰버리던데요..
어케 해결할 방법이 없을련지요.
좀 알려주셨음하네요..
그럼 더운 여름 몸조심 하시구 즐거운 하루 보내세여..