powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Прошу помощи. Вывод изображения в Форме.
3 сообщений из 3, страница 1 из 1
Прошу помощи. Вывод изображения в Форме.
    #35413764
Romario_rus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Вот вариант, при котором у меня все вроде нормально работало:
Существует форма в которой располагаются объекты List2 (RowSource поле файла user.dbf) и Image1 (user.foto (тип Blob))

-------------В свойстве формы init прописано:
IF !EMPTY(user.foto)
Thisform.Image1.PictureVal = user.foto
Thisform.Image1.Visible = .T.
ELSE
Thisform.Image1.PictureVal = ""
Thisform.Image1.Visible= .F.
ENDIF

--------------В свойтве List2.Click:
DODEFAULT()
IF !EMPTY(user.foto)
Thisform.Image1.PictureVal = user.foto
Thisform.Image1.Visible = .T.
ELSE
Thisform.Image1.PictureVal = ""
Thisform.Image1.Visible= .F.
ENDIF
Thisform.Refresh()
--------------------------------------------------------------------
ТЕПЕРЬ ВОТ КАКАЯ ПРОБЛЕМА: в предыдущем варианте использовалась таблица, а теперь мне надо в List2 использовать запрос к этой таблице otbatov.sqp
Попробовал так :
-------------------- 1)Form1.List2.Click:
DODEFAULT()
IF !EMPTY(otbatov.foto )
Thisform.Image1.PictureVal = otbatov.foto
Thisform.Image1.Visible = .T.
ELSE
Thisform.Image1.PictureVal = ""
Thisform.Image1.Visible= .F.
ENDIF
Thisform.Refresh()
--------------------- 2)Form1.init:
IF !EMPTY(otbatov.foto )
Thisform.Image1.PictureVal = otbatov.foto
Thisform.Image1.Visible = .T.
ELSE
Thisform.Image1.PictureVal = ""
Thisform.Image1.Visible= .F.
ENDIF


При этом выбор записей происходит отлично, а ВЫВОД ИЗОБРАЖЕНИЯ НЕ ПРОИСХОДИТ.
Блин, может кто подскажет как исправить код в свойствах ...

Заранее ОГРОМНОЕ спасибо за помощь, Роман.
...
Рейтинг: 0 / 0
Прошу помощи. Вывод изображения в Форме.
    #35413798
Romario_rus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
О, Все работает.
Причина, пока не знаю в чем была.
Сразу пишу, чтобы закрыть тему и не занимать Ваше время.

Огромное спасибо.
...
Рейтинг: 0 / 0
Прошу помощи. Вывод изображения в Форме.
    #35413800
Romario_rus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Кстати, уточню, что код верен.
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Прошу помощи. Вывод изображения в Форме.
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]