День добрый!
На форму вставлена картинка.При открытии - в картинку загружается картинка из файлов jpg. Возможно ли, сделать так, чтобы загруженная картинка не искажалась?
Подскажите, пожалуйста.


Спасибо.

у картинка есть свойства

(1) В свойствах картинки: по центру.

там есть пропорционально

Попробуй после загрузки картинки установить нужный РежимРисования.

(3) Все равно - фигня получается.
(4) Пробую....

(4) СПАСИБО :))))))))))))
То, что надобно :)))))))))))))))))))

Еще один ма-а-а-а-аленький вопрос:
имя файла генерится (ну, типа, случайно). Иногда (непредсказуемо) выскакивает ошибка "Общая файловая ошибка при доступе к [имя файла]".
Почему?

(7) Имя короткое? Всяких левых символов в нём нет? Файл не может быть в это время открыт в другой программе?

Можешь хранить картинку в мокселе еще

(8) Имя файла = [цифра].jpg. Только берется полный путь =
   СтрИмяФайла = Строка(СлучайноеЧисло());
   РасшИмяФайла = ".jpg";
   КаталогФайла = "\\MANAGER2\1Cv7\DB\Shablons\Funny\";
   // собираем имя файла
   ИмяФайла = КаталогФайла + СтрИмяФайла + РасшИмяФайла;

(9) Здравствуйте, Великий Учитель! :)))) А как?

ну так, например:
http://rusfolder.com/36416216

хотя, если картинок много, то лучше в каталоге.

На счет закладок, вот еще пример с кнопочками (накопал тут свой старый):
http://rusfolder.com/36416263

(12) (13) Спасибо ОГРОМНОЕ!

Ёпрст!
Скажи, пожалуйста, как можно открыть форму так:
! пока не закрыта открытая форма - другие не доступны (ОткрытьМодально - ?)
2. сразу открыть форму в полноэкранном режиме.

(15)
1.да
2.либо штатно, так, например:
http://my1c-archive.narod.ru/knowhow/winonscr.html

либо формексом (смотреть в сторону объекта Окно и его методы)

(15) Формекс тебе в поддержку

+(15) Хотя формекс неадекватно ведет себя с Модальными окнами :)

(16) СПАСИБО!!!!!!!!!!!!

PS Вот если бы каждое "Спасибо" стоило 1 руб., ты стал бы миллионером :))))))))

(19) Загляни в его Личку, "Интересы", одари человека спасибо :)

(20) Я знаю. И буду стараться :)))))

У меня тут еще один ма-а-а-а-а-аленький вопрос :))))
Как сделать, чтобы открытая форма висела (к примеру) 1 минуту, потом закрывалась? Ну типа, пользователь минуту сидит и смотрит и ничего сделать не может :))))

дык счетчик воткни, хоть через обработку ожидания, хоть еще как

ну и Форма.Закрыть(0) потом

(23) Какой счетчик? Как его считать?
А (24) мне понятно :))))

(23) Я правильно понимаю:
при открытии формы - взять тек. время.
Как его проверять?

(26) _GetPerformanceCounter()

(26) да как угодно, самое простое - в обработке ожидания, лучше даже формековской - её не остановить модальным окошком, как штатную

тип того

Перем РасшФ;
Процедура Вася()
 Форма.Закрыть(0);
КонецПроцедуры
Процедура Послеоткрытия()
 РасшФ = СоздатьОбъект("Расширениеформы");
 РасшФ.УстановитьФорму(Форма);
 РасшФ.ОбработкаОжидания("Вася",1000);//время в милисекундах
КонецПроцедуры

(29) Бом, бом, бом.... (это я лбом поклоны тебе отбиваю)

(29) Форма.Закрыть(0) тоже лучше на формэксовскую заменить. Штатную модальное окно остановит

Блин...
Дурдом какой-то...

Моя обработка (кусок):

//********************************************************************************
Процедура глМаксимизироватьОкно() Экспорт
   // вызывать в конце процедуры "ПриОткрытии" из модуля формы
   Форма.ОбработкаОжидания("",0);
   WSHShell = СоздатьОбъект("WScript.Shell");
   WSHShell.SendKeys("%");
   WSHShell.SendKeys("{LEFT}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{ENTER}");
     
   //WSHShell = СоздатьОбъект("WScript.Shell");
   //WSHShell.SendKeys("%");
   //WSHShell.SendKeys("{LEFT}");
   //WSHShell.SendKeys("{DOWN 5}");
   //WSHShell.SendKeys("{ENTER}");
КонецПроцедуры

