c++ builder 程序设计实用教程 - 5_4_1 驱动器类控件 - 张晋 - 17xie.htm

已经消失的不易找到的C++ builder网络教程总结

    width=252>
      <P class=a1><SPAN lang=EN-US>Enabled</SPAN></P></TD></TR>
  <TR style="mso-yfti-irow: 0; mso-yfti-firstrow: yes">
    <TD 
    style="BORDER-RIGHT: black 1pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: medium none; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0cm; BORDER-LEFT: medium none; WIDTH: 125.1pt; PADDING-TOP: 0cm; BORDER-BOTTOM: black 1pt solid; mso-border-top-alt: solid black .75pt; mso-border-bottom-alt: solid black .75pt; mso-border-right-alt: solid black .75pt" 
    width=167>
      <P class=a1><SPAN lang=EN-US>Font</SPAN></P></TD>
    <TD 
    style="BORDER-RIGHT: black 1pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: medium none; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0cm; BORDER-LEFT: medium none; WIDTH: 107.4pt; PADDING-TOP: 0cm; BORDER-BOTTOM: black 1pt solid; mso-border-top-alt: solid black .75pt; mso-border-left-alt: solid black .75pt; mso-border-alt: solid black .75pt" 
    width=143>
      <P class=a1><SPAN lang=EN-US>Height</SPAN></P></TD>
    <TD 
    style="BORDER-RIGHT: medium none; PADDING-RIGHT: 5.4pt; BORDER-TOP: medium none; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0cm; BORDER-LEFT: medium none; WIDTH: 188.9pt; PADDING-TOP: 0cm; BORDER-BOTTOM: black 1pt solid; mso-border-top-alt: solid black .75pt; mso-border-bottom-alt: solid black .75pt; mso-border-left-alt: solid black .75pt" 
    width=252>
      <P class=a1><SPAN lang=EN-US>HelpContext</SPAN></P></TD></TR>
  <TR style="mso-yfti-irow: 0; mso-yfti-firstrow: yes">
    <TD 
    style="BORDER-RIGHT: black 1pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: medium none; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0cm; BORDER-LEFT: medium none; WIDTH: 125.1pt; PADDING-TOP: 0cm; BORDER-BOTTOM: black 1pt solid; mso-border-top-alt: solid black .75pt; mso-border-bottom-alt: solid black .75pt; mso-border-right-alt: solid black .75pt" 
    width=167>
      <P class=a1><SPAN lang=EN-US>Hint</SPAN></P></TD>
    <TD 
    style="BORDER-RIGHT: black 1pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: medium none; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0cm; BORDER-LEFT: medium none; WIDTH: 107.4pt; PADDING-TOP: 0cm; BORDER-BOTTOM: black 1pt solid; mso-border-top-alt: solid black .75pt; mso-border-left-alt: solid black .75pt; mso-border-alt: solid black .75pt" 
    width=143>
      <P class=a1><SPAN lang=EN-US>ImeMode</SPAN></P></TD>
    <TD 
    style="BORDER-RIGHT: medium none; PADDING-RIGHT: 5.4pt; BORDER-TOP: medium none; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0cm; BORDER-LEFT: medium none; WIDTH: 188.9pt; PADDING-TOP: 0cm; BORDER-BOTTOM: black 1pt solid; mso-border-top-alt: solid black .75pt; mso-border-bottom-alt: solid black .75pt; mso-border-left-alt: solid black .75pt" 
    width=252>
      <P class=a1><SPAN lang=EN-US>ImeName</SPAN></P></TD></TR>
  <TR style="mso-yfti-irow: 0; mso-yfti-firstrow: yes">
    <TD 
    style="BORDER-RIGHT: black 1pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: medium none; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0cm; BORDER-LEFT: medium none; WIDTH: 125.1pt; PADDING-TOP: 0cm; BORDER-BOTTOM: black 1pt solid; mso-border-top-alt: solid black .75pt; mso-border-bottom-alt: solid black .75pt; mso-border-right-alt: solid black .75pt" 
    width=167>
      <P class=a1><SPAN lang=EN-US>Left</SPAN></P></TD>
    <TD 
    style="BORDER-RIGHT: black 1pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: medium none; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0cm; BORDER-LEFT: medium none; WIDTH: 107.4pt; PADDING-TOP: 0cm; BORDER-BOTTOM: black 1pt solid; mso-border-top-alt: solid black .75pt; mso-border-left-alt: solid black .75pt; mso-border-alt: solid black .75pt" 
    width=143>
      <P class=a1><SPAN lang=EN-US>Name</SPAN></P></TD>
    <TD 
    style="BORDER-RIGHT: medium none; PADDING-RIGHT: 5.4pt; BORDER-TOP: medium none; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0cm; BORDER-LEFT: medium none; WIDTH: 188.9pt; PADDING-TOP: 0cm; BORDER-BOTTOM: black 1pt solid; mso-border-top-alt: solid black .75pt; mso-border-bottom-alt: solid black .75pt; mso-border-left-alt: solid black .75pt" 
    width=252>
      <P class=a1><SPAN lang=EN-US>ParentColor</SPAN></P></TD></TR>
  <TR style="mso-yfti-irow: 0; mso-yfti-firstrow: yes">
    <TD 
    style="BORDER-RIGHT: black 1pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: medium none; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0cm; BORDER-LEFT: medium none; WIDTH: 125.1pt; PADDING-TOP: 0cm; BORDER-BOTTOM: black 1pt solid; mso-border-top-alt: solid black .75pt; mso-border-bottom-alt: solid black .75pt; mso-border-right-alt: solid black .75pt" 
    width=167>
      <P class=a1><SPAN lang=EN-US>ParentCtl3D</SPAN></P></TD>
    <TD 
    style="BORDER-RIGHT: black 1pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: medium none; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0cm; BORDER-LEFT: medium none; WIDTH: 107.4pt; PADDING-TOP: 0cm; BORDER-BOTTOM: black 1pt solid; mso-border-top-alt: solid black .75pt; mso-border-left-alt: solid black .75pt; mso-border-alt: solid black .75pt" 
    width=143>
      <P class=a1><SPAN lang=EN-US>ParentFont</SPAN></P></TD>
    <TD 
    style="BORDER-RIGHT: medium none; PADDING-RIGHT: 5.4pt; BORDER-TOP: medium none; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0cm; BORDER-LEFT: medium none; WIDTH: 188.9pt; PADDING-TOP: 0cm; BORDER-BOTTOM: black 1pt solid; mso-border-top-alt: solid black .75pt; mso-border-bottom-alt: solid black .75pt; mso-border-left-alt: solid black .75pt" 
    width=252>
      <P class=a1><SPAN lang=EN-US>ParentShowHint</SPAN></P></TD></TR>
  <TR style="mso-yfti-irow: 0; mso-yfti-firstrow: yes">
    <TD 
    style="BORDER-RIGHT: black 1pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: medium none; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0cm; BORDER-LEFT: medium none; WIDTH: 125.1pt; PADDING-TOP: 0cm; BORDER-BOTTOM: black 1pt solid; mso-border-top-alt: solid black .75pt; mso-border-bottom-alt: solid black .75pt; mso-border-right-alt: solid black .75pt" 
    width=167>
      <P class=a1><SPAN lang=EN-US>PopupMenu</SPAN></P></TD>
    <TD 
    style="BORDER-RIGHT: black 1pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: medium none; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0cm; BORDER-LEFT: medium none; WIDTH: 107.4pt; PADDING-TOP: 0cm; BORDER-BOTTOM: black 1pt solid; mso-border-top-alt: solid black .75pt; mso-border-left-alt: solid black .75pt; mso-border-alt: solid black .75pt" 
    width=143>
      <P class=a1><SPAN lang=EN-US>ShowHint</SPAN></P></TD>
    <TD 
    style="BORDER-RIGHT: medium none; PADDING-RIGHT: 5.4pt; BORDER-TOP: medium none; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0cm; BORDER-LEFT: medium none; WIDTH: 188.9pt; PADDING-TOP: 0cm; BORDER-BOTTOM: black 1pt solid; mso-border-top-alt: solid black .75pt; mso-border-bottom-alt: solid black .75pt; mso-border-left-alt: solid black .75pt" 
    width=252>
      <P class=a1><SPAN lang=EN-US>TabOrder</SPAN></P></TD></TR>
  <TR style="mso-yfti-irow: 0; mso-yfti-firstrow: yes">
    <TD 
    style="BORDER-RIGHT: black 1pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: medium none; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0cm; BORDER-LEFT: medium none; WIDTH: 125.1pt; PADDING-TOP: 0cm; BORDER-BOTTOM: black 1pt solid; mso-border-top-alt: solid black .75pt; mso-border-bottom-alt: solid black .75pt; mso-border-right-alt: solid black .75pt" 
    width=167>
      <P class=a1><SPAN lang=EN-US>TabStop</SPAN></P></TD>
    <TD 
    style="BORDER-RIGHT: black 1pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: medium none; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0cm; BORDER-LEFT: medium none; WIDTH: 107.4pt; PADDING-TOP: 0cm; BORDER-BOTTOM: black 1pt solid; mso-border-top-alt: solid black .75pt; mso-border-left-alt: solid black .75pt; mso-border-alt: solid black .75pt" 
    width=143>
      <P class=a1><SPAN lang=EN-US>Tag</SPAN></P></TD>
    <TD 
    style="BORDER-RIGHT: medium none; PADDING-RIGHT: 5.4pt; BORDER-TOP: medium none; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0cm; BORDER-LEFT: medium none; WIDTH: 188.9pt; PADDING-TOP: 0cm; BORDER-BOTTOM: black 1pt solid; mso-border-top-alt: solid black .75pt; mso-border-bottom-alt: solid black .75pt; mso-border-left-alt: solid black .75pt" 
    width=252>
      <P class=a1><SPAN lang=EN-US>TextCase</SPAN></P></TD></TR>
  <TR style="mso-yfti-irow: 0; mso-yfti-firstrow: yes; mso-yfti-lastrow: yes">
    <TD 
    style="BORDER-RIGHT: black 1pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: medium none; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0cm; BORDER-LEFT: medium none; WIDTH: 125.1pt; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; mso-border-top-alt: solid black .75pt; mso-border-bottom-alt: solid windowtext 1.0pt; mso-border-right-alt: solid black .75pt" 
    width=167>
      <P class=a1><SPAN lang=EN-US>Top</SPAN></P></TD>
    <TD 
    style="BORDER-RIGHT: black 1pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: medium none; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0cm; BORDER-LEFT: medium none; WIDTH: 107.4pt; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; mso-border-top-alt: solid black .75pt; mso-border-bottom-alt: solid windowtext 1.0pt; mso-border-left-alt: solid black .75pt; mso-border-alt: solid black .75pt" 
    width=143>
      <P class=a1><SPAN lang=EN-US>Visible</SPAN></P></TD>
    <TD 
    style="BORDER-RIGHT: medium none; PADDING-RIGHT: 5.4pt; BORDER-TOP: medium none; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0cm; BORDER-LEFT: medium none; WIDTH: 188.9pt; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; mso-border-top-alt: solid black .75pt; mso-border-left-alt: solid black .75pt" 
    width=252>
      <P class=a1><SPAN lang=EN-US>Width</SPAN></P></TD></TR></TBODY></TABLE></DIV>
