그럴리가요. 저도 퀵레포트로 네트워크프린터를 사용하는데 그쪽
네트워크프린터가 끄져도 아무렇지 않던데요. 아마도 Windows
문제인것 같아요. 저는 2000serve를 사용하는데 한번씩 프린터할
때 뻗어버립니다. Win98에서는 아무렇지 않던데. 메모리 문젠가 ?
다른 컴퓨터에서도 해보셨나요?

아무튼 프린터하기전에 프린터상태를 체크한후 'ready' 상태일
경우에만 프린터하면 되겠군요. 프린터상태를 체크하는 콤프넌트
인데 아래와 같이 해보세요. (저도 어디서 퍼왔는데 출처는 모름)
----------------------------------------------------------
Unit PrinterStatus;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

type
TPrinterStatus = class(Tcomponent)
private
   { Private declarations }
   Fport : Word;
   FStatusStr : string;
protected
   { Protected declarations }
public
   { Public declarations }
   function PrinterReady(LPT: Word): boolean;
published
   { Published declarations }
   property StatusMsg: string read FStatusStr;
end;

procedure Register;

implementation
uses Printers;

procedure Register;
begin
RegisterComponents('sirius', [TPrinterStatus]);
end;

const
PrnReady = $90;
OffLine = $00;
OffLine2 = $10;            
PaperOut = $20;
PaperOut2 = $30;            
HookedButOff = $80;        
NoConnect = $B0;            

function TPrinterStatus.PrinterReady(LPT: Word): boolean;
var
ErrorCode, C : BYTE;
code, x : integer;
s : string;

          function GetPrinterStatus (LPT: Word): Byte;
          begin
            asm
              mov ah,2
              mov dx,LPT
              dec dx
              int $17
              mov @Result,ah
            end;
          end;  


begin
result := false;  

Fport := LPT;
if Fport = 0 then begin  
  s := Printer.Printers[Printer.PrinterIndex];
  if Pos('Fport',s) <> 0 then begin
    s := Copy(s, Pos('Fport',s) +3, 1);
    Val(s,x,code);
    if code <> 0 then Fport := 1 else Fport := x;
  end else Fport := 1;  
end;

if (Fport > 4) or (Fport < 1) then begin
  raise ERangeError.CreateFmt(
      'LPT%d is not within the valid range of %d..%d', [Fport,1,4]);
  exit;
end;

ErrorCode := GetPrinterStatus(Fport);
ErrorCode := ErrorCode and $B0;      

C := ERRORCODE shl 6;  

if C > 0 then ERRORCODE := $B0;

case ErrorCode of
PrnReady            : begin
                         FStatusStr := 'Printer Ready'; result := true;
                       end;
NoConnect           : FStatusStr := 'Printer not connected';
Offline,OffLine2    : FStatusStr := 'Printer off line';    
PaperOut,PaperOut2  : FStatusStr := 'Printer out of paper';
HookedButOff        : FStatusStr := 'Printer connected but turned off';
else
FStatusStr := 'Printer error code: ' + IntToStr(ErrorCode);
end;

end;

end.
위의 소스를 참고하시고요...
이 콤포의 사용방법은 간단합니다...

If not PrinterStatus1.PrinterReady(0) then  //0 = 현재 프린터 포트
ShowMessage(PrinterStatus1.StatusMsg)
else
  // 프린트를 한다...
--------------------------------------------------------------