⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 prms.mdl

📁 用Delhpi和mapx开发的警务管理系统
💻 MDL
📖 第 1 页 / 共 5 页
字号:
			location   	(1040, 560)
			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 	@23
			    location   	(813, 358)
			    fill_color 	13434879
			    nlines     	9
			    max_width  	419
			    label      	"The Use-Case Model is traceable to (and derives from) the Business Model.  The system (as described in the Use Case Model) provides behavior that supports the business.")
			line_color 	3342489
			fill_color 	13434879
			width      	479
			height     	416)
		    (object CategoryView "Use Case View::Business Use-Case Model" @24
			location   	(384, 320)
			font       	(object Font
			    size       	9
			    face       	"Arial"
			    bold       	FALSE
			    italics    	FALSE
			    underline  	FALSE
			    strike     	FALSE
			    color      	0
			    default_color 	TRUE)
			label      	(object ItemLabel
			    Parent_View 	@24
			    location   	(189, 229)
			    fill_color 	13434879
			    nlines     	2
			    max_width  	390
			    justify    	0
			    label      	"Business Use-Case Model")
			icon_style 	"Icon"
			line_color 	3342489
			fill_color 	13434879
			quidu      	"35B677D701B8"
			width      	403
			height     	194)
		    (object ImportView "" @25
			stereotype 	TRUE
			line_color 	3342489
			quidu      	"35C633DA030C"
			client     	@22
			supplier   	@24
			line_style 	0)
		    (object AttachView "" @26
			stereotype 	TRUE
			line_color 	3342489
			client     	@25
			supplier   	@23
			line_style 	0)))))
    root_category 	(object Class_Category "Logical View"
	quid       	"34DBB4830141"
	documentation 	
|Rational Unified Process uses the "Logical View in Rose" to organize the Design Model  and the Process View and the optional Business Object Model and Analysis Model.
	
	exportControl 	"Public"
	global     	TRUE
	subsystem  	"Component View"
	quidu      	"34DBB4830143"
	logical_models 	(list unit_reference_list
	    (object Class "TDataBase"
		quid       	"3E93D7AE002E"
		documentation 	"维护信息操作类,从维护表里取得所有信息,保存在相应的结构变量里"
		operations 	(list Operations
		    (object Operation "create"
			quid       	"3E93E46D0119"
			parameters 	(list Parameters
			    (object Parameter "asTableName"
				quid       	"3E93E49A02BF"
				documentation 	"表名"
				type       	"string"))
			concurrency 	"Sequential"
			opExportControl 	"Public"
			uid        	0)
		    (object Operation "iGetTableInfo"
			quid       	"3E93E24303C8"
			documentation 	"获取表信息 成功1;失败 0;"
			result     	"Integer"
			concurrency 	"Sequential"
			opExportControl 	"Private"
			uid        	0)
		    (object Operation "iGetColumnInfo"
			quid       	"3E93E2DC02CE"
			documentation 	"列信息 成功1;失败 0;"
			result     	"Integer"
			concurrency 	"Sequential"
			opExportControl 	"Private"
			uid        	0)
		    (object Operation "iGetListInfo"
			quid       	"3E93E2FB00DA"
			documentation 	"List节信息 成功1;失败 0;"
			result     	"Integer"
			concurrency 	"Sequential"
			opExportControl 	"Private"
			uid        	0)
		    (object Operation "iGetEditInfo"
			quid       	"3E93E32B0203"
			documentation 	"Edit节信息 成功1;失败 0;"
			result     	"Integer"
			concurrency 	"Sequential"
			opExportControl 	"Private"
			uid        	0)
		    (object Operation "iGetAddInfo"
			quid       	"3E93E3420148"
			documentation 	"Add节信息 成功1;失败 0;"
			result     	"Integer"
			concurrency 	"Sequential"
			opExportControl 	"Private"
			uid        	0)
		    (object Operation "iGetSqlInfo"
			quid       	"3E93E35E033C"
			documentation 	"Sql节信息 成功1;失败 0;"
			result     	"Integer"
			concurrency 	"Sequential"
			opExportControl 	"Private"
			uid        	0)
		    (object Operation "iGetValidInfo"
			quid       	"3E93E37503C8"
			documentation 	"验证信息 成功1;失败 0;"
			result     	"Integer"
			concurrency 	"Sequential"
			opExportControl 	"Private"
			uid        	0))
		class_attributes 	(list class_attribute_list
		    (object ClassAttribute "mRecTable"
			quid       	"3E93DE2303A9"
			documentation 	"指向表信息的记录类型"
			type       	"pTable")
		    (object ClassAttribute "mRecArrCol"
			quid       	"3E93DFBE03B9"
			documentation 	"列信息"
			type       	"array of pColumn")
		    (object ClassAttribute "mRecArrTblList"
			quid       	"3E93E05402AF"
			documentation 	"List节"
			type       	"array of pTblList")
		    (object ClassAttribute "mRecArrTblEdit"
			quid       	"3E93E0ED032C"
			documentation 	
|Edit节
|
			
			type       	"array of pTblEdit")
		    (object ClassAttribute "mRecArrTblAdd"
			quid       	"3E93E155036B"
			documentation 	"Add节"
			type       	"array of pTblAdd")
		    (object ClassAttribute "mRecArrTblSql"
			quid       	"3E93E1B701A5"
			documentation 	"SQL节"
			type       	"array of pTblSql")
		    (object ClassAttribute "mRecArrTblValid"
			quid       	"3E93E1E601C5"
			type       	"array of pTblValid")
		    (object ClassAttribute "RecTable"
			quid       	"3E93E54E01D4"
			documentation 	"property RecTable:pTable read mRecTable;"
			type       	"pTable"
			exportControl 	"Public")
		    (object ClassAttribute "RecArrCol"
			quid       	"3E93E5E10177"
			type       	"array of pColumn"
			exportControl 	"Public")
		    (object ClassAttribute "RecArrTblList"
			quid       	"3E93E5FA033C"
			type       	"array of pTblList"
			exportControl 	"Public")
		    (object ClassAttribute "RecArrTblEdit"
			quid       	"3E93E62C031C"
			type       	"array of pTblEdit"
			exportControl 	"Public")
		    (object ClassAttribute "RecArrTblAdd"
			quid       	"3E93E65D0261"
			type       	"array of pTblAdd"
			exportControl 	"Public")
		    (object ClassAttribute "RecArrTblSql"
			quid       	"3E93E66801F4"
			type       	"array of pTblSql"
			exportControl 	"Public")
		    (object ClassAttribute "RecArrTblValid"
			quid       	"3E93E6680280"
			type       	"array of pTblValid"
			exportControl 	"Public")))
	    (object Class "NewClass"
		quid       	"3E93DADD0242")
	    (object Class "TPanel"
		quid       	"3E93F61C006D"
		documentation 	"ListView选择事件"
		used_nodes 	(list uses_relationship_list
		    (object Uses_Relationship
			quid       	"3F487028036B"
			supplier   	"Logical View::TDataBase"
			quidu      	"3E93D7AE002E")
		    (object Uses_Relationship
			quid       	"3F4B18590399"
			supplier   	"Logical View::TGridListView"
			quidu      	"3F48650E038A")
		    (object Uses_Relationship
			quid       	"3F4B1F1D0000"
			supplier   	"Logical View::TEdit"
			quidu      	"3F497E3E036B"))
		operations 	(list Operations
		    (object Operation "create"
			quid       	"3E93F6430280"
			parameters 	(list Parameters
			    (object Parameter "asTablename"
				quid       	"3E93F6680196"
				documentation 	"表名"
				type       	"string")
			    (object Parameter "aContainer"
				quid       	"3E93F6820213"
				documentation 	"生成的控件的容器"
				type       	"Tcomponent")
			    (object Parameter "aiPara"
				quid       	"3E93FA3601D4"
				documentation 	"段编号"
				type       	"integer")
			    (object Parameter "asArrColName"
				quid       	"3E93F7830109"
				documentation 	
|字段名数组
|对于添加是要预置值的字段名
|对于查询是查询条件字段名
|对于修改是查询条件的字段名
				
				type       	"array of string")
			    (object Parameter "asArrColValue"
				quid       	"3E93F9780119"
				type       	"array of string"))
			concurrency 	"Sequential"
			opExportControl 	"Public"
			uid        	0)
		    (object Operation "lvSelectItem"
			quid       	"3E940D60038A"
			parameters 	(list Parameters
			    (object Parameter "Sender"
				quid       	"3E940DAA006D"
				type       	"TObject")
			    (object Parameter "Item"
				quid       	"3E940DAB0203"
				type       	"TListItem")
			    (object Parameter "Selected"
				quid       	"3E940DAC03B9"
				type       	"Boolean"))
			concurrency 	"Sequential"
			opExportControl 	"Private"
			uid        	0)
		    (object Operation "GenerateForm"
			quid       	"3E940E4A01D4"
			documentation 	"生成窗体控件"
			concurrency 	"Sequential"
			opExportControl 	"Private"
			uid        	0)
		    (object Operation "GetConData"
			quid       	"3E940EC600AB"
			documentation 	"获取单个编辑控件的输入值"
			concurrency 	"Sequential"
			opExportControl 	"Private"
			uid        	0)
		    (object Operation "GetAllConData"
			quid       	"3E940F4302EE"
			documentation 	"获取所有编辑控件的值"
			concurrency 	"Sequential"
			opExportControl 	"Private"
			uid        	0))
		class_attributes 	(list class_attribute_list
		    (object ClassAttribute "mDataBase"
			quid       	"3E93F62C0232"
			type       	"TDataBase"
			quidu      	"3E93D7AE002E")
		    (object ClassAttribute "msArrDataValue"
			quid       	"3E940F7C0177"
			documentation 	"存放编辑控件的值"
			type       	"array of string")
		    (object ClassAttribute "msTableName"
			quid       	"3F49C9FF01E4"
			documentation 	"表名"
			type       	"string")
		    (object ClassAttribute "mTContainer"
			quid       	"3F49CA150399"
			documentation 	"容器"
			type       	"Tcomponent")
		    (object ClassAttribute "miPara"
			quid       	"3F49CA5103A9"
			documentation 	"节序号"
			type       	"Integer")
		    (object ClassAttribute "msArrColName"
			quid       	"3F49CA7E02AF"
			documentation 	"列名数组"
			type       	"array of string")
		    (object ClassAttribute "msArrColValue"
			quid       	"3F49CA9D033C"
			documentation 	"列值数组"
			type       	"array of string")))
	    (object Class "TGridListView"
		quid       	"3F48650E038A"
		used_nodes 	(list uses_relationship_list
		    (object Uses_Relationship
			quid       	"3F487076001F"
			supplier   	"Logical View::TDataBase"
			quidu      	"3E93D7AE002E"))
		operations 	(list Operations
		    (object Operation "create"
			quid       	"3F4866E9005D"
			documentation 	"构造函数"
			parameters 	(list Parameters
			    (object Parameter "aadoQue"
				quid       	"3F486C98006D"
				documentation 	"要显示的数据集"
				type       	"TadoQuery")
			    (object Parameter "aLvContent"
				quid       	"3F486C98007D"
				documentation 	"用于显示数据的ListView控件"
				type       	"TListView")
			    (object Parameter "ablnBind"
				quid       	"3F486C98007E"
				documentation 	"是否绑定数据"
				type       	"Boolean")
			    (object Parameter "aParaId"
				quid       	"3F486C98008C"
				documentation 	"节编号"
				type       	"integer"))
			concurrency 	"Sequential"
			opExportControl 	"Public"
			uid        	0)
		    (object Operation "ChangeListCaption"
			quid       	"3F49CC100119"
			documentation 	
|更改外键列标题
|
			
			concurrency 	"Sequential"
			opExportControl 	"Private"
			uid        	0)
		    (object Operation "ChangeListData"
			quid       	"3F49CC4600CB"
			documentation 	"更改外键值"
			concurrency 	"Sequential"
			opExportControl 	"Private"
			uid        	0)
		    (object Operation "iSetValue"
			quid       	"3F486A6E01A5"
			documentation 	
|将数据集的数据写入ListView
|成功:1
|失败:0
			
			parameters 	(list Parameters
			    (object Parameter "asTableName"
				quid       	"3F486BB2031C"
				documentation 	"表名"
				type       	"string"))

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -