GROß-klein Schreibung ignorieren

[XeRo]

Hallo.

Mein Problem:
Ich will aus einer Datei so lange eine Zeile auslesen, bis ich zu einer Zeile komme, in der etwas bestimmtes steht. Ich hab das jetzt mal so gemacht:

Delphi-Quellcode:

var was: String;

begin
Reset(f);
 Repeat
  Readln(f,was);
 Until(was='Username');
CloseFile(f);
end;

Das Problem ist, dass die Variable "was" nicht nur "Username" sein kann, sondern auch "uSername" oder "UsErNaMe",oder...

Wie kann ich also die GROß-klein Schreibung ignorieren?

[mirage228]

Delphi-Quellcode:

{ .. }
until (AnsiLowerCase(was) = 'username');

mfG
mirage228

[XeRo]

Vielen Dank für die schnelle Antwort mirage228...