Impression d'un Timage [Résolu]

Signaler
Messages postés
240
Date d'inscription
dimanche 31 octobre 2004
Statut
Membre
Dernière intervention
31 décembre 2006
-
Messages postés
240
Date d'inscription
dimanche 31 octobre 2004
Statut
Membre
Dernière intervention
31 décembre 2006
-
Je sais cela doit pas être facile, mais je ne l'ai jamais fait et là
l'aide de delphi ne m'aide guère donc je vous pose cette question:

Comment on fait pour imprimer un Timage (quel composant et le code) car je planche.

Merci pour vos réponses :p

2 réponses

Messages postés
240
Date d'inscription
dimanche 31 octobre 2004
Statut
Membre
Dernière intervention
31 décembre 2006
1
Merci Jmp77, mais pour le premier lien, il requière l'utilisation de quickreport, ce qui n'est pas adequate pour ce que je veux faire, c'est à dire simplement imprimer une image et rien d'autre. Tandis que le second lien, j'ai même pas cherché a regarder vu que c'est dans un prog.
Cependant j'ai trouvé !!!
Il existe une unité print sur Delphi très pratique ( j'en découvre tout les jours sur delphi :p )et voilà le code de ma procedure imprimer :

uses print;
procedure TForm1.Imprimer1Click(Sender: TObject);
var
Myrect:Trect;
begin
Myrect:=rect(40,40,4000,4000);
printer.BeginDoc;
printer.Canvas.StretchDraw(Myrect,bmp.Picture.Bitmap);
printer.EndDoc
end;

C'est tout simple et cela marche très bien.
Messages postés
1119
Date d'inscription
lundi 4 février 2002
Statut
Membre
Dernière intervention
4 octobre 2006
7
Hello,



Tiens tu peux regarder ce code si tu veux :

http://www.phidels.com/php/index.php3?page=../php/pagetelechargementzip.php3&id=305

Bonne prog,
JMP77.

N'oubliez pas de cliquer sur réponse acceptée.