Datei "seeken"

[Rapthor]

Es geht nicht ganz ...
was heißt die -1 hinter dem Count?
Mein Quelltext lautet folgendermaßen

Code:

begin
       SL := TStringList.Create;
     try
        for I := 0 to UserListe.Items.Count -1 do
          ShellExecute(Handle, nil, 'c:\windows\system32\net.exe', PChar('send ' + SL[I] + ' ' + Parameter1.Text), nil, SW_HIDE);
        finally
        SL.Free;
    end;

Ich erhalte jetzt die Fehlermeldung: List Index out of bounds (0)

Was mach ich falsch?