newconstraint.lfm 5.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218
  1. object fmNewConstraint: TfmNewConstraint
  2. Left = 499
  3. Height = 536
  4. Top = 53
  5. Width = 445
  6. ActiveControl = edNewName
  7. BorderStyle = bsSingle
  8. Caption = 'fmNewConstraint'
  9. ClientHeight = 536
  10. ClientWidth = 445
  11. Position = poScreenCenter
  12. LCLVersion = '1.2.6.0'
  13. object Label1: TLabel
  14. Left = 8
  15. Height = 16
  16. Top = 15
  17. Width = 156
  18. Caption = 'New Constraint on table'
  19. ParentColor = False
  20. end
  21. object laTable: TLabel
  22. Left = 184
  23. Height = 16
  24. Top = 15
  25. Width = 50
  26. Caption = 'laTable'
  27. Font.Style = [fsBold]
  28. ParentColor = False
  29. ParentFont = False
  30. end
  31. object Label6: TLabel
  32. Left = 8
  33. Height = 16
  34. Top = 432
  35. Width = 90
  36. Caption = 'Update action'
  37. ParentColor = False
  38. end
  39. object Label7: TLabel
  40. Left = 12
  41. Height = 16
  42. Top = 472
  43. Width = 86
  44. Caption = 'Delete action'
  45. ParentColor = False
  46. end
  47. object GroupBox1: TGroupBox
  48. Left = 0
  49. Height = 170
  50. Top = 40
  51. Width = 441
  52. Anchors = [akTop, akLeft, akRight]
  53. Caption = 'Current table'
  54. ClientHeight = 149
  55. ClientWidth = 435
  56. TabOrder = 0
  57. object Label2: TLabel
  58. Left = 8
  59. Height = 16
  60. Top = 8
  61. Width = 137
  62. Caption = 'New constraint name'
  63. ParentColor = False
  64. end
  65. object Label3: TLabel
  66. Left = 10
  67. Height = 16
  68. Top = 39
  69. Width = 59
  70. Caption = 'On fields'
  71. ParentColor = False
  72. end
  73. object edNewName: TEdit
  74. Left = 150
  75. Height = 24
  76. Top = 8
  77. Width = 226
  78. TabOrder = 0
  79. Text = 'edNewName'
  80. end
  81. object clxOnFields: TCheckListBox
  82. Left = 150
  83. Height = 104
  84. Top = 39
  85. Width = 282
  86. ItemHeight = 0
  87. TabOrder = 1
  88. end
  89. end
  90. object GroupBox2: TGroupBox
  91. Left = 0
  92. Height = 200
  93. Top = 224
  94. Width = 441
  95. Anchors = [akTop, akLeft, akRight]
  96. Caption = 'Foreign Table'
  97. ClientHeight = 179
  98. ClientWidth = 435
  99. TabOrder = 1
  100. object Label4: TLabel
  101. Left = 11
  102. Height = 16
  103. Top = 12
  104. Width = 74
  105. Caption = 'Table name'
  106. ParentColor = False
  107. end
  108. object Label5: TLabel
  109. Left = 11
  110. Height = 16
  111. Top = 52
  112. Width = 59
  113. Caption = 'On fields'
  114. ParentColor = False
  115. end
  116. object cbTables: TComboBox
  117. Left = 108
  118. Height = 25
  119. Top = 7
  120. Width = 268
  121. ItemHeight = 16
  122. OnChange = cbTablesChange
  123. Style = csDropDownList
  124. TabOrder = 0
  125. end
  126. object clxForFields: TCheckListBox
  127. Left = 108
  128. Height = 125
  129. Top = 48
  130. Width = 324
  131. ItemHeight = 0
  132. TabOrder = 1
  133. end
  134. end
  135. object cbUpdateAction: TComboBox
  136. Left = 113
  137. Height = 25
  138. Top = 432
  139. Width = 263
  140. ItemHeight = 16
  141. ItemIndex = 0
  142. Items.Strings = (
  143. 'Restrict'
  144. 'No Action'
  145. 'Cascade'
  146. 'Set Default'
  147. 'Set null'
  148. )
  149. Style = csDropDownList
  150. TabOrder = 2
  151. Text = 'Restrict'
  152. end
  153. object bbScript: TBitBtn
  154. Left = 344
  155. Height = 30
  156. Top = 504
  157. Width = 92
  158. Caption = 'Script'
  159. Color = clForm
  160. Glyph.Data = {
  161. 36040000424D3604000000000000360000002800000010000000100000000100
  162. 2000000000000004000064000000640000000000000000000000000000001010
  163. 100D0000003D0000003F0000003F0000003F0000003F0000003F000000321010
  164. 1005000000000000000000000000000000000000000000000000000000000000
  165. 003EFFFFFFFFDCDCDCFFFEFEFEFFFBFBFBFFF7F7F7FFEEEEEEFFDBDBDBFF2525
  166. 258F0F0F0F070000000000000000000000000000000000000000000000000000
  167. 0040FFFFFFFFFFFFFFFFF9F9F9FFF8F8F9FFF4F4F5FFEBEBEBFFC6C6C6FEF5F5
  168. F5FF2626258E1111110600000000000000000000000000000000000000000000
  169. 0040FFFFFFFF929292FFFFFFFFFFFAFAFAFFFCFCFCFFD5D5D5FF868686FFFFFF
  170. FFFEDBDBDDFF2B2B2C8700000004000000000000000000000000000000000000
  171. 0040FFFFFFFFFFFFFFFFFBFBFBFFCFCFD0FF868686FF878787FF474747FFFFFF
  172. FFFFEEEEEEFECECED0FF49494992000000020000000000000000000000000000
  173. 0040FFFFFFFF919191FFFFFFFFFF6F6F6EFFC9C9C9FFE4E4E4FF9A9A9AFFFFFF
  174. FFFFFFFFFFFFFFFFFFFEE7E7E8FF323232782B2B2B0200000000000000000000
  175. 0040FFFFFFFFFFFFFFFFFFFFFFFF838383FFCACACAFFAEAEAEFF747474FF5455
  176. 55FF535353FF6E6E6EFF6B6B6BFEEDEDECFF0000003400000000000000000000
  177. 0040FFFFFFFF919191FFFFFFFFFF6A6A6AFFD9D9D9FFEDEDEDFFF0EEE9FFE9DD
  178. CBFFDBDDDEFFADADADFF636363FFFFFFFFFF0000004C00000000000000001B1D
  179. 1E4DFFFFFFFFFFFFFFFFFFFFFFFF868687FFE4E6E8FFE8EAEDFFAE6D06FFD2AF
  180. 7DFFACAFB3FFD7DCE3FFB3B8C0FFFFFFFFFF6265686700000000FFFFFF0CE1C5
  181. A0C5CB8B34FFC79145FFC68933FFC3C1C1FFD0AD79FFB8791AFFBF8732FFCDA0
  182. 5DFFF5FCFFFFBE7711FFCE9241FFD29441FFDBC9B0A300000000FFFFFF12D4B7
  183. 91C6FFFEFEFFFFFFFFFFD4A667FFE2C49AFFC0832AFFF8FEFFFFF5FAFFFFCD9F
  184. 5BFFEEDEC7FFC48021FFC9D1DDFFFFFFFFFF2A2B2E5900000000FFFFFF01CEC6
  185. BC94DBA766FFC8862DFFD8AE75FFEDDCC3FFD0A468FFB8BABCFFB5B6B6FFD7BA
  186. 90FFE7CBA6FFC78225FFF9FDFFFFFFFFFFFF0000004D00000000FFFFFF0AE3B9
  187. 84D9ECCEA8FEFFFFFFFFE9D0AFFFF5ECDFFFCA8830FFFEFFFFFFFFFFFFFFD19B
  188. 50FFF4E8D8FFCC872DFFF7FCFFFFFFFFFFFF0000004D00000000FFFFFF01D7CA
  189. BA9CE0A861FFD5994FFFDCAB6EFFF4F7FCFFE9D2B6FFD19343FFD19341FFE2C2
  190. 99FFFAFFFFFFD79C4FFFF4F8FFFFFFFFFFFF0000004D00000000000000000000
  191. 0041FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  192. FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000004A00000000000000001111
  193. 110C000000390000003D0000003D0000003D0000003D0000003D0000003D0000
  194. 003D0000003D0000003D0000003D000000390707070F00000000
  195. }
  196. ModalResult = 1
  197. OnClick = bbScriptClick
  198. TabOrder = 3
  199. end
  200. object cbDeleteAction: TComboBox
  201. Left = 113
  202. Height = 25
  203. Top = 472
  204. Width = 265
  205. ItemHeight = 16
  206. ItemIndex = 0
  207. Items.Strings = (
  208. 'Restrict'
  209. 'No Action'
  210. 'Cascade'
  211. 'Set Default'
  212. 'Set null'
  213. )
  214. Style = csDropDownList
  215. TabOrder = 4
  216. Text = 'Restrict'
  217. end
  218. end