<P class=MsoNormalIndent style="MARGIN-TOP: 6pt"><SPAN 
lang=EN-US>DriveComboBox</SPAN><SPAN 
style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">控件的属性在这里就不一一的加以介绍了，下面以一个示例来说明</SPAN><SPAN 
lang=EN-US>DriveComboBox</SPAN><SPAN 
style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">控件和它的属性的用法，具体步骤如下所示：</SPAN></P>
<H4><SPAN lang=EN-US>1</SPAN><SPAN 
style="FONT-FAMILY: 楷体_GB2312; mso-ascii-font-family: 'Times New Roman'">．开始工作</SPAN></H4>
<P class=MsoNormalIndent><SPAN 
style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">首先启动一个新的项目，选择菜单</SPAN><SPAN 
lang=EN-US>File</SPAN><SPAN 
style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">中的</SPAN><SPAN 
lang=EN-US>New Application</SPAN><SPAN 
style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">项，在</SPAN><SPAN 
lang=EN-US>CBuilder 5</SPAN><SPAN 
style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">的集成开发环境中就会弹出一个新建的窗体，在控件工具栏上选择</SPAN><SPAN 
lang=EN-US>Win 3.1</SPAN><SPAN 
style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">选项后，在</SPAN><SPAN 
lang=EN-US>Drive ComboBox</SPAN><SPAN 
style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">控件的图标上双击鼠标的左键，这时空白的窗体上就会出现一个</SPAN><SPAN 
lang=EN-US>Drive ComboBox</SPAN><SPAN 
style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">控件，如图</SPAN><SPAN 
lang=EN-US>5-10</SPAN><SPAN 
style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">所示。</SPAN></P>
<P class=a0><SPAN lang=EN-US><IMG height=233 
src="C++ Builder 程序设计实用教程 - 5_4_1 驱动器类控件 - 张晋 - 17xie.files/298fec785e.jpg" 
width=297 v:shapes="_x0000_i1025"></SPAN></P>
<P class=MsoCaption><SPAN 
style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">图</SPAN><SPAN 
lang=EN-US>5-10<SPAN style="mso-spacerun: yes">&nbsp; </SPAN></SPAN><SPAN 
style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">添加控件后的窗体</SPAN></P>
<H4><SPAN lang=EN-US>2</SPAN><SPAN 
style="FONT-FAMILY: 楷体_GB2312; mso-ascii-font-family: 'Times New Roman'">．添加代码</SPAN></H4>
<P class=MsoNormalIndent><SPAN 
style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">添加控件后，用鼠标的左键在窗体上的空白处双击，就会弹出一个代码窗口，用户可以在其中添加自己需要的代码。把光标移动到代码窗口中的适当位置，找到需要添加代码的事件，如窗体的</SPAN><SPAN 
lang=EN-US>FormCreate()</SPAN><SPAN 
style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">事件。读者可以参考下面的程序清单在其中添加程序代码：</SPAN></P>
<DIV 
style="BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 0cm; BORDER-TOP: windowtext 1pt solid; PADDING-LEFT: 0cm; PADDING-BOTTOM: 1pt; BORDER-LEFT: windowtext 1pt solid; PADDING-TOP: 1pt; BORDER-BOTTOM: windowtext 1pt solid; mso-border-alt: solid windowtext .5pt; mso-element: para-border-div">
<P class=a2 
style="BORDER-RIGHT: medium none; PADDING-RIGHT: 0cm; BORDER-TOP: medium none; PADDING-LEFT: 0cm; PADDING-BOTTOM: 0cm; BORDER-LEFT: medium none; PADDING-TOP: 0cm; BORDER-BOTTOM: medium none; mso-padding-alt: 1.0pt 0cm 1.0pt 0cm; mso-border-alt: solid windowtext .5pt"><SPAN 
style="FONT-FAMILY: 仿宋_GB2312; mso-ascii-font-family: 'Times New Roman'">程序清单</SPAN></P></DIV>
<P class=a3><SPAN 
lang=EN-US>//-----------------------------------------------------------------------</SPAN></P>
<P class=a3><SPAN lang=EN-US>#include &lt;vcl.h&gt;</SPAN></P>
<P class=a3><SPAN lang=EN-US>#pragma hdrstop</SPAN></P>
<P class=a3><SPAN lang=EN-US><o:p>&nbsp;</o:p></SPAN></P>
<P class=a3><SPAN lang=EN-US>#include "Unit1.h"</SPAN></P>
<P class=a3><SPAN 
lang=EN-US>//-----------------------------------------------------------------------</SPAN></P>
<P class=a3><SPAN lang=EN-US>#pragma package(smart_init)</SPAN></P>
<P class=a3><SPAN lang=EN-US>#pragma resource "*.dfm"</SPAN></P>
<P class=a3><SPAN lang=EN-US>TForm1 *Form1;</SPAN></P>
<P class=a3><SPAN 
lang=EN-US>//-----------------------------------------------------------------------</SPAN></P>
<P class=a3><SPAN lang=EN-US>__fastcall TForm1::TForm1(TComponent* 
Owner)</SPAN></P>
<P class=a3><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </SPAN>: 
TForm(Owner)</SPAN></P>
<P class=a3><SPAN lang=EN-US>{</SPAN></P>
<P class=a3><SPAN lang=EN-US>}</SPAN></P>
<P class=a3><SPAN 
lang=EN-US>//-----------------------------------------------------------------------</SPAN></P>
<P class=a3><SPAN lang=EN-US><o:p>&nbsp;</o:p></SPAN></P>
<P class=a3><SPAN lang=EN-US><o:p>&nbsp;</o:p></SPAN></P>
<P class=a3><SPAN lang=EN-US>void __fastcall TForm1::FormCreate(TObject 
*Sender)</SPAN></P>
<P class=a3><SPAN lang=EN-US>{</SPAN></P>
<P class=a3><SPAN lang=EN-US>Form1-&gt;DriveComboBox1-&gt;Drive='d';</SPAN></P>
<P class=a3><SPAN lang=EN-US>//</SPAN><SPAN 
style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">设置驱动器为</SPAN><SPAN 
lang=EN-US>D</SPAN><SPAN