这三个东西,控件代码怎么写
1、实时开关的
if ?.Value
root.eventController.realtime :=true
else
root.eventController.realtime :=false
end
2、启动/停止仿真的
if root.EVentController.IsRunning
root.eventController.stop
else
root.eventController.start
end
3、重置模型的
root.eventController.reset
很简单,多打几次。
?.value,root.EventController.realtime:=true
root.EventController.IsRunning , .stop .start
root.EventController.reset