[WB25] Save and Restore Table Column Order April 28, 2020 11:25AM |
Registered: 4 years ago Posts: 5 |
Re: Save and Restore Table Column Order April 28, 2020 01:12PM |
Admin Registered: 5 years ago Posts: 500 |
PROCEDURE ResetColumnConfiguration() TC,TX, TW, TD are int PopName is string = ControlPopupOwner() TN is string TC = TableCount(PopName,toColumn) FOR TX = 1 TO TC TN = TableEnumColumn(PopName,TX) TableMoveColumn(PopName,TN,TX) IF {PopName+"."+TN,indControl}..InitialVisible = False THEN {PopName+"."+TN,indControl}..Visible = False ELSE {PopName+"."+TN,indControl}..Visible = True END END FOR TX = 1 TO TC TN = TableEnumColumn(PopName,TX) {PopName+"."+TN,indControl}..Width = {PopName+"."+TN,indControl}..InitialWidth IF {PopName+"."+TN,indControl}..Visible = True THEN TW += {PopName+"."+TN,indControl}..Width END END TD = {PopName,indControl}..Width - TW - 18 // 18 ~= Width of vertical scrollbar of Table FOR TX = 1 TO TC TN = TableEnumColumn(PopName,TX) {PopName+"."+TN,indControl}..Width += TD * {PopName+"."+TN,indControl}..AnchorRateWidth / 1000 END RETURN
Re: Save and Restore Table Column Order April 29, 2020 12:34PM |
Registered: 4 years ago Posts: 5 |
Re: Save and Restore Table Column Order April 29, 2020 02:01PM |
Admin Registered: 5 years ago Posts: 500 |
Re: Save and Restore Table Column Order April 30, 2020 10:06AM |
Registered: 4 years ago Posts: 5 |