try s:=TextPic[strIndex]; //????????? ?????? ??????? SendMs(s, chat); //??????? ? ??? inc(strIndex); //????????? ?????? Except // <--<-- Change this!! ExecuteTimer.Enabled:=False; //????????? end;