Label mit senkrechter Schrift

[Trille]

Hallo allerseits,
ich benötige ein Label, was ich dynamisch füllen kann (also zur Laufzeit die Caption setzen). Der Inhalt soll jedoch um 90° gedreht und senkrecht dargestellt werden. Hat jemand eine Idee, wie man das anstellen kann?

Trille

[cherry]

spontan fällt mir nur ein: Eine Komponente von TLabel abzuleiten und die Paint methode zu überschreiben.

[Daniel Schuhmann]

Was das Drehen allein angeht, hilft Dir vielleicht http://delphi.smartcoder.net/source/...as_drehen.html weiter.

[hincapie]

Schau Dir doch mal den OvcRotatedLabel von Orpheus an (www.turbopower.com),
vieleicht löst der Dein Problem. :gruebel:

[Trille]

Ich sehe gerade, dass Font unter TLabel auch eine Eigenschaft Orientation hat. Jedoch ist der Punkt, um den er das Bild dreht, links oben, das bedeutet, dass die Schrift immer aus dem Label oben rausrutscht. Gibt es eine Möglichkeit, dass ich dort den Drehpunkt ändere?

[RavenIV]

torry.net ist immer ein guter Ausgangspunkt, wenn man Komponenten sucht.
Dort gibt es freie und kommerzielle Angebote.

[Trille]

Das Problem ist, ich DARF keine neue Komponente nutzen. Ich muss quasi mit dem altbekannten TLabel klarkommen.

[turboPASCAL]

Und was ist daran das Problem ? Hinter jeden Buchstaben kommt ein Enter und der Text ist

s
e
n
k
r
e
c
h
t

:stupid:

[Trille]

Das währe schön, nur müssen die Buchstaben ja auch gedreht sein :)

[turboPASCAL]

Zitat:

Zitat von Trille

Das währe schön, nur müssen die Buchstaben ja auch gedreht sein :)

Ah, also auf dem Kopf sehend oder ? :gruebel:

Das ist mit einem normalen 0815 TLabel nicht möglich. Ein Label dient nur zur normalen formateirten Textdarstellung. Ohne ein überschreiben der Komponente läuft da nix.