Suchergebnisse

Hi, ich habe 2 Objekte. Eine PictureBox (picData) und ein Printer Objekt (prnObject). folgende Befehle liefern unterschiedliche Ergebnisse: MsgBox picData.TextWidth("Beispieltext") MsgBox prnObject.TextWidth("Beispieltext") Auf dem Printerobjekt benötigt der auszugebende Text immer einige mm mehr Platz als auf dem PictureBox Steuerelement. Das ist mir absolut unerklärlich. Der Text sollte doch egal wo ich ihn "drucken" möchte die gleiche Breite habe oder ??? Ich benötigen diese Funktion um einen…

Hi, ich poste mal nen Beispiel mit dem ich eure Tipps getestet habe. Vielleicht habe ich da ja irgendwo nen Denkfehler drin. Private Sub Form_Load() Dim p As Printer Set p = Printer Me.Picture1.ScaleMode = vbMillimeters: p.ScaleMode = vbMillimeters Me.Picture1.Font = "Times New Roman": p.Font = "Times New Roman" Me.Picture1.FontSize = 12: p.FontSize = 12 Me.Label1 = Me.Picture1.TextWidth("Beispieltext") Me.Label2 = p.TextWidth("Beispieltext") End Sub Für den Code wird eine PictureBox (Picture1) …

Hi, @Mad Andy Schau Dir mal den Quelltext an, den ich weiter oben geschrieben habe, kopiere Ihn und setz die angegebenen Steuerelemente auf ein Formular und Du wirst sehen, dass die Differenz jedesmal unterschiedlich ist. Leider habe ich auch noch kein System erkannt. Im Laufe der weiteren Programmierung habe ich jedoch festgestellt, das im PictureBox Steuerelement die Millimetergenaue Ausgabe von Text teilweise nach links oder rechts verrutscht (2-3 Pixel). Daher tippe ich drauf, dass in dem St…