开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 电子书籍 > Delphi/CppBuilder > 查看源码
Design.mdl
资源名称：Delphi7经典问题解析源代码.rar　[点击查看]
上传用户：psxgmh
上传日期：2013-04-08
资源大小：15112k
文件大小：2141k
源码类别：

Delphi/CppBuilder

开发平台：

Delphi

Design.mdl：源码内容
  2. (object Petal
  3.     version     44
  4.     _written    "Rose 7.1.9642.27"
  5.     charSet     134)
  7. (object Design "Logical View"
  8.     is_unit     TRUE
  9.     is_loaded   TRUE
  10.     quid        "36D480D20224"
  11.     defaults    (object defaults
  12. rightMargin  0.250000
  13. leftMargin  0.250000
  14. topMargin   0.250000
  15. bottomMargin  0.500000
  16. pageOverlap  0.250000
  17. clipIconLabels  TRUE
  18. autoResize  TRUE
  19. snapToGrid  FALSE
  20. gridX       16
  21. gridY       16
  22. defaultFont  (object Font
  23.     size        10
  24.     face        "Arial"
  25.     bold        FALSE
  26.     italics     FALSE
  27.     underline   FALSE
  28.     strike      FALSE
  29.     color       0
  30.     default_color  TRUE)
  31. showMessageNum  1
  32. showClassOfObject  TRUE
  33. notation    "Unified")
  34.     root_usecase_package  (object Class_Category "Use Case View"
  35. quid        "36D480D20226"
  36. exportControl  "Public"
  37. global      TRUE
  38. logical_models  (list unit_reference_list
  39.     (object Class "TUser"
  40. quid        "3C4ACD82003D"
  41. stereotype  "Actor")
  42.     (object UseCase "TLogSys"
  43. quid        "3C4ACD8D0165")
  44.     (object UseCase "TMultiOperate"
  45. quid        "3C4ACE8C03A7")
  46.     (object UseCase "TDBConnect"
  47. quid        "3C59323802EF"
  48. statemachine  (object State_Machine "State/Activity Model"
  49.     quid        "3C59324C0103"
  50.     states      (list States
  51. (object State "$UNNAMED$0"
  52.     quid        "3C5932550250"
  53.     transitions  (list transition_list
  54. (object State_Transition
  55.     quid        "3C5932A50223"
  56.     supplier    "读取INI"
  57.     quidu       "3C5932620078"
  58.     sendEvent   (object sendEvent
  59. quid        "3C5932A50226")))
  60.     type        "StartState")
  61. (object State "系统"
  62.     quid        "3C5932570253"
  63.     type        "EndState")
  64. (object ActivityState "读取INI"
  65.     quid        "3C5932620078"
  66.     transitions  (list transition_list
  67. (object State_Transition
  68.     quid        "3C5932A801C3"
  69.     label       ""
  70.     supplier    "$UNNAMED$1"
  71.     quidu       "3C59329E0060"
  72.     Event       (object Event "根据INI配置信息连接数据库"
  73. quid        "3C5932A801C4")
  74.     sendEvent   (object sendEvent
  75. quid        "3C5932A801C6"))))
  76. (object ActivityState "$UNNAMED$2"
  77.     quid        "3C5932940201")
  78. (object Decision "$UNNAMED$1"
  79.     quid        "3C59329E0060"
  80.     transitions  (list transition_list
  81. (object State_Transition
  82.     quid        "3C5932AB0380"
  83.     supplier    "系统"
  84.     quidu       "3C5932570253"
  85.     sendEvent   (object sendEvent
  86. quid        "3C5932AB0383"))
  87. (object State_Transition
  88.     quid        "3C59336F0129"
  89.     supplier    "读取INI"
  90.     quidu       "3C5932620078"
  91.     sendEvent   (object sendEvent
  92. quid        "3C59336F012C"))
  93. (object State_Transition
  94.     quid        "3C5933CB02F8"
  95.     supplier    "重新配置"
  96.     quidu       "3C5933AC03C6"
  97.     sendEvent   (object sendEvent
  98. quid        "3C5933CB02FB"))))
  99. (object ActivityState "重新配置"
  100.     quid        "3C5933AC03C6"
  101.     transitions  (list transition_list
  102. (object State_Transition
  103.     quid        "3C5933D2015E"
  104.     supplier    "读取INI"
  105.     quidu       "3C5932620078"
  106.     sendEvent   (object sendEvent
  107. quid        "3C5933D20161"))
  108. (object State_Transition
  109.     quid        "3C59340C0310"
  110.     label       ""
  111.     supplier    "$UNNAMED$3"
  112.     quidu       "3C5934060307"
  113.     Event       (object Event "连接数据库"
  114. quid        "3C59340C0311")
  115.     sendEvent   (object sendEvent
  116. quid        "3C59340C0313"))))
  117. (object Decision "$UNNAMED$3"
  118.     quid        "3C5934060307"
  119.     transitions  (list transition_list
  120. (object State_Transition
  121.     quid        "3C59351A0001"
  122.     supplier    "$UNNAMED$4"
  123.     quidu       "3C59350F01AA"
  124.     sendEvent   (object sendEvent
  125. quid        "3C59351A0004"))
  126. (object State_Transition
  127.     quid        "3C59357001DB"
  128.     supplier    "系统"
  129.     quidu       "3C5932570253"
  130.     sendEvent   (object sendEvent
  131. quid        "3C59357001DE"))
  132. (object State_Transition
  133.     quid        "3C5935A90269"
  134.     supplier    "重新配置"
  135.     quidu       "3C5933AC03C6"
  136.     sendEvent   (object sendEvent
  137. quid        "3C5935A9026C"))))
  138. (object State "$UNNAMED$4"
  139.     quid        "3C59350F01AA"
  140.     type        "EndState"))
  141.     partitions  (list Partitions)
  142.     objects     (list Objects)
  143.     statediagrams  (list StateDiagrams
  144. (object ActivityDiagram "ConfigDB"
  145.     quid        "3C59324C0149"
  146.     title       "ConfigDB"
  147.     zoom        100
  148.     max_height  28350
  149.     max_width   21600
  150.     origin_x    0
  151.     origin_y    0
  152.     items       (list diagram_item_list
  153. (object Swimlane "" @1
  154.     line_color  3342489
  155.     width       450)
  156. (object StateView "StartState" "$UNNAMED$0" @2
  157.     Parent_View  @1
  158.     location    (475, 97)
  159.     font        (object Font
  160. size        10
  161. face        "Arial"
  162. bold        FALSE
  163. italics     FALSE
  164. underline   FALSE
  165. strike      FALSE
  166. color       0
  167. default_color  TRUE)
  168.     label       (object ItemLabel
  169. Parent_View  @2
  170. location    (517, 67)
  171. nlines      2
  172. max_width   600
  173. label       "")
  174.     icon_style  "Icon"
  175.     line_color  3342489
  176.     quidu       "3C5932550250"
  177.     autoResize  TRUE)
  178. (object StateView "EndState" "系统" @3
  179.     Parent_View  @1
  180.     location    (475, 1201)
  181.     font        (object Font
  182. size        10
  183. face        "Arial"
  184. bold        FALSE
  185. italics     FALSE
  186. underline   FALSE
  187. strike      FALSE
  188. color       0
  189. default_color  TRUE)
  190.     label       (object ItemLabel
  191. Parent_View  @3
  192. location    (529, 1159)
  193. nlines      2
  194. max_width   600
  195. label       "系统")
  196.     icon_style  "Icon"
  197.     line_color  3342489
  198.     quidu       "3C5932570253"
  199.     autoResize  TRUE)
  200. (object ActivityStateView "读取INI" @4
  201.     Parent_View  @1
  202.     location    (476, 368)
  203.     font        (object Font
  204. size        10
  205. face        "Arial"
  206. bold        FALSE
  207. italics     FALSE
  208. underline   FALSE
  209. strike      FALSE
  210. color       0
  211. default_color  TRUE)
  212.     label       (object ItemLabel
  213. Parent_View  @4
  214. location    (476, 362)
  215. fill_color  13434879
  216. anchor_loc  1
  217. nlines      2
  218. max_width   257
  219. justify     0
  220. label       "读取INI")
  221.     icon_style  "Icon"
  222.     line_color  3342489
  223.     fill_color  13434879
  224.     quidu       "3C5932620078"
  225.     height      125
  226.     annotation  1
  227.     autoResize  TRUE)
  228. (object TransView "" @5
  229.     stereotype  TRUE
  230.     line_color  3342489
  231.     quidu       "3C5932A50223"
  232.     client      @2
  233.     supplier    @4
  234.     line_style  0
  235.     x_offset    FALSE)
  236. (object DecisionView "$UNNAMED$1" @6
  237.     Parent_View  @1
  238.     location    (476, 759)
  239.     font        (object Font
  240. size        10
  241. face        "Arial"
  242. bold        FALSE
  243. italics     FALSE
  244. underline   FALSE
  245. strike      FALSE
  246. color       0
  247. default_color  TRUE)
  248.     label       (object ItemLabel
  249. Parent_View  @6
  250. location    (536, 694)
  251. nlines      2
  252. max_width   300
  253. label       "")
  254.     icon_style  "Icon"
  255.     line_color  3342489
  256.     fill_color  13434879
  257.     quidu       "3C59329E0060"
  258.     width       169
  259.     height      107
  260.     autoResize  TRUE)
  261. (object TransView "" @7
  262.     font        (object Font
  263. size        10
  264. face        "Arial"
  265. bold        FALSE
  266. italics     FALSE
  267. underline   FALSE
  268. strike      FALSE
  269. color       0
  270. default_color  TRUE)
  271.     label       (object SegLabel @8
  272. Parent_View  @7
  273. location    (570, 562)
  274. font        (object Font
  275.     size        10
  276.     face        "Arial"
  277.     bold        FALSE
  278.     italics     FALSE
  279.     underline   FALSE
  280.     strike      FALSE
  281.     color       0
  282.     default_color  TRUE)
  283. anchor_loc  1
  284. nlines      5
  285. max_width   152
  286. justify     0
  287. label       "根据INI配置信息连接数据库"
  288. pctDist     0.480000
  289. height      94
  290. orientation  0)
  291.     stereotype  TRUE
  292.     line_color  3342489
  293.     quidu       "3C5932A801C3"
  294.     client      @4
  295.     supplier    @6
  296.     line_style  0
  297.     x_offset    FALSE)
  298. (object TransView "" @9
  299.     stereotype  TRUE
  300.     line_color  3342489
  301.     quidu       "3C5932AB0380"
  302.     client      @6
  303.     supplier    @3
  304.     line_style  0
  305.     x_offset    FALSE)
  306. (object ActivityStateView "重新配置" @10
  307.     Parent_View  @1
  308.     location    (1029, 762)
  309.     font        (object Font
  310. size        10
  311. face        "Arial"
  312. bold        FALSE
  313. italics     FALSE
  314. underline   FALSE
  315. strike      FALSE
  316. color       0
  317. default_color  TRUE)
  318.     label       (object ItemLabel
  319. Parent_View  @10
  320. location    (1029, 756)
  321. fill_color  13434879
  322. anchor_loc  1
  323. nlines      2
  324. max_width   293
  325. justify     0
  326. label       "重新配置")
  327.     icon_style  "Icon"
  328.     line_color  3342489
  329.     fill_color  13434879
  330.     quidu       "3C5933AC03C6"
  331.     width       411
  332.     height      124
  333.     annotation  1
  334.     autoResize  TRUE)
  335. (object TransView "" @11
  336.     stereotype  TRUE
  337.     line_color  3342489
  338.     quidu       "3C5933CB02F8"
  339.     client      @6
  340.     supplier    @10
  341.     line_style  0
  342.     x_offset    FALSE)
  343. (object DecisionView "$UNNAMED$3" @12
  344.     Parent_View  @1
  345.     location    (1029, 1036)
  346.     icon_style  "Icon"
  347.     line_color  3342489
  348.     fill_color  13434879
  349.     quidu       "3C5934060307"
  350.     autoResize  TRUE)
  351. (object TransView "" @13
  352.     font        (object Font
  353. size        10
  354. face        "Arial"
  355. bold        FALSE
  356. italics     FALSE
  357. underline   FALSE
  358. strike      FALSE
  359. color       0
  360. default_color  TRUE)
  361.     label       (object SegLabel @14
  362. Parent_View  @13
  363. location    (1102, 913)
  364. font        (object Font
  365.     size        10
  366.     face        "Arial"
  367.     bold        FALSE
  368.     italics     FALSE
  369.     underline   FALSE
  370.     strike      FALSE
  371.     color       0
  372.     default_color  TRUE)
  373. anchor_loc  1
  374. nlines      3
  375. max_width   112
  376. justify     0
  377. label       "连接数据库"
  378. pctDist     0.506848
  379. height      73
  380. orientation  0)
  381.     stereotype  TRUE
  382.     line_color  3342489
  383.     quidu       "3C59340C0310"
  384.     client      @10
  385.     supplier    @12
  386.     line_style  0
  387.     x_offset    FALSE)
  388. (object Label @15
  389.     Parent_View  @1
  390.     location    (558, 690)
  391.     font        (object Font
  392. size        10
  393. face        "Arial"
  394. bold        FALSE
  395. italics     FALSE
  396. underline   FALSE
  397. strike      FALSE
  398. color       0
  399. default_color  TRUE)
  400.     nlines      1
  401.     max_width   256
  402.     label       " 连接失败")
  403. (object Label @16
  404.     Parent_View  @1
  405.     location    (506, 859)
  406.     font        (object Font
  407. size        10
  408. face        "Arial"
  409. bold        FALSE
  410. italics     FALSE
  411. underline   FALSE
  412. strike      FALSE
  413. color       0
  414. default_color  TRUE)
  415.     nlines      4
  416.     max_width   56
  417.     label       "连接成功")
  418. (object StateView "EndState" "$UNNAMED$4" @17
  419.     Parent_View  @1
  420.     location    (1395, 1202)
  421.     font        (object Font
  422. size        10
  423. face        "Arial"
  424. bold        FALSE
  425. italics     FALSE
  426. underline   FALSE
  427. strike      FALSE
  428. color       0
  429. default_color  TRUE)
  430.     label       (object ItemLabel
  431. Parent_View  @17
  432. location    (1449, 1160)
  433. nlines      2
  434. max_width   600
  435. label       "")
  436.     icon_style  "Icon"
  437.     line_color  3342489
  438.     quidu       "3C59350F01AA"
  439.     autoResize  TRUE)
  440. (object Label @18
  441.     Parent_View  @1
  442.     location    (1094, 1094)
  443.     font        (object Font
  444. size        10
  445. face        "Arial"
  446. bold        FALSE
  447. italics     FALSE
  448. underline   FALSE
  449. strike      FALSE
  450. color       0
  451. default_color  TRUE)
  452.     nlines      3
  453.     max_width   150
  454.     label      
  455. |连接失败，退出系统
  456. |成功
  457.     )
  458. (object Label @19
  459.     Parent_View  @1
  460.     location    (781, 1138)
  461.     font        (object Font
  462. size        10
  463. face        "Arial"
  464. bold        FALSE
  465. italics     FALSE
  466. underline   FALSE
  467. strike      FALSE
  468. color       0
  469. default_color  TRUE)
  470.     nlines      1
  471.     max_width   207
  472.     label       "连接成功")
  473. (object TransView "" @20
  474.     stereotype  TRUE
  475.     line_color  3342489
  476.     quidu       "3C59357001DB"
  477.     client      @12
  478.     supplier    @3
  479.     vertices    (list Points
  480. (1029, 1073)
  481. (1028, 1201)
  482. (517, 1201))
  483.     line_style  0
  484.     x_offset    FALSE)
  485. (object TransView "" @21
  486.     stereotype  TRUE
  487.     line_color  3342489
  488.     quidu       "3C59351A0001"
  489.     client      @12
  490.     supplier    @17
  491.     line_style  0
  492.     x_offset    FALSE)
  493. (object TransView "" @22
  494.     stereotype  TRUE
  495.     line_color  3342489
  496.     quidu       "3C5935A90269"
  497.     client      @12
  498.     supplier    @10
  499.     vertices    (list Points
  500. (1104, 1036)
  501. (1441, 1051)
  502. (1441, 757)
  503. (1219, 759))
  504.     line_style  0
  505.     x_offset    FALSE))))))
  506.     (object Association "$UNNAMED$5"
  507. quid        "3C4ACE4101D2"
  508. roles       (list role_list
  509.     (object Role "$UNNAMED$6"
  510. quid        "3C4ACE420129"
  511. supplier    "Use Case View::TLogSys"
  512. quidu       "3C4ACD8D0165"
  513. is_navigable  TRUE)
  514.     (object Role "$UNNAMED$7"
  515. quid        "3C4ACE42016F"
  516. supplier    "Use Case View::TUser"
  517. quidu       "3C4ACD82003D")))
  518.     (object Association "$UNNAMED$8"
  519. quid        "3C4ACECE0185"
  520. roles       (list role_list
  521.     (object Role "$UNNAMED$9"
  522. quid        "3C4ACECF00E6"
  523. supplier    "Use Case View::TMultiOperate"
  524. quidu       "3C4ACE8C03A7"
  525. is_navigable  TRUE)
  526.     (object Role "$UNNAMED$10"
  527. quid        "3C4ACECF00F1"
  528. supplier    "Use Case View::TLogSys"
  529. quidu       "3C4ACD8D0165"))))
  530. logical_presentations  (list unit_reference_list
  531.     (object UseCaseDiagram "Main"
  532. quid        "36D480D20261"
  533. title       "Main"
  534. zoom        100
  535. max_height  28350
  536. max_width   21600
  537. origin_x    0
  538. origin_y    -116
  539. items       (list diagram_item_list
  540.     (object UseCaseView "Use Case View::TDBConnect" @23
  541. location    (406, 347)
  542. font        (object Font
  543.     size        10
  544.     face        "Arial"
  545.     bold        FALSE
  546.     italics     FALSE
  547.     underline   FALSE
  548.     strike      FALSE
  549.     color       0
  550.     default_color  TRUE)
  551. label       (object ItemLabel
  552.     Parent_View  @23
  553.     location    (406, 485)
  554.     anchor_loc  1
  555.     nlines      2
  556.     max_width   630
  557.     justify     0
  558.     label       "TDBConnect")
  559. icon_style  "Icon"
  560. line_color  3342489
  561. fill_color  13434879
  562. quidu       "3C59323802EF"
  563. height      118)))))
  564.     root_category  (object Class_Category "Logical View"
  565. quid        "36D480D20225"
  566. exportControl  "Public"
  567. global      TRUE
  568. subsystem   "Component View"
  569. quidu       "36D480D20227"
  570. logical_models  (list unit_reference_list
  571.     (object Class "NewClass"
  572. quid        "3C4ACF290153")
  573.     (object Class "NewClass2"
  574. quid        "3C4AD06900EF")
  575.     (object Class "TLogsys"
  576. quid        "3C4AD08300BB"
  577. operations  (list Operations
  578.     (object Operation "DoLog"
  579. quid        "3C4AD0BB01DE"
  580. result      "Integer"
  581. concurrency  "Sequential"
  582. opExportControl  "Public"
  583. uid         0))
  584. class_attributes  (list class_attribute_list
  585.     (object ClassAttribute "UserName"
  586. quid        "3C4AD142008D"
  587. type        "String")
  588.     (object ClassAttribute "Password"
  589. quid        "3C4AD16601B2"
  590. type        "String")
  591.     (object ClassAttribute "TableName"
  592. quid        "3C4AD18C0120"
  593. type        "String")
  594.     (object ClassAttribute "FormCaption"
  595. quid        "3C4AD29C035C"
  596. type        "String")))
  597.     (object Class_Category "Delphi Framework"
  598. quid        "36D4A0F601C2"
  599. documentation 
  600. |The Delphi framework contains a fully reverse engineered model of the following Delphi4 library units:
  601. |
  602. |Classes, Controls, Dialogs, Forms, Graphics, Messages, SysUtils, System, Windows
  603. |
  604. |To make use of other Delphi library units, import the appropriate unit category file (.cat) from the "Delphi Framework" subdirectory in Rose Delphi Link installation directory. This would typically be:
  605. |
  606. |C:Program FilesEnsembleRose Delphi Link 3.xDelphi Framework
  607. |
  608. |For example, to use the Db unit, import the Db.cat file into Rose.
  610. exportControl  "Public"
  611. logical_models  (list unit_reference_list
  612.     (object Class_Category "Dialogs"
  613. quid        "36D4AA6702CB"
  614. stereotype  "Unit"
  615. exportControl  "Public"
  616. logical_models  (list unit_reference_list
  617.     (object Class "TCommonDialog"
  618. quid        "36D4AA670389"
  619. superclasses  (list inheritance_relationship_list
  620.     (object Inheritance_Relationship
  621. quid        "36D4AA680114"
  622. supplier    "Logical View::Delphi Framework::Classes::TComponent"
  623. quidu       "36D4A8B401A3"))
  624. operations  (list Operations
  625.     (object Operation "WMDestroy"
  626. attributes  (list Attribute_Set
  627.     (object Attribute
  628. tool        "Delphi"
  629. name        "Operation_Message"
  630. value       "WM_DESTROY"))
  631. quid        "36D4AA6801FA"
  632. parameters  (list Parameters
  633.     (object Parameter "Message"
  634. attributes  (list Attribute_Set
  635.     (object Attribute
  636. tool        "Delphi"
  637. name        "Mode"
  638. value       ("Mode_Enum" 3)))
  639. quid        "3C4ACCCC003E"
  640. type        "TWMDestroy"
  641. quidu       "36D4A1C2014C"))
  642. concurrency  "Sequential"
  643. opExportControl  "Private"
  644. uid         0)
  645.     (object Operation "WMInitDialog"
  646. attributes  (list Attribute_Set
  647.     (object Attribute
  648. tool        "Delphi"
  649. name        "Operation_Message"
  650. value       "WM_INITDIALOG"))
  651. quid        "36D4AA680204"
  652. parameters  (list Parameters
  653.     (object Parameter "Message"
  654. attributes  (list Attribute_Set
  655.     (object Attribute
  656. tool        "Delphi"
  657. name        "Mode"
  658. value       ("Mode_Enum" 3)))
  659. quid        "3C4ACCCC0046"
  660. type        "TWMInitDialog"
  661. quidu       "36D4A1C40344"))
  662. concurrency  "Sequential"
  663. opExportControl  "Private"
  664. uid         0)
  665.     (object Operation "WMNCDestroy"
  666. attributes  (list Attribute_Set
  667.     (object Attribute
  668. tool        "Delphi"
  669. name        "Operation_Message"
  670. value       "WM_NCDESTROY"))
  671. quid        "36D4AA680218"
  672. parameters  (list Parameters
  673.     (object Parameter "Message"
  674. attributes  (list Attribute_Set
  675.     (object Attribute
  676. tool        "Delphi"
  677. name        "Mode"
  678. value       ("Mode_Enum" 3)))
  679. quid        "3C4ACCCC0048"
  680. type        "TWMNCDestroy"
  681. quidu       "36D4A1C801AF"))
  682. concurrency  "Sequential"
  683. opExportControl  "Private"
  684. uid         0)
  685.     (object Operation "MainWndProc"
  686. quid        "36D4AA680222"
  687. parameters  (list Parameters
  688.     (object Parameter "Message"
  689. attributes  (list Attribute_Set
  690.     (object Attribute
  691. tool        "Delphi"
  692. name        "Mode"
  693. value       ("Mode_Enum" 3)))
  694. quid        "3C4ACCCC004A"
  695. type        "TMessage"
  696. quidu       "36D4A1BD034E"))
  697. concurrency  "Sequential"
  698. opExportControl  "Private"
  699. uid         0)
  700.     (object Operation "DoClose"
  701. attributes  (list Attribute_Set
  702.     (object Attribute
  703. tool        "Delphi"
  704. name        "Operation_Binding"
  705. value       ("Operation_Binding_Enum" 3)))
  706. quid        "36D4AA68022C"
  707. concurrency  "Sequential"
  708. opExportControl  "Protected"
  709. uid         0)
  710.     (object Operation "DoShow"
  711. attributes  (list Attribute_Set
  712.     (object Attribute
  713. tool        "Delphi"
  714. name        "Operation_Binding"
  715. value       ("Operation_Binding_Enum" 3)))
  716. quid        "36D4AA680236"
  717. concurrency  "Sequential"
  718. opExportControl  "Protected"
  719. uid         0)
  720.     (object Operation "WndProc"
  721. attributes  (list Attribute_Set
  722.     (object Attribute
  723. tool        "Delphi"
  724. name        "Operation_Binding"
  725. value       ("Operation_Binding_Enum" 2)))
  726. quid        "36D4AA680240"
  727. parameters  (list Parameters
  728.     (object Parameter "Message"
  729. attributes  (list Attribute_Set
  730.     (object Attribute
  731. tool        "Delphi"
  732. name        "Mode"
  733. value       ("Mode_Enum" 3)))
  734. quid        "3C4ACCCC004E"
  735. type        "TMessage"
  736. quidu       "36D4A1BD034E"))
  737. concurrency  "Sequential"
  738. opExportControl  "Protected"
  739. uid         0)
  740.     (object Operation "MessageHook"
  741. attributes  (list Attribute_Set
  742.     (object Attribute
  743. tool        "Delphi"
  744. name        "Operation_Kind"
  745. value       ("Operation_Kind_Enum" 2))
  746.     (object Attribute
  747. tool        "Delphi"
  748. name        "Operation_Binding"
  749. value       ("Operation_Binding_Enum" 2)))
  750. quid        "36D4AA680254"
  751. parameters  (list Parameters
  752.     (object Parameter "Msg"
  753. attributes  (list Attribute_Set
  754.     (object Attribute
  755. tool        "Delphi"
  756. name        "Mode"
  757. value       ("Mode_Enum" 3)))
  758. quid        "3C4ACCCC0050"
  759. type        "TMessage"
  760. quidu       "36D4A1BD034E"))
  761. result      "Boolean"
  762. concurrency  "Sequential"
  763. opExportControl  "Protected"
  764. uid         0)
  765.     (object Operation "TaskModalDialog"
  766. attributes  (list Attribute_Set
  767.     (object Attribute
  768. tool        "Delphi"
  769. name        "Operation_Kind"
  770. value       ("Operation_Kind_Enum" 2))
  771.     (object Attribute
  772. tool        "Delphi"
  773. name        "Operation_Binding"
  774. value       ("Operation_Binding_Enum" 2)))
  775. quid        "36D4AA680268"
  776. parameters  (list Parameters
  777.     (object Parameter "DialogFunc"
  778. quid        "3C4ACCCC0052"
  779. type        "Pointer")
  780.     (object Parameter "DialogData"
  781. attributes  (list Attribute_Set
  782.     (object Attribute
  783. tool        "Delphi"
  784. name        "Mode"
  785. value       ("Mode_Enum" 3)))
  786. quid        "3C4ACCCC0053"))
  787. result      "Bool"
  788. concurrency  "Sequential"
  789. opExportControl  "Protected"
  790. uid         0)
  791.     (object Operation "Execute"
  792. attributes  (list Attribute_Set
  793.     (object Attribute
  794. tool        "Delphi"
  795. name        "Operation_Kind"
  796. value       ("Operation_Kind_Enum" 2))
  797.     (object Attribute
  798. tool        "Delphi"
  799. name        "Operation_Binding"
  800. value       ("Operation_Binding_Enum" 2))
  801.     (object Attribute
  802. tool        "Delphi"
  803. name        "Operation_Abstract"
  804. value       TRUE))
  805. quid        "36D4AA680286"
  806. result      "Boolean"
  807. concurrency  "Sequential"
  808. opExportControl  "Protected"
  809. uid         0)
  810.     (object Operation "Create"
  811. attributes  (list Attribute_Set
  812.     (object Attribute
  813. tool        "Delphi"
  814. name        "Operation_Kind"
  815. value       ("Operation_Kind_Enum" 3))
  816.     (object Attribute
  817. tool        "Delphi"
  818. name        "Operation_Binding"
  819. value       ("Operation_Binding_Enum" 4)))
  820. quid        "36D4AA68029A"
  821. parameters  (list Parameters
  822.     (object Parameter "AOwner"
  823. quid        "3C4ACCCC0056"
  824. type        "TComponent"
  825. quidu       "36D4A8B401A3"))
  826. concurrency  "Sequential"
  827. opExportControl  "Public"
  828. uid         0)
  829.     (object Operation "Destroy"
  830. attributes  (list Attribute_Set
  831.     (object Attribute
  832. tool        "Delphi"
  833. name        "Operation_Kind"
  834. value       ("Operation_Kind_Enum" 4))
  835.     (object Attribute
  836. tool        "Delphi"
  837. name        "Operation_Binding"
  838. value       ("Operation_Binding_Enum" 4)))
  839. quid        "36D4AA6802A4"
  840. concurrency  "Sequential"
  841. opExportControl  "Public"
  842. uid         0)
  843.     (object Operation "DefaultHandler"
  844. attributes  (list Attribute_Set
  845.     (object Attribute
  846. tool        "Delphi"
  847. name        "Operation_Binding"
  848. value       ("Operation_Binding_Enum" 4)))
  849. quid        "36D4AA6802AE"
  850. parameters  (list Parameters
  851.     (object Parameter "Message"
  852. attributes  (list Attribute_Set
  853.     (object Attribute
  854. tool        "Delphi"
  855. name        "Mode"
  856. value       ("Mode_Enum" 3)))
  857. quid        "3C4ACCCC0059"))
  858. concurrency  "Sequential"
  859. opExportControl  "Public"
  860. uid         0)
  861.     (object Operation "Template"
  862. attributes  (list Attribute_Set
  863.     (object Attribute
  864. tool        "Delphi"
  865. name        "Property_Read"
  866. value       "FTemplate")
  867.     (object Attribute
  868. tool        "Delphi"
  869. name        "Property_Write"
  870. value       "FTemplate"))
  871. quid        "36D4AA6802C3"
  872. stereotype  "Property"
  873. result      "PChar"
  874. concurrency  "Sequential"
  875. opExportControl  "Protected"
  876. uid         0)
  877.     (object Operation "Handle"
  878. attributes  (list Attribute_Set
  879.     (object Attribute
  880. tool        "Delphi"
  881. name        "Property_Read"
  882. value       "FHandle"))
  883. quid        "36D4AA6802CD"
  884. stereotype  "Property"
  885. result      "HWnd"
  886. concurrency  "Sequential"
  887. opExportControl  "Public"
  888. uid         0)
  889.     (object Operation "Ctl3D"
  890. attributes  (list Attribute_Set
  891.     (object Attribute
  892. tool        "Delphi"
  893. name        "Published"
  894. value       TRUE)
  895.     (object Attribute
  896. tool        "Delphi"
  897. name        "Property_Read"
  898. value       "FCtl3D")
  899.     (object Attribute
  900. tool        "Delphi"
  901. name        "Property_Write"
  902. value       "FCtl3D")
  903.     (object Attribute
  904. tool        "Delphi"
  905. name        "Property_DefaultSpecifier"
  906. value       ("Property_DefaultSpecifier_Enum" 2))
  907.     (object Attribute
  908. tool        "Delphi"
  909. name        "Property_DefaultValue"
  910. value       "True"))
  911. quid        "36D4AA6802D7"
  912. stereotype  "Property"
  913. result      "Boolean"
  914. concurrency  "Sequential"
  915. opExportControl  "Public"
  916. uid         0)
  917.     (object Operation "HelpContext"
  918. attributes  (list Attribute_Set
  919.     (object Attribute
  920. tool        "Delphi"
  921. name        "Published"
  922. value       TRUE)
  923.     (object Attribute
  924. tool        "Delphi"
  925. name        "Property_Read"
  926. value       "FHelpContext")
  927.     (object Attribute
  928. tool        "Delphi"
  929. name        "Property_Write"
  930. value       "FHelpContext")
  931.     (object Attribute
  932. tool        "Delphi"
  933. name        "Property_DefaultSpecifier"
  934. value       ("Property_DefaultSpecifier_Enum" 2))
  935.     (object Attribute
  936. tool        "Delphi"
  937. name        "Property_DefaultValue"
  938. value       "0"))
  939. quid        "36D4AA6802E1"
  940. stereotype  "Property"
  941. result      "THelpContext"
  942. concurrency  "Sequential"
  943. opExportControl  "Public"
  944. uid         0
  945. quidu       "36D4A8BA021A")
  946.     (object Operation "OnClose"
  947. attributes  (list Attribute_Set
  948.     (object Attribute
  949. tool        "Delphi"
  950. name        "Published"
  951. value       TRUE)
  952.     (object Attribute
  953. tool        "Delphi"
  954. name        "Property_Read"
  955. value       "FOnClose")
  956.     (object Attribute
  957. tool        "Delphi"
  958. name        "Property_Write"
  959. value       "FOnClose"))
  960. quid        "36D4AA6802F5"
  961. stereotype  "Property"
  962. result      "TNotifyEvent"
  963. concurrency  "Sequential"
  964. opExportControl  "Public"
  965. uid         0
  966. quidu       "36D4A8B60214")
  967.     (object Operation "OnShow"
  968. attributes  (list Attribute_Set
  969.     (object Attribute
  970. tool        "Delphi"
  971. name        "Published"
  972. value       TRUE)
  973.     (object Attribute
  974. tool        "Delphi"
  975. name        "Property_Read"
  976. value       "FOnShow")
  977.     (object Attribute
  978. tool        "Delphi"
  979. name        "Property_Write"
  980. value       "FOnShow"))
  981. quid        "36D4AA6802FF"
  982. stereotype  "Property"
  983. result      "TNotifyEvent"
  984. concurrency  "Sequential"
  985. opExportControl  "Public"
  986. uid         0
  987. quidu       "36D4A8B60214"))
  988. class_attributes  (list class_attribute_list
  989.     (object ClassAttribute "FCtl3D"
  990. quid        "36D4AA680115"
  991. type        "Boolean")
  992.     (object ClassAttribute "FDefWndProc"
  993. quid        "36D4AA68011E"
  994. type        "Pointer")
  995.     (object ClassAttribute "FObjectInstance"
  996. quid        "36D4AA680128"
  997. type        "Pointer")
  998.     (object ClassAttribute "FTemplate"
  999. quid        "36D4AA68013C"
  1000. type        "PChar"))
  1001. module      "::Delphi Framework::Vcl::Dialogs"
  1002. quidu       "36D4AA67019F"
  1003. language    "Delphi")
  1004.     (object Class "TOpenOption"
  1005. quid        "36D4AA680313"
  1006. stereotype  "Enum"
  1007. module      "::Delphi Framework::Vcl::Dialogs"
  1008. quidu       "36D4AA67019F"
  1009. language    "Delphi")
  1010.     (object Class "TOpenOptions"
  1011. quid        "36D4AA690061"
  1012. stereotype  "Set"
  1013. module      "::Delphi Framework::Vcl::Dialogs"
  1014. quidu       "36D4AA67019F"
  1015. language    "Delphi")
  1016.     (object Class "TFileEditStyle"
  1017. quid        "36D4AA690198"
  1018. stereotype  "Enum"
  1019. module      "::Delphi Framework::Vcl::Dialogs"
  1020. quidu       "36D4AA67019F"
  1021. language    "Delphi")
  1022.     (object Class "TOpenDialog"
  1023. quid        "36D4AA6902BA"
  1024. superclasses  (list inheritance_relationship_list
  1025.     (object Inheritance_Relationship
  1026. quid        "36D4AA6903DC"
  1027. supplier    "Logical View::Delphi Framework::Dialogs::TCommonDialog"
  1028. quidu       "36D4AA670389"))
  1029. operations  (list Operations
  1030.     (object Operation "GetFileName"
  1031. attributes  (list Attribute_Set
  1032.     (object Attribute
  1033. tool        "Delphi"
  1034. name        "Operation_Kind"
  1035. value       ("Operation_Kind_Enum" 2)))
  1036. quid        "36D4AA6A02E3"
  1037. result      "TFileName"
  1038. concurrency  "Sequential"
  1039. opExportControl  "Private"
  1040. uid         0
  1041. quidu       "36D4A103038D")
  1042.     (object Operation "GetFilterIndex"
  1043. attributes  (list Attribute_Set
  1044.     (object Attribute
  1045. tool        "Delphi"
  1046. name        "Operation_Kind"
  1047. value       ("Operation_Kind_Enum" 2)))
  1048. quid        "36D4AA6A02ED"
  1049. result      "Integer"
  1050. concurrency  "Sequential"
  1051. opExportControl  "Private"
  1052. uid         0)
  1053.     (object Operation "ReadFileEditStyle"
  1054. quid        "36D4AA6A0301"
  1055. parameters  (list Parameters
  1056.     (object Parameter "Reader"
  1057. quid        "3C4ACCCC007A"
  1058. type        "TReader"
  1059. quidu       "36D4A8B8029B"))
  1060. concurrency  "Sequential"
  1061. opExportControl  "Private"
  1062. uid         0)
  1063.     (object Operation "SetHistoryList"
  1064. quid        "36D4AA6A030B"
  1065. parameters  (list Parameters
  1066.     (object Parameter "Value"
  1067. quid        "3C4ACCCC007C"
  1068. type        "TStrings"
  1069. quidu       "36D4A8C10332"))
  1070. concurrency  "Sequential"
  1071. opExportControl  "Private"
  1072. uid         0)
  1073.     (object Operation "SetInitialDir"
  1074. quid        "36D4AA6A0316"
  1075. parameters  (list Parameters
  1076.     (object Parameter "Value"
  1077. attributes  (list Attribute_Set
  1078.     (object Attribute
  1079. tool        "Delphi"
  1080. name        "Mode"
  1081. value       ("Mode_Enum" 2)))
  1082. quid        "3C4ACCCC007E"
  1083. type        "string"))
  1084. concurrency  "Sequential"
  1085. opExportControl  "Private"
  1086. uid         0)
  1087.     (object Operation "CanClose"
  1088. attributes  (list Attribute_Set
  1089.     (object Attribute
  1090. tool        "Delphi"
  1091. name        "Operation_Kind"
  1092. value       ("Operation_Kind_Enum" 2)))
  1093. quid        "36D4AA6A032A"
  1094. parameters  (list Parameters
  1095.     (object Parameter "OpenFileName"
  1096. attributes  (list Attribute_Set
  1097.     (object Attribute
  1098. tool        "Delphi"
  1099. name        "Mode"
  1100. value       ("Mode_Enum" 3)))
  1101. quid        "3C4ACCCC0080"
  1102. type        "TOpenFileName"))
  1103. result      "Boolean"
  1104. concurrency  "Sequential"
  1105. opExportControl  "Protected"
  1106. uid         0)
  1107.     (object Operation "DoCanClose"
  1108. attributes  (list Attribute_Set
  1109.     (object Attribute
  1110. tool        "Delphi"
  1111. name        "Operation_Kind"
  1112. value       ("Operation_Kind_Enum" 2))
  1113.     (object Attribute
  1114. tool        "Delphi"
  1115. name        "Operation_Binding"
  1116. value       ("Operation_Binding_Enum" 3)))
  1117. quid        "36D4AA6A033E"
  1118. result      "Boolean"
  1119. concurrency  "Sequential"
  1120. opExportControl  "Protected"
  1121. uid         0)
  1122.     (object Operation "DoExecute"
  1123. attributes  (list Attribute_Set
  1124.     (object Attribute
  1125. tool        "Delphi"
  1126. name        "Operation_Kind"
  1127. value       ("Operation_Kind_Enum" 2)))
  1128. quid        "36D4AA6A0352"
  1129. parameters  (list Parameters
  1130.     (object Parameter "Func"
  1131. quid        "3C4ACCCC0083"
  1132. type        "Pointer"))
  1133. result      "Bool"
  1134. concurrency  "Sequential"
  1135. opExportControl  "Protected"
  1136. uid         0)
  1137.     (object Operation "DoSelectionChange"
  1138. attributes  (list Attribute_Set
  1139.     (object Attribute
  1140. tool        "Delphi"
  1141. name        "Operation_Binding"
  1142. value       ("Operation_Binding_Enum" 3)))
  1143. quid        "36D4AA6A0370"
  1144. concurrency  "Sequential"
  1145. opExportControl  "Protected"
  1146. uid         0)
  1147.     (object Operation "DoFolderChange"
  1148. attributes  (list Attribute_Set
  1149.     (object Attribute
  1150. tool        "Delphi"
  1151. name        "Operation_Binding"
  1152. value       ("Operation_Binding_Enum" 3)))
  1153. quid        "36D4AA6A0371"
  1154. concurrency  "Sequential"
  1155. opExportControl  "Protected"
  1156. uid         0)
  1157.     (object Operation "DoTypeChange"
  1158. attributes  (list Attribute_Set
  1159.     (object Attribute
  1160. tool        "Delphi"
  1161. name        "Operation_Binding"
  1162. value       ("Operation_Binding_Enum" 3)))
  1163. quid        "36D4AA6A037A"
  1164. concurrency  "Sequential"
  1165. opExportControl  "Protected"
  1166. uid         0)
  1167.     (object Operation "DefineProperties"
  1168. attributes  (list Attribute_Set
  1169.     (object Attribute
  1170. tool        "Delphi"
  1171. name        "Operation_Binding"
  1172. value       ("Operation_Binding_Enum" 4)))
  1173. quid        "36D4AA6A0384"
  1174. parameters  (list Parameters
  1175.     (object Parameter "Filer"
  1176. quid        "3C4ACCCC008C"
  1177. type        "TFiler"
  1178. quidu       "36D4A8B803E4"))
  1179. concurrency  "Sequential"
  1180. opExportControl  "Protected"
  1181. uid         0)
  1182.     (object Operation "GetFileNames"
  1183. quid        "36D4AA6A0398"
  1184. parameters  (list Parameters
  1185.     (object Parameter "OpenFileName"
  1186. attributes  (list Attribute_Set
  1187.     (object Attribute
  1188. tool        "Delphi"
  1189. name        "Mode"
  1190. value       ("Mode_Enum" 3)))
  1191. quid        "3C4ACCCC008E"
  1192. type        "TOpenFileName"))
  1193. concurrency  "Sequential"
  1194. opExportControl  "Protected"
  1195. uid         0)
  1196.     (object Operation "GetStaticRect"
  1197. attributes  (list Attribute_Set
  1198.     (object Attribute
  1199. tool        "Delphi"
  1200. name        "Operation_Kind"
  1201. value       ("Operation_Kind_Enum" 2))
  1202.     (object Attribute
  1203. tool        "Delphi"
  1204. name        "Operation_Binding"
  1205. value       ("Operation_Binding_Enum" 2)))
  1206. quid        "36D4AA6A03A2"
  1207. result      "TRect"
  1208. concurrency  "Sequential"
  1209. opExportControl  "Protected"
  1210. uid         0
  1211. quidu       "36D4A10D03C4")
  1212.     (object Operation "WndProc"
  1213. attributes  (list Attribute_Set
  1214.     (object Attribute
  1215. tool        "Delphi"
  1216. name        "Operation_Binding"
  1217. value       ("Operation_Binding_Enum" 4)))
  1218. quid        "36D4AA6A03AC"
  1219. parameters  (list Parameters
  1220.     (object Parameter "Message"
  1221. attributes  (list Attribute_Set
  1222.     (object Attribute
  1223. tool        "Delphi"
  1224. name        "Mode"
  1225. value       ("Mode_Enum" 3)))
  1226. quid        "3C4ACCCC0091"
  1227. type        "TMessage"
  1228. quidu       "36D4A1BD034E"))
  1229. concurrency  "Sequential"
  1230. opExportControl  "Protected"
  1231. uid         0)
  1232.     (object Operation "Create"
  1233. attributes  (list Attribute_Set
  1234.     (object Attribute
  1235. tool        "Delphi"
  1236. name        "Operation_Kind"
  1237. value       ("Operation_Kind_Enum" 3))
  1238.     (object Attribute
  1239. tool        "Delphi"
  1240. name        "Operation_Binding"
  1241. value       ("Operation_Binding_Enum" 4)))
  1242. quid        "36D4AA6A03C0"
  1243. parameters  (list Parameters
  1244.     (object Parameter "AOwner"
  1245. quid        "3C4ACCCC0095"
  1246. type        "TComponent"
  1247. quidu       "36D4A8B401A3"))
  1248. concurrency  "Sequential"
  1249. opExportControl  "Public"
  1250. uid         0)
  1251.     (object Operation "Destroy"
  1252. attributes  (list Attribute_Set
  1253.     (object Attribute
  1254. tool        "Delphi"
  1255. name        "Operation_Kind"
  1256. value       ("Operation_Kind_Enum" 4))
  1257.     (object Attribute
  1258. tool        "Delphi"
  1259. name        "Operation_Binding"
  1260. value       ("Operation_Binding_Enum" 4)))
  1261. quid        "36D4AA6A03CA"
  1262. concurrency  "Sequential"
  1263. opExportControl  "Public"
  1264. uid         0)
  1265.     (object Operation "Execute"
  1266. attributes  (list Attribute_Set
  1267.     (object Attribute
  1268. tool        "Delphi"
  1269. name        "Operation_Kind"
  1270. value       ("Operation_Kind_Enum" 2))
  1271.     (object Attribute
  1272. tool        "Delphi"
  1273. name        "Operation_Binding"
  1274. value       ("Operation_Binding_Enum" 4)))
  1275. quid        "36D4AA6A03D4"
  1276. result      "Boolean"
  1277. concurrency  "Sequential"
  1278. opExportControl  "Public"
  1279. uid         0)
  1280.     (object Operation "FileEditStyle"
  1281. attributes  (list Attribute_Set
  1282.     (object Attribute
  1283. tool        "Delphi"
  1284. name        "Property_Read"
  1285. value       "FFileEditStyle")
  1286.     (object Attribute
  1287. tool        "Delphi"
  1288. name        "Property_Write"
  1289. value       "FFileEditStyle"))
  1290. quid        "36D4AA6B0000"
  1291. stereotype  "Property"
  1292. result      "TFileEditStyle"
  1293. concurrency  "Sequential"
  1294. opExportControl  "Public"
  1295. uid         0
  1296. quidu       "36D4AA690198")
  1297.     (object Operation "Files"
  1298. attributes  (list Attribute_Set
  1299.     (object Attribute
  1300. tool        "Delphi"
  1301. name        "Property_Read"
  1302. value       "FFiles"))
  1303. quid        "36D4AA6B000A"
  1304. stereotype  "Property"
  1305. result      "TStrings"
  1306. concurrency  "Sequential"
  1307. opExportControl  "Public"
  1308. uid         0
  1309. quidu       "36D4A8C10332")
  1310.     (object Operation "HistoryList"
  1311. attributes  (list Attribute_Set
  1312.     (object Attribute
  1313. tool        "Delphi"
  1314. name        "Property_Read"
  1315. value       "FHistoryList")
  1316.     (object Attribute
  1317. tool        "Delphi"
  1318. name        "Property_Write"
  1319. value       "SetHistoryList"))
  1320. quid        "36D4AA6B001E"
  1321. stereotype  "Property"
  1322. result      "TStrings"
  1323. concurrency  "Sequential"
  1324. opExportControl  "Public"
  1325. uid         0
  1326. quidu       "36D4A8C10332")
  1327.     (object Operation "DefaultExt"
  1328. attributes  (list Attribute_Set
  1329.     (object Attribute
  1330. tool        "Delphi"
  1331. name        "Published"
  1332. value       TRUE)
  1333.     (object Attribute
  1334. tool        "Delphi"
  1335. name        "Property_Read"
  1336. value       "FDefaultExt")
  1337.     (object Attribute
  1338. tool        "Delphi"
  1339. name        "Property_Write"
  1340. value       "FDefaultExt"))
  1341. quid        "36D4AA6B0028"
  1342. stereotype  "Property"
  1343. result      "string"
  1344. concurrency  "Sequential"
  1345. opExportControl  "Public"
  1346. uid         0)
  1347.     (object Operation "FileName"
  1348. attributes  (list Attribute_Set
  1349.     (object Attribute
  1350. tool        "Delphi"
  1351. name        "Published"
  1352. value       TRUE)
  1353.     (object Attribute
  1354. tool        "Delphi"
  1355. name        "Property_Read"
  1356. value       "GetFileName")
  1357.     (object Attribute
  1358. tool        "Delphi"
  1359. name        "Property_Write"
  1360. value       "FFileName"))
  1361. quid        "36D4AA6B0032"
  1362. stereotype  "Property"
  1363. result      "TFileName"
  1364. concurrency  "Sequential"
  1365. opExportControl  "Public"
  1366. uid         0
  1367. quidu       "36D4A103038D")
  1368.     (object Operation "Filter"
  1369. attributes  (list Attribute_Set
  1370.     (object Attribute
  1371. tool        "Delphi"
  1372. name        "Published"
  1373. value       TRUE)
  1374.     (object Attribute
  1375. tool        "Delphi"
  1376. name        "Property_Read"
  1377. value       "FFilter")
  1378.     (object Attribute
  1379. tool        "Delphi"
  1380. name        "Property_Write"
  1381. value       "FFilter"))
  1382. quid        "36D4AA6B003C"
  1383. stereotype  "Property"
  1384. result      "string"
  1385. concurrency  "Sequential"
  1386. opExportControl  "Public"
  1387. uid         0)
  1388.     (object Operation "FilterIndex"
  1389. attributes  (list Attribute_Set
  1390.     (object Attribute
  1391. tool        "Delphi"
  1392. name        "Published"
  1393. value       TRUE)
  1394.     (object Attribute
  1395. tool        "Delphi"
  1396. name        "Property_Read"
  1397. value       "GetFilterIndex")
  1398.     (object Attribute
  1399. tool        "Delphi"
  1400. name        "Property_Write"
  1401. value       "FFilterIndex")
  1402.     (object Attribute
  1403. tool        "Delphi"
  1404. name        "Property_DefaultSpecifier"
  1405. value       ("Property_DefaultSpecifier_Enum" 2))
  1406.     (object Attribute
  1407. tool        "Delphi"
  1408. name        "Property_DefaultValue"
  1409. value       "1"))
  1410. quid        "36D4AA6B0046"
  1411. stereotype  "Property"
  1412. result      "Integer"
  1413. concurrency  "Sequential"
  1414. opExportControl  "Public"
  1415. uid         0)
  1416.     (object Operation "InitialDir"
  1417. attributes  (list Attribute_Set
  1418.     (object Attribute
  1419. tool        "Delphi"
  1420. name        "Published"
  1421. value       TRUE)
  1422.     (object Attribute
  1423. tool        "Delphi"
  1424. name        "Property_Read"
  1425. value       "FInitialDir")
  1426.     (object Attribute
  1427. tool        "Delphi"
  1428. name        "Property_Write"
  1429. value       "SetInitialDir"))
  1430. quid        "36D4AA6B005A"
  1431. stereotype  "Property"
  1432. result      "string"
  1433. concurrency  "Sequential"
  1434. opExportControl  "Public"
  1435. uid         0)
  1436.     (object Operation "Options"
  1437. attributes  (list Attribute_Set
  1438.     (object Attribute
  1439. tool        "Delphi"
  1440. name        "Published"
  1441. value       TRUE)
  1442.     (object Attribute
  1443. tool        "Delphi"
  1444. name        "Property_Read"
  1445. value       "FOptions")
  1446.     (object Attribute
  1447. tool        "Delphi"
  1448. name        "Property_Write"
  1449. value       "FOptions")
  1450.     (object Attribute
  1451. tool        "Delphi"
  1452. name        "Property_DefaultSpecifier"
  1453. value       ("Property_DefaultSpecifier_Enum" 2))
  1454.     (object Attribute
  1455. tool        "Delphi"
  1456. name        "Property_DefaultValue"
  1457. value       "[ofHideReadOnly, ofEnableSizing]"))
  1458. quid        "36D4AA6B0064"
  1459. stereotype  "Property"
  1460. result      "TOpenOptions"
  1461. concurrency  "Sequential"
  1462. opExportControl  "Public"
  1463. uid         0
  1464. quidu       "36D4AA690061")
  1465.     (object Operation "Title"
  1466. attributes  (list Attribute_Set
  1467.     (object Attribute
  1468. tool        "Delphi"
  1469. name        "Published"
  1470. value       TRUE)
  1471.     (object Attribute
  1472. tool        "Delphi"
  1473. name        "Property_Read"
  1474. value       "FTitle")
  1475.     (object Attribute
  1476. tool        "Delphi"
  1477. name        "Property_Write"
  1478. value       "FTitle"))
  1479. quid        "36D4AA6B0078"
  1480. stereotype  "Property"
  1481. result      "string"
  1482. concurrency  "Sequential"
  1483. opExportControl  "Public"
  1484. uid         0)
  1485.     (object Operation "OnCanClose"
  1486. attributes  (list Attribute_Set
  1487.     (object Attribute
  1488. tool        "Delphi"
  1489. name        "Published"
  1490. value       TRUE)
  1491.     (object Attribute
  1492. tool        "Delphi"
  1493. name        "Property_Read"
  1494. value       "FOnCanClose")
  1495.     (object Attribute
  1496. tool        "Delphi"
  1497. name        "Property_Write"
  1498. value       "FOnCanClose"))
  1499. quid        "36D4AA6B0082"
  1500. stereotype  "Property"
  1501. result      "TCloseQueryEvent"
  1502. concurrency  "Sequential"
  1503. opExportControl  "Public"
  1504. uid         0
  1505. quidu       "36D4AA6A0199")
  1506.     (object Operation "OnFolderChange"
  1507. attributes  (list Attribute_Set
  1508.     (object Attribute
  1509. tool        "Delphi"
  1510. name        "Published"
  1511. value       TRUE)
  1512.     (object Attribute
  1513. tool        "Delphi"
  1514. name        "Property_Read"
  1515. value       "FOnFolderChange")
  1516.     (object Attribute
  1517. tool        "Delphi"
  1518. name        "Property_Write"
  1519. value       "FOnFolderChange"))
  1520. quid        "36D4AA6B008C"
  1521. stereotype  "Property"
  1522. result      "TNotifyEvent"
  1523. concurrency  "Sequential"
  1524. opExportControl  "Public"
  1525. uid         0
  1526. quidu       "36D4A8B60214")
  1527.     (object Operation "OnSelectionChange"
  1528. attributes  (list Attribute_Set
  1529.     (object Attribute
  1530. tool        "Delphi"
  1531. name        "Published"
  1532. value       TRUE)
  1533.     (object Attribute
  1534. tool        "Delphi"
  1535. name        "Property_Read"
  1536. value       "FOnSelectionChange")
  1537.     (object Attribute
  1538. tool        "Delphi"
  1539. name        "Property_Write"
  1540. value       "FOnSelectionChange"))
  1541. quid        "36D4AA6B0096"
  1542. stereotype  "Property"
  1543. result      "TNotifyEvent"
  1544. concurrency  "Sequential"
  1545. opExportControl  "Public"
  1546. uid         0
  1547. quidu       "36D4A8B60214")
  1548.     (object Operation "OnTypeChange"
  1549. attributes  (list Attribute_Set
  1550.     (object Attribute
  1551. tool        "Delphi"
  1552. name        "Published"
  1553. value       TRUE)
  1554.     (object Attribute
  1555. tool        "Delphi"
  1556. name        "Property_Read"
  1557. value       "FOnTypeChange")
  1558.     (object Attribute
  1559. tool        "Delphi"
  1560. name        "Property_Write"
  1561. value       "FOnTypeChange"))
  1562. quid        "36D4AA6B00AA"
  1563. stereotype  "Property"
  1564. result      "TNotifyEvent"
  1565. concurrency  "Sequential"
  1566. opExportControl  "Public"
  1567. uid         0
  1568. quidu       "36D4A8B60214"))
  1569. class_attributes  (list class_attribute_list
  1570.     (object ClassAttribute "FFilter"
  1571. quid        "36D4AA6903DD"
  1572. type        "string")
  1573.     (object ClassAttribute "FFilterIndex"
  1574. quid        "36D4AA6A0008"
  1575. type        "Integer")
  1576.     (object ClassAttribute "FCurrentFilterIndex"
  1577. quid        "36D4AA6A0012"
  1578. type        "Integer")
  1579.     (object ClassAttribute "FInitialDir"
  1580. quid        "36D4AA6A001C"
  1581. type        "string")
  1582.     (object ClassAttribute "FTitle"
  1583. quid        "36D4AA6A0030"
  1584. type        "string")
  1585.     (object ClassAttribute "FDefaultExt"
  1586. quid        "36D4AA6A003A"
  1587. type        "string"))
  1588. module      "::Delphi Framework::Vcl::Dialogs"
  1589. quidu       "36D4AA67019F"
  1590. language    "Delphi")
  1591.     (object Class "TSaveDialog"
  1592. quid        "36D4AA6B00B4"
  1593. superclasses  (list inheritance_relationship_list
  1594.     (object Inheritance_Relationship
  1595. quid        "36D4AA6B01D6"
  1596. supplier    "Logical View::Delphi Framework::Dialogs::TOpenDialog"
  1597. quidu       "36D4AA6902BA"))
  1598. operations  (list Operations
  1599.     (object Operation "Execute"
  1600. attributes  (list Attribute_Set
  1601.     (object Attribute
  1602. tool        "Delphi"
  1603. name        "Operation_Kind"
  1604. value       ("Operation_Kind_Enum" 2))
  1605.     (object Attribute
  1606. tool        "Delphi"
  1607. name        "Operation_Binding"
  1608. value       ("Operation_Binding_Enum" 4)))
  1609. quid        "36D4AA6B01E1"
  1610. result      "Boolean"
  1611. concurrency  "Sequential"
  1612. opExportControl  "Public"
  1613. uid         0))
  1614. module      "::Delphi Framework::Vcl::Dialogs"
  1615. quidu       "36D4AA67019F"
  1616. language    "Delphi")
  1617.     (object Class "TColorDialogOption"
  1618. quid        "36D4AA6B01F5"
  1619. stereotype  "Enum"
  1620. module      "::Delphi Framework::Vcl::Dialogs"
  1621. quidu       "36D4AA67019F"
  1622. language    "Delphi")
  1623.     (object Class "TColorDialogOptions"
  1624. quid        "36D4AA6B0317"
  1625. stereotype  "Set"
  1626. module      "::Delphi Framework::Vcl::Dialogs"
  1627. quidu       "36D4AA67019F"
  1628. language    "Delphi")
  1629.     (object Class "TCustomColors"
  1630. quid        "36D4AA6C005B"
  1631. stereotype  "Array"
  1632. module      "::Delphi Framework::Vcl::Dialogs"
  1633. quidu       "36D4AA67019F"
  1634. language    "Delphi")
  1635.     (object Class "TColorDialog"
  1636. quid        "36D4AA6C0188"
  1637. superclasses  (list inheritance_relationship_list
  1638.     (object Inheritance_Relationship
  1639. quid        "36D4AA6C02B4"
  1640. supplier    "Logical View::Delphi Framework::Dialogs::TCommonDialog"
  1641. quidu       "36D4AA670389"))
  1642. operations  (list Operations
  1643.     (object Operation "SetCustomColors"
  1644. quid        "36D4AA6C0336"
  1645. parameters  (list Parameters
  1646.     (object Parameter "Value"
  1647. quid        "3C4ACCCC00CD"
  1648. type        "TStrings"
  1649. quidu       "36D4A8C10332"))
  1650. concurrency  "Sequential"
  1651. opExportControl  "Private"
  1652. uid         0)
  1653.     (object Operation "Create"
  1654. attributes  (list Attribute_Set
  1655.     (object Attribute
  1656. tool        "Delphi"
  1657. name        "Operation_Kind"
  1658. value       ("Operation_Kind_Enum" 3))
  1659.     (object Attribute
  1660. tool        "Delphi"
  1661. name        "Operation_Binding"
  1662. value       ("Operation_Binding_Enum" 4)))
  1663. quid        "36D4AA6C0340"
  1664. parameters  (list Parameters
  1665.     (object Parameter "AOwner"
  1666. quid        "3C4ACCCC00CF"
  1667. type        "TComponent"
  1668. quidu       "36D4A8B401A3"))
  1669. concurrency  "Sequential"
  1670. opExportControl  "Public"
  1671. uid         0)
  1672.     (object Operation "Destroy"
  1673. attributes  (list Attribute_Set
  1674.     (object Attribute
  1675. tool        "Delphi"
  1676. name        "Operation_Kind"
  1677. value       ("Operation_Kind_Enum" 4))
  1678.     (object Attribute
  1679. tool        "Delphi"
  1680. name        "Operation_Binding"
  1681. value       ("Operation_Binding_Enum" 4)))
  1682. quid        "36D4AA6C034A"
  1683. concurrency  "Sequential"
  1684. opExportControl  "Public"
  1685. uid         0)
  1686.     (object Operation "Execute"
  1687. attributes  (list Attribute_Set
  1688.     (object Attribute
  1689. tool        "Delphi"
  1690. name        "Operation_Kind"
  1691. value       ("Operation_Kind_Enum" 2))
  1692.     (object Attribute
  1693. tool        "Delphi"
  1694. name        "Operation_Binding"
  1695. value       ("Operation_Binding_Enum" 4)))
  1696. quid        "36D4AA6C0354"
  1697. result      "Boolean"
  1698. concurrency  "Sequential"
  1699. opExportControl  "Public"
  1700. uid         0)
  1701.     (object Operation "Color"
  1702. attributes  (list Attribute_Set
  1703.     (object Attribute
  1704. tool        "Delphi"
  1705. name        "Published"
  1706. value       TRUE)
  1707.     (object Attribute
  1708. tool        "Delphi"
  1709. name        "Property_Read"
  1710. value       "FColor")
  1711.     (object Attribute
  1712. tool        "Delphi"
  1713. name        "Property_Write"
  1714. value       "FColor")
  1715.     (object Attribute
  1716. tool        "Delphi"
  1717. name        "Property_DefaultSpecifier"
  1718. value       ("Property_DefaultSpecifier_Enum" 2))
  1719.     (object Attribute
  1720. tool        "Delphi"
  1721. name        "Property_DefaultValue"
  1722. value       "clBlack"))
  1723. quid        "36D4AA6C0373"
  1724. stereotype  "Property"
  1725. result      "TColor"
  1726. concurrency  "Sequential"
  1727. opExportControl  "Public"
  1728. uid         0
  1729. quidu       "36D4A93701D4")
  1730.     (object Operation "Ctl3D"
  1731. attributes  (list Attribute_Set
  1732.     (object Attribute
  1733. tool        "Delphi"
  1734. name        "Published"
  1735. value       TRUE)
  1736.     (object Attribute
  1737. tool        "Delphi"
  1738. name        "Property_DefaultSpecifier"
  1739. value       ("Property_DefaultSpecifier_Enum" 2))
  1740.     (object Attribute
  1741. tool        "Delphi"
  1742. name        "Property_DefaultValue"
  1743. value       "False"))
  1744. quid        "36D4AA6C037D"
  1745. stereotype  "Property"
  1746. concurrency  "Sequential"
  1747. opExportControl  "Public"
  1748. uid         0)
  1749.     (object Operation "CustomColors"
  1750. attributes  (list Attribute_Set
  1751.     (object Attribute
  1752. tool        "Delphi"
  1753. name        "Published"
  1754. value       TRUE)
  1755.     (object Attribute
  1756. tool        "Delphi"
  1757. name        "Property_Read"
  1758. value       "FCustomColors")
  1759.     (object Attribute
  1760. tool        "Delphi"
  1761. name        "Property_Write"
  1762. value       "SetCustomColors"))
  1763. quid        "36D4AA6C0387"
  1764. stereotype  "Property"
  1765. result      "TStrings"
  1766. concurrency  "Sequential"
  1767. opExportControl  "Public"
  1768. uid         0
  1769. quidu       "36D4A8C10332")
  1770.     (object Operation "Options"
  1771. attributes  (list Attribute_Set
  1772.     (object Attribute
  1773. tool        "Delphi"
  1774. name        "Published"
  1775. value       TRUE)
  1776.     (object Attribute
  1777. tool        "Delphi"
  1778. name        "Property_Read"
  1779. value       "FOptions")
  1780.     (object Attribute
  1781. tool        "Delphi"
  1782. name        "Property_Write"
  1783. value       "FOptions")
  1784.     (object Attribute
  1785. tool        "Delphi"
  1786. name        "Property_DefaultSpecifier"
  1787. value       ("Property_DefaultSpecifier_Enum" 2))
  1788.     (object Attribute
  1789. tool        "Delphi"
  1790. name        "Property_DefaultValue"
  1791. value       "[]"))
  1792. quid        "36D4AA6C0391"
  1793. stereotype  "Property"
  1794. result      "TColorDialogOptions"
  1795. concurrency  "Sequential"
  1796. opExportControl  "Public"
  1797. uid         0
  1798. quidu       "36D4AA6B0317"))
  1799. module      "::Delphi Framework::Vcl::Dialogs"
  1800. quidu       "36D4AA67019F"
  1801. language    "Delphi")
  1802.     (object Class "TFontDialogOption"
  1803. quid        "36D4AA6C03A5"
  1804. stereotype  "Enum"
  1805. module      "::Delphi Framework::Vcl::Dialogs"
  1806. quidu       "36D4AA67019F"
  1807. language    "Delphi")
  1808.     (object Class "TFontDialogOptions"
  1809. quid        "36D4AA6D00E9"
  1810. stereotype  "Set"
  1811. module      "::Delphi Framework::Vcl::Dialogs"
  1812. quidu       "36D4AA67019F"
  1813. language    "Delphi")
  1814.     (object Class "TFontDialogDevice"
  1815. quid        "36D4AA6D020B"
  1816. stereotype  "Enum"
  1817. module      "::Delphi Framework::Vcl::Dialogs"
  1818. quidu       "36D4AA67019F"
  1819. language    "Delphi")
  1820.     (object Class "TFDApplyEvent"
  1821. quid        "36D4AA6D032E"
  1822. stereotype  "ProcType"
  1823. module      "::Delphi Framework::Vcl::Dialogs"
  1824. quidu       "36D4AA67019F"
  1825. language    "Delphi")
  1826.     (object Class "TFontDialog"
  1827. quid        "36D4AA6E0072"
  1828. superclasses  (list inheritance_relationship_list
  1829.     (object Inheritance_Relationship
  1830. quid        "36D4AA6E0195"
  1831. supplier    "Logical View::Delphi Framework::Dialogs::TCommonDialog"
  1832. quidu       "36D4AA670389"))
  1833. operations  (list Operations
  1834.     (object Operation "DoApply"
  1835. quid        "36D4AA6E0271"
  1836. parameters  (list Parameters
  1837.     (object Parameter "Wnd"
  1838. quid        "3C4ACCCC00EB"
  1839. type        "HWND"
  1840. quidu       "36D4A10E0299"))
  1841. concurrency  "Sequential"
  1842. opExportControl  "Private"
  1843. uid         0)
  1844.     (object Operation "SetFont"
  1845. quid        "36D4AA6E027B"
  1846. parameters  (list Parameters
  1847.     (object Parameter "Value"
  1848. quid        "3C4ACCCC00ED"
  1849. type        "TFont"
  1850. quidu       "36D4A8D20265"))
  1851. concurrency  "Sequential"
  1852. opExportControl  "Private"
  1853. uid         0)
  1854.     (object Operation "UpdateFromLogFont"
  1855. quid        "36D4AA6E0285"
  1856. parameters  (list Parameters
  1857.     (object Parameter "LogFont"
  1858. attributes  (list Attribute_Set
  1859.     (object Attribute
  1860. tool        "Delphi"
  1861. name        "Mode"
  1862. value       ("Mode_Enum" 2)))
  1863. quid        "3C4ACCCC00EF"
  1864. type        "TLogFont"
  1865. quidu       "36D4A2E501C3"))
  1866. concurrency  "Sequential"
  1867. opExportControl  "Private"
  1868. uid         0)
  1869.     (object Operation "Apply"
  1870. attributes  (list Attribute_Set
  1871.     (object Attribute
  1872. tool        "Delphi"
  1873. name        "Operation_Binding"
  1874. value       ("Operation_Binding_Enum" 3)))
  1875. quid        "36D4AA6E0299"
  1876. parameters  (list Parameters
  1877.     (object Parameter "Wnd"
  1878. quid        "3C4ACCCC00F1"
  1879. type        "HWND"
  1880. quidu       "36D4A10E0299"))
  1881. concurrency  "Sequential"
  1882. opExportControl  "Protected"
  1883. uid         0)
  1884.     (object Operation "WndProc"
  1885. attributes  (list Attribute_Set
  1886.     (object Attribute
  1887. tool        "Delphi"
  1888. name        "Operation_Binding"
  1889. value       ("Operation_Binding_Enum" 4)))
  1890. quid        "36D4AA6E02A3"
  1891. parameters  (list Parameters
  1892.     (object Parameter "Message"
  1893. attributes  (list Attribute_Set
  1894.     (object Attribute
  1895. tool        "Delphi"
  1896. name        "Mode"
  1897. value       ("Mode_Enum" 3)))
  1898. quid        "3C4ACCCC00F3"
  1899. type        "TMessage"
  1900. quidu       "36D4A1BD034E"))
  1901. concurrency  "Sequential"
  1902. opExportControl  "Protected"
  1903. uid         0)
  1904.     (object Operation "Create"
  1905. attributes  (list Attribute_Set
  1906.     (object Attribute
  1907. tool        "Delphi"
  1908. name        "Operation_Kind"
  1909. value       ("Operation_Kind_Enum" 3))
  1910.     (object Attribute
  1911. tool        "Delphi"
  1912. name        "Operation_Binding"
  1913. value       ("Operation_Binding_Enum" 4)))
  1914. quid        "36D4AA6E02B7"
  1915. parameters  (list Parameters
  1916.     (object Parameter "AOwner"
  1917. quid        "3C4ACCCC00F5"
  1918. type        "TComponent"
  1919. quidu       "36D4A8B401A3"))
  1920. concurrency  "Sequential"
  1921. opExportControl  "Public"
  1922. uid         0)
  1923.     (object Operation "Destroy"
  1924. attributes  (list Attribute_Set
  1925.     (object Attribute
  1926. tool        "Delphi"
  1927. name        "Operation_Kind"
  1928. value       ("Operation_Kind_Enum" 4))
  1929.     (object Attribute
  1930. tool        "Delphi"
  1931. name        "Operation_Binding"
  1932. value       ("Operation_Binding_Enum" 4)))
  1933. quid        "36D4AA6E02C1"
  1934. concurrency  "Sequential"
  1935. opExportControl  "Public"
  1936. uid         0)
  1937.     (object Operation "Execute"
  1938. attributes  (list Attribute_Set
  1939.     (object Attribute
  1940. tool        "Delphi"
  1941. name        "Operation_Kind"
  1942. value       ("Operation_Kind_Enum" 2))
  1943.     (object Attribute
  1944. tool        "Delphi"
  1945. name        "Operation_Binding"
  1946. value       ("Operation_Binding_Enum" 4)))
  1947. quid        "36D4AA6E02CB"
  1948. result      "Boolean"
  1949. concurrency  "Sequential"
  1950. opExportControl  "Public"
  1951. uid         0)
  1952.     (object Operation "Font"
  1953. attributes  (list Attribute_Set
  1954.     (object Attribute
  1955. tool        "Delphi"
  1956. name        "Published"
  1957. value       TRUE)
  1958.     (object Attribute
  1959. tool        "Delphi"
  1960. name        "Property_Read"
  1961. value       "FFont")
  1962.     (object Attribute
  1963. tool        "Delphi"
  1964. name        "Property_Write"
  1965. value       "SetFont"))
  1966. quid        "36D4AA6E02DF"
  1967. stereotype  "Property"
  1968. result      "TFont"
  1969. concurrency  "Sequential"
  1970. opExportControl  "Public"
  1971. uid         0
  1972. quidu       "36D4A8D20265")
  1973.     (object Operation "Device"
  1974. attributes  (list Attribute_Set
  1975.     (object Attribute
  1976. tool        "Delphi"
  1977. name        "Published"
  1978. value       TRUE)
  1979.     (object Attribute
  1980. tool        "Delphi"
  1981. name        "Property_Read"
  1982. value       "FDevice")
  1983.     (object Attribute
  1984. tool        "Delphi"
  1985. name        "Property_Write"
  1986. value       "FDevice")
  1987.     (object Attribute
  1988. tool        "Delphi"
  1989. name        "Property_DefaultSpecifier"
  1990. value       ("Property_DefaultSpecifier_Enum" 2))
  1991.     (object Attribute
  1992. tool        "Delphi"
  1993. name        "Property_DefaultValue"
  1994. value       "fdScreen"))
  1995. quid        "36D4AA6E02E9"
  1996. stereotype  "Property"
  1997. result      "TFontDialogDevice"
  1998. concurrency  "Sequential"
  1999. opExportControl  "Public"
  2000. uid         0
  2001. quidu       "36D4AA6D020B")
  2002.     (object Operation "MinFontSize"
  2003. attributes  (list Attribute_Set
  2004.     (object Attribute
  2005. tool        "Delphi"
  2006. name        "Published"
  2007. value       TRUE)
  2008.     (object Attribute
  2009. tool        "Delphi"
  2010. name        "Property_Read"
  2011. value       "FMinFontSize")
  2012.     (object Attribute
  2013. tool        "Delphi"
  2014. name        "Property_Write"
  2015. value       "FMinFontSize"))
  2016. quid        "36D4AA6E02FD"
  2017. stereotype  "Property"
  2018. result      "Integer"
  2019. concurrency  "Sequential"
  2020. opExportControl  "Public"
  2021. uid         0)
  2022.     (object Operation "MaxFontSize"
  2023. attributes  (list Attribute_Set
  2024.     (object Attribute
  2025. tool        "Delphi"
  2026. name        "Published"
  2027. value       TRUE)
  2028.     (object Attribute
  2029. tool        "Delphi"
  2030. name        "Property_Read"
  2031. value       "FMaxFontSize")
  2032.     (object Attribute
  2033. tool        "Delphi"
  2034. name        "Property_Write"
  2035. value       "FMaxFontSize"))
  2036. quid        "36D4AA6E0307"
  2037. stereotype  "Property"
  2038. result      "Integer"
  2039. concurrency  "Sequential"
  2040. opExportControl  "Public"
  2041. uid         0)
  2042.     (object Operation "Options"
  2043. attributes  (list Attribute_Set
  2044.     (object Attribute
  2045. tool        "Delphi"
  2046. name        "Published"
  2047. value       TRUE)
  2048.     (object Attribute
  2049. tool        "Delphi"
  2050. name        "Property_Read"
  2051. value       "FOptions")
  2052.     (object Attribute
  2053. tool        "Delphi"
  2054. name        "Property_Write"
  2055. value       "FOptions")
  2056.     (object Attribute
  2057. tool        "Delphi"
  2058. name        "Property_DefaultSpecifier"
  2059. value       ("Property_DefaultSpecifier_Enum" 2))
  2060.     (object Attribute
  2061. tool        "Delphi"
  2062. name        "Property_DefaultValue"
  2063. value       "[fdEffects]"))
  2064. quid        "36D4AA6E0311"
  2065. stereotype  "Property"
  2066. result      "TFontDialogOptions"
  2067. concurrency  "Sequential"
  2068. opExportControl  "Public"
  2069. uid         0
  2070. quidu       "36D4AA6D00E9")
  2071.     (object Operation "OnApply"
  2072. attributes  (list Attribute_Set
  2073.     (object Attribute
  2074. tool        "Delphi"
  2075. name        "Published"
  2076. value       TRUE)
  2077.     (object Attribute
  2078. tool        "Delphi"
  2079. name        "Property_Read"
  2080. value       "FOnApply")
  2081.     (object Attribute
  2082. tool        "Delphi"
  2083. name        "Property_Write"
  2084. value       "FOnApply"))
  2085. quid        "36D4AA6E0325"
  2086. stereotype  "Property"
  2087. result      "TFDApplyEvent"
  2088. concurrency  "Sequential"
  2089. opExportControl  "Public"
  2090. uid         0
  2091. quidu       "36D4AA6D032E"))
  2092. class_attributes  (list class_attribute_list
  2093.     (object ClassAttribute "FMinFontSize"
  2094. quid        "36D4AA6E0196"
  2095. type        "Integer")
  2096.     (object ClassAttribute "FMaxFontSize"
  2097. quid        "36D4AA6E01A9"
  2098. type        "Integer")
  2099.     (object ClassAttribute "FFontCharsetModified"
  2100. quid        "36D4AA6E01B3"
  2101. type        "Boolean")
  2102.     (object ClassAttribute "FFontColorModified"
  2103. quid        "36D4AA6E01BD"
  2104. type        "Boolean"))
  2105. module      "::Delphi Framework::Vcl::Dialogs"
  2106. quidu       "36D4AA67019F"
  2107. language    "Delphi")
  2108.     (object Class "TPrinterSetupDialog"
  2109. quid        "36D4AA6E032F"
  2110. superclasses  (list inheritance_relationship_list
  2111.     (object Inheritance_Relationship
  2112. quid        "36D4AA6F0074"
  2113. supplier    "Logical View::Delphi Framework::Dialogs::TCommonDialog"
  2114. quidu       "36D4AA670389"))
  2115. operations  (list Operations
  2116.     (object Operation "Execute"
  2117. attributes  (list Attribute_Set
  2118.     (object Attribute
  2119. tool        "Delphi"
  2120. name        "Operation_Kind"
  2121. value       ("Operation_Kind_Enum" 2))
  2122.     (object Attribute
  2123. tool        "Delphi"
  2124. name        "Operation_Binding"
  2125. value       ("Operation_Binding_Enum" 4)))
  2126. quid        "36D4AA6F0075"
  2127. result      "Boolean"
  2128. concurrency  "Sequential"
  2129. opExportControl  "Public"
  2130. uid         0))
  2131. module      "::Delphi Framework::Vcl::Dialogs"
  2132. quidu       "36D4AA67019F"
  2133. language    "Delphi")
  2134.     (object Class "TPrintRange"
  2135. quid        "36D4AA6F0088"
  2136. stereotype  "Enum"
  2137. module      "::Delphi Framework::Vcl::Dialogs"
  2138. quidu       "36D4AA67019F"
  2139. language    "Delphi")
  2140.     (object Class "TPrintDialogOption"
  2141. quid        "36D4AA6F01C8"
  2142. stereotype  "Enum"
  2143. module      "::Delphi Framework::Vcl::Dialogs"
  2144. quidu       "36D4AA67019F"
  2145. language    "Delphi")
  2146.     (object Class "TPrintDialogOptions"
  2147. quid        "36D4AA6F02EB"
  2148. stereotype  "Set"
  2149. module      "::Delphi Framework::Vcl::Dialogs"
  2150. quidu       "36D4AA67019F"
  2151. language    "Delphi")
  2152.     (object Class "TPrintDialog"
  2153. quid        "36D4AA70002F"
  2154. superclasses  (list inheritance_relationship_list
  2155.     (object Inheritance_Relationship
  2156. quid        "36D4AA700151"
  2157. supplier    "Logical View::Delphi Framework::Dialogs::TCommonDialog"
  2158. quidu       "36D4AA670389"))
  2159. operations  (list Operations
  2160.     (object Operation "SetNumCopies"
  2161. quid        "36D4AA7001FC"
  2162. parameters  (list Parameters
  2163.     (object Parameter "Value"
  2164. quid        "3C4ACCCC011B"
  2165. type        "Integer"))
  2166. concurrency  "Sequential"
  2167. opExportControl  "Private"
  2168. uid         0)
  2169.     (object Operation "Execute"
  2170. attributes  (list Attribute_Set
  2171.     (object Attribute
  2172. tool        "Delphi"
  2173. name        "Operation_Kind"
  2174. value       ("Operation_Kind_Enum" 2))
  2175.     (object Attribute
  2176. tool        "Delphi"
  2177. name        "Operation_Binding"
  2178. value       ("Operation_Binding_Enum" 4)))
  2179. quid        "36D4AA700210"
  2180. result      "Boolean"
  2181. concurrency  "Sequential"
  2182. opExportControl  "Public"
  2183. uid         0)
  2184.     (object Operation "Collate"
  2185. attributes  (list Attribute_Set
  2186.     (object Attribute
  2187. tool        "Delphi"
  2188. name        "Published"
  2189. value       TRUE)
  2190.     (object Attribute
  2191. tool        "Delphi"
  2192. name        "Property_Read"
  2193. value       "FCollate")
  2194.     (object Attribute
  2195. tool        "Delphi"
  2196. name        "Property_Write"
  2197. value       "FCollate")
  2198.     (object Attribute
  2199. tool        "Delphi"
  2200. name        "Property_DefaultSpecifier"
  2201. value       ("Property_DefaultSpecifier_Enum" 2))
  2202.     (object Attribute
  2203. tool        "Delphi"
  2204. name        "Property_DefaultValue"
  2205. value       "False"))
  2206. quid        "36D4AA70021A"
  2207. stereotype  "Property"
  2208. result      "Boolean"
  2209. concurrency  "Sequential"
  2210. opExportControl  "Public"
  2211. uid         0)
  2212.     (object Operation "Copies"
  2213. attributes  (list Attribute_Set
  2214.     (object Attribute
  2215. tool        "Delphi"
  2216. name        "Published"
  2217. value       TRUE)
  2218.     (object Attribute
  2219. tool        "Delphi"
  2220. name        "Property_Read"
  2221. value       "FCopies")
  2222.     (object Attribute
  2223. tool        "Delphi"
  2224. name        "Property_Write"
  2225. value       "SetNumCopies")
  2226.     (object Attribute
  2227. tool        "Delphi"
  2228. name        "Property_DefaultSpecifier"
  2229. value       ("Property_DefaultSpecifier_Enum" 2))
  2230.     (object Attribute
  2231. tool        "Delphi"
  2232. name        "Property_DefaultValue"
  2233. value       "0"))
  2234. quid        "36D4AA70022E"
  2235. stereotype  "Property"
  2236. result      "Integer"
  2237. concurrency  "Sequential"
  2238. opExportControl  "Public"
  2239. uid         0)
  2240.     (object Operation "FromPage"
  2241. attributes  (list Attribute_Set
  2242.     (object Attribute
  2243. tool        "Delphi"
  2244. name        "Published"
  2245. value       TRUE)
  2246.     (object Attribute
  2247. tool        "Delphi"
  2248. name        "Property_Read"
  2249. value       "FFromPage")
  2250.     (object Attribute
  2251. tool        "Delphi"
  2252. name        "Property_Write"
  2253. value       "FFromPage")
  2254.     (object Attribute
  2255. tool        "Delphi"
  2256. name        "Property_DefaultSpecifier"
  2257. value       ("Property_DefaultSpecifier_Enum" 2))
  2258.     (object Attribute
  2259. tool        "Delphi"
  2260. name        "Property_DefaultValue"
  2261. value       "0"))
  2262. quid        "36D4AA700238"
  2263. stereotype  "Property"
  2264. result      "Integer"
  2265. concurrency  "Sequential"
  2266. opExportControl  "Public"
  2267. uid         0)
  2268.     (object Operation "MinPage"
  2269. attributes  (list Attribute_Set
  2270.     (object Attribute
  2271. tool        "Delphi"
  2272. name        "Published"
  2273. value       TRUE)
  2274.     (object Attribute
  2275. tool        "Delphi"
  2276. name        "Property_Read"
  2277. value       "FMinPage")
  2278.     (object Attribute
  2279. tool        "Delphi"
  2280. name        "Property_Write"
  2281. value       "FMinPage")
  2282.     (object Attribute
  2283. tool        "Delphi"
  2284. name        "Property_DefaultSpecifier"
  2285. value       ("Property_DefaultSpecifier_Enum" 2))
  2286.     (object Attribute
  2287. tool        "Delphi"
  2288. name        "Property_DefaultValue"
  2289. value       "0"))
  2290. quid        "36D4AA70024C"
  2291. stereotype  "Property"
  2292. result      "Integer"
  2293. concurrency  "Sequential"
  2294. opExportControl  "Public"
  2295. uid         0)
  2296.     (object Operation "MaxPage"
  2297. attributes  (list Attribute_Set
  2298.     (object Attribute
  2299. tool        "Delphi"
  2300. name        "Published"
  2301. value       TRUE)
  2302.     (object Attribute
  2303. tool        "Delphi"
  2304. name        "Property_Read"
  2305. value       "FMaxPage")
  2306.     (object Attribute
  2307. tool        "Delphi"
  2308. name        "Property_Write"
  2309. value       "FMaxPage")
  2310.     (object Attribute
  2311. tool        "Delphi"
  2312. name        "Property_DefaultSpecifier"
  2313. value       ("Property_DefaultSpecifier_Enum" 2))
  2314.     (object Attribute
  2315. tool        "Delphi"
  2316. name        "Property_DefaultValue"
  2317. value       "0"))
  2318. quid        "36D4AA700256"
  2319. stereotype  "Property"
  2320. result      "Integer"
  2321. concurrency  "Sequential"
  2322. opExportControl  "Public"
  2323. uid         0)
  2324.     (object Operation "Options"
  2325. attributes  (list Attribute_Set
  2326.     (object Attribute
  2327. tool        "Delphi"
  2328. name        "Published"
  2329. value       TRUE)
  2330.     (object Attribute
  2331. tool        "Delphi"
  2332. name        "Property_Read"
  2333. value       "FOptions")
  2334.     (object Attribute
  2335. tool        "Delphi"
  2336. name        "Property_Write"
  2337. value       "FOptions")
  2338.     (object Attribute
  2339. tool        "Delphi"
  2340. name        "Property_DefaultSpecifier"
  2341. value       ("Property_DefaultSpecifier_Enum" 2))
  2342.     (object Attribute
  2343. tool        "Delphi"
  2344. name        "Property_DefaultValue"
  2345. value       "[]"))
  2346. quid        "36D4AA700260"
  2347. stereotype  "Property"
  2348. result      "TPrintDialogOptions"
  2349. concurrency  "Sequential"
  2350. opExportControl  "Public"
  2351. uid         0
  2352. quidu       "36D4AA6F02EB")
  2353.     (object Operation "PrintToFile"
  2354. attributes  (list Attribute_Set
  2355.     (object Attribute
  2356. tool        "Delphi"
  2357. name        "Published"
  2358. value       TRUE)
  2359.     (object Attribute
  2360. tool        "Delphi"
  2361. name        "Property_Read"
  2362. value       "FPrintToFile")
  2363.     (object Attribute
  2364. tool        "Delphi"
  2365. name        "Property_Write"
  2366. value       "FPrintToFile")
  2367.     (object Attribute
  2368. tool        "Delphi"
  2369. name        "Property_DefaultSpecifier"
  2370. value       ("Property_DefaultSpecifier_Enum" 2))
  2371.     (object Attribute
  2372. tool        "Delphi"
  2373. name        "Property_DefaultValue"
  2374. value       "False"))
  2375. quid        "36D4AA700274"
  2376. stereotype  "Property"
  2377. result      "Boolean"
  2378. concurrency  "Sequential"
  2379. opExportControl  "Public"
  2380. uid         0)
  2381.     (object Operation "PrintRange"
  2382. attributes  (list Attribute_Set
  2383.     (object Attribute
  2384. tool        "Delphi"
  2385. name        "Published"
  2386. value       TRUE)
  2387.     (object Attribute
  2388. tool        "Delphi"
  2389. name        "Property_Read"
  2390. value       "FPrintRange")
  2391.     (object Attribute
  2392. tool        "Delphi"
  2393. name        "Property_Write"
  2394. value       "FPrintRange")
  2395.     (object Attribute
  2396. tool        "Delphi"
  2397. name        "Property_DefaultSpecifier"
  2398. value       ("Property_DefaultSpecifier_Enum" 2))
  2399.     (object Attribute
  2400. tool        "Delphi"
  2401. name        "Property_DefaultValue"
  2402. value       "prAllPages"))
  2403. quid        "36D4AA70027E"
  2404. stereotype  "Property"
  2405. result      "TPrintRange"
  2406. concurrency  "Sequential"
  2407. opExportControl  "Public"
  2408. uid         0
  2409. quidu       "36D4AA6F0088")
  2410.     (object Operation "ToPage"
  2411. attributes  (list Attribute_Set
  2412.     (object Attribute
  2413. tool        "Delphi"
  2414. name        "Published"
  2415. value       TRUE)
  2416.     (object Attribute
  2417. tool        "Delphi"
  2418. name        "Property_Read"
  2419. value       "FToPage")
  2420.     (object Attribute
  2421. tool        "Delphi"
  2422. name        "Property_Write"
  2423. value       "FToPage")
  2424.     (object Attribute
  2425. tool        "Delphi"
  2426. name        "Property_DefaultSpecifier"
  2427. value       ("Property_DefaultSpecifier_Enum" 2))
  2428.     (object Attribute
  2429. tool        "Delphi"
  2430. name        "Property_DefaultValue"
  2431. value       "0"))
  2432. quid        "36D4AA700292"
  2433. stereotype  "Property"
  2434. result      "Integer"
  2435. concurrency  "Sequential"
  2436. opExportControl  "Public"
  2437. uid         0))
  2438. class_attributes  (list class_attribute_list
  2439.     (object ClassAttribute "FFromPage"
  2440. quid        "36D4AA700152"
  2441. type        "Integer")
  2442.     (object ClassAttribute "FToPage"
  2443. quid        "36D4AA700166"
  2444. type        "Integer")
  2445.     (object ClassAttribute "FCollate"
  2446. quid        "36D4AA700170"
  2447. type        "Boolean")
  2448.     (object ClassAttribute "FPrintToFile"
  2449. quid        "36D4AA70017A"
  2450. type        "Boolean")
  2451.     (object ClassAttribute "FMinPage"
  2452. quid        "36D4AA700184"
  2453. type        "Integer")
  2454.     (object ClassAttribute "FMaxPage"
  2455. quid        "36D4AA700198"
  2456. type        "Integer")
  2457.     (object ClassAttribute "FCopies"
  2458. quid        "36D4AA7001A2"
  2459. type        "Integer"))
  2460. module      "::Delphi Framework::Vcl::Dialogs"
  2461. quidu       "36D4AA67019F"
  2462. language    "Delphi")
  2463.     (object Class "TFindOption"
  2464. quid        "36D4AA7002A6"
  2465. stereotype  "Enum"
  2466. module      "::Delphi Framework::Vcl::Dialogs"
  2467. quidu       "36D4AA67019F"
  2468. language    "Delphi")
  2469.     (object Class "TFindOptions"
  2470. quid        "36D4AA7003C8"
  2471. stereotype  "Set"
  2472. module      "::Delphi Framework::Vcl::Dialogs"
  2473. quidu       "36D4AA67019F"
  2474. language    "Delphi")
  2475.     (object Class "TFindReplaceFunc"
  2476. quid        "36D4AA710103"
  2477. stereotype  "ProcType"
  2478. module      "::Delphi Framework::Vcl::Dialogs"
  2479. quidu       "36D4AA67019F"
  2480. language    "Delphi")
  2481.     (object Class "TFindDialog"
  2482. quid        "36D4AA710239"
  2483. superclasses  (list inheritance_relationship_list
  2484.     (object Inheritance_Relationship
  2485. quid        "36D4AA710366"
  2486. supplier    "Logical View::Delphi Framework::Dialogs::TCommonDialog"
  2487. quidu       "36D4AA670389"))
  2488. operations  (list Operations
  2489.     (object Operation "GetFindText"
  2490. attributes  (list Attribute_Set
  2491.     (object Attribute
  2492. tool        "Delphi"
  2493. name        "Operation_Kind"
  2494. value       ("Operation_Kind_Enum" 2)))
  2495. quid        "36D4AA7200F0"
  2496. result      "string"
  2497. concurrency  "Sequential"
  2498. opExportControl  "Private"
  2499. uid         0)
  2500.     (object Operation "GetLeft"
  2501. attributes  (list Attribute_Set
  2502.     (object Attribute
  2503. tool        "Delphi"
  2504. name        "Operation_Kind"
  2505. value       ("Operation_Kind_Enum" 2)))
  2506. quid        "36D4AA720104"
  2507. result      "Integer"
  2508. concurrency  "Sequential"
  2509. opExportControl  "Private"
  2510. uid         0)
  2511.     (object Operation "GetPosition"
  2512. attributes  (list Attribute_Set
  2513.     (object Attribute
  2514. tool        "Delphi"
  2515. name        "Operation_Kind"
  2516. value       ("Operation_Kind_Enum" 2)))
  2517. quid        "36D4AA720118"
  2518. result      "TPoint"
  2519. concurrency  "Sequential"
  2520. opExportControl  "Private"
  2521. uid         0
  2522. quidu       "36D4A10E01D1")
  2523.     (object Operation "GetReplaceText"
  2524. attributes  (list Attribute_Set
  2525.     (object Attribute
  2526. tool        "Delphi"
  2527. name        "Operation_Kind"
  2528. value       ("Operation_Kind_Enum" 2)))
  2529. quid        "36D4AA720122"
  2530. result      "string"
  2531. concurrency  "Sequential"
  2532. opExportControl  "Private"
  2533. uid         0)
  2534.     (object Operation "GetTop"
  2535. attributes  (list Attribute_Set
  2536.     (object Attribute
  2537. tool        "Delphi"
  2538. name        "Operation_Kind"
  2539. value       ("Operation_Kind_Enum" 2)))
  2540. quid        "36D4AA720136"
  2541. result      "Integer"
  2542. concurrency  "Sequential"
  2543. opExportControl  "Private"
  2544. uid         0)
  2545.     (object Operation "SetFindText"
  2546. quid        "36D4AA720140"
  2547. parameters  (list Parameters
  2548.     (object Parameter "Value"
  2549. attributes  (list Attribute_Set
  2550.     (object Attribute
  2551. tool        "Delphi"
  2552. name        "Mode"
  2553. value       ("Mode_Enum" 2)))
  2554. quid        "3C4ACCCC0149"
  2555. type        "string"))
  2556. concurrency  "Sequential"
  2557. opExportControl  "Private"
  2558. uid         0)
  2559.     (object Operation "SetLeft"
  2560. quid        "36D4AA720154"
  2561. parameters  (list Parameters
  2562.     (object Parameter "Value"
  2563. quid        "3C4ACCCC014B"
  2564. type        "Integer"))
  2565. concurrency  "Sequential"
  2566. opExportControl  "Private"
  2567. uid         0)
  2568.     (object Operation "SetPosition"
  2569. quid        "36D4AA720168"
  2570. parameters  (list Parameters
  2571.     (object Parameter "Value"
  2572. attributes  (list Attribute_Set
  2573.     (object Attribute
  2574. tool        "Delphi"
  2575. name        "Mode"
  2576. value       ("Mode_Enum" 2)))
  2577. quid        "3C4ACCCC014D"
  2578. type        "TPoint"
  2579. quidu       "36D4A10E01D1"))
  2580. concurrency  "Sequential"
  2581. opExportControl  "Private"
  2582. uid         0)
  2583.     (object Operation "SetReplaceText"
  2584. quid        "36D4AA720172"
  2585. parameters  (list Parameters
  2586.     (object Parameter "Value"
  2587. attributes  (list Attribute_Set
  2588.     (object Attribute
  2589. tool        "Delphi"
  2590. name        "Mode"
  2591. value       ("Mode_Enum" 2)))
  2592. quid        "3C4ACCCC014F"
  2593. type        "string"))
  2594. concurrency  "Sequential"
  2595. opExportControl  "Private"
  2596. uid         0)
  2597.     (object Operation "SetTop"
  2598. quid        "36D4AA720186"
  2599. parameters  (list Parameters
  2600.     (object Parameter "Value"
  2601. quid        "3C4ACCCC0151"
  2602. type        "Integer"))
  2603. concurrency  "Sequential"
  2604. opExportControl  "Private"
  2605. uid         0)
  2606.     (object Operation "MessageHook"
  2607. attributes  (list Attribute_Set
  2608.     (object Attribute
  2609. tool        "Delphi"
  2610. name        "Operation_Kind"
  2611. value       ("Operation_Kind_Enum" 2))
  2612.     (object Attribute
  2613. tool        "Delphi"
  2614. name        "Operation_Binding"
  2615. value       ("Operation_Binding_Enum" 4)))
  2616. quid        "36D4AA7201AE"
  2617. parameters  (list Parameters
  2618.     (object Parameter "Msg"
  2619. attributes  (list Attribute_Set
  2620.     (object Attribute
  2621. tool        "Delphi"
  2622. name        "Mode"
  2623. value       ("Mode_Enum" 3)))
  2624. quid        "3C4ACCCC0153"
  2625. type        "TMessage"
  2626. quidu       "36D4A1BD034E"))
  2627. result      "Boolean"
  2628. concurrency  "Sequential"
  2629. opExportControl  "Protected"
  2630. uid         0)
  2631.     (object Operation "Find"
  2632. attributes  (list Attribute_Set
  2633.     (object Attribute
  2634. tool        "Delphi"
  2635. name        "Operation_Binding"
  2636. value       ("Operation_Binding_Enum" 3)))
  2637. quid        "36D4AA7201C3"
  2638. concurrency  "Sequential"
  2639. opExportControl  "Protected"
  2640. uid         0)
  2641.     (object Operation "Replace"
  2642. attributes  (list Attribute_Set
  2643.     (object Attribute
  2644. tool        "Delphi"
  2645. name        "Operation_Binding"
  2646. value       ("Operation_Binding_Enum" 3)))
  2647. quid        "36D4AA7201CD"
  2648. concurrency  "Sequential"
  2649. opExportControl  "Protected"
  2650. uid         0)
  2651.     (object Operation "Create"
  2652. attributes  (list Attribute_Set
  2653.     (object Attribute
  2654. tool        "Delphi"
  2655. name        "Operation_Kind"
  2656. value       ("Operation_Kind_Enum" 3))
  2657.     (object Attribute
  2658. tool        "Delphi"
  2659. name        "Operation_Binding"
  2660. value       ("Operation_Binding_Enum" 4)))
  2661. quid        "36D4AA7201D7"
  2662. parameters  (list Parameters
  2663.     (object Parameter "AOwner"
  2664. quid        "3C4ACCCC0157"
  2665. type        "TComponent"
  2666. quidu       "36D4A8B401A3"))
  2667. concurrency  "Sequential"
  2668. opExportControl  "Public"
  2669. uid         0)
  2670.     (object Operation "Destroy"
  2671. attributes  (list Attribute_Set
  2672.     (object Attribute
  2673. tool        "Delphi"
  2674. name        "Operation_Kind"
  2675. value       ("Operation_Kind_Enum" 4))
  2676.     (object Attribute
  2677. tool        "Delphi"
  2678. name        "Operation_Binding"
  2679. value       ("Operation_Binding_Enum" 4)))
  2680. quid        "36D4AA7201E1"
  2681. concurrency  "Sequential"
  2682. opExportControl  "Public"
  2683. uid         0)
  2684.     (object Operation "CloseDialog"
  2685. quid        "36D4AA7201EB"
  2686. concurrency  "Sequential"
  2687. opExportControl  "Public"
  2688. uid         0)
  2689.     (object Operation "Execute"
  2690. attributes  (list Attribute_Set
  2691.     (object Attribute
  2692. tool        "Delphi"
  2693. name        "Operation_Kind"
  2694. value       ("Operation_Kind_Enum" 2))
  2695.     (object Attribute
  2696. tool        "Delphi"
  2697. name        "Operation_Binding"
  2698. value       ("Operation_Binding_Enum" 4)))
  2699. quid        "36D4AA7201F5"
  2700. result      "Boolean"
  2701. concurrency  "Sequential"
  2702. opExportControl  "Public"
  2703. uid         0)
  2704.     (object Operation "ReplaceText"
  2705. attributes  (list Attribute_Set
  2706.     (object Attribute
  2707. tool        "Delphi"
  2708. name        "Property_Read"
  2709. value       "GetReplaceText")
  2710.     (object Attribute
  2711. tool        "Delphi"
  2712. name        "Property_Write"
  2713. value       "SetReplaceText"))
  2714. quid        "36D4AA720209"
  2715. stereotype  "Property"
  2716. result      "string"
  2717. concurrency  "Sequential"
  2718. opExportControl  "Private"
  2719. uid         0)
  2720.     (object Operation "OnReplace"
  2721. attributes  (list Attribute_Set
  2722.     (object Attribute
  2723. tool        "Delphi"
  2724. name        "Property_Read"
  2725. value       "FOnReplace")
  2726.     (object Attribute
  2727. tool        "Delphi"
  2728. name        "Property_Write"
  2729. value       "FOnReplace"))
  2730. quid        "36D4AA720213"
  2731. stereotype  "Property"
  2732. result      "TNotifyEvent"
  2733. concurrency  "Sequential"
  2734. opExportControl  "Private"
  2735. uid         0
  2736. quidu       "36D4A8B60214")
  2737.     (object Operation "Left"
  2738. attributes  (list Attribute_Set
  2739.     (object Attribute
  2740. tool        "Delphi"
  2741. name        "Property_Read"
  2742. value       "GetLeft")
  2743.     (object Attribute
  2744. tool        "Delphi"
  2745. name        "Property_Write"
  2746. value       "SetLeft"))
  2747. quid        "36D4AA72021D"
  2748. stereotype  "Property"
  2749. result      "Integer"
  2750. concurrency  "Sequential"
  2751. opExportControl  "Public"
  2752. uid         0)
  2753.     (object Operation "Position"
  2754. attributes  (list Attribute_Set
  2755.     (object Attribute
  2756. tool        "Delphi"
  2757. name        "Property_Read"
  2758. value       "GetPosition")
  2759.     (object Attribute
  2760. tool        "Delphi"
  2761. name        "Property_Write"
  2762. value       "SetPosition"))
  2763. quid        "36D4AA720231"
  2764. stereotype  "Property"
  2765. result      "TPoint"
  2766. concurrency  "Sequential"
  2767. opExportControl  "Public"
  2768. uid         0
  2769. quidu       "36D4A10E01D1")
  2770.     (object Operation "Top"
  2771. attributes  (list Attribute_Set
  2772.     (object Attribute
  2773. tool        "Delphi"
  2774. name        "Property_Read"
  2775. value       "GetTop")
  2776.     (object Attribute
  2777. tool        "Delphi"
  2778. name        "Property_Write"
  2779. value       "SetTop"))
  2780. quid        "36D4AA72023B"
  2781. stereotype  "Property"
  2782. result      "Integer"
  2783. concurrency  "Sequential"
  2784. opExportControl  "Public"
  2785. uid         0)
  2786.     (object Operation "FindText"
  2787. attributes  (list Attribute_Set
  2788.     (object Attribute
  2789. tool        "Delphi"
  2790. name        "Published"
  2791. value       TRUE)
  2792.     (object Attribute
  2793. tool        "Delphi"
  2794. name        "Property_Read"
  2795. value       "GetFindText")
  2796.     (object Attribute
  2797. tool        "Delphi"
  2798. name        "Property_Write"
  2799. value       "SetFindText"))
  2800. quid        "36D4AA720245"
  2801. stereotype  "Property"
  2802. result      "string"
  2803. concurrency  "Sequential"
  2804. opExportControl  "Public"
  2805. uid         0)
  2806.     (object Operation "Options"
  2807. attributes  (list Attribute_Set
  2808.     (object Attribute
  2809. tool        "Delphi"
  2810. name        "Published"
  2811. value       TRUE)
  2812.     (object Attribute
  2813. tool        "Delphi"
  2814. name        "Property_Read"
  2815. value       "FOptions")
  2816.     (object Attribute
  2817. tool        "Delphi"
  2818. name        "Property_Write"
  2819. value       "FOptions")
  2820.     (object Attribute
  2821. tool        "Delphi"
  2822. name        "Property_DefaultSpecifier"
  2823. value       ("Property_DefaultSpecifier_Enum" 2))
  2824.     (object Attribute
  2825. tool        "Delphi"
  2826. name        "Property_DefaultValue"
  2827. value       "[frDown]"))
  2828. quid        "36D4AA72024F"
  2829. stereotype  "Property"
  2830. result      "TFindOptions"
  2831. concurrency  "Sequential"
  2832. opExportControl  "Public"
  2833. uid         0
  2834. quidu       "36D4AA7003C8")
  2835.     (object Operation "OnFind"
  2836. attributes  (list Attribute_Set
  2837.     (object Attribute
  2838. tool        "Delphi"
  2839. name        "Published"
  2840. value       TRUE)
  2841.     (object Attribute
  2842. tool        "Delphi"
  2843. name        "Property_Read"
  2844. value       "FOnFind")
  2845.     (object Attribute
  2846. tool        "Delphi"
  2847. name        "Property_Write"
  2848. value       "FOnFind"))
  2849. quid        "36D4AA720263"
  2850. stereotype  "Property"
  2851. result      "TNotifyEvent"
  2852. concurrency  "Sequential"
  2853. opExportControl  "Public"
  2854. uid         0
  2855. quidu       "36D4A8B60214"))
  2856. class_attributes  (list class_attribute_list
  2857.     (object ClassAttribute "FFindText"
  2858. quid        "36D4AA710367"
  2859. type        "array[0..255] of Char")
  2860.     (object ClassAttribute "FReplaceText"
  2861. quid        "36D4AA71037A"
  2862. type        "array[0..255] of Char"))
  2863. module      "::Delphi Framework::Vcl::Dialogs"
  2864. quidu       "36D4AA67019F"
  2865. language    "Delphi")
  2866.     (object Class "TReplaceDialog"
  2867. quid        "36D4AA72026D"
  2868. superclasses  (list inheritance_relationship_list
  2869.     (object Inheritance_Relationship
  2870. quid        "36D4AA7203A3"
  2871. supplier    "Logical View::Delphi Framework::Dialogs::TFindDialog"
  2872. quidu       "36D4AA710239"))
  2873. operations  (list Operations
  2874.     (object Operation "Create"
  2875. attributes  (list Attribute_Set
  2876.     (object Attribute
  2877. tool        "Delphi"
  2878. name        "Operation_Kind"
  2879. value       ("Operation_Kind_Enum" 3))
  2880.     (object Attribute
  2881. tool        "Delphi"
  2882. name        "Operation_Binding"
  2883. value       ("Operation_Binding_Enum" 4)))
  2884. quid        "36D4AA7203A4"
  2885. parameters  (list Parameters
  2886.     (object Parameter "AOwner"
  2887. quid        "3C4ACCCC0172"
  2888. type        "TComponent"
  2889. quidu       "36D4A8B401A3"))
  2890. concurrency  "Sequential"
  2891. opExportControl  "Public"
  2892. uid         0)
  2893.     (object Operation "ReplaceText"
  2894. attributes  (list Attribute_Set
  2895.     (object Attribute
  2896. tool        "Delphi"
  2897. name        "Published"
  2898. value       TRUE))
  2899. quid        "36D4AA7203B7"
  2900. stereotype  "Property"
  2901. concurrency  "Sequential"
  2902. opExportControl  "Public"
  2903. uid         0)
  2904.     (object Operation "OnReplace"
  2905. attributes  (list Attribute_Set
  2906.     (object Attribute
  2907. tool        "Delphi"
  2908. name        "Published"
  2909. value       TRUE))
  2910. quid        "36D4AA7203C1"
  2911. stereotype  "Property"
  2912. concurrency  "Sequential"
  2913. opExportControl  "Public"
  2914. uid         0))
  2915. module      "::Delphi Framework::Vcl::Dialogs"
  2916. quidu       "36D4AA67019F"
  2917. language    "Delphi")
  2918.     (object Class "TMsgDlgType"
  2919. quid        "36D4AA7203CB"
  2920. stereotype  "Enum"
  2921. module      "::Delphi Framework::Vcl::Dialogs"
  2922. quidu       "36D4AA67019F"
  2923. language    "Delphi")
  2924.     (object Class "TMsgDlgBtn"
  2925. quid        "36D4AA730110"
  2926. stereotype  "Enum"
  2927. module      "::Delphi Framework::Vcl::Dialogs"
  2928. quidu       "36D4AA67019F"
  2929. language    "Delphi")
  2930.     (object Class "TMsgDlgButtons"
  2931. quid        "36D4AA73023C"
  2932. stereotype  "Set"
  2933. module      "::Delphi Framework::Vcl::Dialogs"
  2934. quidu       "36D4AA67019F"
  2935. language    "Delphi")
  2936.     (object Association "$UNNAMED$11"
  2937. quid        "36D4AA680146"
  2938. roles       (list role_list
  2939.     (object Role "$UNNAMED$12"
  2940. quid        "36D4AA680147"
  2941. supplier    "Logical View::Delphi Framework::Dialogs::TCommonDialog"
  2942. quidu       "36D4AA670389")
  2943.     (object Role "FHelpContext"
  2944. quid        "36D4AA680150"
  2945. label       "FHelpContext"
  2946. supplier    "Logical View::Delphi Framework::Classes::THelpContext"
  2947. quidu       "36D4A8BA021A"
  2948. exportControl  "Private"
  2949. is_navigable  TRUE)))
  2950.     (object Association "$UNNAMED$13"
  2951. quid        "36D4AA680178"
  2952. roles       (list role_list
  2953.     (object Role "$UNNAMED$14"
  2954. quid        "36D4AA680179"
  2955. supplier    "Logical View::Delphi Framework::Dialogs::TCommonDialog"
  2956. quidu       "36D4AA670389")
  2957.     (object Role "FHandle"
  2958. quid        "36D4AA68017A"
  2959. label       "FHandle"
  2960. supplier    "Logical View::Delphi Framework::Windows::HWND"
  2961. quidu       "36D4A10E0299"
  2962. exportControl  "Private"
  2963. is_navigable  TRUE)))
  2964.     (object Association "$UNNAMED$15"
  2965. quid        "36D4AA6801A0"
  2966. roles       (list role_list
  2967.     (object Role "$UNNAMED$16"
  2968. quid        "36D4AA6801A1"
  2969. supplier    "Logical View::Delphi Framework::Dialogs::TCommonDialog"
  2970. quidu       "36D4AA670389")
  2971.     (object Role "FOnClose"
  2972. quid        "36D4AA6801AA"
  2973. label       "FOnClose"
  2974. supplier    "Logical View::Delphi Framework::Classes::TNotifyEvent"
  2975. quidu       "36D4A8B60214"
  2976. exportControl  "Private"
  2977. is_navigable  TRUE)))
  2978.     (object Association "$UNNAMED$17"
  2979. quid        "36D4AA6801C8"
  2980. roles       (list role_list
  2981.     (object Role "$UNNAMED$18"
  2982. quid        "36D4AA6801C9"
  2983. supplier    "Logical View::Delphi Framework::Dialogs::TCommonDialog"
  2984. quidu       "36D4AA670389")
  2985.     (object Role "FOnShow"
  2986. quid        "36D4AA6801D2"
  2987. label       "FOnShow"
  2988. supplier    "Logical View::Delphi Framework::Classes::TNotifyEvent"
  2989. quidu       "36D4A8B60214"
  2990. exportControl  "Private"
  2991. is_navigable  TRUE)))
  2992.     (object Association "$UNNAMED$19"
  2993. quid        "36D4AA6A004E"
  2994. roles       (list role_list
  2995.     (object Role "$UNNAMED$20"
  2996. quid        "36D4AA6A004F"
  2997. supplier    "Logical View::Delphi Framework::Dialogs::TOpenDialog"
  2998. quidu       "36D4AA6902BA")
  2999.     (object Role "FHistoryList"
  3000. quid        "36D4AA6A0050"
  3001. label       "FHistoryList"
  3002. supplier    "Logical View::Delphi Framework::Classes::TStrings"
  3003. quidu       "36D4A8C10332"
  3004. exportControl  "Private"
  3005. is_navigable  TRUE)))
  3006.     (object Association "$UNNAMED$21"
  3007. quid        "36D4AA6A0077"
  3008. roles       (list role_list
  3009.     (object Role "$UNNAMED$22"
  3010. quid        "36D4AA6A0078"
  3011. supplier    "Logical View::Delphi Framework::Dialogs::TOpenDialog"
  3012. quidu       "36D4AA6902BA")
  3013.     (object Role "FOptions"
  3014. quid        "36D4AA6A0079"
  3015. label       "FOptions"
  3016. supplier    "Logical View::Delphi Framework::Dialogs::TOpenOptions"
  3017. quidu       "36D4AA690061"
  3018. exportControl  "Private"
  3019. is_navigable  TRUE)))
  3020.     (object Association "$UNNAMED$23"
  3021. quid        "36D4AA6A009F"
  3022. roles       (list role_list
  3023.     (object Role "$UNNAMED$24"
  3024. quid        "36D4AA6A00A0"
  3025. supplier    "Logical View::Delphi Framework::Dialogs::TOpenDialog"
  3026. quidu       "36D4AA6902BA")
  3027.     (object Role "FFileName"
  3028. quid        "36D4AA6A00A1"
  3029. label       "FFileName"
  3030. supplier    "Logical View::Delphi Framework::SysUtils::TFileName"
  3031. quidu       "36D4A103038D"
  3032. exportControl  "Private"
  3033. is_navigable  TRUE)))
  3034.     (object Association "$UNNAMED$25"
  3035. quid        "36D4AA6A00C7"
  3036. roles       (list role_list
  3037.     (object Role "$UNNAMED$26"
  3038. quid        "36D4AA6A00C8"
  3039. supplier    "Logical View::Delphi Framework::Dialogs::TOpenDialog"
  3040. quidu       "36D4AA6902BA")
  3041.     (object Role "FFiles"
  3042. quid        "36D4AA6A00C9"
  3043. label       "FFiles"
  3044. supplier    "Logical View::Delphi Framework::Classes::TStrings"
  3045. quidu       "36D4A8C10332"
  3046. exportControl  "Private"
  3047. is_navigable  TRUE)))
  3048.     (object Association "$UNNAMED$27"
  3049. quid        "36D4AA6A00EF"
  3050. roles       (list role_list
  3051.     (object Role "$UNNAMED$28"
  3052. quid        "36D4AA6A00F0"
  3053. supplier    "Logical View::Delphi Framework::Dialogs::TOpenDialog"
  3054. quidu       "36D4AA6902BA")
  3055.     (object Role "FFileEditStyle"
  3056. quid        "36D4AA6A00F9"
  3057. label       "FFileEditStyle"
  3058. supplier    "Logical View::Delphi Framework::Dialogs::TFileEditStyle"
  3059. quidu       "36D4AA690198"
  3060. exportControl  "Private"
  3061. is_navigable  TRUE)))
  3062.     (object Association "$UNNAMED$29"
  3063. quid        "36D4AA6A0117"
  3064. roles       (list role_list
  3065.     (object Role "$UNNAMED$30"
  3066. quid        "36D4AA6A0118"
  3067. supplier    "Logical View::Delphi Framework::Dialogs::TOpenDialog"
  3068. quidu       "36D4AA6902BA")
  3069.     (object Role "FOnSelectionChange"
  3070. quid        "36D4AA6A0121"
  3071. label       "FOnSelectionChange"
  3072. supplier    "Logical View::Delphi Framework::Classes::TNotifyEvent"
  3073. quidu       "36D4A8B60214"
  3074. exportControl  "Private"
  3075. is_navigable  TRUE)))
  3076.     (object Association "$UNNAMED$31"
  3077. quid        "36D4AA6A013F"
  3078. roles       (list role_list
  3079.     (object Role "$UNNAMED$32"
  3080. quid        "36D4AA6A0140"
  3081. supplier    "Logical View::Delphi Framework::Dialogs::TOpenDialog"
  3082. quidu       "36D4AA6902BA")
  3083.     (object Role "FOnFolderChange"
  3084. quid        "36D4AA6A0149"
  3085. label       "FOnFolderChange"
  3086. supplier    "Logical View::Delphi Framework::Classes::TNotifyEvent"
  3087. quidu       "36D4A8B60214"
  3088. exportControl  "Private"
  3089. is_navigable  TRUE)))
  3090.     (object Association "$UNNAMED$33"
  3091. quid        "36D4AA6A0171"
  3092. roles       (list role_list
  3093.     (object Role "$UNNAMED$34"
  3094. quid        "36D4AA6A0172"
  3095. supplier    "Logical View::Delphi Framework::Dialogs::TOpenDialog"
  3096. quidu       "36D4AA6902BA")
  3097.     (object Role "FOnTypeChange"
  3098. quid        "36D4AA6A0173"
  3099. label       "FOnTypeChange"
  3100. supplier    "Logical View::Delphi Framework::Classes::TNotifyEvent"
  3101. quidu       "36D4A8B60214"
  3102. exportControl  "Private"
  3103. is_navigable  TRUE)))
  3104.     (object Association "$UNNAMED$35"
  3105. quid        "36D4AA6A02BB"
  3106. roles       (list role_list
  3107.     (object Role "$UNNAMED$36"
  3108. quid        "36D4AA6A02BC"
  3109. supplier    "Logical View::Delphi Framework::Dialogs::TOpenDialog"
  3110. quidu       "36D4AA6902BA")
  3111.     (object Role "FOnCanClose"
  3112. quid        "36D4AA6A02C5"
  3113. label       "FOnCanClose"
  3114. supplier    "Logical View::Delphi Framework::Forms::TCloseQueryEvent"
  3115. quidu       "36D4AA6A0199"
  3116. exportControl  "Private"
  3117. is_navigable  TRUE)))
  3118.     (object Association "$UNNAMED$37"
  3119. quid        "36D4AA6C02BE"
  3120. roles       (list role_list
  3121.     (object Role "$UNNAMED$38"
  3122. quid        "36D4AA6C02BF"
  3123. supplier    "Logical View::Delphi Framework::Dialogs::TColorDialog"
  3124. quidu       "36D4AA6C0188")
  3125.     (object Role "FColor"
  3126. quid        "36D4AA6C02C0"
  3127. label       "FColor"
  3128. supplier    "Logical View::Delphi Framework::Graphics::TColor"
  3129. quidu       "36D4A93701D4"
  3130. exportControl  "Private"
  3131. is_navigable  TRUE)))
  3132.     (object Association "$UNNAMED$39"
  3133. quid        "36D4AA6C02E6"
  3134. roles       (list role_list
  3135.     (object Role "$UNNAMED$40"
  3136. quid        "36D4AA6C02E7"
  3137. supplier    "Logical View::Delphi Framework::Dialogs::TColorDialog"
  3138. quidu       "36D4AA6C0188")
  3139.     (object Role "FOptions"
  3140. quid        "36D4AA6C02E8"
  3141. label       "FOptions"
  3142. supplier    "Logical View::Delphi Framework::Dialogs::TColorDialogOptions"
  3143. quidu       "36D4AA6B0317"
  3144. exportControl  "Private"
  3145. is_navigable  TRUE)))
  3146.     (object Association "$UNNAMED$41"
  3147. quid        "36D4AA6C030E"
  3148. roles       (list role_list
  3149.     (object Role "$UNNAMED$42"
  3150. quid        "36D4AA6C030F"
  3151. supplier    "Logical View::Delphi Framework::Dialogs::TColorDialog"
  3152. quidu       "36D4AA6C0188")
  3153.     (object Role "FCustomColors"
  3154. quid        "36D4AA6C0310"
  3155. label       "FCustomColors"
  3156. supplier    "Logical View::Delphi Framework::Classes::TStrings"
  3157. quidu       "36D4A8C10332"
  3158. exportControl  "Private"
  3159. is_navigable  TRUE)))
  3160.     (object Association "$UNNAMED$43"
  3161. quid        "36D4AA6E01D1"
  3162. roles       (list role_list
  3163.     (object Role "$UNNAMED$44"
  3164. quid        "36D4AA6E01D2"
  3165. supplier    "Logical View::Delphi Framework::Dialogs::TFontDialog"
  3166. quidu       "36D4AA6E0072")
  3167.     (object Role "FFont"
  3168. quid        "36D4AA6E01D3"
  3169. label       "FFont"
  3170. supplier    "Logical View::Delphi Framework::Graphics::TFont"
  3171. quidu       "36D4A8D20265"
  3172. exportControl  "Private"
  3173. is_navigable  TRUE)))
  3174.     (object Association "$UNNAMED$45"
  3175. quid        "36D4AA6E01F9"
  3176. roles       (list role_list
  3177.     (object Role "$UNNAMED$46"
  3178. quid        "36D4AA6E01FA"
  3179. supplier    "Logical View::Delphi Framework::Dialogs::TFontDialog"
  3180. quidu       "36D4AA6E0072")
  3181.     (object Role "FDevice"
  3182. quid        "36D4AA6E01FB"
  3183. label       "FDevice"
  3184. supplier    "Logical View::Delphi Framework::Dialogs::TFontDialogDevice"
  3185. quidu       "36D4AA6D020B"
  3186. exportControl  "Private"
  3187. is_navigable  TRUE)))
  3188.     (object Association "$UNNAMED$47"
  3189. quid        "36D4AA6E0221"
  3190. roles       (list role_list
  3191.     (object Role "$UNNAMED$48"
  3192. quid        "36D4AA6E0222"
  3193. supplier    "Logical View::Delphi Framework::Dialogs::TFontDialog"
  3194. quidu       "36D4AA6E0072")
  3195.     (object Role "FOptions"
  3196. quid        "36D4AA6E0223"
  3197. label       "FOptions"
  3198. supplier    "Logical View::Delphi Framework::Dialogs::TFontDialogOptions"
  3199. quidu       "36D4AA6D00E9"
  3200. exportControl  "Private"
  3201. is_navigable  TRUE)))
  3202.     (object Association "$UNNAMED$49"
  3203. quid        "36D4AA6E023F"
  3204. roles       (list role_list
  3205.     (object Role "$UNNAMED$50"
  3206. quid        "36D4AA6E0240"
  3207. supplier    "Logical View::Delphi Framework::Dialogs::TFontDialog"
  3208. quidu       "36D4AA6E0072")
  3209.     (object Role "FOnApply"
  3210. quid        "36D4AA6E0249"
  3211. label       "FOnApply"
  3212. supplier    "Logical View::Delphi Framework::Dialogs::TFDApplyEvent"
  3213. quidu       "36D4AA6D032E"
  3214. exportControl  "Private"
  3215. is_navigable  TRUE)))
  3216.     (object Association "$UNNAMED$51"
  3217. quid        "36D4AA7001AC"
  3218. roles       (list role_list
  3219.     (object Role "$UNNAMED$52"
  3220. quid        "36D4AA7001AD"
  3221. supplier    "Logical View::Delphi Framework::Dialogs::TPrintDialog"
  3222. quidu       "36D4AA70002F")
  3223.     (object Role "FOptions"
  3224. quid        "36D4AA7001B6"
  3225. label       "FOptions"
  3226. supplier    "Logical View::Delphi Framework::Dialogs::TPrintDialogOptions"
  3227. quidu       "36D4AA6F02EB"
  3228. exportControl  "Private"
  3229. is_navigable  TRUE)))
  3230.     (object Association "$UNNAMED$53"
  3231. quid        "36D4AA7001D4"
  3232. roles       (list role_list
  3233.     (object Role "$UNNAMED$54"
  3234. quid        "36D4AA7001D5"
  3235. supplier    "Logical View::Delphi Framework::Dialogs::TPrintDialog"
  3236. quidu       "36D4AA70002F")
  3237.     (object Role "FPrintRange"
  3238. quid        "36D4AA7001DE"
  3239. label       "FPrintRange"
  3240. supplier    "Logical View::Delphi Framework::Dialogs::TPrintRange"
  3241. quidu       "36D4AA6F0088"
  3242. exportControl  "Private"
  3243. is_navigable  TRUE)))
  3244.     (object Association "$UNNAMED$55"
  3245. quid        "36D4AA710384"
  3246. roles       (list role_list
  3247.     (object Role "$UNNAMED$56"
  3248. quid        "36D4AA710385"
  3249. supplier    "Logical View::Delphi Framework::Dialogs::TFindDialog"
  3250. quidu       "36D4AA710239")
  3251.     (object Role "FOptions"
  3252. quid        "36D4AA71038E"
  3253. label       "FOptions"
  3254. supplier    "Logical View::Delphi Framework::Dialogs::TFindOptions"
  3255. quidu       "36D4AA7003C8"
  3256. exportControl  "Private"
  3257. is_navigable  TRUE)))
  3258.     (object Association "$UNNAMED$57"
  3259. quid        "36D4AA7103AC"
  3260. roles       (list role_list
  3261.     (object Role "$UNNAMED$58"
  3262. quid        "36D4AA7103AD"
  3263. supplier    "Logical View::Delphi Framework::Dialogs::TFindDialog"
  3264. quidu       "36D4AA710239")
  3265.     (object Role "FPosition"
  3266. quid        "36D4AA7103B6"
  3267. label       "FPosition"
  3268. supplier    "Logical View::Delphi Framework::Windows::TPoint"
  3269. quidu       "36D4A10E01D1"
  3270. exportControl  "Private"
  3271. is_navigable  TRUE)))
  3272.     (object Association "$UNNAMED$59"
  3273. quid        "36D4AA7103DE"
  3274. roles       (list role_list
  3275.     (object Role "$UNNAMED$60"
  3276. quid        "36D4AA7103DF"
  3277. supplier    "Logical View::Delphi Framework::Dialogs::TFindDialog"
  3278. quidu       "36D4AA710239")
  3279.     (object Role "FFindReplaceFunc"
  3280. quid        "36D4AA7103E0"
  3281. label       "FFindReplaceFunc"
  3282. supplier    "Logical View::Delphi Framework::Dialogs::TFindReplaceFunc"
  3283. quidu       "36D4AA710103"
  3284. exportControl  "Private"
  3285. is_navigable  TRUE)))
  3286.     (object Association "$UNNAMED$61"
  3287. quid        "36D4AA72001E"
  3288. roles       (list role_list
  3289.     (object Role "$UNNAMED$62"
  3290. quid        "36D4AA72001F"
  3291. supplier    "Logical View::Delphi Framework::Dialogs::TFindDialog"
  3292. quidu       "36D4AA710239")
  3293.     (object Role "FRedirector"
  3294. quid        "36D4AA720020"
  3295. label       "FRedirector"
  3296. supplier    "Logical View::Delphi Framework::Controls::TWinControl"
  3297. quidu       "36D4A8C4003E"
  3298. exportControl  "Private"
  3299. is_navigable  TRUE)))
  3300.     (object Association "$UNNAMED$63"
  3301. quid        "36D4AA720046"
  3302. roles       (list role_list
  3303.     (object Role "$UNNAMED$64"
  3304. quid        "36D4AA720047"
  3305. supplier    "Logical View::Delphi Framework::Dialogs::TFindDialog"
  3306. quidu       "36D4AA710239")
  3307.     (object Role "FOnFind"
  3308. quid        "36D4AA720048"
  3309. label       "FOnFind"
  3310. supplier    "Logical View::Delphi Framework::Classes::TNotifyEvent"
  3311. quidu       "36D4A8B60214"
  3312. exportControl  "Private"
  3313. is_navigable  TRUE)))
  3314.     (object Association "$UNNAMED$65"
  3315. quid        "36D4AA72006E"
  3316. roles       (list role_list
  3317.     (object Role "$UNNAMED$66"
  3318. quid        "36D4AA72006F"
  3319. supplier    "Logical View::Delphi Framework::Dialogs::TFindDialog"
  3320. quidu       "36D4AA710239")
  3321.     (object Role "FOnReplace"
  3322. quid        "36D4AA720078"
  3323. label       "FOnReplace"
  3324. supplier    "Logical View::Delphi Framework::Classes::TNotifyEvent"
  3325. quidu       "36D4A8B60214"
  3326. exportControl  "Private"
  3327. is_navigable  TRUE)))
  3328.     (object Association "$UNNAMED$67"
  3329. quid        "36D4AA7200A0"
  3330. roles       (list role_list
  3331.     (object Role "$UNNAMED$68"
  3332. quid        "36D4AA7200A1"
  3333. supplier    "Logical View::Delphi Framework::Dialogs::TFindDialog"
  3334. quidu       "36D4AA710239")
  3335.     (object Role "FFindHandle"
  3336. quid        "36D4AA7200A2"
  3337. label       "FFindHandle"
  3338. supplier    "Logical View::Delphi Framework::Windows::HWND"
  3339. quidu       "36D4A10E0299"
  3340. exportControl  "Private"
  3341. is_navigable  TRUE)))
  3342.     (object Association "$UNNAMED$69"
  3343. quid        "36D4AA7200C8"
  3344. roles       (list role_list
  3345.     (object Role "$UNNAMED$70"
  3346. quid        "36D4AA7200C9"
  3347. supplier    "Logical View::Delphi Framework::Dialogs::TFindDialog"
  3348. quidu       "36D4AA710239")
  3349.     (object Role "FFindReplace"
  3350. quid        "36D4AA7200D2"
  3351. label       "FFindReplace"
  3352. supplier    "::CommDlg::TFindReplace"
  3353. quidu       "36D4A1A0022A"
  3354. exportControl  "Private"
  3355. is_navigable  TRUE))))
  3356. logical_presentations  (list unit_reference_list))
  3357.     (object Class_Category "Graphics"
  3358. quid        "36D4A8D2002A"
  3359. stereotype  "Unit"
  3360. exportControl  "Public"
  3361. logical_models  (list unit_reference_list
  3362.     (object Class "IChangeNotifier"
  3363. attributes  (list Attribute_Set
  3364.     (object Attribute
  3365. tool        "Delphi"
  3366. name        "Kind"
  3367. value       ("Kind_Enum" 2)))
  3368. quid        "36D4A8D200DE"
  3369. stereotype  "Interface"
  3370. operations  (list Operations
  3371.     (object Operation "Changed"
  3372. quid        "36D4AACA03B4"
  3373. concurrency  "Sequential"
  3374. opExportControl  "Public"
  3375. uid         0))
  3376. module      "::Delphi Framework::Vcl::Graphics"
  3377. quidu       "36D4A8D1032B"
  3378. language    "Delphi")
  3379.     (object Class "TFont"
  3380. quid        "36D4A8D20265"
  3381. superclasses  (list inheritance_relationship_list
  3382.     (object Inheritance_Relationship
  3383. quid        "36D4A8D300B7"
  3384. supplier    "Logical View::Delphi Framework::Graphics::TGraphicsObject"
  3385. quidu       "36D4A8D2039B"))
  3386. operations  (list Operations
  3387.     (object Operation "GetData"
  3388. quid        "36D4AACB0030"
  3389. parameters  (list Parameters
  3390.     (object Parameter "FontData"
  3391. attributes  (list Attribute_Set
  3392.     (object Attribute
  3393. tool        "Delphi"
  3394. name        "Mode"
  3395. value       ("Mode_Enum" 3)))
  3396. quid        "3C4ACCCC0221"
  3397. type        "TFontData"
  3398. quidu       "36D4AAC800FE"))
  3399. concurrency  "Sequential"
  3400. opExportControl  "Private"
  3401. uid         0)
  3402.     (object Operation "SetData"
  3403. quid        "36D4AACB0044"
  3404. parameters  (list Parameters
  3405.     (object Parameter "FontData"
  3406. attributes  (list Attribute_Set
  3407.     (object Attribute
  3408. tool        "Delphi"
  3409. name        "Mode"
  3410. value       ("Mode_Enum" 2)))
  3411. quid        "3C4ACCCC0223"
  3412. type        "TFontData"
  3413. quidu       "36D4AAC800FE"))
  3414. concurrency  "Sequential"
  3415. opExportControl  "Private"
  3416. uid         0)
  3417.     (object Operation "Changed"
  3418. attributes  (list Attribute_Set
  3419.     (object Attribute
  3420. tool        "Delphi"
  3421. name        "Operation_Binding"
  3422. value       ("Operation_Binding_Enum" 4)))
  3423. quid        "36D4AACB004E"
  3424. concurrency  "Sequential"
  3425. opExportControl  "Protected"
  3426. uid         0)
  3427.     (object Operation "GetHandle"
  3428. attributes  (list Attribute_Set
  3429.     (object Attribute
  3430. tool        "Delphi"
  3431. name        "Operation_Kind"
  3432. value       ("Operation_Kind_Enum" 2)))
  3433. quid        "36D4AACB0058"
  3434. result      "HFont"
  3435. concurrency  "Sequential"
  3436. opExportControl  "Protected"
  3437. uid         0)
  3438.     (object Operation "GetHeight"
  3439. attributes  (list Attribute_Set
  3440.     (object Attribute
  3441. tool        "Delphi"
  3442. name        "Operation_Kind"
  3443. value       ("Operation_Kind_Enum" 2)))
  3444. quid        "36D4AACB008A"
  3445. result      "Integer"
  3446. concurrency  "Sequential"
  3447. opExportControl  "Protected"
  3448. uid         0)
  3449.     (object Operation "GetName"
  3450. attributes  (list Attribute_Set
  3451.     (object Attribute
  3452. tool        "Delphi"
  3453. name        "Operation_Kind"
  3454. value       ("Operation_Kind_Enum" 2)))
  3455. quid        "36D4AACB009E"
  3456. result      "TFontName"
  3457. concurrency  "Sequential"
  3458. opExportControl  "Protected"
  3459. uid         0
  3460. quidu       "36D4A9370397")
  3461.     (object Operation "GetPitch"
  3462. attributes  (list Attribute_Set
  3463.     (object Attribute
  3464. tool        "Delphi"
  3465. name        "Operation_Kind"
  3466. value       ("Operation_Kind_Enum" 2)))
  3467. quid        "36D4AACB00A8"
  3468. result      "TFontPitch"
  3469. concurrency  "Sequential"
  3470. opExportControl  "Protected"
  3471. uid         0
  3472. quidu       "36D4A93800D1")
  3473.     (object Operation "GetSize"
  3474. attributes  (list Attribute_Set
  3475.     (object Attribute
  3476. tool        "Delphi"
  3477. name        "Operation_Kind"
  3478. value       ("Operation_Kind_Enum" 2)))
  3479. quid        "36D4AACB00B2"
  3480. result      "Integer"
  3481. concurrency  "Sequential"
  3482. opExportControl  "Protected"
  3483. uid         0)
  3484.     (object Operation "GetStyle"
  3485. attributes  (list Attribute_Set
  3486.     (object Attribute
  3487. tool        "Delphi"
  3488. name        "Operation_Kind"
  3489. value       ("Operation_Kind_Enum" 2)))
  3490. quid        "36D4AACB00BC"
  3491. result      "TFontStyles"
  3492. concurrency  "Sequential"
  3493. opExportControl  "Protected"
  3494. uid         0
  3495. quidu       "36D4A9380208")
  3496.     (object Operation "GetCharset"
  3497. attributes  (list Attribute_Set
  3498.     (object Attribute
  3499. tool        "Delphi"
  3500. name        "Operation_Kind"
  3501. value       ("Operation_Kind_Enum" 2)))
  3502. quid        "36D4AACB00C6"
  3503. result      "TFontCharset"
  3504. concurrency  "Sequential"
  3505. opExportControl  "Protected"
  3506. uid         0
  3507. quidu       "36D4A93700BB")
  3508.     (object Operation "SetColor"
  3509. quid        "36D4AACB00D0"
  3510. parameters  (list Parameters
  3511.     (object Parameter "Value"
  3512. quid        "3C4ACCCC022D"
  3513. type        "TColor"
  3514. quidu       "36D4A93701D4"))
  3515. concurrency  "Sequential"
  3516. opExportControl  "Protected"
  3517. uid         0)
  3518.     (object Operation "SetHandle"
  3519. quid        "36D4AACB00DA"
  3520. parameters  (list Parameters
  3521.     (object Parameter "Value"
  3522. quid        "3C4ACCCC022F"
  3523. type        "HFont"))
  3524. concurrency  "Sequential"
  3525. opExportControl  "Protected"
  3526. uid         0)
  3527.     (object Operation "SetHeight"
  3528. quid        "36D4AACB00E5"
  3529. parameters  (list Parameters
  3530.     (object Parameter "Value"
  3531. quid        "3C4ACCCC0231"
  3532. type        "Integer"))
  3533. concurrency  "Sequential"
  3534. opExportControl  "Protected"
  3535. uid         0)
  3536.     (object Operation "SetName"
  3537. quid        "36D4AACB00F8"
  3538. parameters  (list Parameters
  3539.     (object Parameter "Value"
  3540. attributes  (list Attribute_Set
  3541.     (object Attribute
  3542. tool        "Delphi"
  3543. name        "Mode"
  3544. value       ("Mode_Enum" 2)))
  3545. quid        "3C4ACCCC0233"
  3546. type        "TFontName"
  3547. quidu       "36D4A9370397"))
  3548. concurrency  "Sequential"
  3549. opExportControl  "Protected"
  3550. uid         0)
  3551.     (object Operation "SetPitch"
  3552. quid        "36D4AACB0103"
  3553. parameters  (list Parameters
  3554.     (object Parameter "Value"
  3555. quid        "3C4ACCCC0235"
  3556. type        "TFontPitch"
  3557. quidu       "36D4A93800D1"))
  3558. concurrency  "Sequential"
  3559. opExportControl  "Protected"
  3560. uid         0)
  3561.     (object Operation "SetSize"
  3562. quid        "36D4AACB0116"
  3563. parameters  (list Parameters
  3564.     (object Parameter "Value"
  3565. quid        "3C4ACCCC0237"
  3566. type        "Integer"))
  3567. concurrency  "Sequential"
  3568. opExportControl  "Protected"
  3569. uid         0)
  3570.     (object Operation "SetStyle"
  3571. quid        "36D4AACB0120"
  3572. parameters  (list Parameters
  3573.     (object Parameter "Value"
  3574. quid        "3C4ACCCC0239"
  3575. type        "TFontStyles"
  3576. quidu       "36D4A9380208"))
  3577. concurrency  "Sequential"
  3578. opExportControl  "Protected"
  3579. uid         0)
  3580.     (object Operation "SetCharset"
  3581. quid        "36D4AACB012B"
  3582. parameters  (list Parameters
  3583.     (object Parameter "Value"
  3584. quid        "3C4ACCCC023B"
  3585. type        "TFontCharset"
  3586. quidu       "36D4A93700BB"))
  3587. concurrency  "Sequential"
  3588. opExportControl  "Protected"
  3589. uid         0)
  3590.     (object Operation "Create"
  3591. attributes  (list Attribute_Set
  3592.     (object Attribute
  3593. tool        "Delphi"
  3594. name        "Operation_Kind"
  3595. value       ("Operation_Kind_Enum" 3)))
  3596. quid        "36D4AACB0135"
  3597. concurrency  "Sequential"
  3598. opExportControl  "Public"
  3599. uid         0)
  3600.     (object Operation "Destroy"
  3601. attributes  (list Attribute_Set
  3602.     (object Attribute
  3603. tool        "Delphi"
  3604. name        "Operation_Kind"
  3605. value       ("Operation_Kind_Enum" 4))
  3606.     (object Attribute
  3607. tool        "Delphi"
  3608. name        "Operation_Binding"
  3609. value       ("Operation_Binding_Enum" 4)))
  3610. quid        "36D4AACB013E"
  3611. concurrency  "Sequential"
  3612. opExportControl  "Public"
  3613. uid         0)
  3614.     (object Operation "Assign"
  3615. attributes  (list Attribute_Set
  3616.     (object Attribute
  3617. tool        "Delphi"
  3618. name        "Operation_Binding"
  3619. value       ("Operation_Binding_Enum" 4)))
  3620. quid        "36D4AACB0148"
  3621. parameters  (list Parameters
  3622.     (object Parameter "Source"
  3623. quid        "3C4ACCCC023F"
  3624. type        "TPersistent"
  3625. quidu       "36D4A8B40316"))
  3626. concurrency  "Sequential"
  3627. opExportControl  "Public"
  3628. uid         0)
  3629.     (object Operation "FontAdapter"
  3630. attributes  (list Attribute_Set
  3631.     (object Attribute
  3632. tool        "Delphi"
  3633. name        "Property_Read"
  3634. value       "FNotify")
  3635.     (object Attribute
  3636. tool        "Delphi"
  3637. name        "Property_Write"
  3638. value       "FNotify"))
  3639. quid        "36D4AACB015C"
  3640. stereotype  "Property"
  3641. result      "IChangeNotifier"
  3642. concurrency  "Sequential"
  3643. opExportControl  "Public"
  3644. uid         0
  3645. quidu       "36D4A8D200DE")
  3646.     (object Operation "Handle"
  3647. attributes  (list Attribute_Set
  3648.     (object Attribute
  3649. tool        "Delphi"
  3650. name        "Property_Read"
  3651. value       "GetHandle")
  3652.     (object Attribute
  3653. tool        "Delphi"
  3654. name        "Property_Write"
  3655. value       "SetHandle"))
  3656. quid        "36D4AACB0166"
  3657. stereotype  "Property"
  3658. result      "HFont"
  3659. concurrency  "Sequential"
  3660. opExportControl  "Public"
  3661. uid         0)
  3662.     (object Operation "PixelsPerInch"
  3663. attributes  (list Attribute_Set
  3664.     (object Attribute
  3665. tool        "Delphi"
  3666. name        "Property_Read"
  3667. value       "FPixelsPerInch")
  3668.     (object Attribute
  3669. tool        "Delphi"
  3670. name        "Property_Write"
  3671. value       "FPixelsPerInch"))
  3672. quid        "36D4AACB0170"
  3673. stereotype  "Property"
  3674. result      "Integer"
  3675. concurrency  "Sequential"
  3676. opExportControl  "Public"
  3677. uid         0)
  3678.     (object Operation "Charset"
  3679. attributes  (list Attribute_Set
  3680.     (object Attribute
  3681. tool        "Delphi"
  3682. name        "Published"
  3683. value       TRUE)
  3684.     (object Attribute
  3685. tool        "Delphi"
  3686. name        "Property_Read"
  3687. value       "GetCharset")
  3688.     (object Attribute
  3689. tool        "Delphi"
  3690. name        "Property_Write"
  3691. value       "SetCharset"))
  3692. quid        "36D4AACB0184"
  3693. stereotype  "Property"
  3694. result      "TFontCharset"
  3695. concurrency  "Sequential"
  3696. opExportControl  "Public"
  3697. uid         0
  3698. quidu       "36D4A93700BB")
  3699.     (object Operation "Color"
  3700. attributes  (list Attribute_Set
  3701.     (object Attribute
  3702. tool        "Delphi"
  3703. name        "Published"
  3704. value       TRUE)
  3705.     (object Attribute
  3706. tool        "Delphi"
  3707. name        "Property_Read"
  3708. value       "FColor")
  3709.     (object Attribute
  3710. tool        "Delphi"
  3711. name        "Property_Write"
  3712. value       "SetColor"))
  3713. quid        "36D4AACB018E"
  3714. stereotype  "Property"
  3715. result      "TColor"
  3716. concurrency  "Sequential"
  3717. opExportControl  "Public"
  3718. uid         0
  3719. quidu       "36D4A93701D4")
  3720.     (object Operation "Height"
  3721. attributes  (list Attribute_Set
  3722.     (object Attribute
  3723. tool        "Delphi"
  3724. name        "Published"
  3725. value       TRUE)
  3726.     (object Attribute
  3727. tool        "Delphi"
  3728. name        "Property_Read"
  3729. value       "GetHeight")
  3730.     (object Attribute
  3731. tool        "Delphi"
  3732. name        "Property_Write"
  3733. value       "SetHeight"))
  3734. quid        "36D4AACB0198"
  3735. stereotype  "Property"
  3736. result      "Integer"
  3737. concurrency  "Sequential"
  3738. opExportControl  "Public"
  3739. uid         0)
  3740.     (object Operation "Name"
  3741. attributes  (list Attribute_Set
  3742.     (object Attribute
  3743. tool        "Delphi"
  3744. name        "Published"
  3745. value       TRUE)
  3746.     (object Attribute
  3747. tool        "Delphi"
  3748. name        "Property_Read"
  3749. value       "GetName")
  3750.     (object Attribute
  3751. tool        "Delphi"
  3752. name        "Property_Write"
  3753. value       "SetName"))
  3754. quid        "36D4AACB01A2"
  3755. stereotype  "Property"
  3756. result      "TFontName"
  3757. concurrency  "Sequential"
  3758. opExportControl  "Public"
  3759. uid         0
  3760. quidu       "36D4A9370397")
  3761.     (object Operation "Pitch"
  3762. attributes  (list Attribute_Set
  3763.     (object Attribute
  3764. tool        "Delphi"
  3765. name        "Published"
  3766. value       TRUE)
  3767.     (object Attribute
  3768. tool        "Delphi"
  3769. name        "Property_Read"
  3770. value       "GetPitch")
  3771.     (object Attribute
  3772. tool        "Delphi"
  3773. name        "Property_Write"
  3774. value       "SetPitch")
  3775.     (object Attribute
  3776. tool        "Delphi"
  3777. name        "Property_DefaultSpecifier"
  3778. value       ("Property_DefaultSpecifier_Enum" 2))
  3779.     (object Attribute
  3780. tool        "Delphi"
  3781. name        "Property_DefaultValue"
  3782. value       "fpDefault"))
  3783. quid        "36D4AACB01B6"
  3784. stereotype  "Property"
  3785. result      "TFontPitch"
  3786. concurrency  "Sequential"
  3787. opExportControl  "Public"
  3788. uid         0
  3789. quidu       "36D4A93800D1")
  3790.     (object Operation "Size"
  3791. attributes  (list Attribute_Set
  3792.     (object Attribute
  3793. tool        "Delphi"
  3794. name        "Published"
  3795. value       TRUE)
  3796.     (object Attribute
  3797. tool        "Delphi"
  3798. name        "Property_Read"
  3799. value       "GetSize")
  3800.     (object Attribute
  3801. tool        "Delphi"
  3802. name        "Property_Write"
  3803. value       "SetSize")
  3804.     (object Attribute
  3805. tool        "Delphi"
  3806. name        "Property_Stored"
  3807. value       "False"))
  3808. quid        "36D4AACB01C1"
  3809. stereotype  "Property"
  3810. result      "Integer"
  3811. concurrency  "Sequential"
  3812. opExportControl  "Public"
  3813. uid         0)
  3814.     (object Operation "Style"
  3815. attributes  (list Attribute_Set
  3816.     (object Attribute
  3817. tool        "Delphi"
  3818. name        "Published"
  3819. value       TRUE)
  3820.     (object Attribute
  3821. tool        "Delphi"
  3822. name        "Property_Read"
  3823. value       "GetStyle")
  3824.     (object Attribute
  3825. tool        "Delphi"
  3826. name        "Property_Write"
  3827. value       "SetStyle"))
  3828. quid        "36D4AACB01CB"
  3829. stereotype  "Property"
  3830. result      "TFontStyles"
  3831. concurrency  "Sequential"
  3832. opExportControl  "Public"
  3833. uid         0
  3834. quidu       "36D4A9380208"))
  3835. class_attributes  (list class_attribute_list
  3836.     (object ClassAttribute "FPixelsPerInch"
  3837. quid        "36D4AACA03BE"
  3838. type        "Integer"))
  3839. module      "::Delphi Framework::Vcl::Graphics"
  3840. quidu       "36D4A8D1032B"
  3841. language    "Delphi")
  3842.     (object Class "TGraphicsObject"