Delphi Can

Merhaba,
Network yazıcı üzerinde bulunan kuyruğu temizlemek istiyorum ama şuanda sadece yazıcı üzerindeki işleri alabiliyorum.
Bu konu ile ilgili daha önceden uğraşan varmıdır aceba ? 

GetCurrentPrinterHandle ile Handle'ı aldıktan sonra ClosePrinter( PrinterHandle ) işe yaramaz mı?

---

procedure IsleriIptalEt;
var
  PrinterHandle: THandle;
begin
  PrinterHandle:= GetCurrentPrinterHandle;
  try
    if not WinSpool.SetPrinter( PrinterHandle, 0, nil, PRINTER_CONTROL_PURGE ) then
      RaiseLastWin32Error;
  finally
    ClosePrinter( PrinterHandle );
  end;
end;