[delphi]zwiecha przy ini

0

Co w tym jest źle.
Zawiesza sie jak to wykonuje:
Listbox7.Clear;
Listbox8.Clear;
Ini:=TIniFile.Create(extractfilepath(application.ExeName)+'awer.ini');
Ini.ReadSection('awer',Listbox7.Items);
for xpxp:=0 to ListBox7.Items.Count -1 do begin
ListBox8.Items.Add(ini.ReadString('Zadania',Listbox7.Items.Strings[xpxp],''));
end;
for xpxp:=0 to ListBox7.Items.Count -1 do begin
ListBox9.Items.Add('cza'+Listbox7.Items.Strings[i]);
ListBox9.Items.Add('zad'+Listbox8.Items.Strings[i]);
end;
for xpxp:=0 to ListBox9.Items.Count -1 do begin
gg.GGSendMessage(true,StrToInt(edit3.Text),Listbox9.Items.Strings[xpxp],MsgFormat2);
sleep(30)
end;
end;

0

A po co Ci sleep?

0
Application.ProcessMessages;

?
//to postu poniżej.
Serwer powinien mu jaja urwać za flood [green]

0

Pewnie go serwer rozłącza za flood.

1 użytkowników online, w tym zalogowanych: 0, gości: 1