Нашли или выдавили из себя код, который нельзя назвать нормальным,
на который без улыбки не взглянешь?
Не торопитесь его удалять или рефакторить, — запостите его на
говнокод.ру, посмеёмся вместе!
procedure TForm1.sButton1Click(Sender: TObject);
begin
if sOpenDialog1.Execute then begin
AccountsList.Clear;
AccountsList.LoadFromFile(sOpenDialog1.FileName);
Form1.sButton1.Caption:='[+]Загрузить лист аккаунтов | '+inttostr(AccountsList.Count);
end else
ShowMessage('База не загруженна!!!');
end;
procedure TForm1.sButton2Click(Sender: TObject);
begin
if sOpenDialog2.Execute then begin
ProxyList.Clear;
ProxyList.LoadFromFile(sOpenDialog2.FileName);
Form1.sButton2.Caption:='[+]Загрузить лист прокси | '+inttostr(ProxyList.Count);
end;
end;
Когда просто открыл исход с просьбой о помощи, послал сразу же после sOpenDialog....
> лист прокси
Спамилку чую я...