Hallo Christian,
Einfache Stringverarbeitung:
1. POS - suchen eines Simbols in einem String. Liefert Position(Integer)
2. LEFTSTR - liefert n Zeichen von links
3. RIGHTSTR - das gleiche von rechts
4. LENGTH - liefert Länge eines Strings.
Ich hoffe du kannst damit etwas anfangen
Delphi-Quellcode:
var
p: Integer;
tSpalte: Integer;
tZeile: String;
begin
p := 0;
tSpalte := 0;
tZeile := Zeile;
while p < Length(tZeile) do
begin
p := pos(';', tZeile);
tSpalte := tSpalte + 1;
if tSpalte >= Spalte then
begin
Result := LeftStr(tZeile, p-1);
Break;
end
else
tZeile := RightStr(tZeile, length(tZeile)-p);
end;
end;
Vile Spaß