Achtet IndexOf einer StringList nicht auf Groß-/Kleinschreib

[Pr0g]

Hallo,

ich suche den Index eines Buchstabens aus einer StringList per IndexOf raus, dabei scheint diese aber nicht auf die Groß-/Kleinschreibung zu achten, hier mal ein Beispiel:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  sl: TStrings;
begin
  sl := TStringList.Create;
  try
    sl.Add('a');
    sl.Add('A');
    Caption := 'a:' + IntToStr(sl.IndexOf('a')) + ' | A:' + IntToStr(sl.IndexOf('A'));
  finally
    sl.Free;
  end;
end;

Meine gewünschte Ausgabe wäre "a:0 | A:1", ich bekomme aber folgendes: "a:0 | A:0".

Kann man das Problem irgendwie beheben, oder muss ich selber mit einer Schleife die einzelnen Einträge prüfen (dann gehts ja)?


MfG Pr0g

[Christian Seehase]

Moin Andreas,

Du könntest Dir aus TStringList eine neues Objekt ableiten, und Find bzw. IndexOf überschreiben, so dass die beiden Methoden AnsiCompareStr statt AnsiCompareText verwenden.

[Pr0g]

Danke, das klappt soweit.

Jetzt habe ich noch ein Problem, dass TIniFile bei den Keynamen nicht unterscheidet, aber da habe ich schon einen kleinen Wordaround für, in dem ich die Keys mit einem Zeichen am Anfang versehe, was dann später für Groß, oder Klein ausgewertet wird. Wenn jemand ne bessere Lösung hat einfach melden

[Christian Seehase]

Moin Andreas,

ich hab' gerade noch mal in der D7PE-Hilfe nachgeschaut, ob dort die Berücksichtigung der Gross-/Kleinschreibung dokumentiert ist:
Du kannst auch einfach die Eigenschaft CaseSensitive auf true stellen *unauffälligvorsichhinpfeif*

[Pr0g]

Das zeigt mal wieder, das ich nicht genau genug geschaut habe. Auf CaseSensitive hätte man schon durch alleiniges Probieren kommen können

Das andere Problem mit der Ini habe ich auch gelöst, in dem ich die Daten einfach anders speichere.

[Muetze1]

Moin!

Bei der INI wird auch nirgendwo behauptet das sie Case-Sensitiv ist - wäre ja noch schöner. Eine INI war es eigentlich auch noch nie - da verlangst du ein wenig viel von der INI...

MfG
Muetze1

[Pr0g]

Ich bin einfach mal davon ausgegangen, dass alles CaseSensitive ist.

[Muetze1]

Moin!

Zitat von Pr0g:

Ich bin einfach mal davon ausgegangen, dass alles CaseSensitive ist.

Ok, Faustregel: Unter Linux/Unix/BeOS gehe davon aus, das es case-sensitive ist; unter Windows gehe davon aus, das es case-insensitive ist...

MfG
Muetze1