Mindestlänge von Editfeldern

[Premaider]

Wie lege ich eine Mindestlänge für Editfelder fest ?

[haentschman]

Hallo...

indem du beim OnExit die Länge prüfst und entsprechend reagierst...

[Popov]

Mindestlänge als solches gibt es nicht. Alternativ kannst du MaskEdit nehmen. In EditMask z.B. 10 mal A eingeben und schon müssen 10 Buchstaben/Zahlen eingegeben werden.

[Premaider]

Ich habe das jetzt so gelöst
If((((Edit10.text<>'') and (Edit11.text<>'') and (length(Edit10.text)<> 1 or 2) and (length(Edit11.text)<> 1 or 2)))) Then das machen was ich will :D Danke euch

[Popov]

Auf was bezieht sich 1 von 1 or 2 und die 2? Nicht du mußt es verstehen, sondern Delphi.

[Premaider]

Auf die Länge der Eingabe im Editfeld

[mkinzler]

Dann muss es
...(length(Edit10.text) <> 1 or length(Edit10.text) <> 2) ... heissen
oder besser gleich
length(Edit10.text) > 2

[Popov]

Das war mir schon klar, aber bei length(Edit10.text)<> 1 or 2 ergeben 1 or 2 = 3. Di fragst also ob die Länge ungleich 3 ist, nicht ob sie 1 oder 2 ist.

Das ist Binär:

0001 ist 1
or
0010 ist 2
=
0011 ist 3

//Edit

@mkinzler

Meine Antwort bezog sich auf den Post von Premaider, nicht deinen. Im Nachhinein klingt meine Antwort als ob ich auf dich antworten würde.

[himitsu]

Zitat:

length(Edit10.text)<> 1 or 2

Ich denk du kennst kein OR?

Und ich wette das es nicht funktionieren wird.
Den Tipp mit den Tutorials würde ich wirklich empfehlen.

[edit]
komisch, irgendwie waren vor 2 Minuten koch keine anderen Antworten zu sehn.
Ein Aprilscherz von Daniel oder des Internets?

[Sir Rufo]

Zitat von Premaider:

Ich habe das jetzt so gelöst
If((((Edit10.text<>'') and (Edit11.text<>'') and (length(Edit10.text)<> 1 or 2) and (length(Edit11.text)<> 1 or 2)))) Then das machen was ich will :D Danke euch

Also wenn du prüfen möchtest, dass in den Edit-Feldern mindestens 3 Stellen gefüllt sind, warum dann nicht direkt so prüfen wie man es sich denkt?
if ( Length( Edit10.Text ) >= 3 ) and ( Length( Edit11.Text ) >= 3 ) then