Discussion :

[chekkal]

Bonjour à tous,

ma question est simple, comment ouvrir n'importe quel terroir caisse . c'est à dire on écrivant directement sur le port série pour envoyer la séquence d'échappement.

[SergioMaster]

Bonjour,

N'importe quel tiroir caisse

ça c'est compromis, même si en général c'est standardisé, il n'est pas dit que tous les constructeurs appliquent la même séquence.
Le mieux est donc d'inscrire la séquence de code (en général deux caractères) dans un paramètre (base de registre ou autre) selon le poste et le tiroir caisse et d'utiliser ensuite ce paramètre.

[chekkal]

j'utilise ce code qui marche mais je ne sais pas s'il peut marcher sur toutes les imprimantes?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Procedure OpenTiroir;
var
      test:Integer;
      bu:TStrucPrinter;
const
     fc1=#27+'@'+#27+'p'+#0+#16+#32+#27+'@';
begin
      test:= PASSTHROUGH ;
 
      if Escape(Printer.Handle,QUERYESCSUPPORT,sizeof(test),@test,nil)=0 then
        exit;
      Printer.SetPrinter(pchar(NamPrinter),'WINSPOOL',nil,0);
      Printer.BeginDoc;
      StrPCopy(bu.buff,FC1);
      bu.bufl:=StrLen(bu.buff);
      Escape(Printer.Handle,PASSTHROUGH,0,@bu,nil);
      Printer.EndDoc;
end;

[SergioMaster]

Re,

il suffit que fc1 ne soit plus une constante mais le paramètre à stocker. Je pense que personne sur le forum ne puisse connaitre tout les fabricants de tiroir caisse et tout les modèles pour pouvoir à coup sûr que la constante fc1 ( et donc le code) est valable quel que soit le tiroir caisse.
A moins qu'il s'agisse d'une normalisation ANSI (pourquoi pas )

[ShaiLeTroll]

Tu peux déjà fouiller

Delphi
https://www.developpez.net/forums/d1...+tiroir+caisse
https://www.developpez.net/forums/d1...+tiroir+caisse

Autres Langages
https://www.developpez.net/forums/d1...+tiroir+caisse
https://www.developpez.net/forums/d1...+tiroir+caisse

C'est un sujet qui revient si fréquemment