Update Form Designer - FormDesigner_QRadioButton Class - Events Properties.
@@ -3749,11 +3749,98 @@ class FormDesigner_QRadioButton from QRadioButton
CreateCommonAttributes()
CreateMoveResizeCornersAttributes()
+ cclickedEvent = ""
+ cpressedEvent = ""
+ creleasedEvent = ""
+ ctoggledEvent = ""
+
+ func SetclickedEventCode cValue
+ cclickedEvent = cValue
+
+ func clickedEventCode
+ return cclickedEvent
+
+ func SetpressedEventCode cValue
+ cpressedEvent = cValue
+
+ func pressedEventCode
+ return cpressedEvent
+
+ func SetreleasedEventCode cValue
+ creleasedEvent = cValue
+
+ func releasedEventCode
+ return creleasedEvent
+
+ func SettoggledEventCode cValue
+ ctoggledEvent = cValue
+
+ func toggledEventCode
+ return ctoggledEvent
+
+ func AddObjectProperties oDesigner
+ AddObjectCommonProperties(oDesigner)
+ oDesigner.oView.AddProperty("clickedEvent",False)
+ oDesigner.oView.AddProperty("pressedEvent",False)
+ oDesigner.oView.AddProperty("releasedEvent",False)
+ oDesigner.oView.AddProperty("toggledEvent",False)
+
+ func DisplayProperties oDesigner
+ DisplayCommonProperties(oDesigner)
+ oPropertiesTable = oDesigner.oView.oPropertiesTable
+ oPropertiesTable.Blocksignals(True)
+ oPropertiesTable.item(8,1).settext(clickedEventcode())
+ oPropertiesTable.item(9,1).settext(pressedEventcode())
+ oPropertiesTable.item(10,1).settext(releasedEventcode())
+ oPropertiesTable.item(11,1).settext(toggledEventcode())
+ oPropertiesTable.Blocksignals(False)
+
+ func UpdateProperties oDesigner,nRow,nCol,cValue
+ UpdateCommonProperties(oDesigner,nRow,nCol,cValue)
+ if nCol = 1 {
+ switch nRow {
+ case 8
+ setclickedEventCode(cValue)
+ case 9
+ setpressedEventCode(cValue)
+ case 10
+ setreleasedEventCode(cValue)
+ case 11
+ settoggledEventCode(cValue)
+
+ }
+ }
+
+ func ObjectDataAsString nTabsCount
+ cOutput = ObjectDataAsString2(nTabsCount)
+ cTabs = std_copy(char(9),nTabsCount)
+ cOutput += "," + nl + cTabs + ' :setclickedEvent = "' + clickedEventCode() + '"'
+ cOutput += "," + nl + cTabs + ' :setpressedEvent = "' + pressedEventCode() + '"'
+ cOutput += "," + nl + cTabs + ' :setreleasedEvent = "' + releasedEventCode() + '"'
+ cOutput += "," + nl + cTabs + ' :settoggledEvent = "' + toggledEventCode() + '"'
+ return cOutput
+
func GenerateCustomCode
cOutput = 'setText("#{f1}")' + nl
cOutput = substr(cOutput,"#{f1}",text())
+ cOutput += 'setclickedEvent("#{f1}")' + nl
+ cOutput = substr(cOutput,"#{f1}",clickedEventCode())
+ cOutput += 'setpressedEvent("#{f1}")' + nl
+ cOutput = substr(cOutput,"#{f1}",pressedEventCode())
+ cOutput += 'setreleasedEvent("#{f1}")' + nl
+ cOutput = substr(cOutput,"#{f1}",releasedEventCode())
+ cOutput += 'settoggledEvent("#{f1}")' + nl
+ cOutput = substr(cOutput,"#{f1}",toggledEventCode())
return cOutput
+ func RestoreProperties oDesigner,Item
+ RestoreCommonProperties(oDesigner,item)
+ itemdata = item[:data]
+ SetclickedEventCode(itemdata[:setclickedEvent])
+ SetpressedEventCode(itemdata[:setpressedEvent])
+ SetreleasedEventCode(itemdata[:setreleasedEvent])
+ SettoggledEventCode(itemdata[:settoggledEvent])
+
class FormDesignerFileSystem
cFileName = "noname.rform"
