|
v7: Вывод картинок в прайсе | ☑ | ||
---|---|---|---|---|
0
Азат
09.11.11
✎
17:24
|
Собственно, суть: в справочнике номенклатуры есть реквизит "Файл картинки" - Строка (200)
туда юзеры навыбирали картинок имена файлов, каталогов и русские и с пробелами и тп теперь хочу картинку вывести на прайс вешаю на таблицу объект "картинка", метод пишу ВывестиКартинку(Таб.ЭтотОбъект, ИмяФайла) В модуле: Процедура ВывестиКартинку(Куда, Файл) Куда.Загрузить(Файл); КонецПроцедуры постоянно ругается, что ошибка доступа к файлу ... Как можно побороть? |
|||
1
ДенисЧ
09.11.11
✎
17:25
|
А что у нас с именем файла?
|
|||
2
filh
09.11.11
✎
17:27
|
СокрЛП и ФС.СуществуетФайл
|
|||
3
Азат
09.11.11
✎
17:29
|
(1) ну там бывает всякая дрянь типа D:\Images\Китай\Игрушки новые\И098.jpg
(2) ФС.СуществуетФайл() = 1 стабильно, проверил |
|||
4
Ёпрст
09.11.11
✎
17:30
|
ЭтотОбъект ???
|
|||
5
Азат
09.11.11
✎
17:34
|
(4) а как? не помню, если честно, это нашел в яндехе
|
|||
6
filh
09.11.11
✎
17:36
|
ТекущийОбъект
|
|||
7
Азат
09.11.11
✎
17:39
|
(6) а, ну да, канеш
|
|||
8
filh
09.11.11
✎
17:44
|
Все же попробуй СокрЛП:
ВывестиКартинку(Таб.ТекущийОбъект, СокрЛП(ИмяФайла)) |
|||
9
Азат
09.11.11
✎
18:40
|
(8) это было первым, что я попробовал
|
|||
10
Азат
10.11.11
✎
07:35
|
Утренний ап! По совету Абрахамса попробовал с короткими именами, ошибка теперь такая:
Общая файловая ошибка при доступе к D:\1cbases\2008\Images\8311~1\117~1.JPG Куда.Загрузить(СокрЛП(ИмяФайла)); |
|||
11
Азат
10.11.11
✎
07:49
|
+ (10) сделал себя владельцем папки, права добавил по максимуму...
|
|||
12
1Сергей
10.11.11
✎
08:17
|
(10) а оно жипеги разве понимает?
|
|||
13
Азат
10.11.11
✎
09:24
|
(12) с бмп та же колбаса... картинки разные есть...
|
|||
14
KUBIK
10.11.11
✎
09:26
|
(10) Общая файловая ошибка при доступе = это значит у тебя нет доступа к картинке.
Скопируй путь в КС и попробуй открыть картинку |
|||
15
Азат
10.11.11
✎
09:29
|
(14) попробовал, все норм
|
|||
16
KUBIK
10.11.11
✎
09:34
|
(15) Посмотри в почте, рабочий отчет, 2 года назад делал.
|
|||
17
KUBIK
10.11.11
✎
09:37
|
+(16) токо он для самописки, подрихтуй и проверь
|
|||
18
Азат
10.11.11
✎
10:07
|
(16) та же х*ня, мать ее... всю голову сломал
|
|||
19
Ёпрст
10.11.11
✎
11:28
|
(18) пр1вер0 на bmp фай2е - будет работать
|
|||
20
Азат
10.11.11
✎
11:58
|
(19) проверил, не работает.
+ пробовал ShortPath - тоже не взлетело... |
|||
21
Азат
10.11.11
✎
11:58
|
и на png попробовал, тоже не летает..
+ перед выводом картинки пробовал КомандаСистемы - открывается, все ок |
|||
22
1Сергей
10.11.11
✎
14:26
|
(21) П-к0ж_ к*д
|
|||
23
Азат
10.11.11
✎
14:57
|
(22) код см в (0)
Все нафиг, тему закрываем, решить не удалось, в итоге решил сразу выгрузкой в Exсеl |
|||
24
1Сергей
10.11.11
✎
15:06
|
у меня так работает:
Функция Рисунок (Куда,Знач Откуда) Экспорт Если Лев(Откуда,1)="." тогда Откуда=КаталогИБ()+Сред(Откуда,2); КонецЕсли; Попытка Если (ПустоеЗначение(СокрЛП(Откуда))=1) тогда Куда.УстановитьКартинку(СоздатьОбъект("Картинка")); ИначеЕсли (ФС.СуществуетФайл(Откуда)=0) тогда Куда.УстановитьКартинку(СоздатьОбъект("Картинка")); Иначе Куда.Загрузить(Откуда); КонецЕсли; Исключение КонецПопытки; КонецФункции |
|||
25
Азат
10.11.11
✎
15:09
|
дык код такой же практически кроме УстановитьКартинку)
|
|||
26
Азат
10.11.11
✎
15:09
|
+ (25) и так день убил на эту дрянь, достало
|
|||
27
1Сергей
10.11.11
✎
15:11
|
(24) + а в свойствах картинки:
Рисунок(Таб.ТекущийОбъект,"logo.bmp") |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |