Zitat von
XeRo:
Hi. Ich will beim Vergleichen 2er Strings die Groß- und Kleinschreibung ignorieren ohne das ich den String verändere.(also nicht einfach alles kleinschreiben lassen
)
Delphi-Quellcode:
if LowerCase(s1) = LowerCase(s2) then
begin
...
end;
Damit veränderst du die Strings nicht, sondern vergleichst nur die Rückgabewerte der Funktionen.
Wenn du das auch nicht willst - aus welchen Gründen auch immer - dann musst du dir wohl oder übel ne eigene Funktion basteln:
Delphi-Quellcode:
function StrCompar(s1, s2:
string)e: Boolean;
var
i: Integer;
begin
<auf gleiche Länge prüfen>
for i := 1
to Length(s1)
do
begin
if LowerCase(s1[i]) = LowerCase(s2[i])
then // ja ich weiß LowerCase taucht heir auch auf, wenn du auch das nicht willst, musst du die ANSI-Werte unter berücksichtigung beider(Ord('a') und Ord('A')) Werte vergleichen
begin
...
end
else
begin
...
end;
end;
end;
Achtung! Nicht Copx&Paste-Fähig
mfg
Christian
//Edit: Ups
Da hab ich ja 2 Beiträge gar nicht gesehen. Naja was solls. Meiner is ausführlicher.
P.S.: ANSISameText kannte ich ja noch gar nicht. Wissenslücke...