purebasic.info

PureBasic forum
Текущее время: Чт июн 04, 2020 5:21 pm

Часовой пояс: UTC + 3 часа




Начать новую тему Ответить на тему  [ Сообщений: 4 ] 
Автор Сообщение
 Заголовок сообщения: ListIconGadget и #PB_ListIcon_LargeIcon
СообщениеДобавлено: Пт мар 13, 2020 6:49 pm 
Не в сети
профессор

Зарегистрирован: Пт фев 20, 2009 12:57 pm
Сообщений: 1828
Откуда: Алматы
Благодарил (а): 19 раз.
Поблагодарили: 51 раз.
Пункты репутации: 5
тут какая-то фигня у меня происходит. пытаюсь в ListIconGadget вывести кучу картинок. первые три строчки как полагается. четвертая выкоблучивается. что я делаю не так?

Код:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
Enumeration
  #Window
  #METAEDListIcon
EndEnumeration
 
TylesMetaCount = 360
Global Dim MapIcons.l(TylesMetaCount)
 
For i = 0 To TylesMetaCount - 1
  MapIcons(i) = CreateImage(#PB_Any, 32, 32, 32)
  If StartDrawing(ImageOutput(MapIcons(i)))
    DrawText(5, 5, Str(i))
    StopDrawing()
  EndIf
Next
 
If OpenWindow(#Window, 100, 200, 1015, 600, "", #PB_Window_SystemMenu | #PB_Window_MinimizeGadget | #PB_Window_ScreenCentered)
 
  x = 10
  y = 10  
  ListIconGadget(#METAEDListIcon, x, y, 685, 280, "", 685, #PB_ListIcon_GridLines)    
    SetGadgetAttribute(#METAEDListIcon, #PB_ListIcon_DisplayMode, #PB_ListIcon_LargeIcon)
    For i = 0 To TylesMetaCount - 1
      AddGadgetItem(#METAEDListIcon, -1, Str(i), ImageID(MapIcons(i)))
    Next
   
   Repeat
    Event = WaitWindowEvent()
   
    Select Event
      Case #PB_Event_Gadget
       
      Case #PB_Event_CloseWindow
        Quit = 1
       
    EndSelect
 
  Until Quit = 1
 
EndIf
 



Изображение


Вернуться наверх
 Профиль  
 
 Заголовок сообщения: Re: ListIconGadget и #PB_ListIcon_LargeIcon
СообщениеДобавлено: Пт мар 13, 2020 6:52 pm 
Не в сети
профессор

Зарегистрирован: Пт фев 20, 2009 12:57 pm
Сообщений: 1828
Откуда: Алматы
Благодарил (а): 19 раз.
Поблагодарили: 51 раз.
Пункты репутации: 5
только уменьшив размер листикона - они встали как полагается. но все равно это бред какой-то.


Вернуться наверх
 Профиль  
 
 Заголовок сообщения: Re: ListIconGadget и #PB_ListIcon_LargeIcon
СообщениеДобавлено: Пн май 04, 2020 2:47 pm 
Не в сети
профессор

Зарегистрирован: Чт сен 22, 2011 6:21 pm
Сообщений: 302
Благодарил (а): 47 раз.
Поблагодарили: 30 раз.
Пункты репутации: 0
Эксперементально выяснил - ширина гаджета должна быть кратна 10.

адд: нет, только на некоторых "магических" размерах сбивается, действительно дичь.


Вернуться наверх
 Профиль  
 
 Заголовок сообщения: Re: ListIconGadget и #PB_ListIcon_LargeIcon
СообщениеДобавлено: Вт май 05, 2020 7:38 am 
Не в сети
профессор

Зарегистрирован: Вт май 13, 2014 4:12 am
Сообщений: 950
Благодарил (а): 103 раз.
Поблагодарили: 32 раз.
Пункты репутации: 5
в хрюнделе это Г. ещё интересней выделывается, если элементов больше 100, то начинается бардак, конкретику не помню
пришлось свой на канвасе писать, но там вылезло ограничение скрола в ScrollAreaGadget(), и это пришлось ограничивать, пришлось следить за этим размером и выводить порциями


Вернуться наверх
 Профиль  
 
Показать сообщения за:  Сортировать по:  
Начать новую тему Ответить на тему  [ Сообщений: 4 ] 

Часовой пояс: UTC + 3 часа


Кто сейчас на форуме

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 2


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
Создано на основе phpBB® Forum Software © phpBB Group (блог о phpBB)
Сборка создана CMSart Studio
Русская поддержка phpBB