PureRESIZE library : gadget automatic resizing and more

[c4s]

Just to let you know: I think there is a bug in the 4.50 library because with PB 4.50 Beta 4 and unicode & threadsafe enabled I get several IMA's with PureRESIZE_SetGadgetResize(). See your example code for PureRESIZE_SetGadgetResize from the help file. At line 30 it crashes.
Maybe you just have to recompile it?

By the way: WindowWidth() at 45 needs a parameter.

[gnozal]

I have have just recompiled the library for PB 4.50 beta 4

[c4s]

Thanks. Everything works fine again!

[Ramihyn_]

Both links to the 4.4 version of PureRESIZE seem to be dead?

Linked from your webpage:
http://gnozal.ucoz.com/PureRESIZE_440.zip

Link from this thread:
http://freenet-homepage.de/gnozal/PureRESIZE_440.zip

Did i miss a posting somewhere?

[gnozal]

Both links to the 4.4 version of PureRESIZE seem to be dead?

The http://freenet-homepage.de/gnozal/ links are dead.
The http://gnozal.ucoz.com/ links should work.

[Ramihyn_]

Download works again, thanks.

[Grafix]

I have a problem with "Unicode executable" options. When I changed windows size, CPU usage is increasing to 90% and application freezes (example files too). Anyone confirm this error?
---
I used jaPBe and compile with it. Now works fine. Thank you gnozal for this great editor

[IdeasVacuum]

PB4.51x86 WinXP 32bit SP3

I'm seeing some graphical corruption on the text of Frame3D Gadgets (if no text, no problem), only when using PureResize:

Code: Select all

Enumeration
#WinMain
#KeyEnter
#TabPanel
#FrameFiles
#ListFiles
EndEnumeration

Procedure ShowWin()
;-----------------

       If OpenWindow(#WinMain, 0, 0, 706, 325, "ResizeTest",#PB_Window_SystemMenu|#PB_Window_SizeGadget|#PB_Window_MinimizeGadget|#PB_Window_MaximizeGadget|#PB_Window_TitleBar|#PB_Window_ScreenCentered)

               AddKeyboardShortcut(#WinMain,#PB_Shortcut_Escape,#KeyEnter)

                       PanelGadget(#TabPanel, 5, 5, 697, 315)

                     ;TAB 0
                     ;---------------------------------------------------------------------------
                     AddGadgetItem(#TabPanel, -1, "Tab 0")

                     Frame3DGadget(#FrameFiles,      5,  30, 680, 250, "Frame")
                    ListViewGadget(#ListFiles,      15,  80, 660, 190, #PB_ListView_MultiSelect)

                   CloseGadgetList()

                     ;Window Size
                     PureRESIZE_SetWindowMinimumSize(#WinMain, 706, 325)

                     ;Gadget Resizing
                     PureRESIZE_SetGadgetResize(#TabPanel, 1, 1, 1, 1)
                     PureRESIZE_SetGadgetResize(#FrameFiles, 1, 1, 1, 1)
                     PureRESIZE_SetGadgetResize(#ListFiles, 1, 1, 1, 1)

        EndIf

EndProcedure

Procedure WaitForUser()
;----------------------
      Repeat
            iEvent = WaitWindowEvent(1)
      Until iEvent = #PB_Event_CloseWindow

EndProcedure

ShowWin()
WaitForUser()

Sometimes when the app is launched, always when the app is re-sized/maximized, some sort of image gets 'attached' to the frame text. Can anyone reproduce this issue?

[IdeasVacuum]

....ah, perhaps it was a known issue? Same sample code seems to be fine in PB4.60

[gnozal]

....ah, perhaps it was a known issue? Same sample code seems to be fine in PB4.60

The library code hasn't changed between the PB4.5x and the PB4.6x version (only recompiled).
However, I can't reproduce the problem (using Win XP / 'classic' gui) : graphic card / themes / OS / whatever issue ?
But I do remember some graphical glitches with the Frame3DGadget in the past, that needed some redraw after a resize event.

[Deluxe0321]

Can't compile any code with Unicode & Threadsafe @last Version.
I tried to reinstall purebasic, nothing changed. Same thing all the Time: Polink Error!
File: PureResize_Test_4.pb
Compiler: x86

thx,
Deluxe

[IdeasVacuum]

Deluxe0321, have entered UserLibUnicodeThreadSafe in Compiler Options/Library Subsystem?

[Deluxe0321]

Nope, but now! Sorry!

[jassing]

Gadgets creep slightly...

Code: Select all

;{- Enumerations / DataSections
;{ Windows
Enumeration
  #Window_0
EndEnumeration
;}
;{ Gadgets
Enumeration
  #ListIcon_0
  #Button_1
  #CheckBox_2
EndEnumeration
;}
Define.l Event, EventWindow, EventGadget, EventType, EventMenu
;}
Procedure OpenWindow_Window_0()
  If OpenWindow(#Window_0, 450, 200, 636, 294, "Window_0", #PB_Window_SystemMenu|#PB_Window_SizeGadget|#PB_Window_MinimizeGadget|#PB_Window_TitleBar)
    ListIconGadget(#ListIcon_0, 5, 5, 625, 240, "Gadget_0", 100, #PB_ListIcon_AlwaysShowSelection|#PB_ListIcon_GridLines|#PB_ListIcon_FullRowSelect)
    SendMessage_(GadgetID(#ListIcon_0), #LVM_SETCOLUMNWIDTH, 0, #LVSCW_AUTOSIZE_USEHEADER)
    ButtonGadget(#Button_1, 15, 255, 125, 25, "Gadget_1")
    CheckBoxGadget(#CheckBox_2, 515, 250, 115, 15, "Gadget_2")
    ; Gadget Resizing
    PureRESIZE_SetGadgetResize(#ListIcon_0, 1, 1, 0, 0)
    PureRESIZE_SetGadgetProportionalResize(#ListIcon_0, 1, 1, 0, 0)
    PureRESIZE_SetGadgetResize(#Button_1, 1, 0, 0, 1)
    PureRESIZE_SetGadgetResize(#CheckBox_2, 0, 0, 1, 1)
  EndIf
EndProcedure

OpenWindow_Window_0()

;{- Event loop
Repeat
  Event = WaitWindowEvent(10)
  Select Event
    ; ///////////////////
    Case #PB_Event_Gadget
      EventGadget = EventGadget()
      EventType = EventType()
      If EventGadget = #ListIcon_0
      ElseIf EventGadget = #Button_1
      ElseIf EventGadget = #CheckBox_2
      EndIf
    ; ////////////////////////
    Case #PB_Event_CloseWindow
      EventWindow = EventWindow()
      If EventWindow = #Window_0
        CloseWindow(#Window_0)
        Break
      EndIf
  EndSelect
ForEver
;
;}

If you resize the window -- the button & checkbox will slowly creep up to (resize window smaller) or away from (resize window larger) the listicongadget...

[gnozal]

... If you resize the window -- the button & checkbox will slowly creep up to (resize window smaller) or away from (resize window larger) the listicongadget...

I cannot test the code right now, but I would say it's because of PureRESIZE_SetGadgetProportionalResize(). When you work with integers, some divisions do not have an integer result.