Welcome to the SRP Forum! Please refer to the SRP Forum FAQ post if you have any questions regarding how the forum works.
Splitter issue
Resizing my splitter has an issue with the width changing.
Could well be my code, but I have two versions of my application with different SRP controls, and one works and the other not.
The one that works is 4.0.3.RC25
The one that fails is 4.1.0.RC2
What is the proper latest version, web site says 4.0.3, so presume this is correct, but just checking.
Colin
Could well be my code, but I have two versions of my application with different SRP controls, and one works and the other not.
The one that works is 4.0.3.RC25
The one that fails is 4.1.0.RC2
What is the proper latest version, web site says 4.0.3, so presume this is correct, but just checking.
Colin
Comments
I will reinstate V4.0.3 and see if that resolves.
The issue is as I resize the form vertically, the splitter gets narrower by 1 pixel until invisible.
It still could well be in my code, I have copied the code from version A to B but B still exhibits the issue... but it could be elsewhere still, so I am not pointing to the SRP control just yet.
The issue is definitely relate to the AutoSize height check box, even though I am only changing the left/right size properties.
Resizing the form vertically with AutoSize height ON, causes the control to migrate right in my code as it seems to get a mismatch in the X position somehow.
I also added code
If SplitSize<3><5 THEN SplitSize<3>=5
To ensure the splitter remains visible.
In addition if I try to manually set the Size<4> property to the window size<4> it also makes things move.
Very strange indeed.
I am still investigating.
Colin
Plus it moans about my licence, so I reinstated 4.0.3 and all is well, except the splitter issue remains.
I will look to a workaround in the meantime.
SIZE:
IF NOT(ASSIGNED(WinSize)) THEN WinSize=""
NewSize=Get_Property(@WINDOW,"SIZE")
IF NewSize<3>=WinSize<3> and NewSize<4>=WinSize<4> THEN
WinSize =Get_Property(@WINDOW,"SIZE")
END ELSE
WinSize =Get_Property(@WINDOW,"SIZE")
SplitSize=Get_Property(@WINDOW:".SPLITTER","SIZE")
FromSize =Get_Property(@WINDOW:".FROM_TABLE","SIZE")
CurrSize =Get_Property(CurrCtrl,"SIZE")
IF SplitSize<3><5 THEN SplitSize<3>=5
Call Set_Property(@WINDOW:".SPLITTER","SIZE",SplitSize)
FromSize<3>=SplitSize<1>-10
* Call Set_Property(@WINDOW:".FROM_TABLE","SIZE",FromSize)
CurrSize<1>=SplitSize<1>+10
CurrSize<3>=WinSize<3>-SplitSize<1>-35
Call Set_Property(CurrCtrl,"SIZE",CurrSize)
Size=GET_PROPERTY(@WINDOW:".CURR_LABEL","SIZE")
Size<1>=SplitSize<1>+10
Call Set_Property(@WINDOW:".CURR_LABEL","SIZE",Size)
Size=GET_PROPERTY(@WINDOW:".CURR_PROJECT","SIZE")
Size<1>=SplitSize<1>+100
Call Set_Property(@WINDOW:".CURR_PROJECT","SIZE",Size)
End
RETURN
Turned off the OI Border, and use the SRP control border property and all works fine with AutoSize height ON.
Thanks Mark