Как проверить наличие бумаги в USB-принтере?

← →
romick © (2006-11-01 09:25) [0]

Есть USB-принтер. Необходимо программно проверить наличие в нем бумаги. Подскажите плз. как мне это сделать в WinXP-pro.

← →
Дмитрий Белькевич © (2006-11-02 12:48) [1]

Так же, как и в неusb, попробовать что-нить напечатать - если вернется папер аут значит собсно...

← →
Romick © (2006-11-02 15:33) [2]

При отправке документа на печать, документ становится в очередь печати и весит там до тех пор, пока в принтер не сунут бумагу. При этом программа завершается успешно.

← →
Virgo_Style © (2006-11-02 21:30) [3]

Romick © (02.11.06 15:33) [2]
"а у нас в квартире газ" (c)

← →
romick © (2006-11-03 14:00) [4]

Пробовал вот так:
procedure TForm1.btnPrintInfoClick(Sender: TObject);
var
hPrinter: THandle;
info: array[0..10000] of PRINTER_INFO_6;
count: PDWORD;
i: integer;

begin
if OpenPrinter(PChar(printerName), hPrinter, nil) then
if GetPrinter(hPrinter, 6, @info, length(info), count) then
begin
memo1.Clear;
for i:=0 to count^-1 do
memo1.Lines.Add("Status: "+IntToStr(info[i].dwStatus));
end
else
showMessage("Failg with message : "+SysErrorMessage(GetLastError))
else
showMessage("Failg with message : "+SysErrorMessage(GetLastError))
end;

Но статус (dwStatus) всегда равен 0.

← →
Дмитрий Белькевич © (2006-11-04 02:47) [5]

>При отправке документа на печать, документ становится в очередь печати и весит там до тех пор, пока в принтер не сунут бумагу. При этом программа завершается успешно.

Ну и ладно, спулер дальше сам разберется.

> Дмитрий Белькевич (04.11.2006 2:47:05) [5]

Да и принтер физический тоже не обязателен, а откуда в виртуальном бумага?

> Ну и ладно, спулер дальше сам разберется.

Если не чего посоветовать - не советуйте ничего вообще. Да и посты читать не мешало-бы. Мне нужно мониторить кучу принтеров, причем принеры ВСЕ самые что есть РЕАЛЬНЫЕ (килограмм по 5 каждый!) и мне совсем не надо, чтоб с бумагой разбирался спулер или кто-то там еще!
Virgo_Style вообще "отличился", молодец!

Твое желание выполнено.

Как проверить наличие бумаги в USB-принтере? Найти похожие ветки