Фрейм расположен на 1 главной форме, приведённый код работает в потоке, должен сохранять картинку в папку ,но иногда перестаёт перезаписывать картинку и останавливается.
Код:
Fix: TMemoryStream;
png: TPNGObject;
begin
Fix := TMemoryStream.Create;
png := TPNGObject.Create;
Form1.Frame11.idhttp1.Get('http://www.work.net/captcha/captcha-st/captcha.php?sid=' + sid, Fix);
Fix.Position := 0;
png.LoadFromStream(Fix);
png.SaveToFile('accounts\akk' + Form1.Frame11.label1.Caption + '/' + '1.png');
Fix.Free;
png.Free;
end;