powered by simpleCommunicator - 2.0.48     © 2025 Programmizd 02
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / DW тип Label
1 сообщений из 1, страница 1 из 1
DW тип Label
    #33175284
Pasha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Добрый день.

Все потыаюсь решить вопрос, с отображением списка людей с фотографией из БД.

Один из вариантов это создание DW типа Label. вроде все нормально, но одна проблема
я в рантайме создаю обьект picture в данном DW.У меня на странице размещается 5 карточек сотрудника. До пустим я выбираю 10 людей, выбирается 10 карточек создается 10 обектов picture, но реально вставляются 5 картинок, т.е. повторяются 2 раза. Хотя на диске сохраняются во временный файл 10 разных фотографий.

Если я меняю свойство у DW Labels Down c 5 на 10, то из -за нехватки места отображаются только 5 карточек а остальные становятся не видымимы.
Как решить данный вопрос.
Пример кода следующий:
il_count = dw_report.Retrieve(ll_group, ll_person[])
For ll_row = 1 To il_count Step 1
ll_per = dw_report.GetItemNumber(ll_row, 'person_id')
SetPointer(HourGlass!)
SetNull(lblob_photo)

SELECTBLOB "PERSON_PHOTO"."PHOTO_IMAGE"
INTO :lblob_photo
FROM "PERSON_PHOTO"
WHERE "PERSON_PHOTO"."PERSON_ID" = :ll_per
USING SQLCA;

If not isNull(lblob_photo) Then
ls_file_name = 'image_' + string(ll_row) + '.jpg'
If FileExists(ls_file_name) Then FileDelete(ls_file_name)
// Get the file length, and open the file
далее код формирования файла с картинкой
ls_modify = 'create bitmap(band=detail filename="'+ls_file_name+'" x="2156" y="'+ string((ll_row - 1)*2000+312) + '" height="1439" width="1120" border="0" name=p_'+string(ll_row)+' visible="1" )'
ls_result = dw_report.Modify(ls_modify)
FileClose ( li_FileNum )
End If
Next

PB 9.0.2 build 7509
...
Рейтинг: 0 / 0
1 сообщений из 1, страница 1 из 1
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / DW тип Label
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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