procedure Tinject4.FormCreate(Sender: TObject);
var
FileOnNet,LocalFileName:string;
begin
FileOnNet:='http://********/4.jpg';
LocalFileName:='4.jpg';
if GetInetFile(FileOnNet,LocalFileName)=True then
begin
inject4.image1.picture.loadFromFile('4.jpg');
end
else
begin
ShowMessage('Файл отсутствует')
end;
end;
Этот код находится на 5 форме, если считать от главной по переходам.
При запуске приложения начинается загрузка этого файла, а после уже запускается приложение.
Как сделать, что-бы этот файл не загружался до того момента пока не дойдёш до этой формы?
Или как загрузить картинку не сохраняя её?
Принимаются пожертвования любых размеров в фонд поддержки начинающих программистов
Кошельки: WMZ - Z276844220882; WMR - R231028582939; WMU - U394136909210; ЯД - 410011494605270.