Funktion um bestimmte Zeichen im string zählen?

[Henry]

Hallo,

gibt es eine Funktion in Delphi mit der ich in enem string ein auswählbares zeichen (zeichenfolge) zählen kann?

Ich möchte nämlich aus einer CSV Datei die Spalten zählen, also nach dem Trennzeichen (",") suchen und wissen wie viele es sind.

Danke schon einmal

[Bluemeus]

Zitat:

Zitat von Henry

Hallo,

gibt es eine Funktion in Delphi mit der ich in enem string ein auswählbares zeichen (zeichenfolge) zählen kann?

Ich möchte nämlich aus einer CSV Datei die Spalten zählen, also nach dem Trennzeichen (",") suchen und wissen wie viele es sind.

Danke schon einmal

Nicht dass ich wüsste, aber ich hab Dir fix eine geschrieben:

Delphi-Quellcode:

function FindStrAndCount(const TargetString, Symbol: String): Integer;
var i: Integer;
begin
 Result:= 0;
 i:= Length(TargetString);
 for i:= 1 to i do
  begin
   if TargetString[i] = Symbol then inc(Result);
  end;
 end;

Aufzurufen als

Delphi-Quellcode:

var Anzahl: Integer;
begin
 Anzahl:=FindStrAndCount('dies ist ein String der auch durch eine Variable ersetzt werden kann',',');
end;

Gruß Blue

[Henry]

Danke Dir, das ist das was ich brauche. Werde ich dann morgen mal testen.
Da hätte ich wohl ne weile drüber gebrühtet :)

[Bluemeus]

Zitat:

Zitat von Henry

Danke Dir, das ist das was ich brauche. Werde ich dann morgen mal testen.
Da hätte ich wohl ne weile drüber gebrühtet :)

:)
Keine Ursache! :thumb:

Ich finde es klasse, wenn ich jemandem mit meinem 3. Beitrag schon helfen kann! ^^


Gruß