Forum: Algorithmen, Datenstrukturen und Klassendesign
by blauweiss,
5. Okt 2011
Hab's doch mal eben implementiert, weil es mich selber interessiert hat.
function GetStringFromHere(aList: TStringList;
StartIndex, TokenCount: integer): string;
var
i: integer;
begin
Result := aList; // Achtung keine Abprüfung auf < 0 oder > aList.Count-1 ...!!
for i := StartIndex+1 to StartIndex+TokenCount-1 do
Forum: Algorithmen, Datenstrukturen und Klassendesign
by blauweiss,
5. Okt 2011
Hallo Sendrix,
ich würde es folgendermaßen angehen:
1. eine Routine (Funktion bzw. Methode falls Du ein Objekt daraus machen willst) "GetStringFromHere"
function GetStringFromHere(StartIndex, TokenCount: integer): string;
-> liefert Konkatenation von "TokenCount" Bestandteilen (natürlich beschränkt durch Listenende) ab StartIndex in der Liste
2. eine Routine "GetMatchIndex"
function...