Einzelnen Beitrag anzeigen

dws

Registriert seit: 27. Feb 2004
31 Beiträge
 
#13

Re: Inhalt eines Strings herausschneiden

  Alt 25. Mai 2004, 21:27
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.
  Mit Zitat antworten Zitat