money.mdl
来自「Delphi深度探索,Delphi深度探索（第二版）」· MDL 代码 · 共 2,427 行 · 第 1/5 页
MDL
2,427 行
(object Petal
version 45
_written "Rose 7.5.0103.1920"
charSet 134)
(object Design "Logical View"
is_unit TRUE
is_loaded TRUE
quid "3EC780A20282"
defaults (object defaults
rightMargin 0.250000
leftMargin 0.250000
topMargin 0.250000
bottomMargin 0.500000
pageOverlap 0.250000
clipIconLabels TRUE
autoResize TRUE
snapToGrid TRUE
gridX 16
gridY 16
defaultFont (object Font
size 10
face "Arial"
bold FALSE
italics FALSE
underline FALSE
strike FALSE
color 0
default_color TRUE)
showMessageNum 1
showClassOfObject TRUE
notation "Unified")
root_usecase_package (object Class_Category "Use Case View"
quid "3EC780A20284"
exportControl "Public"
global TRUE
logical_models (list unit_reference_list
(object Class "AcctItem"
quid "3EC7810202BC"
documentation "账目对象"
class_attributes (list class_attribute_list
(object ClassAttribute "Name"
quid "3EC78254002D"
documentation "账目名称"
type "String"
exportControl "Public")
(object ClassAttribute "Amount"
quid "3EC7829902F3"
documentation "金额"
type "Currency"
exportControl "Public")
(object ClassAttribute "HappenDate"
quid "3EC782C00231"
documentation "发生日期"
type "Date"
exportControl "Public")))
(object Class "Person"
quid "3EC7838B0341"
documentation "费用相关人员"
operations (list Operations
(object Operation "NewAcctItem"
quid "3EC7846601AC"
result "AcctItem"
concurrency "Sequential"
opExportControl "Public"
uid 0
quidu "3EC7810202BC"))
class_attributes (list class_attribute_list
(object ClassAttribute "Name"
quid "3EC783A503CB"
type "String"
exportControl "Public")))
(object Association "PayAssoc"
quid "3EC783FD00D8"
roles (list role_list
(object Role "PayPerson"
quid "3EC783FD03B3"
label "PayPerson"
supplier "Use Case View::Person"
quidu "3EC7838B0341"
client_cardinality (value cardinality "1")
is_navigable TRUE)
(object Role "Pay"
quid "3EC783FD03BE"
label "Pay"
supplier "Use Case View::AcctItem"
quidu "3EC7810202BC"
client_cardinality (value cardinality "0..n")
is_navigable TRUE))))
logical_presentations (list unit_reference_list
(object UseCaseDiagram "Main"
quid "3EC780A80001"
title "Main"
zoom 100
max_height 28350
max_width 21600
origin_x 0
origin_y 0
items (list diagram_item_list
(object ClassView "Class" "Use Case View::Person" @1
ShowCompartmentStereotypes TRUE
IncludeAttribute TRUE
IncludeOperation TRUE
location (304, 640)
font (object Font
size 10
face "Arial"
bold FALSE
italics FALSE
underline FALSE
strike FALSE
color 0
default_color TRUE)
label (object ItemLabel
Parent_View @1
location (156, 545)
fill_color 13434879
nlines 1
max_width 296
justify 0
label "Person")
icon_style "Icon"
line_color 3342489
fill_color 13434879
quidu "3EC7838B0341"
compartment (object Compartment
Parent_View @1
location (156, 601)
font (object Font
size 10
face "Arial"
bold FALSE
italics FALSE
underline FALSE
strike FALSE
color 0
default_color TRUE)
icon_style "Icon"
fill_color 13434879
anchor 2
nlines 3
max_width 293)
width 314
height 212
annotation 8
autoResize TRUE)
(object ClassView "Class" "Use Case View::AcctItem" @2
ShowCompartmentStereotypes TRUE
IncludeAttribute TRUE
IncludeOperation TRUE
location (1376, 640)
font (object Font
size 10
face "Arial"
bold FALSE
italics FALSE
underline FALSE
strike FALSE
color 0
default_color TRUE)
label (object ItemLabel
Parent_View @2
location (1186, 522)
fill_color 13434879
nlines 1
max_width 380
justify 0
label "AcctItem")
icon_style "Icon"
line_color 3342489
fill_color 13434879
quidu "3EC7810202BC"
compartment (object Compartment
Parent_View @2
location (1186, 578)
font (object Font
size 10
face "Arial"
bold FALSE
italics FALSE
underline FALSE
strike FALSE
color 0
default_color TRUE)
icon_style "Icon"
fill_color 13434879
anchor 2
nlines 4
max_width 378)
width 398
height 258
annotation 8
autoResize TRUE)
(object AssociationViewNew "PayAssoc" @3
location (818, 640)
font (object Font
size 10
face "Arial"
bold FALSE
italics FALSE
underline FALSE
strike FALSE
color 0
default_color TRUE)
label (object SegLabel @4
Parent_View @3
location (804, 660)
font (object Font
size 10
face "Arial"
bold FALSE
italics TRUE
underline FALSE
strike FALSE
color 0
default_color TRUE)
anchor 1
anchor_loc 1
nlines 1
max_width 450
justify 0
label "PayAssoc"
pctDist 0.266667
height 20
orientation 1)
stereotype TRUE
line_color 3342489
quidu "3EC783FD00D8"
roleview_list (list RoleViews
(object RoleView "PayPerson" @5
Parent_View @3
location (-94, 272)
font (object Font
size 10
face "Arial"
bold FALSE
italics FALSE
underline FALSE
strike FALSE
color 0
default_color TRUE)
label (object SegLabel @6
Parent_View @5
location (589, 595)
font (object Font
size 10
face "Arial"
bold FALSE
italics FALSE
underline FALSE
strike FALSE
color 0
default_color TRUE)
anchor 1
anchor_loc 1
nlines 1
max_width 217
justify 0
label "+PayPerson"
pctDist 0.641457
height 45
orientation 1)
stereotype TRUE
line_color 3342489
quidu "3EC783FD03B3"
client @3
supplier @1
line_style 0
label (object SegLabel @7
Parent_View @5
location (497, 694)
font (object Font
size 10
face "Arial"
bold FALSE
italics FALSE
underline FALSE
strike FALSE
color 0
default_color TRUE)
anchor 2
anchor_loc 1
nlines 1
max_width 15
justify 0
label "1"
pctDist 0.900000
height 54
orientation 0))
(object RoleView "Pay" @8
Parent_View @3
location (-94, 272)
font (object Font
size 10
face "Arial"
bold FALSE
italics FALSE
underline FALSE
strike FALSE
color 0
default_color TRUE)
label (object SegLabel @9
Parent_View @8
location (1116, 600)
font (object Font
size 10
face "Arial"
bold FALSE
italics FALSE
underline FALSE
strike FALSE
color 0
default_color TRUE)
anchor 1
anchor_loc 1
nlines 1
max_width 154
justify 0
label "+Pay"
pctDist 0.832402
height 40
orientation 0)
stereotype TRUE
line_color 3342489
quidu "3EC783FD03BE"
client @3
supplier @2
line_style 0
label (object SegLabel @10
Parent_View @8
location (1140, 694)
font (object Font
size 10
face "Arial"
bold FALSE
italics FALSE
underline FALSE
strike FALSE
color 0
default_color TRUE)
anchor 2
anchor_loc 1
nlines 1
max_width 15
justify 0
label "0..n"
pctDist 0.900000
height 54
orientation 1))))))
(object ClassDiagram "Money Class Diagram"
quid "3EC780C60310"
title "Money Class Diagram"
zoom 100
max_height 28350
max_width 21600
origin_x 0
origin_y 0
items (list diagram_item_list))))
root_category (object Class_Category "Logical View"
quid "3EC780A20283"
exportControl "Public"
global TRUE
subsystem "Component View"
quidu "3EC780A20285"
logical_models (list unit_reference_list)
logical_presentations (list unit_reference_list
(object ClassDiagram "Main"
quid "3EC780A80032"
title "Main"
zoom 100
max_height 28350
max_width 21600
origin_x 0
origin_y 0
items (list diagram_item_list))))
root_subsystem (object SubSystem "Component View"
quid "3EC780A20285"
physical_models (list unit_reference_list)
physical_presentations (list unit_reference_list
(object Module_Diagram "Main"
quid "3EC780A80000"
title "Main"
zoom 100
max_height 28350
max_width 21600
origin_x 0
origin_y 0
items (list diagram_item_list))))
process_structure (object Processes
quid "3EC780A20286"
ProcsNDevs (list
(object Process_Diagram "Deployment View"
quid "3EC780A20288"
title "Deployment View"
zoom 100
max_height 28350
max_width 21600
origin_x 0
origin_y 0
items (list diagram_item_list))))
properties (object Properties
attributes (list Attribute_Set
(object Attribute
tool "Cplusplus"
name "propertyId"
value "809135966")
(object Attribute
tool "Cplusplus"
name "default__Role"
value (list Attribute_Set
(object Attribute
tool "Cplusplus"
name "Synchronize"
value TRUE)
(object Attribute
tool "Cplusplus"
name "CodeName"
value "")
(object Attribute
tool "Cplusplus"
name "Const"
value FALSE)
(object Attribute
tool "Cplusplus"
name "InitialValue"
value "")))
(object Attribute
tool "Cplusplus"
name "default__Inherit"
value (list Attribute_Set
(object Attribute
tool "Cplusplus"
name "Synchronize"
value TRUE)))
(object Attribute
tool "Cplusplus"
name "default__Module-Spec"
value (list Attribute_Set
(object Attribute
tool "Cplusplus"
name "Synchronize"
value TRUE)
(object Attribute
tool "Cplusplus"
name "Copyright"
value (value Text ""))
(object Attribute
tool "Cplusplus"
name "RootPackage"
value "C++ Reverse Engineered")
(object Attribute
tool "Cplusplus"
name "InitialHeaderIncludes"
value (value Text ""))
(object Attribute
tool "Cplusplus"
name "InitialBodyIncludes"
value (value Text ""))))
(object Attribute
tool "Cplusplus"
name "default__Param"
value (list Attribute_Set
(object Attribute
tool "Cplusplus"
name "CodeName"
value "")))
(object Attribute
tool "Cplusplus"
name "default__Attribute"
value (list Attribute_Set
(object Attribute
tool "Cplusplus"
name "Synchronize"
value TRUE)
(object Attribute
tool "Cplusplus"
name "CodeName"
value "")))
(object Attribute
tool "Cplusplus"
name "default__Operation"
value (list Attribute_Set
(object Attribute
tool "Cplusplus"
name "Synchronize"
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?