Discussion :

[MélanieS]

Bien bien !

Me voilà de retour et au rapport !
Le programme fonctionne !

Le seul problème est qu'il m'imprime des bandes de papiers d'un cm de hauteur sur environs 10 cm de longueur contenant ma facture sur une seule ligne.
Ceci est à cause des x,y que je n'ai pas pu changer, donc les lignes se superposent..

Mais je n'ai pas pu y changer sur place, je n'arrivais pas à ouvrir le programme malgré Delphi installé.

Je vais donc le faire ce soir.

[Paul TOTH]

c'est étrange comme façon de procéder...

vu que pour l'instant tu fais une impression "bête", tu peux très bien stocker tout cela dans un TStringList

Code :

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

1
2
3
4
 
  List.Add('Nom de la boutique');
  List.Add('Adresse';
  List.add('Horaires...');

et imprimer tout d'un coup

Code :

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

1
2
3
 
  for i := 0 to List.count - 1 do
   Printer.Canvas.Textout(10, 10 + 10 * i, List[i]);

et de toute façon tu peux utiliser un Bitmap pour tester sans imprimante comme je l'indique ici.

sinon je fais des prestations à distances ^^

[MélanieS]

En fait, ce n'est pas juste une bête impression.
À chaque impression, la facture sera différente, alors j'ai codé de façon à ce que ça s'adapte.

Pour la prévisualisation, je vais le faire, justement avec ton code.

[MélanieS]

Bonjour,

Je viens aux nouvelles !
Ces derniers jours, j'avais très peu de temps à moi.
Aussi, le programme a été laissé un peu de côté.

Cependant, aujourd'hui, je m'y suis remise et je l'ai terminé !

Je viens donc vous remercier pour tous vos conseils et toutes vos idées !
Parce que sans votre aide, je n'y serais jamais arrivée !!

J'ai une dernière question, malgré tout.
Si je souhaite imprimer 2x le même ticket, comment dois-je faire ?

Code :

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

Printer.Copies := 2;

Code :

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

Printer.Copies := PrintDialog.Copies // Où PrintDialog.Copies = 2

;

Ces deux bouts de code ne fonctionnent pas.

Je dois dire que je bloque un peu à ce niveau-là.

[Paul TOTH]

ben oui ça devrait fonctionner je pense...pas testé.

Ceci dit, de mon côté j'ai mis en production une technique qui boost les impressions

1) si l'imprimante est en réseau, j'envoie directement l'impression par TCP/IP, j'ai des temps de réponse imbattables

2) si l'imprimante est en USB j'envoie la même impression que ci-dessus en mode PASSTHROUGH, c'est bien plus rapide

Dans les deux cas l'impression se fait avec un bitmap, c'est en fait exactement ce que fait le driver EPSON, j'ai pu le vérifier en capturant son impression et en décodant son contenu

[MélanieS]

Je vais retenter ma chance avec mes bouts de codes alors !

Merci beaucoup Paul !

[davinci29]

bonjour,
j'ai une application à réaliser avec delphi

mais mon grand problème c'est d'imprimer des ticket de caisse mais je ne trouve pas la solution qlq peut m'aider à réaliser mon projet.

un petit programme qui imprime des ticket de caisse sous delphi.
merci d'avance

[tourlourou]

Où cela bloque-t-il ?

[davinci29]

bonjour ,

je programme avec delphi 7 et j'aimerai savoir comment imprimer un ticket de caisse.

si c'est possible m'envoyé un petit prog ..

merci d'avance:

[tourlourou]

Sache tout d'abord que nous ne sommes pas là pour faire ton travail ! Surtout avec si peu d'éléments, ce qui exigerait en plus l'utilisation d'une boule de cristal...

Ensuite, pour peu que tu saches lire et que tu aies la patience de le faire, il me semble qu'il y a tous les éléments voulus dans ce fil de discussion...

Merci de ne revenir vers nous qu'avec des questions sur des problèmes ponctuels et précisément décrits, détaillant tes essais de solutions (davinci29 code, bien sûr) et les erreurs ou comportements absents ou obtenus mais indésirables.