控制.tbl

电气控制仿真软件

<?xml version="1.0" encoding="gb2312"?>
<vg version="452" gridsize="4" activesheetindex="6" range="0,0,800,553" backcolor="$8000000F" frontcolor="$0" pattern="1">
<page name="Page" bounds="0,0,827,1169" visible="false" margin="100,100,100,100" paperwidth="2100" paperheight="2969"/>
<sheet name="Static" bounds="-3,2,44,24">
<shape name="Rect1" bounds="-3,2,44,24" origin="43,21.5" linetype="0" backcolor="$8000000F" pattern="1">
<text name="Text1" bounds="-3,2,44,24" origin="20.5,13" border="$0" fontname="宋体" fontsize="12" textalign="24" text="Static"/>
</shape>
</sheet>
<sheet name="RadioButton" bounds="16,18,104.25,36" origin="79,134" label="Text1">
<text name="Text1" bounds="28.25,18,104.25,36" origin="13.25,17" autosize="true" border="$0" fontname="宋体" fontsize="12" multiline="false" textalign="24" text="RadioButton1"/>
<shape name="Arc1" type="Arc" bounds="16,20.45,27,31.45" origin="25,29.45" endangle="225" startangle="45" linecolor="$80000010"/>
<shape name="Arc2" type="Arc" bounds="16,20.45,27,31.45" origin="25,29.45" endangle="45" startangle="225" linecolor="$80000014"/>
<shape name="Circle1" type="Circle" bounds="16.5,20.95,26.5,30.95" origin="24.5,28.95" linecolor="$8000000F" pattern="1"/>
<shape name="Arc3" type="Arc" bounds="16.5,20.95,26.5,30.95" origin="25.5,29.95" endangle="224.13194855" startangle="45"/>
<shape name="园形2" type="Circle" bounds="19.5,23.95,23.5,27.95" origin="18,19.45" visible="false" linetype="0" backcolor="$0" pattern="1"/>
<programe>
Property Checked read GetChecked write SetChecked editor Bool
Private Function GetChecked()
return 园形2.Visible
End Function
Private Function SetChecked(AChecked)
园形2.Visible = AChecked
End Function
</programe>
</sheet>
<sheet name="CheckBox" bounds="1.422402,2,74,20" label="Text1">
<line name="Line5" origin="11.422402,15.5" linecolor="$8000000F" pattern="1">
<points>
2.422402,15.5,6
12.422402,15.5,2
12.422402,5.5,2
2.422402,5.5,2
</points>
</line>
<line name="Line1" origin="10.422402,13.5" linecolor="$80000010">
<points>
1.422402,16.5,6
1.422402,4.5,2
13.422402,4.5,2
</points>
</line>
<text name="Text1" bounds="16,2,74,20" origin="3,2" autosize="true" border="$0" fontname="宋体" fontsize="12" multiline="false" textalign="0" text="CheckBox1"/>
<line name="Line2" origin="10.422402,14.5" linecolor="$FFFFFF">
<points>
1.422402,16.5,6
13.422402,16.5,2
13.422402,4.5,2
</points>
</line>
<line name="Line4" origin="11.422402,14.5">
<points>
2.422402,15.5,6
2.422402,5.5,2
12.422402,5.5,2
</points>
</line>
<line name="Line3" origin="5.918627,9.553631" linetype="0" backcolor="$0" pattern="1">
<points>
4.2306,8.25,6
6.614203,11.25,2
10.614204,7.25,2
10.5306,9.25,2
6.614203,13.75,2
4.2306,10.75,2
</points>
</line>
<programe>
Property Checked read GetChecked write SetChecked editor Bool
Private Function GetChecked()
return Line3.Visible
End Function
Private Function OnLButtonDown(Sender,X,Y)
Line5.BackColor = $8000000F
End Function
Private Function OnLButtonUp(Sender,X,Y)
Line5.BackColor = $FFFFFF
End Function
Private Function SetChecked(AChecked)
Line3.Visible = AChecked
End Function
</programe>
</sheet>
<sheet name="Edit" type="立体编辑框" bounds="4,7,126,26" origin="182,126" label="Text1">
<line name="Line1" origin="131,24">
<points>
4,26,6
4,7,2
126,7,2
</points>
</line>
<line name="Line2" origin="132,23" linecolor="$FFFFFF">
<points>
4,26,6
126,26,2
126,7,2
</points>
</line>
<shape name="Rect1" bounds="5,8,125,25" origin="132,27" linecolor="$8000000F" pattern="1"/>
<text name="Text1" bounds="5,8,125,25" origin="48,15" border="$0" fontname="宋体" fontsize="12" textalign="0"/>
<programe>
Private Function OnResize(Sender)
Line1.SetBounds( Left, Top, Width, Height )
Line2.SetBounds( Left, Top, Width, Height )
Rect1.SetBounds( Left + 1, Top + 1, Width - 2, Height - 2 )
Text1.SetBounds( Left + 1, Top + 1, Width - 2, Height - 2 )
End Function
</programe>
</sheet>
<sheet name="Button" type="Button" bounds="172,178,254,203" origin="204,205" label="Text1">
<shape name="Rect2" bounds="172,178,254,203" origin="202,203" linecolor="$80000010" backcolor="$8000000F" pattern="1"/>
<shape name="Rect1" bounds="172,178,254,203" origin="203,204" visible="false" linecolor="$80000010" backcolor="$8000000F" pattern="1"/>
<text name="Text1" bounds="176,181.5,252,199.5" origin="187,195" border="$0" fontname="宋体" fontsize="12" fontcolor="$80000012" text="Button"/>
<programe>
Private Function Initialize(Sender)
End Function
Private Function OnLButtonDown(Sender,X,Y)
Rect1.Visible = true
Text1.MoveTo( Text1.Left + 2, Text1.Top + 2 )
End Function
Private Function OnLButtonUp(Sender,X,Y)
Rect1.Visible = false
Text1.MoveTo( Text1.Left - 2, Text1.Top - 2 )
End Function
Private Function OnMouseEnter(Sender)
Rect2.BackColor=$80000014
End Function
Private Function OnMouseExit(Sender)
Rect2.BackColor=$8000000F
End Function
Private Function OnResize(Sender)
End Function
</programe>
</sheet>
<sheet name="RadioGroup" bounds="16,16,188,104">
<line name="Line1" origin="128,64" linecolor="$80000010">
<points>
16,104,6
16,24,2
188,24,2
</points>
</line>
<line name="Line2" origin="152,64" linecolor="$FFFFFF">
<points>
16,104,6
188,104,2
188,24,2
</points>
</line>
<line name="Line3" origin="129,65" linecolor="$FFFFFF">
<points>
17,103,6
17,25,2
187,25,2
</points>
</line>
<line name="Line4" origin="153,65" linecolor="$80000010">
<points>
17,103,6
187,103,2
187,25,2
</points>
</line>
<text name="Text1" bounds="24,16,96,32" origin="12,-28" backcolor="$8000000F" pattern="1" border="$0" fontname="宋体" fontsize="12" text="RadioGroup"/>
<programe>
Private Function Initialize(Sender)
End Function
Private Function OnResize(Sender)
Line1.SetBounds( Left, Top + Text1.Height/ 2, Width, Height - Text1.Height / 2 )
Line2.SetBounds( Left, Line1.Top, Line1.Width, Line1.Height )
Line3.SetBounds( Left + 1, Line1.Top + 1, Line1.Width - 2, Line1.Height - 2 )
Line4.SetBounds( Left + 1, Line1.Top + 1, Line1.Width - 2, Line1.Height - 2 )
Text1.Left = Left + 8
Text1.Top = Top
End Function
</programe>
</sheet>
<sheet name="ComboBox" bounds="16,16,138,38" edit="Text1">
<elliment name="Elliment2" bounds="16,16,138,38" origin="77,27">
<line name="Line1" origin="143,33" linecolor="$80000010">
<points>
16,38,6
16,16,2
138,16,2
</points>
</line>
<line name="Line2" origin="144,32" linecolor="$80000014">
<points>
16,38,6
138,38,2
138,16,2
</points>
</line>
</elliment>
<elliment name="Elliment3" bounds="17,17,137,37" origin="77,27">
<line name="Line3" origin="144,34" linecolor="$80000015">
<points>
17,37,6
17,17,2
137,17,2
</points>
</line>
<line name="Line4" origin="145,33" linecolor="$80000016">
<points>
17,37,6
137,37,2
137,17,2
</points>
</line>
</elliment>
<shape name="Rect1" bounds="18,18,136,36" origin="144,36" linecolor="$8000000F" pattern="1"/>
<text name="Text1" cursor="15" bounds="18,18,120,36" origin="61,25" border="$0" fontname="宋体" fontsize="12" readonly="false" textalign="0"/>
<elliment name="Elliment1" bounds="120,18,136,36" origin="128,27">
<line name="Line5" origin="128,26" linecolor="$80000016">
<points>
120,36,6
120,18,2
136,18,2
</points>
</line>
<line name="Line6" origin="128,26" linecolor="$80000015">
<points>
120,36,6
136,36,2
136,18,2
</points>
</line>
<line name="Line7" origin="129,27" linecolor="$80000014">
<points>
121,35,6
121,19,2
135,19,2
</points>
</line>
<line name="Line8" origin="129,27" linecolor="$80000010">
<points>
121,35,6
135,35,2
135,19,2
</points>
</line>
<shape name="Rect2" bounds="122,20,134,34" origin="128,27" linecolor="$8000000F" backcolor="$8000000F" pattern="1"/>
<line name="Line9" origin="128,29" backcolor="$0" pattern="1">
<points>
128,29,6
131,26,2
125,26,3
</points>
</line>
</elliment>
<programe>
Private Function OnResize(Sender)
Elliment2.SetBounds( Left, Top, Width, 22 )
Elliment3.SetBounds( Left + 1, Top + 1, Width - 2, 20 )
Rect1.SetBounds( Left + 2, Top + 2, Width - 4, 18 )
Text1.SetBounds( Left + 2, Top + 2, Width - 20, 18 )
Elliment1.Left = Text1.Left + Text1.Width
Elliment1.Top = Text1.Top
End Function
</programe>
</sheet>
<sheet name="HScrollBar" bounds="78,16,210,32">
<shape name="Line1" bounds="96,16,192,32" origin="144,26" linetype="0" backcolor="$80000000" frontcolor="$80000014" pattern="8"/>
<elliment name="Elliment3" bounds="96,16,114,32" origin="105,24">
<line name="Line5" origin="24,104" linecolor="$80000016">
<points>
114,16,6
96,16,2
96,32,2
</points>
</line>
<line name="Line6" origin="24,104" linecolor="$80000015">
<points>
114,16,6
114,32,2
96,32,2
</points>
</line>
<line name="Line7" origin="25,105" linecolor="$80000014">
<points>
113,17,6
97,17,2
97,31,2
</points>
</line>
<line name="Line8" origin="25,105" linecolor="$80000010">
<points>
113,17,6
113,31,2
97,31,2
</points>
</line>
<shape name="Rect2" bounds="98,18,112,30" origin="24,105" linecolor="$8000000F" backcolor="$8000000F" pattern="1"/>
</elliment>
<elliment name="Elliment1" bounds="78,16,96,32" origin="87,24">
<line name="Line2" origin="24,86" linecolor="$80000016">
<points>
96,16,6
78,16,2
78,32,2
</points>
</line>
<line name="Line3" origin="24,86" linecolor="$80000015">
<points>
96,16,6
96,32,2
78,32,2
</points>
</line>
<line name="Line4" origin="25,87" linecolor="$80000014">
<points>
95,17,6
79,17,2
79,31,2
</points>
</line>
<line name="Line10" origin="25,87" linecolor="$80000010">
<points>
95,17,6
95,31,2
79,31,2
</points>
</line>
<shape name="Rect1" bounds="80,18,94,30" origin="86,25" linecolor="$8000000F" backcolor="$8000000F" pattern="1"/>
<line name="Line11" origin="24,86" backcolor="$0" pattern="1">
<points>
86,24,6
89,27,2
89,21,3
</points>
</line>
</elliment>
<elliment name="Elliment2" bounds="192,16,210,32" origin="201,24">
<line name="Line5" origin="24,200" linecolor="$80000016">
<points>
210,16,6