PaintBox rechstbündig statt linksbündig

[Nils_13]

Hi,

wie kann ich dafür sorgen, so dass in einer PaintBox die mit TextOut erstellten Texte nicht linksbündig sondern rechtsbündig ausgerichtet werden ?

[Schlendrian]

In dem man die Eigenschaft auf rechtsbündig setzt? Sollte glaube TPaintBox.Align oder TPaintBox.Alignment sein.

[Nils_13]

Das gibt es nicht. Und Align ist was anderes.

[Lannes]

Hallo,

so in etwa:

Delphi-Quellcode:

var x : Integer;
begin
  with PaintBox1 do
    begin
    x := Canvas.TextWidth('erster Text');
    Canvas.TextOut(Width-x,0,'erster Text');
    x := Canvas.TextWidth('etwas länger ist dieser');
    Canvas.TextOut(Width-x,20,'etwas länger ist dieser');
    end;

[Luckie]

Nimm DrawText, damit hast du mehr formatier Möglichkeiten.

[Nils_13]

@Lannes: cool jetzt läuft alles.