Problemchen mit ValueListEditor und TStringList

[daredd]

Hi Leutz,

ich habe ein ValueListEditor in meiner Form wo ich schon mal ganz gut Werte einsetzen kann.
Nun will ich aber die Namen die ich in einer Spalte des ValueListEditor habe in ein TStrigList packen.
hier mein Code:

Delphi-Quellcode:

procedure TFormEditor.EditText(Sender: TObject);
var
i, f : Integer;
s : string;
strings : TStringList;
begin
for i := 0 to ValueListEditor1.RowCount - 1 do
                s := ValueListEditor1.Cells[0,i];
                f := strtoint(s);
                strings.Text := ValueListEditor1.Cells[1,i-1];
                Languager.SaveStringsForText(strings, IntToStr(f));
                TMText(List.GetItem(f)).MakeHint;

ValueListEditor1.Visible := true;
RefreshStatistic;
end;

Ich bekomme diese Fehler bei Wenn ich die Prozedur ausführe, also schon im laufenden Programm.

Erste Gelegenheit für Exception bei $775F42EB. Exception-Klasse EAccessViolation mit Meldung 'Access violation at address 00559A2C in module 'Tune.exe'. Read of address 00000000'. Prozess Tune.exe (3732)

Kann mir einer sagen was ich da jetzt machen soll?