[kod] błąd przy wykonywaniu

Mam komponent NetUsers i pare listy TStringList i gdy wykonywuje się funkcja :

function TForm1.SzukajKomp:TStringList;
var
ListaKomp : TStringList;
X : Integer;
XX : Integer;
Grupy : TStringList;
begin
Result := TStringList.Create;
ListaKomp := TStringList.Create;
ListaIP := TStringList.Create;
ListaGrup := TStringList.Create;
ListaName := TStringList.Create;
Grupy := TStringList.Create;
Result.Clear;
ListaIP.Clear;
ListaGrup.Clear;
ListaName.Clear;
NetUsers.GetServerList;
Grupy.Text := NetUsers.List.Text;
for x := 0 to Grupy.Count-1 do begin
NetUsers.Server := Grupy[x];
NetUsers.GetUserList;
ListaKomp.Text := NetUsers.List.Text;
for xx := 0 to ListaKomp.Count-1 do begin
ListaName.Add(ListaKomp[xx]);
ListaGrup.Add(Grupy[x]);
ListaIP.Add('');
Result.Add(ListaKomp[xx] + ' [' + (GetIP(xx)) + ']');
end;
end;
Done('Przeszukiwanie zakończone');
Info.Refresh;
end;

To komplikacja przebiego OK ale jak już program działa i wywołuję to funkcję to wychodź błąd "Project Project1.exe raised exception class AAcessViolation with message 'Access violation at address 00403310 in module 'project1.exe'. Read of adress 000004C6'. Process stopped. use Step or Run to continue."

Wiem, że ten kod jest bardzo nietaki jaki powinien być ale proszę czemu mi wychodź ten błąd !! Z góry dzięki

A w którym miejscu program się wykrzacza?

ps. zrób wcięcia z łaski swojej...

Jak bym wiedział przy której funkcji się wkrzacza to bym sam to zrobił ale o to chodź, że jak się wkrzaczy to niepokazuję o którą funkcje chodź tylko się pokazuje kod Project.dpr. Program ma już ponad 5 miesięcy i mi się wydaje, że to komponent NetUsers się wkrzacza. Ale błąd się pokazuję jak program zaczyna wykonywać tą funkcję

To możesz najpierw zaczniesz od przeczytania co to jest debugger, breakpoint itd.?

O to chodź, że Debuger nic niepokazuje [!!!]