1. Objects
建立Method,输入命令:
var obj: object ; var str: string
var x: integer := 100 ; var y: integer := 0
obj := .MaterialFlow.SingleProc.createObject(.Models.Frame,x,y,"Maschine")
Maschine.ProcTime := 50
创建其他模块时更改模块的类型和其所在的标签页和模块的类型名称
2. Connection of Objects
obj := .MaterialFlow.Connector.connect(.Models.Frame.SingleProc,.Models.Frame.Source)
3. Method
运行现有的Method创建一个新的Method,并在新的Method里面输入命令
//定义local variable
var obj: object ; var str: string
//创建Method,命名“Exitcontrol”
obj := .Informationflow.&Method.createObject(.Models.Frame,100,0,"Exitcontrol")
//命令
str := ""
str += "var p1 : integer := 50 ; var p2 :integer := 50" +chr(10)
str += "T1.ExitStrategy := \"percentage\"" + chr(10)
str += "T1.ExitStrategyPercentageValues := makeArray(p1,p2)" +chr(10)
str += "T1.ExitStrategyBlocking := true" + chr(10)
//输入命令
obj.Program := str
//执行新建的Method
execute("Exitcontrol")
这里注意,新建的Method里面要输入的命令一定要包含在 “ ” 里面,如果命令里面有名称 “name” 要用转义字符 \“name\”
4. HTML Report
运行模拟后自动生成一份Report显示模拟结果
//创建一个新的Method,在模拟结束后自动运行
var obj: object
var str: string
obj := .Informationflow.&Method.createObject(.Models.Frame, 100, 0, "endsim")
str := ""
str += ".UserInterface.HtmlReport.createObject(.Models.Frame,100,100,\"Report\")"
obj.Program := str
execute("endsim")
Report.save("C:\temp\SimReport.html");