ITSSELAMF.dfm 18 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620
  1. object ITSSELAM: TITSSELAM
  2. Left = 0
  3. Top = 0
  4. HorzScrollBar.Visible = False
  5. VertScrollBar.Visible = False
  6. Caption = #44396#44036' '#49440#53469
  7. ClientHeight = 816
  8. ClientWidth = 1361
  9. Color = clBtnFace
  10. DoubleBuffered = True
  11. Font.Charset = DEFAULT_CHARSET
  12. Font.Color = clWindowText
  13. Font.Height = -13
  14. Font.Name = #47569#51008' '#44256#46357
  15. Font.Style = []
  16. KeyPreview = True
  17. OldCreateOrder = False
  18. Position = poOwnerFormCenter
  19. ShowHint = True
  20. OnClose = FormClose
  21. OnShow = FormShow
  22. DesignSize = (
  23. 1361
  24. 816)
  25. PixelsPerInch = 96
  26. TextHeight = 17
  27. object LblCaption: TLabel
  28. Left = 16
  29. Top = 10
  30. Width = 267
  31. Height = 23
  32. Caption = #53440#51060#53952' '
  33. Font.Charset = DEFAULT_CHARSET
  34. Font.Color = 4740964
  35. Font.Height = -17
  36. Font.Name = #47569#51008' '#44256#46357
  37. Font.Style = [fsBold]
  38. ParentFont = False
  39. ParentShowHint = False
  40. ShowHint = True
  41. end
  42. object ShpList: TShape
  43. Left = 3
  44. Top = 4
  45. Width = 1354
  46. Height = 810
  47. Anchors = [akLeft, akTop, akRight, akBottom]
  48. Pen.Color = 10849679
  49. Pen.Width = 2
  50. Visible = False
  51. ExplicitWidth = 1118
  52. ExplicitHeight = 563
  53. end
  54. object EdFocus: TEdit
  55. Left = -10
  56. Top = -10
  57. Width = 2
  58. Height = 25
  59. ImeName = 'Microsoft Office IME 2007'
  60. TabOrder = 2
  61. Text = 'EdFocus'
  62. end
  63. object PnlBack: TPanel
  64. Left = 4
  65. Top = 4
  66. Width = 1354
  67. Height = 810
  68. Anchors = [akLeft, akTop, akRight, akBottom]
  69. BevelOuter = bvNone
  70. TabOrder = 3
  71. object cxGroupBox1: TcxGroupBox
  72. Left = 0
  73. Top = 0
  74. Align = alClient
  75. Caption = #9654' '#51648#46020
  76. Style.TextStyle = [fsBold]
  77. TabOrder = 0
  78. Height = 810
  79. Width = 1030
  80. object StatusBar: TStatusBar
  81. Left = 3
  82. Top = 781
  83. Width = 1024
  84. Height = 19
  85. Panels = <
  86. item
  87. Alignment = taRightJustify
  88. Bevel = pbRaised
  89. Text = #50948#52824':'
  90. Width = 50
  91. end
  92. item
  93. Text = #51340#54364
  94. Width = 50
  95. end>
  96. end
  97. inline FRAMEGisMap1: TFRAMEGisMap
  98. Left = 3
  99. Top = 19
  100. Width = 1024
  101. Height = 762
  102. Align = alClient
  103. TabOrder = 2
  104. ExplicitLeft = 3
  105. ExplicitTop = 19
  106. ExplicitWidth = 1024
  107. ExplicitHeight = 762
  108. inherited xclntMap: TXiClient
  109. Width = 1024
  110. Height = 721
  111. OnMouseDown = FRAMEGisMap1xclntMapMouseDown
  112. OnMouseMove = FRAMEGisMap1xclntMapMouseMove
  113. OnMouseUp = FRAMEGisMap1xclntMapMouseUp
  114. ExplicitWidth = 1024
  115. ExplicitHeight = 721
  116. end
  117. inherited GrpTool: TcxGroupBox
  118. ExplicitWidth = 1024
  119. Width = 1024
  120. inherited LbDef: TLabel
  121. Width = 247
  122. Height = 17
  123. ExplicitWidth = 247
  124. ExplicitHeight = 17
  125. end
  126. end
  127. end
  128. object Panel1: TPanel
  129. Left = 464
  130. Top = 136
  131. Width = 425
  132. Height = 245
  133. Caption = 'Panel1'
  134. TabOrder = 1
  135. Visible = False
  136. object ImgDesc04: TImage
  137. Left = 6
  138. Top = 31
  139. Width = 9
  140. Height = 9
  141. Transparent = True
  142. end
  143. object ImgDesc01: TImage
  144. Left = 6
  145. Top = 59
  146. Width = 9
  147. Height = 9
  148. Transparent = True
  149. end
  150. object cxLabel4: TcxLabel
  151. Left = 27
  152. Top = 22
  153. Caption = #49440#53469#51340#54364
  154. Properties.Alignment.Horz = taRightJustify
  155. Properties.Alignment.Vert = taVCenter
  156. Transparent = True
  157. AnchorX = 83
  158. AnchorY = 33
  159. end
  160. object cxLabel1: TcxLabel
  161. Left = 27
  162. Top = 50
  163. Caption = #49440#53469#44396#44036
  164. Properties.Alignment.Horz = taRightJustify
  165. Properties.Alignment.Vert = taVCenter
  166. Transparent = True
  167. AnchorX = 83
  168. AnchorY = 61
  169. end
  170. object EdPos: TcxTextEdit
  171. Left = 89
  172. Top = 21
  173. Properties.Alignment.Vert = taVCenter
  174. Properties.ReadOnly = True
  175. TabOrder = 2
  176. Width = 220
  177. end
  178. object EdLinkId: TcxTextEdit
  179. Left = 89
  180. Top = 49
  181. Properties.Alignment.Vert = taVCenter
  182. Properties.ReadOnly = True
  183. TabOrder = 3
  184. Width = 220
  185. end
  186. end
  187. end
  188. object cxSplitter1: TcxSplitter
  189. Left = 1030
  190. Top = 0
  191. Width = 6
  192. Height = 810
  193. AlignSplitter = salRight
  194. Control = PnlRight
  195. end
  196. object PnlRight: TPanel
  197. Left = 1036
  198. Top = 0
  199. Width = 318
  200. Height = 810
  201. Align = alRight
  202. BevelOuter = bvNone
  203. TabOrder = 2
  204. object cxGroupBox2: TcxGroupBox
  205. Left = 0
  206. Top = 0
  207. Align = alTop
  208. Caption = #9654' '#49440#53469' '#44396#44036' '#47785#47197
  209. Style.TextStyle = [fsBold]
  210. TabOrder = 0
  211. DesignSize = (
  212. 318
  213. 158)
  214. Height = 165
  215. Width = 318
  216. object BtnSelect: TcxButton
  217. Tag = 4
  218. Left = 214
  219. Top = 97
  220. Width = 97
  221. Height = 25
  222. Cursor = crHandPoint
  223. Hint = #45432#46300#47484' '#49440#53469#54633#45768#45796'.'
  224. Anchors = [akRight, akBottom]
  225. Caption = #44396#44036#49440#53469
  226. Colors.Default = 10737865
  227. TabOrder = 0
  228. Font.Charset = DEFAULT_CHARSET
  229. Font.Color = clBlack
  230. Font.Height = -13
  231. Font.Name = #47569#51008' '#44256#46357
  232. Font.Style = [fsBold]
  233. ParentFont = False
  234. OnClick = BtnSelectClick
  235. end
  236. object CxList: TcxGrid
  237. Left = 3
  238. Top = 19
  239. Width = 312
  240. Height = 74
  241. Align = alTop
  242. Anchors = [akLeft, akTop, akRight, akBottom]
  243. TabOrder = 1
  244. object TvList: TcxGridTableView
  245. Navigator.Buttons.Append.Visible = True
  246. Navigator.Buttons.SaveBookmark.Visible = False
  247. Navigator.InfoPanel.Visible = True
  248. DataController.Summary.DefaultGroupSummaryItems = <>
  249. DataController.Summary.FooterSummaryItems = <>
  250. DataController.Summary.SummaryGroups = <>
  251. FilterRow.InfoText = #44160#49353#50612#47484' '#51077#47141#54616#49464#50836'.'
  252. OptionsBehavior.CellHints = True
  253. OptionsBehavior.ShowLockedStateImageOptions.BestFit = lsimImmediate
  254. OptionsBehavior.ShowLockedStateImageOptions.Filtering = lsimImmediate
  255. OptionsBehavior.ShowLockedStateImageOptions.Grouping = lsimImmediate
  256. OptionsBehavior.ShowLockedStateImageOptions.Sorting = lsimImmediate
  257. OptionsCustomize.ColumnFiltering = False
  258. OptionsCustomize.ColumnGrouping = False
  259. OptionsCustomize.ColumnMoving = False
  260. OptionsCustomize.ColumnSorting = False
  261. OptionsData.Deleting = False
  262. OptionsData.DeletingConfirmation = False
  263. OptionsData.Inserting = False
  264. OptionsSelection.CellSelect = False
  265. OptionsView.NoDataToDisplayInfoText = '<'#49440#53469#44396#44036#51221#48372'>'
  266. OptionsView.ColumnAutoWidth = True
  267. OptionsView.GroupByBox = False
  268. OptionsView.Indicator = True
  269. object Column01: TcxGridColumn
  270. Caption = #44396#44036' ID'
  271. PropertiesClassName = 'TcxLabelProperties'
  272. Properties.Alignment.Horz = taCenter
  273. Properties.Alignment.Vert = taVCenter
  274. HeaderAlignmentHorz = taCenter
  275. Options.Editing = False
  276. Width = 133
  277. end
  278. object Column02: TcxGridColumn
  279. Caption = #51340#54364' X'
  280. DataBinding.ValueType = 'Float'
  281. PropertiesClassName = 'TcxCalcEditProperties'
  282. Properties.Alignment.Horz = taRightJustify
  283. Properties.Alignment.Vert = taVCenter
  284. Properties.DisplayFormat = '##0.######0'
  285. HeaderAlignmentHorz = taCenter
  286. Options.Editing = False
  287. Width = 100
  288. end
  289. object Column03: TcxGridColumn
  290. Caption = #51340#54364' Y'
  291. DataBinding.ValueType = 'Float'
  292. PropertiesClassName = 'TcxCalcEditProperties'
  293. Properties.Alignment.Horz = taRightJustify
  294. Properties.Alignment.Vert = taVCenter
  295. Properties.DisplayFormat = '##0.######0'
  296. HeaderAlignmentHorz = taCenter
  297. Options.Editing = False
  298. Width = 100
  299. end
  300. object Column04: TcxGridColumn
  301. Caption = #51201#50857' '#51333#47308#49884#44033
  302. PropertiesClassName = 'TcxDateEditProperties'
  303. Properties.Alignment.Horz = taCenter
  304. Properties.Alignment.Vert = taVCenter
  305. Properties.ImmediatePost = True
  306. Properties.Kind = ckDateTime
  307. Visible = False
  308. HeaderAlignmentHorz = taCenter
  309. Options.Editing = False
  310. Width = 170
  311. end
  312. object Column99: TcxGridColumn
  313. Caption = #47700#47784#47532
  314. DataBinding.ValueType = 'Integer'
  315. PropertiesClassName = 'TcxCalcEditProperties'
  316. Visible = False
  317. HeaderAlignmentHorz = taCenter
  318. Options.Editing = False
  319. end
  320. end
  321. object GlList: TcxGridLevel
  322. GridView = TvList
  323. end
  324. end
  325. object BtnDelete: TcxButton
  326. Tag = 4
  327. Left = 6
  328. Top = 97
  329. Width = 97
  330. Height = 25
  331. Cursor = crHandPoint
  332. Hint = #47785#47197#50640#49436' '#49440#53469#54620' '#44396#44036#51012' '#49325#51228#54633#45768#45796'.'
  333. Anchors = [akLeft, akBottom]
  334. Caption = #49440#53469#49325#51228
  335. Colors.Default = 10737865
  336. TabOrder = 2
  337. Font.Charset = DEFAULT_CHARSET
  338. Font.Color = clBlack
  339. Font.Height = -13
  340. Font.Name = #47569#51008' '#44256#46357
  341. Font.Style = [fsBold]
  342. ParentFont = False
  343. OnClick = BtnDeleteClick
  344. end
  345. end
  346. object PgList: TcxPageControl
  347. Left = 0
  348. Top = 171
  349. Width = 318
  350. Height = 639
  351. Align = alClient
  352. TabOrder = 1
  353. Properties.ActivePage = TabNode
  354. ClientRectBottom = 634
  355. ClientRectLeft = 2
  356. ClientRectRight = 313
  357. ClientRectTop = 28
  358. object TabNode: TcxTabSheet
  359. Caption = #45432#46300' '
  360. ImageIndex = 0
  361. inline FRAMENodeList1: TFRAMENodeList
  362. Left = 0
  363. Top = 0
  364. Width = 311
  365. Height = 606
  366. Align = alClient
  367. TabOrder = 0
  368. ExplicitWidth = 311
  369. ExplicitHeight = 606
  370. inherited CxList: TcxGrid
  371. Width = 311
  372. Height = 544
  373. ExplicitWidth = 311
  374. ExplicitHeight = 544
  375. inherited TvList: TcxGridTableView
  376. OnCellDblClick = FRAMENodeList1TvListCellDblClick
  377. end
  378. end
  379. inherited PnlTop: TPanel
  380. Width = 311
  381. ExplicitWidth = 311
  382. end
  383. inherited PnlBottom: TPanel
  384. Top = 575
  385. Width = 311
  386. ExplicitTop = 575
  387. ExplicitWidth = 311
  388. inherited LblRecords: TLabel
  389. Left = 200
  390. Width = 25
  391. Height = 17
  392. ExplicitLeft = 268
  393. ExplicitWidth = 25
  394. ExplicitHeight = 17
  395. end
  396. inherited ChkDispExt: TcxCheckBox
  397. ExplicitHeight = 21
  398. end
  399. inherited BtnExlSave: TcxButton
  400. Left = 231
  401. ExplicitLeft = 231
  402. end
  403. end
  404. end
  405. end
  406. object TabLink: TcxTabSheet
  407. Caption = #47553#53356' '
  408. ImageIndex = 1
  409. ExplicitLeft = 0
  410. ExplicitTop = 0
  411. ExplicitWidth = 0
  412. ExplicitHeight = 0
  413. inline FRAMELinkList1: TFRAMELinkList
  414. Left = 0
  415. Top = 0
  416. Width = 311
  417. Height = 606
  418. Align = alClient
  419. TabOrder = 0
  420. ExplicitWidth = 311
  421. ExplicitHeight = 606
  422. inherited CxList: TcxGrid
  423. Width = 311
  424. Height = 544
  425. ExplicitWidth = 311
  426. ExplicitHeight = 544
  427. inherited TvList: TcxGridTableView
  428. OnCellDblClick = FRAMELinkList1TvListCellDblClick
  429. end
  430. end
  431. inherited PnlTop: TPanel
  432. Width = 311
  433. ExplicitWidth = 311
  434. end
  435. inherited PnlBottom: TPanel
  436. Top = 575
  437. Width = 311
  438. ExplicitTop = 575
  439. ExplicitWidth = 311
  440. inherited LblRecords: TLabel
  441. Left = 200
  442. Width = 25
  443. Height = 17
  444. ExplicitLeft = 268
  445. ExplicitWidth = 25
  446. ExplicitHeight = 17
  447. end
  448. inherited ChkDispExt: TcxCheckBox
  449. ExplicitHeight = 21
  450. end
  451. inherited BtnExlSave: TcxButton
  452. Left = 231
  453. ExplicitLeft = 231
  454. end
  455. end
  456. end
  457. end
  458. object TabServiceLink: TcxTabSheet
  459. Caption = #49436#48708#49828#47553#53356' '
  460. ImageIndex = 2
  461. ExplicitLeft = 0
  462. ExplicitTop = 0
  463. ExplicitWidth = 0
  464. ExplicitHeight = 0
  465. inline FRAMEServiceLinkList1: TFRAMEServiceLinkList
  466. Left = 0
  467. Top = 0
  468. Width = 311
  469. Height = 606
  470. Align = alClient
  471. TabOrder = 0
  472. ExplicitWidth = 311
  473. ExplicitHeight = 606
  474. inherited CxList: TcxGrid
  475. Width = 311
  476. Height = 544
  477. ExplicitWidth = 311
  478. ExplicitHeight = 544
  479. inherited TvList: TcxGridTableView
  480. OnCellDblClick = FRAMEServiceLinkList1TvListCellClick
  481. end
  482. end
  483. inherited PnlTop: TPanel
  484. Width = 311
  485. ExplicitWidth = 311
  486. end
  487. inherited PnlBottom: TPanel
  488. Top = 575
  489. Width = 311
  490. ExplicitTop = 575
  491. ExplicitWidth = 311
  492. inherited LblRecords: TLabel
  493. Left = 200
  494. Width = 25
  495. Height = 17
  496. ExplicitLeft = 234
  497. ExplicitWidth = 25
  498. ExplicitHeight = 17
  499. end
  500. inherited ChkDispExt: TcxCheckBox
  501. ExplicitHeight = 21
  502. end
  503. inherited BtnExlSave: TcxButton
  504. Left = 231
  505. ExplicitLeft = 231
  506. end
  507. end
  508. end
  509. end
  510. object TabRoad: TcxTabSheet
  511. Caption = #46020#47196' '
  512. ImageIndex = 3
  513. ExplicitLeft = 0
  514. ExplicitTop = 0
  515. ExplicitWidth = 0
  516. ExplicitHeight = 0
  517. inline FRAMERoadList1: TFRAMERoadList
  518. Left = 0
  519. Top = 0
  520. Width = 311
  521. Height = 606
  522. Align = alClient
  523. TabOrder = 0
  524. ExplicitWidth = 311
  525. ExplicitHeight = 606
  526. inherited CxList: TcxGrid
  527. Width = 311
  528. Height = 544
  529. ExplicitWidth = 311
  530. ExplicitHeight = 544
  531. inherited TvList: TcxGridTableView
  532. OnCellDblClick = FRAMERoadList1TvListCellClick
  533. end
  534. end
  535. inherited PnlTop: TPanel
  536. Width = 311
  537. ExplicitWidth = 311
  538. end
  539. inherited PnlBottom: TPanel
  540. Top = 575
  541. Width = 311
  542. ExplicitTop = 575
  543. ExplicitWidth = 311
  544. inherited LblRecords: TLabel
  545. Left = 200
  546. Width = 25
  547. Height = 17
  548. ExplicitLeft = 234
  549. ExplicitWidth = 25
  550. ExplicitHeight = 17
  551. end
  552. inherited ChkDispExt: TcxCheckBox
  553. ExplicitHeight = 21
  554. end
  555. inherited BtnExlSave: TcxButton
  556. Left = 231
  557. ExplicitLeft = 231
  558. end
  559. end
  560. end
  561. end
  562. end
  563. object cxSplitter2: TcxSplitter
  564. Left = 0
  565. Top = 165
  566. Width = 318
  567. Height = 6
  568. AlignSplitter = salTop
  569. Control = cxGroupBox2
  570. end
  571. end
  572. end
  573. object BtnClose: TcxButton
  574. Left = 852
  575. Top = -10
  576. Width = 75
  577. Height = 25
  578. Cursor = crHandPoint
  579. Hint = #45803#44592
  580. Anchors = [akTop, akRight]
  581. Caption = #45803#44592
  582. Colors.Default = 10737865
  583. TabOrder = 1
  584. Visible = False
  585. Font.Charset = DEFAULT_CHARSET
  586. Font.Color = clBlack
  587. Font.Height = -13
  588. Font.Name = #47569#51008' '#44256#46357
  589. Font.Style = [fsBold]
  590. ParentFont = False
  591. OnClick = BtnCloseClick
  592. end
  593. object BtnSearch: TcxButton
  594. Left = 767
  595. Top = -10
  596. Width = 75
  597. Height = 25
  598. Cursor = crHandPoint
  599. Hint = #51312#54924
  600. Anchors = [akTop, akRight]
  601. Caption = #51312#54924
  602. Colors.Default = 10737865
  603. TabOrder = 0
  604. Visible = False
  605. Font.Charset = DEFAULT_CHARSET
  606. Font.Color = clBlack
  607. Font.Height = -13
  608. Font.Name = #47569#51008' '#44256#46357
  609. Font.Style = [fsBold]
  610. ParentFont = False
  611. OnClick = BtnSearchClick
  612. end
  613. object TmrShow: TTimer
  614. Enabled = False
  615. Interval = 500
  616. OnTimer = TmrShowTimer
  617. Left = 167
  618. Top = 180
  619. end
  620. end