So habe es jetzt alles soweit nur ich bekomme das nicht hin die einzelnen datensätze in ein aray zu speichern
habe es damit probiert
Code:
var
test: string; // da sind die datensätze drin
test3: Array [1..7] of string;
count: integer;
i: integer;
begin
listitem:= ssl_anzeige.Selected;
test:=listitem.Subitems.GetText;
count:=1;
i:=1;
while not (Tokenize(test, count, '#') = '') do
begin
test3[i]:=(Tokenize(test, count, '#'));
inc(count);
i:= i+1;
end;
ssl_VNameedit1.text:= test3[1];
ssl_VNameedit2.text:= test3[2];
ssl_VNameedit3.text:= test3[3];
ssl_VNameedit4.text:= test3[4];
ssl_VNameedit5.text:= test3[5];
ssl_VNameedit6.text:= test3[6];
ssl_VNameedit7.text:= test3[7];
Nur er gibt immer wieder den kompletten datensatz aus.