Einzelnen Beitrag anzeigen

teebee

Registriert seit: 17. Jan 2003
Ort: Köln
460 Beiträge
 
Delphi 6 Professional
 
#13

Re: TLabel: Wieso verschindet der Text?

  Alt 2. Apr 2005, 14:23
Mit etwas Frickelei geht es übrigens doch mit einer ScrollBox:
Eine Scrollbox aufs Form, darin ein Label mit Align := alBottom und AutoSize auf True. Das Label braucht kein spezielles Layout.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
 Txt := Txt+#13#10+Edit1.Text;
 Label1.Caption := Txt;
 ScrollBox1.VertScrollBar.Position := Label1.Height;
end;
Warum einfach, wenns auch kompliziert geht...
Farbe sowohl im Label als auch in der Scrollbox einstellen, fertig.

Gruß, teebee
  Mit Zitat antworten Zitat