Multiline-Textbox vergroessern, wenn Text nicht kpl. angezeigt wird?

19/08/2011 - 11:43 von Wilfried Dietrich | Report spam
Gegeben:

TextBox1
MaxLength = 0
MultiLine = True
ScrollBars = 0 - Kein
.Text = "Mal so viel, das er nicht kpl. angezeigt wird."


Es muss eine Textbox sein, keine RTB und kein Label.
Wenn der Text nicht reinpasst, soll kein Scrollbar
angezeigt werden, die Textbox soll lediglich um nur
eine Zeile in der Hoehe (vertikal) vergroessert werden?

Gruß
Wilfried
 

Lesen sie die antworten

#1 Heinz-Mario Frühbeis
19/08/2011 - 12:29 | Warnen spam
AFAIR ->

a) kann man eine Multiline-Textbox beliebig in der Größe àndern.
(Voraussetzung)
b) TextWidth und TextHeight in Anspruch nehmen (oder API (TextOutAPI (mit
CALCRECT)))
c) errechnen was alles in die feste Breite der Textbox reinpasst
d) errechnen, was "übrig" bleibt (ob eine Zeile mehr, oder mehrere)
e) Textbox.Height = Zeilenhöhe("W") * Zeilenanzahl (+ ein bisschen Rand der
Textbox (falls nicht Borderstyle = 0)) (wobei "W" AFAIK mit der höchste
Buchstabe ist)
f) fertig

Ähnliche fragen