Edit schmaler machen ?

[Intruder]

spinn ich?

auf der Form mach ich das Edit Feld schmaler
von urspungs height 21 auf 17
sieht auch alles ganz toll aus,
nur sobald ich das programm starte springen die
edits wieder auf 21 zurück , was läuft da falsch ?

[Matze]

Du musst die Schriftgröße auch ändern.

[Daniel B]

Hi,

das ist kein Fehler Deinerseids, sondern so "gewollt". Zur DT kann man machen was man will, zur RT dann nicht mehr. Du kannst, oder solltest die gewünschte Grösse erst zur RT einstellen!

[Intruder]

habe ich versucht, bringt auch nichts,
die springt ebenfalls zurück...
bzw. die wird garnicht erst kleiner

[Daniel B]

Hi,

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Edit1.Height := 10;
end;

Ob Du es kleiner oder grösser machst, zur Run-Time, geht wunderbar, nimm Dir dochmal ein Button und die Prouedur. Egal ob es 10 oder 100 hoch ist, die Gröse bleibt dann wie im ButtonKlick eingestellt und man kann immernoch drin schreiben und es ganz normal benutzen. Bei mir klappt es jedenfalls so wie es soll.
Wenn es bei Dir nicht klappt, lösche dochmal das Edit von der Form, setze en neues drauf und probiere es einfach nochmla aus, vielelciht hat sich da nur etwas "aufgehängt".

[Matze]

Wenn du die Schriftgröße veränderst, dann geht es!!

[Daniel B]

Hi,

Zitat von Matze:

Wenn du die Schriftgröße veränderst, dann geht es!!

Wie vorhin erwähnt, das funktioniert auch so ohne Probleme, oder liegt das vielleicht an der Delphi-Version?

[Sharky]

Hai,

das verößern geht beim änder der Schriftgöße auch zur Designtime.
Kleiner als 8 Punkt (Font) wird nach meiner Erfahrung schwierig. Alle Standarfonts werden, zumindest bei mir, nicht kleiner dargestelle. Und die Größe des Edits hängt von der Größe der Schriftart ab.

[Matze]

@Sharky: *zustimm*

[APP]

Hallo,
wenn man Edit1.Autosize := FALSE macht, kann man die Höhe des Edits unabhängig
von der Textgrösse einstellen, egal ob zur RT oder zur DT.