Détection papier niveau bas

Version imprimable

02/05/2018, 17h05
Mirande

Détection papier niveau bas

Bonjour le forum

Je sollicite votre aide et votre bienveillance pour un problème pour lequel je n'arrive pas à trouver de solution !

Dans le cadre d'un programme de borne de commande client, j'imprime des tickets (caisse et carte bleue). Techniquement, l'imprimante permet de détecter le niveau bas de papier (papier en rouleau).

Est-ce que quelqu'un sait comment récupérer cette information ? Peut-être via une API Windows ?

Merci d'avance de votre aide.

Bonne journée

FM
02/05/2018, 22h58
Jipété

Citation:

Envoyé par Mirande

Je sollicite votre aide et votre bienveillance pour un problème pour lequel je n'arrive pas à trouver de solution !

Curieux : j'ai tapé delphi detect paper out dans un moteur de recherche et j'ai eu environ 350 000 retours...
02/05/2018, 23h27
Mirande

352 000 réponses mais juste pour l'exemple, sur la première page :

Delphi Complete Works of Jonathan Swift (Illustrated)
https://books.google.fr/books?isbn=1909496367 - Traduire cette page
Jonathan Swift - 2013 - ‎Fiction
He waited most anxiously for the servant to bring the paper; but to his surprise and indignation, an hour elapsed, and the man did not present it. The dean again looked out. The day was cold and wet, and the wretched petitioner still retained her situation, with many an eloquent and anxious look at the house. The benevolent ..

Cela ne m'aide pas vraiment. En tout cas, pas pour résoudre mon problème de détection de papier !

Donc, pour être plus sérieux. J'ai bien entendu fait le tour d'un certain nombre de choses sur google. Je cherche à savoir s'il y a moyen de capter l'information de "presque fin de rouleau", symbolisé par les bandes rouges. Je n'ai pas encore l'imprimante en main mais d'après la description technique, elle détecte cette information.

Je ne suis pas sûr, je le testerai dès que possible, que l'information soit la même que lorsqu'il n'y a plus de papier. L'imprimante étant toujours fonctionnelle pour l'impression.
02/05/2018, 23h41
Jipété

Citation:

Envoyé par Mirande

Donc, pour être plus sérieux. J'ai bien entendu fait le tour d'un certain nombre de choses sur google. Je cherche à savoir s'il y a moyen de capter l'information de "presque fin de rouleau", symbolisé par les bandes rouges. Je n'ai pas encore l'imprimante en main mais d'après la description technique, elle détecte cette information.

Je ne suis pas sûr, je le testerai dès que possible, que l'information soit la même que lorsqu'il n'y a plus de papier. L'imprimante étant toujours fonctionnelle pour l'impression.

Désolé, je n'avais pas fait la différence entre "paper out" et "paper low".

Si l'imprimante détecte ces bandes rouges, ça devrait "remonter" à travers le pilote.
Lire attentivement la doc, et éventuellement poser la question au constructeur, c'est peut-être propriétaire, cette option "paper low". Et c'est vrai qu'elle remonte beaucoup moins à la recherche ggl.
03/05/2018, 08h24
Lung

Citation:

Envoyé par Mirande

Dans le cadre d'un programme de borne de commande client, j'imprime des tickets (caisse et carte bleue).

Tu utilises quoi pour imprimer ?
Directement des API windows, ou une surcouche genre OPOS ?

salut

sous Windows utilise le WMI
Code:

1 2 3 4 5 6 7 user, Password : String; user := ''; Password := ''; FSWbemLocator := CreateOleObject('WbemScripting.SWbemLocator'); FWMIService := FSWbemLocator.ConnectServer('localhost', 'root\CIMV2', user, Password); FWbemObjectSet:= FWMIService.ExecQuery(Format('SELECT * FROM Win32_Printer WHERE Name = "%s"',[NomImprimante]),'WQL',0);
recherche la propriété DetectedErrorState
selon la valeur retourné tu as differentes erreur

Code:

( 'Unknown', 'Other', 'No Error', 'Low Paper', 'No Paper', 'Low Toner', 'No Toner', 'Door Open', 'Jammed', 'Offline', 'Service Requested', 'Output Bin Full' );