//********************************************************************************
Процедура ПриОткрытии()

   Счетчик = 1;
   Предел = 32;
   
   Форма.Заголовок("Special for you");

   // сгенерили случайное число
   КакоеТоЧисло=_GetPerformanceCounter()*_GetPerformanceCounter();
   
   // определяем имя файла
   СтрИмяФайла = Строка(СлучайноеЧисло());
   РасшИмяФайла = ".jpg";
   КаталогФайла = "\\MANAGER2\1Cv7\DB\Shablons\Funny\";
   // собираем имя файла
   ИмяФайла = КаталогФайла + СтрИмяФайла + РасшИмяФайла;

   Картинка.Загрузить(ИмяФайла);
   Картинка.РежимРисования(2);
   
   глМаксимизироватьОкно();

КонецПроцедуры // ПриОткрытии

//********************************************************************************
Процедура ОбновитьКартинку()
   
   // определяем имя файла
   СтрИмяФайла = Строка(Счетчик);
   РасшИмяФайла = ".jpg";
   КаталогФайла = "\\MANAGER2\1Cv7\DB\Shablons\Funny\";
   // собираем имя файла
   ИмяФайла = КаталогФайла + СтрИмяФайла + РасшИмяФайла;

   Картинка.Загрузить(ИмяФайла);
   Картинка.РежимРисования(2);
   //Форма.ЗаголовокФормы.Заголовок(ИмяФайла);    
   Счетчик = Счетчик + 1;
   
КонецПроцедуры // ОбновитьКартинку

//********************************************************************************
Процедура Назад()
       
   Счетчик = Счетчик - 1;
   СтрИмяФайла = Строка(Счетчик);
   РасшИмяФайла = ".jpg";
   КаталогФайла = "\\MANAGER2\1Cv7\DB\Shablons\Funny\";
   // собираем имя файла
   ИмяФайла = КаталогФайла + СтрИмяФайла + РасшИмяФайла;

   Картинка.Загрузить(ИмяФайла);
   Картинка.РежимРисования(2);
   //Форма.ЗаголовокФормы.Заголовок(ИмяФайла);    

КонецПроцедуры // Назад

Процедура Вася()
 Форма.Закрыть(0);
КонецПроцедуры

Процедура Послеоткрытия()
 РасшФ = СоздатьОбъект("Расширениеформы");
 РасшФ.УстановитьФорму(Форма);
 РасшФ.ОбработкаОжидания("Вася",1000);//время в милисекундах
 //РасшФ.ОбработкаОжидания("Вася",60000);//время в милисекундах
   //глМаксимизироватьОкно();

КонецПроцедуры

Моя обработка вызывается в глобальнике:

   Если (глПользователь.Код = "Администратор") Тогда
       ОткрытьФормуМодально("Отчет",,КаталогИБ() + "\Dopolnitelno\МаленькийПрикол.ert");
   КонецЕсли;
   
КонецПроцедуры  //ПриНачалеРаботыСистемы()


Так вот - сразу при старте системы окно не разворачивается во весь экран. Потом если вызвать - разворачивается.
wscript - из командной строки вызывала. Выводит окно с параметрами сервера сценариев винды.

посмотри, как сделано тут:

http://infostart.ru/public/63653/

(33) Спасибо!

а так, модальность..всё портит, тут через WScript окно никогда не развернётся, только формексом

(35) Ты будешь смеяться, но твои обработки обе не развернулись во весь экран :(. Ничего не меняла - запустила и усе.

+(35) Сделала в глобальнике ОткрытьФорму (вместо Модально). Все равно фигня....
Пойду, блин, утоплюсь в море....

+(37) А-а-а-а-а! Не пойду топиться..... Получилось!!!!!!
Ё! Спасибо тебе ОГРОМНОЕ!!!!!!

чего, заставка с мураьями заработала ?
поставь там время 0 при старте

(39) Прикольная такая штука :)))))

(39) А можно на время, пока работает обработка (у меня получилось - при старте 1С выводится мой бантик и висит скока надо) убрать курсор мыши?

можно

(42) А как? Скажи, пожалуйста :)))

смотри это:
http://infostart.ru/public/22442/

Грубо, через формекс устанавливаешь свой курсор

Спасибо!

УстановитьКурсор(<?>)
Синтаксис:
УстановитьКурсор(<ИмяКурсора>)
Назначение:
Перехват курсора для текущего объекта.
Параметры:
<ИмяКурсора> - Если в качестве параметра передается строковое значение, то оно воспринимается
как путь к файлу с курсором. Если ни чего не передавать, то для текущего объекта перехват курсора
отключается. Если передается числовое значение, то устанавливается курсор из системы.

ну и соответственно, имей файлик с пустым курсором - в общем, в поделке поищи по УстановитьКурсор

(44) Класс!!!!!
Спасибо!