Eingabefeld auf inhalt prüfen

[joel93]

Ich habe einen Code (von ManuMF) der ein Edit Prüft, ob etwas darin steht (der auch dann noch funzt wenn ihr 1 Mille
(oder mehr) Leerzeichen eintippt )
Der Code geht so:

Delphi-Quellcode:

if (StringReplace(EditBeispiel.Text, ' ', '', [rfReplaceAll]) = '')
  //das Feld ist leer...
end;

(Ihr müsstet dann noch EditBeispiel durch den passenden Editnamen erstetzen )

[shmia]

Ja aber folgendes dürfte schneller sein:

Delphi-Quellcode:

if TrimRight(EditBeispiel.Text.Text) = '' then
begin
  //das Feld ist leer... 
end
else
  ....

TrimRight entfernt von rechts her Leerzeichen (und Steuerzeichen) und bricht ab,
sobald ein "nicht Whitespace" Zeichen kommt. Es müssen keine Teilstrings im Speicher verschoben werden.

[faux]

Zitat von joel93:

der ein Edit Prüft, ob etwas darin steht

Ich würde das mal anders definieren: Der Ürpft, ob in einem Edit etwas anderes als Leerzeichen drinnen steht.
btw: Wärs nicht besser, daraus ne Funktion zu machen? Wieso sich auf Edits beschränken?

Ist das wirklich einen Eintrag in die CodeLib wert, das ist doch im Prinzip nur ein einziger Funktionsaufruf?

Grüße
Faux

[Matze]

Zitat von faux:

Ist das wirklich einen Eintrag in die CodeLib wert, das ist doch im Prinzip nur ein einziger Funktionsaufruf?

So sehe ich das momentan auch, das ist mehr so 0815, was man eigentlich beherrschen sollte.

Dennoch danke für den Vorschlag, vielleicht entwickelt sich daraus ja auch eine interessantere Funktion, die wir doch aufnehmen können.

[DGL-luke]

naja...

Delphi-Quellcode:

function IsStringEmpty(s: string): Boolean;
begin
  Result := TrimRight(s) = '';
end;

Is ja auch nicht so der brüller...

[joel93]

Ich find das sollte in der lib stehn weil ich's auch nich kante (könnt ja noch ne lib kategorie 'Grundwissen' Aufnehmen )