If-Abfrage wird ignoriert (D7)

[Hobbycoder]

Oh Mann, das ist schon fast peinlich
Danke Uwe.

[mkinzler]

if Trim(wer<>'') then und Leerzeichen werden zum Vergleichen entfernt.

[Delphi.Narium]

Wenn aber das Leerzeichen erlaubt ist und nur ein Leerstring die Bedingung erfüllt? if Length(wer) = 0 then

[Neutral General]

Zitat von mkinzler:

if Trim(wer<>'') then und Leerzeichen werden zum Vergleichen entfernt.

Inkompatible Typen String und Boolean

[KodeZwerg]

if Length(Trim(wer)) > 0 then
Sollte funktionieren.

[Delphi.Narium]

Zitat von KodeZwerg:

if Length(Trim(wer)) > 0 then
Sollte funktionieren.

Aber nur, wenn führende und folgende Leerzeichen zu ignorieren sind, bzw. ein nur aus Leerzeichen bestehender String mit einem Leerstring gleichzusetzen ist.

[KodeZwerg]

if ((wer<>'')and(wer<>' ')) then
Sollte auch funktionieren mit Delphi.Nariums Wunsch nach Leerstellen.

[Hobbycoder]

Alles gut. Ich weiß schon wie ich das alles lösen kann.

Ich hatte lediglich nicht gesehen, dass eben im String ein Leerzeichen enthalten war .Lag tatsächlich daran, dass im Debug-Fenster eine Proportionalschrift verwendet wird, und im Quelltexteditor eben nicht. Da sah dann der Abstand der beiden Hochkomma gleich aus, was mich eben zu der fälschlichen Annahme verleitet hat, der Wert in Wer wäre ein Leerstring.

Da mich aber Uwe Raabe, mit seinem geschulten Auge , mal direkt drauf gestoßen hat, war dieser Thread bereits nach dem 2 Post erledigt.

Und, obwohl mir ein solcher Fehler nach nun mehr als 25 Jahren nicht unterlaufen sollte, danke ich allen hier für ihre Rat- und Vorschläge.

Wobei:

Zitat von mkinzler:

if Trim(wer<>'') then und Leerzeichen werden zum Vergleichen entfernt.

das war nicht dein Ernst, oder