Registriert seit: 2. Mär 2005
Ort: Göttingen
1.592 Beiträge
Delphi 2009 Professional
|
Label.canvas beschreiben
4. Okt 2007, 15:14
Moin,
ich schreibe auf das Canvas eines TntLabels (geht um hoch- und tiefgestellte Schrift). Das ist etwas holperig, weil die Beschriftung rechtsbündig sein muss.
Mein Schreibvorgang wird im Form.OnResize ausgeführt.
Nun wird mir bei jeder Gelegenheit das Label verdeckt (z.B. von einer MessageBox) und danach neu gezeichnet. Damit wird wieder die leere Caption gezeichnet. Wenn ich den Aufruf in die Form.OnRepaint setze, wird meist nur das nachgezeichnet, was nicht von einer Meldung etc. verdeckt war bzw. beim Ausblenden einer Meldung etc. wird das Repaint des Forms nicht ausgelöst.
Im Prinzip bräuchte ich ein Ereignis wie ein TLabel.Repaint, damit ich dort die Beschriftung umsetzen kann.
Hat jemand einen Tipp?
Danke, Messie
|