applications/formdesigner/source/controls/qcheckbox.ring

   1 /*
   2 **      Project : Form Designer
   3 **      File Purpose :  QCheckbox Control
   4 **      Date : 2017.04.29
   5 **      Author :  Mahmoud Fayed <msfclipper@yahoo.com>
   6 */
   7
   8 package formdesigner
   9
  10 class FormDesigner_QCheckBox from QCheckBox
  11
  12         CreateCommonAttributes()
  13         CreateMoveResizeCornersAttributes()
  14
  15         cstateChangedEvent = ""
  16         cclickedEvent = ""
  17         cpressedEvent = ""
  18         creleasedEvent = ""
  19         ctoggledEvent = ""
  20
  21         func SetstateChangedEventCode cValue
  22                 cstateChangedEvent = cValue
  23
  24         func stateChangedEventCode
  25                 return cstateChangedEvent
  26
  27         func SetclickedEventCode cValue
  28                 cclickedEvent = cValue
  29
  30         func clickedEventCode
  31                 return cclickedEvent
  32
  33         func SetpressedEventCode cValue
  34                 cpressedEvent = cValue
  35
  36         func pressedEventCode
  37                 return cpressedEvent
  38
  39         func SetreleasedEventCode cValue
  40                 creleasedEvent = cValue
  41
  42         func releasedEventCode
  43                 return creleasedEvent
  44
  45         func SettoggledEventCode cValue
  46                 ctoggledEvent = cValue
  47
  48         func toggledEventCode
  49                 return ctoggledEvent
  50
  51         func AddObjectProperties  oDesigner
  52                 AddObjectCommonProperties(oDesigner)
  53                 oDesigner.oView.AddProperty(T_FORMDESIGNER_ATTRIBUTE_TEXT,False)                # "Text"
  54                 oDesigner.oView.AddProperty(T_FORMDESIGNER_ATTRIBUTE_STATECHANGEDEVENT,False)   # "stateChangedEvent"
  55                 oDesigner.oView.AddProperty(T_FORMDESIGNER_ATTRIBUTE_CLICKEDEVENT,False)        # "clickedEvent"
  56                 oDesigner.oView.AddProperty(T_FORMDESIGNER_ATTRIBUTE_PRESSEDEVENT,False)        # "pressedEvent"
  57                 oDesigner.oView.AddProperty(T_FORMDESIGNER_ATTRIBUTE_RELEASEDEVENT,False)       # "releasedEvent"
  58                 oDesigner.oView.AddProperty(T_FORMDESIGNER_ATTRIBUTE_TOGGLEDEVENT,False)        # "toggledEvent"
  59
  60         func DisplayProperties oDesigner
  61                 DisplayCommonProperties(oDesigner)
  62                 oPropertiesTable = oDesigner.oView.oPropertiesTable
  63                 oPropertiesTable.Blocksignals(True)
  64                 # Set the Text
  65                         oPropertiesTable.item(C_AFTERCOMMON,1).settext(text())
  66                 oPropertiesTable.item(C_AFTERCOMMON+1,1).settext(stateChangedEventcode())
  67                 oPropertiesTable.item(C_AFTERCOMMON+2,1).settext(clickedEventcode())
  68                 oPropertiesTable.item(C_AFTERCOMMON+3,1).settext(pressedEventcode())
  69                 oPropertiesTable.item(C_AFTERCOMMON+4,1).settext(releasedEventcode())
  70                 oPropertiesTable.item(C_AFTERCOMMON+5,1).settext(toggledEventcode())
  71                 oPropertiesTable.Blocksignals(False)
  72
  73         func UpdateProperties oDesigner,nRow,nCol,cValue
  74                 UpdateCommonProperties(oDesigner,nRow,nCol,cValue)
  75                 if nCol = 1 {
  76                         switch nRow {
  77                                 case C_AFTERCOMMON
  78                                         setText(cValue)
  79                                 case C_AFTERCOMMON+1
  80                                         setstateChangedEventCode(cValue)
  81                                 case C_AFTERCOMMON+2
  82                                         setclickedEventCode(cValue)
  83                                 case C_AFTERCOMMON+3
  84                                         setpressedEventCode(cValue)
  85                                 case C_AFTERCOMMON+4
  86                                         setreleasedEventCode(cValue)
  87                                 case C_AFTERCOMMON+5
  88                                         settoggledEventCode(cValue)
  89                         }
  90                 }
  91
  92         func ObjectDataAsString oDesigner,nTabsCount
  93                 cOutput = ObjectDataAsString2(oDesigner,nTabsCount)
  94                 cTabs = std_copy(char(9),nTabsCount)
  95                 cOutput += "," + nl + cTabs + ' :text =  "' + oDesigner.PrepareStringForFormFile(Text()) + '"'
  96                 cOutput += "," + nl + cTabs + ' :setstateChangedEvent =  "' + oDesigner.PrepareStringForFormFile(stateChangedEventCode()) + '"'
  97                 cOutput += "," + nl + cTabs + ' :setclickedEvent =  "' + oDesigner.PrepareStringForFormFile(clickedEventCode()) + '"'
  98                 cOutput += "," + nl + cTabs + ' :setpressedEvent =  "' + oDesigner.PrepareStringForFormFile(pressedEventCode()) + '"'
  99                 cOutput += "," + nl + cTabs + ' :setreleasedEvent =  "' + oDesigner.PrepareStringForFormFile(releasedEventCode()) + '"'
 100                 cOutput += "," + nl + cTabs + ' :settoggledEvent =  "' + oDesigner.PrepareStringForFormFile(toggledEventCode()) + '"'
 101                 return cOutput
 102
 103         func GenerateCustomCode oDesigner
 104                 cOutput = 'setText("#{f1}")' + nl
 105                 cOutput = substr(cOutput,"#{f1}",oDesigner.PrepareStringForFormFile(text()))
 106                 cOutput += 'setstateChangedEvent("#{f1}")' + nl
 107                 cOutput = PrepareEvent(cOutput,stateChangedEventCode(),"#{f1}")
 108                 cOutput = substr(cOutput,"#{f1}",stateChangedEventCode())
 109                 cOutput += 'setclickedEvent("#{f1}")' + nl
 110                 cOutput = PrepareEvent(cOutput,clickedEventCode(),"#{f1}")
 111                 cOutput = substr(cOutput,"#{f1}",clickedEventCode())
 112                 cOutput += 'setpressedEvent("#{f1}")' + nl
 113                 cOutput = PrepareEvent(cOutput,pressedEventCode(),"#{f1}")
 114                 cOutput = substr(cOutput,"#{f1}",pressedEventCode())
 115                 cOutput += 'setreleasedEvent("#{f1}")' + nl
 116                 cOutput = PrepareEvent(cOutput,releasedEventCode(),"#{f1}")
 117                 cOutput = substr(cOutput,"#{f1}",releasedEventCode())
 118                 cOutput += 'settoggledEvent("#{f1}")' + nl
 119                 cOutput = PrepareEvent(cOutput,toggledEventCode(),"#{f1}")
 120                 cOutput = substr(cOutput,"#{f1}",toggledEventCode())
 121                 return cOutput
 122
 123         func RestoreProperties oDesigner,Item
 124                 RestoreCommonProperties(oDesigner,item)
 125                 itemdata = item[:data]
 126                 setText(itemdata[:text])
 127                 SetstateChangedEventCode(itemdata[:setstateChangedEvent])
 128                 SetclickedEventCode(itemdata[:setclickedEvent])
 129                 SetpressedEventCode(itemdata[:setpressedEvent])
 130                 SetreleasedEventCode(itemdata[:setreleasedEvent])
 131                 SettoggledEventCode(itemdata[:settoggledEvent])