0
vozgar2
03.09.15
✎
16:14
|
Необходимо разместить 6 картинок загруженных из интернета, вот код:
Для А=1 По 5 Цикл
Попытка
УРЛ = "";
ПоискНаСервере(УРЛ, СчетчикУдачных);
Номер = 1;
ФайлНаДиске = ПолучитьИмяВременногоФайла("jpg");
КопироватьФайл(УРЛ,ФайлНаДиске);
ФайлНаДиске = Новый Файл(ФайлНаДиске);
ДвоичныеДанные = Новый ДвоичныеДанные(ФайлНаДиске.ПолноеИмя);
ЭтаФорма["АдресКартинки"+А]= ПоместитьВоВременноеХранилище(ДвоичныеДанные);
Элементы["АдресКартинки"+А].РазмерКартинки = РазмерКартинки.Пропорционально;
Номер = Номер+1;
СчетчикУдачных = СчетчикУдачных + 1;
Исключение
СчетчикУдачных = СчетчикУдачных + 1;
КонецПопытки;
КонецЦикла;
//Попытка
// УРЛ = "";
// ПоискНаСервере(УРЛ, СчетчикУдачных);
// Номер = 1;
// ФайлНаДиске = ПолучитьИмяВременногоФайла("jpg");
// КопироватьФайл(УРЛ,ФайлНаДиске);
// ФайлНаДиске = Новый Файл(ФайлНаДиске);
// ДвоичныеДанные = Новый ДвоичныеДанные(ФайлНаДиске.ПолноеИмя);
// ЭтаФорма["АдресКартинки"+6]= ПоместитьВоВременноеХранилище(ДвоичныеДанные);
// Элементы["АдресКартинки"+6].РазмерКартинки = РазмерКартинки.Пропорционально;
// Номер = Номер+1;
// СчетчикУдачных = СчетчикУдачных + 1;
//Исключение
// СчетчикУдачных = СчетчикУдачных + 1;
//КонецПопытки;
Но заполняется только пятый элемент формы, а если раскомментировать последний кусок кода, то заполняется только шестой.
Где я туплю?
|
|