Hello,
I have a form with a splitcontainer with 2 splitpanel:
- splitpanelFilter
- splitpanelMain
/* SplitContainerMain */
/* */
THIS-OBJECT:SplitContainerMain:AutoScroll = TRUE.
THIS-OBJECT:SplitContainerMain:Controls:Add(THIS-OBJECT:splitPanelFilter).
THIS-OBJECT:SplitContainerMain:Controls:Add(THIS-OBJECT:splitPanelMain).
THIS-OBJECT:SplitContainerMain:Dock = System.Windows.Forms.DockStyle:Fill.
THIS-OBJECT:SplitContainerMain:Location = NEW System.Drawing.Point(0, 0).
THIS-OBJECT:SplitContainerMain:Name = "SplitContainerMain".
THIS-OBJECT:SplitContainerMain:Orientation = System.Windows.Forms.Orientation:Horizontal.
/* */
/* */
/* */
THIS-OBJECT:SplitContainerMain:RootElement:MinSize = NEW System.Drawing.Size(25, 25).
THIS-OBJECT:SplitContainerMain:Size = NEW System.Drawing.Size(644, 480).
THIS-OBJECT:SplitContainerMain:SplitterWidth = 2.
THIS-OBJECT:SplitContainerMain:TabIndex = 1.
THIS-OBJECT:SplitContainerMain:TabStop = FALSE.
THIS-OBJECT:SplitContainerMain:ThemeName = "Crystal".
/* */
/* splitPanelFilter */
/* */
THIS-OBJECT:splitPanelFilter:Controls:Add(THIS-OBJECT:BtnFilterDown).
THIS-OBJECT:splitPanelFilter:Controls:Add(THIS-OBJECT:BtnFilterDefault).
THIS-OBJECT:splitPanelFilter:Dock = System.Windows.Forms.DockStyle:Top.
THIS-OBJECT:splitPanelFilter:Location = NEW System.Drawing.Point(0, 0).
THIS-OBJECT:splitPanelFilter:Name = "splitPanelFilter".
/* */
/* */
/* */
THIS-OBJECT:splitPanelFilter:RootElement:MinSize = NEW System.Drawing.Size(25, 25).
THIS-OBJECT:splitPanelFilter:Size = NEW System.Drawing.Size(644, 28).
THIS-OBJECT:splitPanelFilter:SizeInfo:AutoSizeScale = NEW System.Drawing.SizeF(Progress.Util.CastUtil:ToSingle(0), Progress.Util.CastUtil:ToSingle(-0.4393305)).
THIS-OBJECT:splitPanelFilter:SizeInfo:SplitterCorrection = NEW System.Drawing.Size(0, -192).
THIS-OBJECT:splitPanelFilter:TabIndex = 0.
THIS-OBJECT:splitPanelFilter:TabStop = FALSE.
THIS-OBJECT:splitPanelFilter:ThemeName = "Crystal".
/* */
/* BtnFilterDefault */
/* */
THIS-OBJECT:BtnFilterDefault:Image = CAST(resources:GetObject("BtnFilterDefault.Image"), System.Drawing.Image).
THIS-OBJECT:BtnFilterDefault:Location = NEW System.Drawing.Point(3, 3).
THIS-OBJECT:BtnFilterDefault:Name = "BtnFilterDefault".
THIS-OBJECT:BtnFilterDefault:Size = NEW System.Drawing.Size(73, 22).
THIS-OBJECT:BtnFilterDefault:TabIndex = 0.
THIS-OBJECT:BtnFilterDefault:Text = "Filtres".
THIS-OBJECT:BtnFilterDefault:TextAlignment = System.Drawing.ContentAlignment:MiddleRight.
THIS-OBJECT:BtnFilterDefault:ThemeName = "Crystal".
THIS-OBJECT:BtnFilterDefault:Click:Subscribe(THIS-OBJECT:BtnFilterDefault_Click).
/* */
/* splitPanelMain */
/* */
THIS-OBJECT:splitPanelMain:Location = NEW System.Drawing.Point(0, 31).
THIS-OBJECT:splitPanelMain:Name = "splitPanelMain".
/* */
/* */
/* */
THIS-OBJECT:splitPanelMain:RootElement:MinSize = NEW System.Drawing.Size(25, 25).
THIS-OBJECT:splitPanelMain:Size = NEW System.Drawing.Size(644, 450).
THIS-OBJECT:splitPanelMain:SizeInfo:AutoSizeScale = NEW System.Drawing.SizeF(Progress.Util.CastUtil:ToSingle(0), Progress.Util.CastUtil:ToSingle(0.4393305)).
THIS-OBJECT:splitPanelMain:SizeInfo:SplitterCorrection = NEW System.Drawing.Size(0, 192).
THIS-OBJECT:splitPanelMain:TabIndex = 1.
THIS-OBJECT:splitPanelMain:TabStop = FALSE.
THIS-OBJECT:splitPanelMain:ThemeName = "Crystal".
I want to dynamically manage the size of the Split Panels on the click of a button.
I have a variable iHeight= 30.
If I click I increase the height of the SplitPanelFilter by (28 + iHeigth) and I decrease the height of the SplitPanelMain (450 - iHeigth)
And conversely when I click again on the button ==> default position
THIS-OBJECT:SplitPanelMain:Height= 450 - iTaille.
THIS-OBJECT:SplitPanelFilter:Height= 28 + iTaille.
but nothing ....
Are you a solution ??
Thank you
Laurent TROMBINO