Forum: Programmieren allgemein
by markus5766h,
8. Jan 2017
danke für die Tipps :thumb:
Forum: Programmieren allgemein
by markus5766h,
8. Jan 2017
hab's jetzt so geändert - ist auch etwas übersichtlicher
S := MediaList.Strings;
p := Pos(Chr(19), S);
Delete(S, 1, p); // ID
p := Pos(Chr(19), S);
S2 := Copy(S, 1, p-1); // FileName
Delete(S, 1, p);
S := Copy(S, 1, Length(S)); // ext Daten
Forum: Programmieren allgemein
by markus5766h,
8. Jan 2017
ah danke . . . logisch, das Delete bezieht sich dann auf die TListView und nicht auf den String . . .
... die Geschichte mit dem Wald und den Bäumen . . .:oops:
Forum: Programmieren allgemein
by markus5766h,
8. Jan 2017
Moin, zusammen.
Kann mir bitte dies mal jemand erklären ?
var
n, l, l2, i, r, sn : Byte;
p : Integer;
S : String;
S2 : String;
IndexList : TStringlist;