String auf Tabulatoren prüfen

[sx2008]

Zitat von Ajintaro:

... wie man die Anzahl der Tabulatoren eines Strings zählen kann

Hier kommt die Hilfe zur Selbsthilfe...

Warum verwendest du keine Zwischenvariablen?

Delphi-Quellcode:

var
   line : string;
for i := 0 to memo1.lines.count-1 do
begin
   // Grundregel für alle Programmierer die keinen Spaghetticode schreiben wollen
   // wenn man über eine Stringliste iteriert soll man das aktuellen String in eine Zwischenvariable kopieren
   line := memo1.Lines[i];
   ...
end;

Grundregel 2: Teile Methoden/Funktionen so lange auf bis eine weitere Aufteilung keinen Sinn mehr machen würde!

Du brauchst doch eigentlich nur deine Frage von oben anschauen und dann kommst du darauf,
dass du folgende Funktion benötigst:

Delphi-Quellcode:

function CountLeadingTabs(const s:string):Integer;
begin
   // die Implementierung ist trivial; das kriegst du selber hin
   // Schleife über den String und abbrechen sobald das aktuelle Zeichen <> #9 ist
   ...
end;