?? gis
字號(hào):
<text name="text2" origin="14.005389,3.5" bounds="-8.994611,-9,9.005389,9" locked="true" autosize="true" border="0" fontname="Wingdings" fontsize="12" text=","/>
<programe>
<!--
property Caption read GetCaption write SetCaption
private function GetCaption()
return Text1.Text
end function
private function GetSymbolColor()
return Text2.FontColor
end function
private function Initialize(Sender)
FSymbol = 44
end function
private function SetCaption(AValue)
Text1.Text = AValue;Refresh()
end function
private function SetSymbol(AValue)
FSymbol = AValue
Text2.Text = Chr( FSymbol )
end function
private function SetSymbolColor(AValue)
Text2.FontColor = AValue
end function
property Symbol read FSymbol write SetSymbol
property SymbolColor read GetSymbolColor write SetSymbolColor editor Color
-->
</programe>
</sheet>
<sheet name="SymbolAM" selectmode="1" visible="false" protect="512">
<text name="text1" origin="12.530798,2" bounds="8.530798,-8,12.530798,8" locked="true" autosize="true" border="0" fontname="瀹嬩綋" fontsize="12" textalign="1"/>
<line name="line1" origin="0.005389,0">
<points>
0,0,6
</points>
</line>
<text name="text2" origin="14.005389,3.5" bounds="-8.994611,-9,9.005389,9" locked="true" autosize="true" border="0" fontname="Wingdings" fontsize="12" text="-"/>
<programe>
<!--
property Caption read GetCaption write SetCaption
private function GetCaption()
return Text1.Text
end function
private function GetSymbolColor()
return Text2.FontColor
end function
private function Initialize(Sender)
FSymbol = 45
end function
private function SetCaption(AValue)
Text1.Text = AValue;Refresh()
end function
private function SetSymbol(AValue)
FSymbol = AValue
Text2.Text = Chr( FSymbol )
end function
private function SetSymbolColor(AValue)
Text2.FontColor = AValue
end function
property Symbol read FSymbol write SetSymbol
property SymbolColor read GetSymbolColor write SetSymbolColor editor Color
-->
</programe>
</sheet>
<sheet name="SymbolAN" selectmode="1" visible="false" protect="512">
<text name="text1" origin="12.530798,2" bounds="8.530798,-8,12.530798,8" locked="true" autosize="true" border="0" fontname="瀹嬩綋" fontsize="12" textalign="1"/>
<line name="line1" origin="0.005389,0">
<points>
0,0,6
</points>
</line>
<text name="text2" origin="14.005389,3.5" bounds="-10.494611,-9,10.505389,9" locked="true" autosize="true" border="0" fontname="Wingdings" fontsize="12" text="."/>
<programe>
<!--
property Caption read GetCaption write SetCaption
private function GetCaption()
return Text1.Text
end function
private function GetSymbolColor()
return Text2.FontColor
end function
private function Initialize(Sender)
FSymbol = 46
end function
private function SetCaption(AValue)
Text1.Text = AValue;Refresh()
end function
private function SetSymbol(AValue)
FSymbol = AValue
Text2.Text = Chr( FSymbol )
end function
private function SetSymbolColor(AValue)
Text2.FontColor = AValue
end function
property Symbol read FSymbol write SetSymbol
property SymbolColor read GetSymbolColor write SetSymbolColor editor Color
-->
</programe>
</sheet>
<sheet name="SymbolAO" selectmode="1" visible="false" protect="512">
<text name="text1" origin="12.530798,2" bounds="8.530798,-8,12.530798,8" locked="true" autosize="true" border="0" fontname="瀹嬩綋" fontsize="12" textalign="1"/>
<line name="line1" origin="0.005389,0">
<points>
0,0,6
</points>
</line>
<text name="text2" origin="14.005389,3.5" bounds="-10.494611,-9,10.505389,9" locked="true" autosize="true" border="0" fontname="Wingdings" fontsize="12" text="/"/>
<programe>
<!--
property Caption read GetCaption write SetCaption
private function GetCaption()
return Text1.Text
end function
private function GetSymbolColor()
return Text2.FontColor
end function
private function Initialize(Sender)
FSymbol = 47
end function
private function SetCaption(AValue)
Text1.Text = AValue;Refresh()
end function
private function SetSymbol(AValue)
FSymbol = AValue
Text2.Text = Chr( FSymbol )
end function
private function SetSymbolColor(AValue)
Text2.FontColor = AValue
end function
property Symbol read FSymbol write SetSymbol
property SymbolColor read GetSymbolColor write SetSymbolColor editor Color
-->
</programe>
</sheet>
<sheet name="SymbolAP" selectmode="1" visible="false" protect="512">
<text name="text1" origin="12.530798,2" bounds="8.530798,-8,12.530798,8" locked="true" autosize="true" border="0" fontname="瀹嬩綋" fontsize="12" textalign="1"/>
<line name="line1" origin="0.005389,0">
<points>
0,0,6
</points>
</line>
<text name="text2" origin="14.005389,3.5" bounds="-8.494611,-9,8.505389,9" locked="true" autosize="true" border="0" fontname="Wingdings" fontsize="12" text="0"/>
<programe>
<!--
property Caption read GetCaption write SetCaption
private function GetCaption()
return Text1.Text
end function
private function GetSymbolColor()
return Text2.FontColor
end function
private function Initialize(Sender)
FSymbol = 48
end function
private function SetCaption(AValue)
Text1.Text = AValue;Refresh()
end function
private function SetSymbol(AValue)
FSymbol = AValue
Text2.Text = Chr( FSymbol )
end function
private function SetSymbolColor(AValue)
Text2.FontColor = AValue
end function
property Symbol read FSymbol write SetSymbol
property SymbolColor read GetSymbolColor write SetSymbolColor editor Color
-->
</programe>
</sheet>
<sheet name="SymbolAQ" selectmode="1" visible="false" protect="512">
<text name="text1" origin="12.530798,2" bounds="8.530798,-8,12.530798,8" locked="true" autosize="true" border="0" fontname="瀹嬩綋" fontsize="12" textalign="1"/>
<line name="line1" origin="0.005389,0">
<points>
0,0,6
</points>
</line>
<text name="text2" origin="14.005389,3.5" bounds="-9.994611,-9,10.005389,9" locked="true" autosize="true" border="0" fontname="Wingdings" fontsize="12" text="1"/>
<programe>
<!--
property Caption read GetCaption write SetCaption
private function GetCaption()
return Text1.Text
end function
private function GetSymbolColor()
return Text2.FontColor
end function
private function Initialize(Sender)
FSymbol = 49
end function
private function SetCaption(AValue)
Text1.Text = AValue;Refresh()
end function
private function SetSymbol(AValue)
FSymbol = AValue
Text2.Text = Chr( FSymbol )
end function
private function SetSymbolColor(AValue)
Text2.FontColor = AValue
end function
property Symbol read FSymbol write SetSymbol
property SymbolColor read GetSymbolColor write SetSymbolColor editor Color
-->
</programe>
</sheet>
<sheet name="SymbolAR" selectmode="1" visible="false" protect="512">
<text name="text1" origin="12.530798,2" bounds="8.530798,-8,12.530798,8" locked="true" autosize="true" border="0" fontname="瀹嬩綋" fontsize="12" textalign="1"/>
<line name="line1" origin="0.005389,0">
<points>
0,0,6
</points>
</line>
<text name="text2" origin="14.005389,3.5" bounds="-5.994611,-9,6.005389,9" locked="true" autosize="true" border="0" fontname="Wingdings" fontsize="12" text="2"/>
<programe>
<!--
property Caption read GetCaption write SetCaption
private function GetCaption()
return Text1.Text
end function
private function GetSymbolColor()
return Text2.FontColor
end function
private function Initialize(Sender)
FSymbol = 50
end function
private function SetCaption(AValue)
Text1.Text = AValue;Refresh()
end function
private function SetSymbol(AValue)
FSymbol = AValue
Text2.Text = Chr( FSymbol )
end function
private function SetSymbolColor(AValue)
Text2.FontColor = AValue
end function
property Symbol read FSymbol write SetSymbol
property SymbolColor read GetSymbolColor write SetSymbolColor editor Color
-->
</programe>
</sheet>
<sheet name="SymbolAS" selectmode="1" visible="false" protect="512">
<text name="text1" origin="12.530798,2" bounds="8.530798,-8,12.530798,8" locked="true" autosize="true" border="0" fontname="瀹嬩綋" fontsize="12" textalign="1"/>
<line name="line1" origin="0.005389,0">
<points>
0,0,6
</points>
</line>
<text name="text2" origin="14.005389,3.5" bounds="-5.994611,-9,6.005389,9" locked="true" autosize="true" border="0" fontname="Wingdings" fontsize="12" text="3"/>
<programe>
<!--
property Caption read GetCaption write SetCaption
private function GetCaption()
return Text1.Text
end function
private function GetSymbolColor()
return Text2.FontColor
end function
private function Initialize(Sender)
FSymbol = 51
end function
private function SetCaption(AValue)
Text1.Text = AValue;Refresh()
end function
private function SetSymbol(AValue)
FSymbol = AValue
Text2.Text = Chr( FSymbol )
end function
private function SetSymbolColor(AValue)
Text2.FontColor = AValue
end function
property Symbol read FSymbol write SetSymbol
property SymbolColor read GetSymbolColor write SetSymbolColor editor Color
-->
</programe>
</sheet>
<sheet name="SymbolAT" selectmode="1" visible="false" protect="512">
<text name="text1" origin="12.530798,2" bounds="8.530798,-8,12.530798,8" locked="true" autosize="true" border="0" fontname="瀹嬩綋" fontsize="12" textalign="1"/>
<line name="line1" origin="0.005389,0">
<points>
0,0,6
</points>
</line>
<text name="text2" origin="14.005389,3.5" bounds="-7.494611,-9,7.505389,9" locked="true" autosize="true" border="0" fontname="Wingdings" fontsize="12" text="4"/>
<programe>
<!--
property Caption read GetCaption write SetCaption
private function GetCaption()
return Text1.Text
end function
private function GetSymbolColor()
return Text2.FontColor
end function
private function Initialize(Sender)
FSymbol = 52
end function
private function SetCaption(AValue)
Text1.Text = AValue;Refresh()
end function
private function SetSymbol(AValue)
FSymbol = AValue
Text2.Text = Chr( FSymbol )
end function
private function SetSymbolColor(AValue)
Text2.FontColor = AValue
end function
property Symbol read FSymbol write SetSymbol
property SymbolColor read GetSymbolColor write SetSymbolColor editor Color
-->
</programe>
</sheet>
<sheet name="SymbolAU" selectmode="1" visible="false" protect="512">
<text name="text1" origin="12.530798,2" bounds="8.530798,-8,12.530798,8" locked="true" autosize="true" border="0" fontname="瀹嬩綋" fontsize="12" textalign="1"/>
<line name="line1" origin="0.005389,0">
<points>
0,0,6
</points>
</line>
<text name="text2" origin="14.005389,3.5" bounds="-5.494611,-9,5.505389,9" locked="true" autosize="true" border="0" fontname="Wingdings" fontsize="12" text="5"/>
<programe>
<!--
property Caption read GetCaption write SetCaption
private function GetCaption()
return Text1.Text
end function
private function GetSymbolColor()
return Text2.FontColor
end function
private function Initialize(Sender)
FSymbol = 53
end function
private function SetCaption(AValue)
Text1.Text = AValue;Refresh()
end function
private function SetSymbol(AValue)
FSymbol = AValue
Text2.Text = Chr( FSymbol )
end function
private function SetSymbolColor(AValue)
Text2.FontColor = AValue
end function
property Symbol read FSymbol write SetSymbol
property SymbolColor read GetSymbolColor write SetSymbolColor editor Color
-->
</programe>
</sheet>
<sheet name="SymbolAV" selectmode="1" visible="false" protect="512">
<text name="text1" origin="12.530798,2" bounds="8.530798,-8,12.530798,8" locked="true" autosize="true" border="0" fontname="瀹嬩綋" fontsize="12" textalign="1"/>
<line name="line1" origin="0.005389,0">
<points>
0,0,6
</points>
</line>
<text name="text2" origin="14.005389,3.5" bounds="-5.494611,-9,5.505389,9" locked="true" autosize="true" border="0" fontname="Wingdings" fontsize="12" text="6"/>
<programe>
<!--
property Caption read GetCaption write SetCaption
private function GetCaption()
return Text1.Text
end function
private function GetSymbolColor()
return Text2.FontColor
end function
private function Initialize(Sender)
FSymbol = 54
end function
private function SetCaption(AValue)
Text1.Text = AValue;Refresh()
end function
private function SetSymbol(AValue)
FSymbol = AValue
Text2.Text = Chr( FSymbol )
end function
private function SetSymbolColor(AValue)
Text2.FontColor = AValue
end function
property Symbol read FSymbol write SetSymbol
property SymbolColor read GetSymbolColor write SetSymbolColor editor Color
-->
</programe>
</sheet>
<sheet name="SymbolAW" selectmode="1" visible="false" protect="512">
<text name="text1" origin="12.530798,2" bounds="8.530798,-8,12.530798,8" locked="true" autosize="true" border="0" fontname="瀹嬩綋" fontsize="12" textalign="1"/>
<line name="line1" origin="0.005389,0">
<points>
0,0,6
</points>
</line>
<text name="text2" origin="14.005389,3.5" bounds="-8.494611,-9,8.505389,9" locked="true" autosize="true" border="0" fontname="Wingdings" fontsize="12" text="7"/>
<programe>
<!--
property Caption read GetCaption write SetCaption
private function GetCaption()
return Text1.Text
end function
private function GetSymbolColor()
return Text2.FontColor
end function
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -