Werte "mittig" auf das Blatt drucken.

  • VB6

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von Marcus Gräfe.

    Werte "mittig" auf das Blatt drucken.

    Hallo,

    ich möchte einige Werte aus Labelfeldern ausdrucken.
    Mein Code ist:

    Printer.FontSize = 12
    Printer.Print Label1.Caption
    Printer.EndDoc

    Was muß ich noch angeben, damit der Text aus Label1 - "mittig" - auf das Blatt gedruckt wird ?
    Printer.CurrentX bzw. Printer.CurrentY gibt die X/Y Position an, die der darauffolgende Print-Befehl benutzt. Mit ein bisschen Mathematik kannst du die Mitte berechnen. Die Länge des Textes kannst du mit "Printer.TextWidth Label1.Caption" ermitteln, die brauchst du für die Berechnung.
    Besucht auch mein anderes Forum:
    Das Amateurfilm-Forum