Was stimmt hier nicht?

**lucius**

Moin Leute,

Ich habe eine Function CreateStrings:

Delphi-Quellcode:

			function TForm1.CreateStrings(s: string): TStrings;

var

  name, value: string;

  i: integer;

begin

  Result := TStringList.Create;

  Result.NameValueSeparator := ':';

  Result.Text := s;

  for i := 0 to Pred(Result.Count) do

  begin

    name := Trim(Result.Names[i]);

    value := Trim(Result.Values[name]);

    Result[i] := name + Result.NameValueSeparator + value;

  end;

end;

Die wird in einem Button1.Click Event aufgerufen:
z := CreateStrings(SimpleRSS.Items.Items[i].Description); Jetzt wird nur immer die Value Category in einer Listview eingetragen, die Values Size, Speed unsw nicht.

markieren

Delphi-Quellcode:

			listitem.SubItems.add(z.Values['Category']);

listitem.SubItems.add(z.Values['Size']);

listitem.SubItems.add(z.Values['Status']);

....

Verweis nach

Parse Function
Was stimmt an der Function CreateStrings nicht?

Was stimmt hier nicht?

Was stimmt hier nicht?

Forumregeln