visitor2.mdl

delphi深度探索第二版随书光盘所附内容

		    (object Operation "ExecutePerson(APerson:TPerson)"
			quid       	"3EEFDDBF0266"
			concurrency 	"Sequential"
			opExportControl 	"Public"
			uid        	0)))
	    (object Class "TPeople"
		quid       	"3EEFD5C4022C"
		superclasses 	(list inheritance_relationship_list
		    (object Inheritance_Relationship
			quid       	"3EEFD5E6022B"
			supplier   	"Logical View::TPeopleItem"
			quidu      	"3EEFD5D90023"))
		operations 	(list Operations
		    (object Operation "Iterate(AOperation:TOperation)"
			quid       	"3EEFD63A016D"
			concurrency 	"Sequential"
			opExportControl 	"Public"
			uid        	0)))
	    (object Class "TPeopleItem"
		quid       	"3EEFD5D90023"
		operations 	(list Operations
		    (object Operation "AcceptOperation(AOperation:TOperation)"
			quid       	"3EEFDE060312"
			concurrency 	"Sequential"
			opExportControl 	"Public"
			uid        	0)))
	    (object Class "TPerson"
		quid       	"3EEFD621012B"
		superclasses 	(list inheritance_relationship_list
		    (object Inheritance_Relationship
			quid       	"3EEFD62E00A8"
			supplier   	"Logical View::TPeopleItem"
			quidu      	"3EEFD5D90023"))
		operations 	(list Operations
		    (object Operation "AcceptOperation(AOperation:TOperation)"
			quid       	"3EEFDE490065"
			concurrency 	"Sequential"
			opExportControl 	"Public"
			uid        	0)))
	    (object Association "$UNNAMED$0"
		quid       	"3EEFD5CE03D5"
		roles      	(list role_list
		    (object Role "$UNNAMED$1"
			quid       	"3EEFD5CF01CD"
			supplier   	"Logical View::TTemporyPerson"
			quidu      	"3EE9892B0086"
			is_navigable 	TRUE)
		    (object Role "$UNNAMED$2"
			quid       	"3EEFD5CF01CF"
			supplier   	"Logical View::TPeople"
			quidu      	"3EEFD5C4022C"
			is_aggregate 	TRUE)))
	    (object Association "$UNNAMED$3"
		quid       	"3EEFD5E90243"
		roles      	(list role_list
		    (object Role "$UNNAMED$4"
			quid       	"3EEFD5EA00C8"
			supplier   	"Logical View::TPeopleItem"
			quidu      	"3EEFD5D90023"
			is_navigable 	TRUE)
		    (object Role "$UNNAMED$5"
			quid       	"3EEFD5EA00D2"
			supplier   	"Logical View::TPeople"
			quidu      	"3EEFD5C4022C"
			is_aggregate 	TRUE))))
	logical_presentations 	(list unit_reference_list
	    (object ClassDiagram "Main"
		quid       	"3EE989260101"
		title      	"Main"
		zoom       	100
		max_height 	28350
		max_width  	21600
		origin_x   	70
		origin_y   	290
		items      	(list diagram_item_list
		    (object ClassView "Class" "Logical View::TOperation" @16
			ShowCompartmentStereotypes 	TRUE
			IncludeAttribute 	TRUE
			IncludeOperation 	TRUE
			location   	(1024, 192)
			font       	(object Font
			    size       	10
			    face       	"宋体"
			    charSet    	134
			    bold       	FALSE
			    italics    	FALSE
			    underline  	FALSE
			    strike     	FALSE
			    color      	0
			    default_color 	TRUE)
			label      	(object ItemLabel
			    Parent_View 	@16
			    location   	(603, 107)
			    fill_color 	13434879
			    nlines     	1
			    max_width  	842
			    justify    	0
			    label      	"TOperation")
			icon_style 	"Icon"
			line_color 	3342489
			fill_color 	13434879
			quidu      	"3EEFD52603AB"
			compartment 	(object Compartment
			    Parent_View 	@16
			    location   	(603, 158)
			    font       	(object Font
				size       	10
				face       	"宋体"
				charSet    	134
				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  	847)
			width      	860
			height     	190
			annotation 	8
			autoResize 	TRUE)
		    (object ClassView "Class" "Logical View::TSafeOperation" @17
			ShowCompartmentStereotypes 	TRUE
			IncludeAttribute 	TRUE
			IncludeOperation 	TRUE
			location   	(576, 496)
			font       	(object Font
			    size       	10
			    face       	"宋体"
			    charSet    	134
			    bold       	FALSE
			    italics    	FALSE
			    underline  	FALSE
			    strike     	FALSE
			    color      	0
			    default_color 	TRUE)
			label      	(object ItemLabel
			    Parent_View 	@17
			    location   	(155, 391)
			    fill_color 	13434879
			    nlines     	2
			    max_width  	842
			    justify    	0
			    label      	"TSafeOperation")
			icon_style 	"Icon"
			line_color 	3342489
			fill_color 	13434879
			quidu      	"3EEFD53B0134"
			compartment 	(object Compartment
			    Parent_View 	@17
			    location   	(155, 442)
			    font       	(object Font
				size       	10
				face       	"宋体"
				charSet    	134
				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  	847)
			width      	860
			height     	230
			annotation 	8
			autoResize 	TRUE)
		    (object NoteView @18
			location   	(352, 160)
			font       	(object Font
			    size       	10
			    face       	"宋体"
			    charSet    	134
			    bold       	FALSE
			    italics    	FALSE
			    underline  	FALSE
			    strike     	FALSE
			    color      	0
			    default_color 	TRUE)
			label      	(object ItemLabel
			    Parent_View 	@18
			    location   	(214, 100)
			    fill_color 	13434879
			    nlines     	2
			    max_width  	240
			    label      	"保险方法类")
			line_color 	3342489
			fill_color 	13434879
			width      	300
			height     	132)
		    (object AttachView "" @19
			font       	(object Font
			    size       	10
			    face       	"宋体"
			    charSet    	134
			    bold       	FALSE
			    italics    	FALSE
			    underline  	FALSE
			    strike     	FALSE
			    color      	0
			    default_color 	TRUE)
			stereotype 	TRUE
			line_color 	3342489
			client     	@18
			supplier   	@17
			line_style 	0)
		    (object ClassView "Class" "Logical View::TLunchOperation" @20
			ShowCompartmentStereotypes 	TRUE
			IncludeAttribute 	TRUE
			IncludeOperation 	TRUE
			location   	(1504, 496)
			font       	(object Font
			    size       	10
			    face       	"宋体"
			    charSet    	134
			    bold       	FALSE
			    italics    	FALSE
			    underline  	FALSE
			    strike     	FALSE
			    color      	0
			    default_color 	TRUE)
			label      	(object ItemLabel
			    Parent_View 	@20
			    location   	(1083, 391)
			    fill_color 	13434879
			    nlines     	2
			    max_width  	842
			    justify    	0
			    label      	"TLunchOperation")
			icon_style 	"Icon"
			line_color 	3342489
			fill_color 	13434879
			quidu      	"3EEFD56C029D"
			compartment 	(object Compartment
			    Parent_View 	@20
			    location   	(1083, 442)
			    font       	(object Font
				size       	10
				face       	"宋体"
				charSet    	134
				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  	847)
			width      	860
			height     	230
			annotation 	8
			autoResize 	TRUE)
		    (object NoteView @21
			location   	(1712, 144)
			font       	(object Font
			    size       	10
			    face       	"宋体"
			    charSet    	134
			    bold       	FALSE
			    italics    	FALSE
			    underline  	FALSE
			    strike     	FALSE
			    color      	0
			    default_color 	TRUE)
			label      	(object ItemLabel
			    Parent_View 	@21
			    location   	(1574, 84)
			    fill_color 	13434879
			    nlines     	2
			    max_width  	240
			    label      	"午餐方法类")
			line_color 	3342489
			fill_color 	13434879
			width      	300
			height     	132)
		    (object AttachView "" @22
			font       	(object Font
			    size       	10
			    face       	"宋体"
			    charSet    	134
			    bold       	FALSE
			    italics    	FALSE
			    underline  	FALSE
			    strike     	FALSE
			    color      	0
			    default_color 	TRUE)
			stereotype 	TRUE
			line_color 	3342489
			client     	@21
			supplier   	@20
			line_style 	0)
		    (object InheritView "" @23
			font       	(object Font
			    size       	10
			    face       	"宋体"
			    charSet    	134
			    bold       	FALSE
			    italics    	FALSE
			    underline  	FALSE
			    strike     	FALSE
			    color      	0
			    default_color 	TRUE)
			stereotype 	TRUE
			line_color 	3342489
			quidu      	"3EEFD59001AF"
			client     	@17
			supplier   	@16
			line_style 	0)
		    (object InheritView "" @24
			font       	(object Font
			    size       	10
			    face       	"宋体"
			    charSet    	134
			    bold       	FALSE
			    italics    	FALSE
			    underline  	FALSE
			    strike     	FALSE
			    color      	0
			    default_color 	TRUE)
			stereotype 	TRUE
			line_color 	3342489
			quidu      	"3EEFD5930267"
			client     	@20
			supplier   	@16
			line_style 	0)
		    (object ClassView "Class" "Logical View::TTemporyPerson" @25
			ShowCompartmentStereotypes 	TRUE
			IncludeAttribute 	TRUE
			IncludeOperation 	TRUE
			location   	(624, 1152)
			font       	(object Font
			    size       	10
			    face       	"宋体"
			    charSet    	134
			    bold       	FALSE
			    italics    	FALSE
			    underline  	FALSE
			    strike     	FALSE
			    color      	0
			    default_color 	TRUE)
			label      	(object ItemLabel
			    Parent_View 	@25
			    location   	(203, 1067)
			    fill_color 	13434879
			    nlines     	2
			    max_width  	842
			    justify    	0
			    label      	"TTemporyPerson")
			icon_style 	"Icon"
			line_color 	3342489
			fill_color 	13434879
			quidu      	"3EE9892B0086"
			compartment 	(object Compartment
			    Parent_View 	@25
			    location   	(203, 1118)
			    font       	(object Font
				size       	10
				face       	"宋体"
				charSet    	134
				bold       	FALSE
				italics    	FALSE
				underline  	FALSE
				strike     	FALSE
				color      	0
				default_color 	TRUE)
			    icon_style 	"Icon"
			    fill_color 	16777215
			    anchor     	2
			    nlines     	2
			    max_width  	847)
			width      	860
			height     	190
			annotation 	8
			autoResize 	TRUE)
		    (object ClassView "Class" "Logical View::TPeopleItem" @26
			ShowCompartmentStereotypes 	TRUE
			IncludeAttribute 	TRUE
			IncludeOperation 	TRUE
			location   	(1408, 720)
			font       	(object Font
			    size       	10
			    face       	"宋体"
			    charSet    	134
			    bold       	FALSE
			    italics    	FALSE
			    underline  	FALSE
			    strike     	FALSE
			    color      	0
			    default_color 	TRUE)
			label      	(object ItemLabel
			    Parent_View 	@26
			    location   	(987, 655)
			    fill_color 	13434879
			    nlines     	1
			    max_width  	842
			    justify    	0
			    label      	"TPeopleItem")
			icon_style 	"Icon"
			line_color 	3342489
			fill_color 	13434879
			quidu      	"3EEFD5D90023"
			compartment 	(object Compartment
			    Parent_View 	@26
			    location   	(987, 706)
			    font       	(object Font
				size       	10
				face       	"宋体"
				charSet    	134
				bold       	FALSE
				italics    	FALSE
				underline  	FALSE
				strike     	FALSE
				color      	0
				default_color 	TRUE)
			    icon_style 	"Icon"
			    fill_color 	13434879
			    anchor     	2
			    nlines     	2
			    max_width  	847)
			width      	860
			height     	150
			annotation 	8
			autoResize 	TRUE)
		    (object ClassView "Class" "Logical View::TPeople" @27
			ShowCompartmentStereotypes 	TRUE
			IncludeAttribute 	TRUE
			IncludeOperation 	TRUE
			location   	(512, 736)
			font       	(object Font
			    size       	10
			    face       	"宋体"
			    charSet    	134
			    bold       	FALSE
			    italics    	FALSE
			    underline  	FALSE
			    strike     	FALSE
			    color      	0
			    default_color 	TRUE)
			label      	(object ItemLabel
			    Parent_View 	@27
			    location   	(171, 670)
			    fill_color 	13434879
			    nlines     	1
			    max_width  	682
			    justify    	0
			    label      	"TPeople")
			icon_style 	"Icon"
			line_color 	3342489
			fill_color 	13434879
			quidu      	"3EEFD5C4022C"
			compartment 	(object Compartment
			    Parent_View 	@27
			    location   	(171, 721)
			    font       	(object Font
				size       	10
				face       	"宋体"
				charSet    	134
				bold       	FALSE
				italics    	FALSE
				underline  	FALSE
				strike     	FALSE
				color      	0
				default_color 	TRUE)
			    icon_style 	"Icon"
			    fill_color 	13434879
			    anchor     	2
			    nlines     	2
			    max_width  	687)
			width      	700
			height     	152
			annotation 	8