Update Form Designer - Save/Restore Label - Text Align Property.
@@ -1997,6 +1997,9 @@ class CommonAttributesMethods
}
func ObjectDataAsString nTabsCount
+ return ObjectDataAsString2(nTabsCount)
+
+ func ObjectDataAsString2 nTabsCount
cTabs = std_copy(char(9),nTabsCount)
cOutput = cTabs + " :x = #{f1} , : y = #{f2} , " + nl
cOutput += cTabs + " :width = #{f3} , :height = #{f4} , " + nl
@@ -2021,6 +2024,9 @@ class FormDesigner_QLabel from QLabel
CreateCommonAttributes()
CreateMoveResizeCornersAttributes()
+ func TextAlign
+ return nTextAlign
+
func SetTextAlign nIndex
nTextAlign = nIndex
Switch nIndex {
@@ -2058,6 +2064,12 @@ class FormDesigner_QLabel from QLabel
setTextAlign(nIndex)
}
+ func ObjectDataAsString nTabsCount
+ cOutput = ObjectDataAsString2(nTabsCount)
+ cTabs = std_copy(char(9),nTabsCount)
+ cOutput += "," + nl + cTabs + ' :textalign = ' + TextAlign()
+ return cOutput
+
class FormDesigner_QPushButton from QPushButton
CreateCommonAttributes()
@@ -2276,6 +2288,7 @@ class FormDesignerFileSystem
oDesigner.oModel.AddLabel(new FormDesigner_QLabel(oDesigner.oModel.FormObject()) )
oDesigner.NewControlEvents(item[:name],oDesigner.oModel.LabelsCount())
RestoreCommonProperties(oDesigner,item)
+ oDesigner.oModel.ActiveObject().setTextAlign(0+item[:data][:textalign])
case :FormDesigner_QPushButton
oDesigner.HideCorners()
oDesigner.oModel.AddPushButton(new FormDesigner_QPushButton(oDesigner.oModel.FormObject()) {
