begin process at 2012 02 16 01:07:43
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Archive Visual Basic & VB.NET

 > 

Archives Visual Basic

 > 

J'AI BESOIN D'AIDE !!!! :)

 > 

conversion Print vers api TextOut


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

conversion Print vers api TextOut

samedi 16 avril 2005 à 16:34:44 | conversion Print vers api TextOut

yan35

Bonjour,

j'ai un problème de conversion pour les coordonnées utilisées avec Print et l'API TextOut :

avec Print, je fais :
   picDessin.currentX = 567
   picDessin.currentY = 567
   picDessin.Print "A"                        ' j'obtiens A sur ma pictureBox à 1 cm G et Ht

avec API TextOut, je fais :
    TextOut picDessin.hdc, picDessin.currentX / Screen.TwipsPerPixelX,  _
    picDessin.currentY / Screen.TwipsPerPixelX, "A", Len("A")
   ' j'obtiens mon A sur ma pictureBox à 1 cm G et Ht exatement comme avec Print

Mais maintenant Problème, si je fais la même chose mais avec Printer au lieu de 
PictureBox, je ne maîtrise + les positions ! ?
avec Print
   Printer.currentX = 567 - margeTecG      
' où  margeTecG  correspond au décallage de la marge technique de l'imprimante
   Printer.currentY = 567 - margeTecH      
' où  margeTecH  correspond au décallage haut de la marge technique de l'imprimante
   Printer.Print "A"      ' J'obtiens mon A positionné comme dans pisDessin sur mon feuille A4

avec API TextOut :
    printer.print      ' pour initialiser et récupérer mon hdc
    TextOut printer.hdc, printer.currentX / printer.TwipsPerPixelX,  _
    printer.currentY / printer.TwipsPerPixelX, "A", Len("A")

Et là je ne retrouve + mon A où je l'attendais !
Je ne comprends pas où je bugg dans ma conversion ?!!!!!
Si quelqu'un peut m'aider MERCI


   
dimanche 17 avril 2005 à 09:26:18 | Re : conversion Print vers api TextOut

rene38

Bonjour
Dans ma source :
http://www.vbfrance.com/code.aspx?ID=6359
le positionnement fonctionne très bien.
dimanche 17 avril 2005 à 10:55:48 | Re : conversion Print vers api TextOut

yan35

Bonjour et Merci de ton aide,

Cette source est super et je l'avais déjà repérée, mais je suis un peu largué sur certaines fonctions, et dans un 1° temps je voulais comprendre mon problème d'utilisation de TextOut sans le compliquer avec des polices particulières.

Je crois qu'à la longue de tests j'avais fini par trouver, voila ce que j'en ai déduit :
Si l'unité n'est pas modifiée, les coordonnées X et Y pour TextOut s'expriment en pixels mais attention avec des entiers de type Long, sinon ça coince, et dans mon cas d'école de demande d'aide, c'est là que ça coinçait, je crois !   Est-ce bien ça ?

Pour la source d'impression de texte avec orientation, je ne comprends pas :
    Hauteur = -(Taille_Fonte * GetDeviceCaps(Contexte, LOGPIXELSY)) / 85
l'api GetDev... renvoie le nbre de pixels par pouce en largeur OK, mais pourquoi Diviser par 85, que représente 85 ?

Merci beaucoup


Cette discussion est classée dans : api, printer, print, textout, picdessin


Répondre à ce message

Sujets en rapport avec ce message

Urgent : ajout d'une imprimante avec l'API AddPrinter [ par Cedric_Malache ] Je voudrais ajouter une nouvelle imprimante garce a l'api AddPrinter: Voici la déclaration de l'api en C: Marge / Imprimante ? [ par Philyp ] Bonjour à tous. Je rencontre le problème suivant :Comment définir la marge , pour éditionsur l'imprimante? Mon code est : Private Sub Imprimer_Click() Comment imprimer une Picture ? [ par lechti62 ] j'envoie à mon imprimante les contenus de champs comme :Commondialog ShowprinterPrinter.print form1.text1.textprinter.print form1.text2.textetc ...pui objet printer : methode print non gérée ??? [ par celine ] Help ...Je voudrais imprimer, j'ai creer un objet printer : Dim impr As PrinterSet impr = Printer ou printers(0)et quand je veux faire impr.print "tot imprimer une dbgrid entière [ par badseyar ] Bonjour,comment fait-on pour imprimer une dbgrid en entier, car avec printer.print form1.dbgrid.seltext ou printer.print form1.dbgrid.text ça ne m'imp Probleme d'impression [ par Sna ] Bonjourj'ai un petit probleme avec la fonction Print pour l'objet Printerj'ai ete voir la source http://www.vbfrance.com/fichier.aspx?Val=678dans laqu URGENT : Pb d'impression [ par eltaris ] Quelqu'un pourrait-il me dire pourquoi, quandje veux imprimer et que j'utilise l'objet Printerl'option print n'apparait pas !Dans tous les exemples qu Imprimer le contenu d'un RTB via Printer.print [ par Fabrice ] Bonjour,En utilisant l'objet Printer, j'ai réussi à recréer exactement le papier à lettre de ma société.J'ai développé d'autre part un petit éditeur d Impression sous VB [ par DadaPik ] Alors déjà la partie du code qui me pose probléme : If ChkImprimer.Value = 1 Then REP = MsgBox("Voulez vous vraiment imprimer ?", vb Imprimer des TextBox [ par Damdamdeo ] Salut,Sous VB6, je pouvais imprimer le contenu de plusieurs TextBox et ComboBox ligne par ligne. Ce n'est plus le cas maintenant. Ca n'imprime plus. J


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,265 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales