ich hab jetzt auf deinem code basierend ein bisschen rumprobiert und so klappt es soweit, aber leider fehlt der letzte eintrag :/
Delphi-Quellcode:
if (StrArr[0] = 'Maplist') and (AUser.Nick = 'KKND|Masterserver') then
begin
Form6.Maplist.Clear;
Anzahl := StrtoInt(StrArr[1]);
for i := 2 to Anzahl do
begin
LI := Form6.Maplist.Items.Insert ( 2 * i - 1 );
LI.Caption := StrArr [ 2 * i - 2];
LI.SubItems.Add ( StrArr [ 2 * i - 1 ] );
end;
end;