Page 1 of 1
splitter gadget in form editor
Posted: Tue Sep 24, 2013 3:56 am
by julesd
How do I go about using the splitter gadget in PB 5.20 using the form editor?
I have created a explorer tree gadget and then a editor gadget then tried to apply the splitter
with no results.
Re: splitter gadget in form editor
Posted: Fri Sep 27, 2013 3:50 pm
by julesd
I guess no one knows this one.
Re: splitter gadget in form editor
Posted: Fri Sep 27, 2013 4:13 pm
by Polo
When creating the splitter it asks to select the 2 gadgets.
What exactly is not working?
Re: splitter gadget in form editor
Posted: Sat Sep 28, 2013 5:59 am
by julesd
I then select the 2 object and still nothing.
Re: splitter gadget in form editor
Posted: Sun Sep 29, 2013 5:26 am
by VB6_to_PBx
julesd wrote:I then select the 2 object and still nothing.
1-Place or Draw 2 Gadgets of your choice on the Window
2-Select the SplitterGadget ,
then Select 1 of the 2 previous Gadget you placed on the Window
Select the 2nd Gadget
3-Click the Start Drawing button on the SplitterGadget Menu
4-Start drawing the SplitterGadget dimensions on the Window around your 2 previous Gadgets with your Mouse
5-Release your Mouse , and the SplitterGadget automatically joins the 2 Gadgets you chose together inside the Splitter Gadget
example of what it should look like :
Code: Select all
Enumeration FormWindow
#Window_1
EndEnumeration
Enumeration FormGadget
#Editor_0
#ExplorerTree_0
#Splitter_0
EndEnumeration
Procedure OpenWindow_1(x = 0, y = 0, width = 506, height = 590)
OpenWindow(#Window_1, x, y, width, height, "", #PB_Window_SystemMenu | #PB_Window_MinimizeGadget | #PB_Window_MaximizeGadget | #PB_Window_SizeGadget | #PB_Window_ScreenCentered)
SetWindowColor(#Window_1, RGB(192,192,192))
EditorGadget(#Editor_0, 20, 5, 471, 288)
ExplorerTreeGadget(#ExplorerTree_0, 20, 302, 470, 279, "")
SplitterGadget(#Splitter_0, 20, 5, 471, 576, #Editor_0, #ExplorerTree_0, #PB_Splitter_Separator)
SetGadgetState(#Splitter_0, 288)
EndProcedure
Procedure Window_1_Events(event)
Select event
Case #PB_Event_CloseWindow
ProcedureReturn #False
Case #PB_Event_Menu
Select EventMenu()
EndSelect
Case #PB_Event_Gadget
Select EventGadget()
EndSelect
EndSelect
ProcedureReturn #True
EndProcedure
OpenWindow_1()
Repeat
event = WaitWindowEvent()
Until Window_1_Events(event) = #False
End
Re: splitter gadget in form editor
Posted: Mon Sep 30, 2013 12:45 am
by julesd
thanks, it's working.