Einzelnen Beitrag anzeigen

Benutzerbild von Bluemeus
Bluemeus

Registriert seit: 1. Dez 2004
Ort: Erfurt
16 Beiträge
 
Delphi 7 Enterprise
 
#2

Re: Funktion um bestimmte Zeichen im string zählen?

  Alt 8. Jan 2005, 00:56
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
Stephan
  Mit Zitat antworten Zitat