Since the boss said no problem, I edit the topic :D
Posted: 27.11.2017 17:34
Since the boss said no problem, I edit the topic 
ofcourse.GetGumpInfo(GetGumpsCount-1, gumpInfo);
wait(WaitTime);
while gumpInfo.XmfHTMLGumpColor[2].Hue <> 16927 do begin
if Dead or not Connected then Exit;
NumGumpButton(GetGumpsCount-1,4);
CheckLag(60000);
wait(100);
GetGumpInfo(GetGumpsCount-1, gumpInfo);
wait(100);
end;
often get the out of range error
Because no any guarantee that gumpinfo will be always taken with XmfHTMLGumpColor array. You make no checks f.e. Length(XmfHTMLGumpColor) > 0, just directly taking array element value. If array empty = error.
It's your bug, not stealth.