Discussion :

[alexandria]

Bonjour,
J'aimerais une aide pour pouvoir imprimer en continu ,
mon probleme étant super novice et d'insserer une boucle pour imprimer n fois en continu et en laissant quelques centimetre entre la premiere impression et la deuxieme.
voici mon code

Code :

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

1
2
3
4
5
6
7
8
begin
  Printer.BeginDoc;
  Printer.Canvas.TextOut(50,150,Edit1.Text); 
  Printer.Canvas.TextOut(50,250,Edit2.Text);
  Printer.Canvas.TextOut(50,450,MaskEdit1.text);
  Printer.EndDoc;
 
end;

[LadyWasky]

En gros tu veux faire des étiquettes ?

Il faut que la position en Y de test TextOut, soient paramétrés en fonction d'une variable d'une boucle :

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
19
20
 
//Paramètres à adapter selon tes besoins
const n=10;
        MargeEntreDeuxEtiquettes=400;
        HauteurDuneEtiquette=500;
var i:integer;
      DecalageEnY:integer;
...
begin
  Printer.BeginDoc;
  for i:=0 to (n-1) do
  begin
     DecalageEnY:=(HauteurDuneEtiquette+MargeEntreDeuxEtiquettes)*i;
     Printer.Canvas.TextOut(50,DecalageEnY+150,Edit1.Text);
     Printer.Canvas.TextOut(50,DecalageEnY+250,Edit2.Text);
     Printer.Canvas.TextOut(50,DecalageEnY+450,MaskEdit1.text);
  end;
  Printer.EndDoc;
 
end;

Je te prévient, ce ne sera pas forcément super Top.

Il y a des moyens veaucoup plus efficaces (et plus compliqués) pour obtenir des dimensions précises et donc de déterminer ou d'utiliser précisément :
- La taille de la Police du texte que tu imprimes (propriété Height de TFont).
- Les dimensions exactes du Canvas de l'imprimante (le nombre de pixels en X et en Y que tu pourras imprimer sur ta page (Printer.PageWidth, Printer.PageWidth) (ça dépend de la résolution de ton imprimante)
...afin de déterminer :
MargeEntreDeuxEtiquettes, HauteurDuneEtiquette et la position de tes TextOut.

Là, ce sont des maths et plus du Delphi.

Quand tu parle de "imprimer en continu", si tu pensait pouvoir imprimer "au fil de l'eau", c'est-à-dire au fur et à mesure que tu donne des valeurs, et bien la réponse est immédiate :
A moins d'avoir une vieille imprimante matricielle, c'est impossible !
Le sujet à été abordé plus d'une fois dans ce forum.

D'ailleurs, je te conseilles vivement d'effectuer une recherche sur le forum avec le mot "imprimer" ou "imprimante" et je suis sur que tu trouveras ton bonheur.

Bon courage et bon dev.