c++ builder 程序设计实用教程 - 9_1_2 剪贴板类 - 张晋 - 17xie.htm

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

  <TR style="mso-yfti-irow: 5">
    <TD 
    style="BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 5.4pt; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 105pt; BORDER-TOP-COLOR: #ece9d8; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; BACKGROUND-COLOR: transparent; mso-border-bottom-alt: solid windowtext .5pt; mso-border-top-alt: solid windowtext .5pt; mso-border-right-alt: solid windowtext .5pt" 
    width=140>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><SPAN lang=EN-US><FONT 
      face="Times New Roman" size=2>SetComponent</FONT></SPAN></P></TD>
    <TD 
    style="BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 5.4pt; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 126pt; BORDER-TOP-COLOR: #ece9d8; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; BACKGROUND-COLOR: transparent; mso-border-top-alt: solid windowtext .5pt; mso-border-left-alt: solid windowtext .5pt; mso-border-alt: solid windowtext .5pt" 
    width=168>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><SPAN lang=EN-US><FONT 
      face="Times New Roman" size=2>Source:Tpersistent</FONT></SPAN></P></TD>
    <TD 
    style="PADDING-RIGHT: 5.4pt; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 185.8pt; BORDER-TOP-COLOR: #ece9d8; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; BACKGROUND-COLOR: transparent; BORDER-RIGHT-COLOR: #ece9d8; mso-border-bottom-alt: solid windowtext .5pt; mso-border-top-alt: solid windowtext .5pt; mso-border-left-alt: solid windowtext .5pt" 
    width=248>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><SPAN 
      style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'"><FONT 
      size=2>把部件拷贝到剪贴板</FONT></SPAN></P></TD></TR>
  <TR style="mso-yfti-irow: 6">
    <TD 
    style="BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 5.4pt; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 105pt; BORDER-TOP-COLOR: #ece9d8; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; BACKGROUND-COLOR: transparent; mso-border-bottom-alt: solid windowtext .5pt; mso-border-top-alt: solid windowtext .5pt; mso-border-right-alt: solid windowtext .5pt" 
    width=140>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><SPAN lang=EN-US><FONT 
      face="Times New Roman" size=2>GetComponent</FONT></SPAN></P></TD>
    <TD 
    style="BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 5.4pt; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 126pt; BORDER-TOP-COLOR: #ece9d8; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; BACKGROUND-COLOR: transparent; mso-border-top-alt: solid windowtext .5pt; mso-border-left-alt: solid windowtext .5pt; mso-border-alt: solid windowtext .5pt" 
    width=168>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><SPAN lang=EN-US><FONT 
      face="Times New Roman" size=2>OwnerParent:Tpersistent</FONT></SPAN></P></TD>
    <TD 
    style="PADDING-RIGHT: 5.4pt; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 185.8pt; BORDER-TOP-COLOR: #ece9d8; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; BACKGROUND-COLOR: transparent; BORDER-RIGHT-COLOR: #ece9d8; mso-border-bottom-alt: solid windowtext .5pt; mso-border-top-alt: solid windowtext .5pt; mso-border-left-alt: solid windowtext .5pt" 
    width=248>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><SPAN 
      style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'"><FONT 
      size=2>从剪贴板取回一个部件并放置</FONT></SPAN></P></TD></TR>
  <TR style="mso-yfti-irow: 7">
    <TD 
    style="BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 5.4pt; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 105pt; BORDER-TOP-COLOR: #ece9d8; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; BACKGROUND-COLOR: transparent; mso-border-bottom-alt: solid windowtext .5pt; mso-border-top-alt: solid windowtext .5pt; mso-border-right-alt: solid windowtext .5pt" 
    width=140>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><SPAN lang=EN-US><FONT 
      face="Times New Roman" size=2>SetAsHandle</FONT></SPAN></P></TD>
    <TD 
    style="BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 5.4pt; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 126pt; BORDER-TOP-COLOR: #ece9d8; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; BACKGROUND-COLOR: transparent; mso-border-top-alt: solid windowtext .5pt; mso-border-left-alt: solid windowtext .5pt; mso-border-alt: solid windowtext .5pt" 
    width=168>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><SPAN lang=EN-US><FONT 
      face="Times New Roman" size=2>Format:Word</FONT></SPAN></P>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><FONT size=2><SPAN 
      style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">返回类型：</SPAN><SPAN 
      lang=EN-US><FONT 
face="Times New Roman">Thandle</FONT></SPAN></FONT></P></TD>
    <TD 
    style="PADDING-RIGHT: 5.4pt; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 185.8pt; BORDER-TOP-COLOR: #ece9d8; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; BACKGROUND-COLOR: transparent; BORDER-RIGHT-COLOR: #ece9d8; mso-border-bottom-alt: solid windowtext .5pt; mso-border-top-alt: solid windowtext .5pt; mso-border-left-alt: solid windowtext .5pt" 
    width=248>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><SPAN 
      style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'"><FONT 
      size=2>把指定格式数据的句柄交给剪贴板</FONT></SPAN></P></TD></TR>
  <TR style="mso-yfti-irow: 8">
    <TD 
    style="BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 5.4pt; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 105pt; BORDER-TOP-COLOR: #ece9d8; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; BACKGROUND-COLOR: transparent; mso-border-bottom-alt: solid windowtext .5pt; mso-border-top-alt: solid windowtext .5pt; mso-border-right-alt: solid windowtext .5pt" 
    width=140>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><SPAN lang=EN-US><FONT 
      face="Times New Roman" size=2>GetAsHandle</FONT></SPAN></P></TD>
    <TD 
    style="BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 5.4pt; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 126pt; BORDER-TOP-COLOR: #ece9d8; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; BACKGROUND-COLOR: transparent; mso-border-top-alt: solid windowtext .5pt; mso-border-left-alt: solid windowtext .5pt; mso-border-alt: solid windowtext .5pt" 
    width=168>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><SPAN lang=EN-US><FONT 
      face="Times New Roman" size=2>Format:Word</FONT></SPAN></P>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><FONT size=2><SPAN 
      style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">返回类型：</SPAN><SPAN 
      lang=EN-US><FONT 
face="Times New Roman">THandle</FONT></SPAN></FONT></P></TD>
    <TD 
    style="PADDING-RIGHT: 5.4pt; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 185.8pt; BORDER-TOP-COLOR: #ece9d8; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; BACKGROUND-COLOR: transparent; BORDER-RIGHT-COLOR: #ece9d8; mso-border-bottom-alt: solid windowtext .5pt; mso-border-top-alt: solid windowtext .5pt; mso-border-left-alt: solid windowtext .5pt" 
    width=248>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><SPAN 
      style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'"><FONT 
      size=2>返回剪贴板指定格式数据的句柄</FONT></SPAN></P></TD></TR>
  <TR style="mso-yfti-irow: 9">
    <TD 
    style="BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 5.4pt; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 105pt; BORDER-TOP-COLOR: #ece9d8; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; BACKGROUND-COLOR: transparent; mso-border-bottom-alt: solid windowtext .5pt; mso-border-top-alt: solid windowtext .5pt; mso-border-right-alt: solid windowtext .5pt" 
    width=140>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><SPAN lang=EN-US><FONT 
      face="Times New Roman" size=2>HasFormat</FONT></SPAN></P></TD>
    <TD 
    style="BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 5.4pt; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 126pt; BORDER-TOP-COLOR: #ece9d8; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; BACKGROUND-COLOR: transparent; mso-border-top-alt: solid windowtext .5pt; mso-border-left-alt: solid windowtext .5pt; mso-border-alt: solid windowtext .5pt" 
    width=168>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><SPAN lang=EN-US><FONT 
      face="Times New Roman" size=2>Format:Word</FONT></SPAN></P>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><FONT size=2><SPAN 
      style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">返回类型：</SPAN><SPAN 
      lang=EN-US><FONT 
face="Times New Roman">Boolean</FONT></SPAN></FONT></P></TD>
    <TD 
    style="PADDING-RIGHT: 5.4pt; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 185.8pt; BORDER-TOP-COLOR: #ece9d8; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; BACKGROUND-COLOR: transparent; BORDER-RIGHT-COLOR: #ece9d8; mso-border-bottom-alt: solid windowtext .5pt; mso-border-top-alt: solid windowtext .5pt; mso-border-left-alt: solid windowtext .5pt" 
    width=248>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><SPAN 
      style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'"><FONT 
      size=2>判断剪贴板是否拥有给定的格式</FONT></SPAN></P></TD></TR>
  <TR style="mso-yfti-irow: 10; mso-yfti-lastrow: yes">
    <TD 
    style="BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 5.4pt; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 105pt; BORDER-TOP-COLOR: #ece9d8; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; BACKGROUND-COLOR: transparent; mso-border-bottom-alt: solid windowtext 1.0pt; mso-border-top-alt: solid windowtext .5pt; mso-border-right-alt: solid windowtext .5pt" 
    width=140>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><SPAN lang=EN-US><FONT 
      face="Times New Roman" size=2>SetTextBuf</FONT></SPAN></P></TD>
    <TD 
    style="BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 5.4pt; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 126pt; BORDER-TOP-COLOR: #ece9d8; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; BACKGROUND-COLOR: transparent; mso-border-bottom-alt: solid windowtext 1.0pt; mso-border-top-alt: solid windowtext .5pt; mso-border-left-alt: solid windowtext .5pt; mso-border-alt: solid windowtext .5pt" 
    width=168>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><SPAN lang=EN-US><FONT 
      face="Times New Roman" size=2>Buffer:Pchar</FONT></SPAN></P></TD>
    <TD 
    style="PADDING-RIGHT: 5.4pt; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 185.8pt; BORDER-TOP-COLOR: #ece9d8; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; BACKGROUND-COLOR: transparent; BORDER-RIGHT-COLOR: #ece9d8; mso-border-top-alt: solid windowtext .5pt; mso-border-left-alt: solid windowtext .5pt" 
    width=248>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><SPAN 
      style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'"><FONT 
      size=2>设置剪贴板的文本内容</FONT></SPAN></P></TD></TR></TBODY></TABLE></P>
<P class=a2 style="MARGIN: 6pt 0cm 0pt"><SPAN 
style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">剪贴板中可能的数据格式如表</SPAN><SPAN 
lang=EN-US><FONT face="Times New Roman">9-4</FONT></SPAN><SPAN 
style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">所示。</SPAN></P>
<P class=a style="MARGIN: 6pt 0cm 4pt"><FONT size=2><SPAN 
style="FONT-FAMILY: 黑体; mso-ascii-font-family: 'Times New Roman'">表</SPAN><SPAN 
lang=EN-US><FONT face="Times New Roman">9-4</FONT></SPAN><SPAN 
style="FONT-FAMILY: 黑体; mso-ascii-font-family: 'Times New Roman'">　剪贴板数据格式及其意义</SPAN></FONT></P>
<P>
<TABLE class=MsoNormalTable 
style="BORDER-RIGHT: medium none; BORDER-TOP: medium none; MARGIN: auto auto auto 10.65pt; BORDER-LEFT: medium none; BORDER-BOTTOM: medium none; BORDER-COLLAPSE: collapse; mso-padding-alt: 0cm 5.4pt 0cm 5.4pt; mso-border-bottom-alt: solid green 1.5pt; mso-table-layout-alt: fixed; mso-border-top-alt: solid green 1.5pt; mso-yfti-tbllook: 191; mso-border-insideh: cell-none; mso-border-insidev: cell-none" 
cellSpacing=0 cellPadding=0 border=1>
  <TBODY>
  <TR style="mso-yfti-irow: 0; mso-yfti-firstrow: yes">
    <TD 
    style="BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: windowtext 1pt solid; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 110.25pt; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; BACKGROUND-COLOR: transparent; mso-border-bottom-alt: solid windowtext 1.0pt; mso-border-top-alt: solid windowtext 1.0pt; mso-border-right-alt: solid windowtext .5pt" 
    vAlign=top width=147>
      <P class=a1 style="MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: center" 
      align=center><SPAN 
      style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'"><FONT 
      size=2><STRONG>数据格式</STRONG></FONT></SPAN></P></TD>
    <TD 
    style="PADDING-RIGHT: 5.4pt; BORDER-TOP: windowtext 1pt solid; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 306.55pt; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; BACKGROUND-COLOR: transparent; BORDER-RIGHT-COLOR: #ece9d8; mso-border-left-alt: solid windowtext .5pt" 
    vAlign=top width=409>
      <P class=a1 style="MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: center" 
      align=center><SPAN 
      style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'"><STRONG><FONT 
      size=2>意　义</FONT></STRONG></SPAN></P></TD></TR>
  <TR style="mso-yfti-irow: 1">
    <TD 
    style="BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 5.4pt; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 110.25pt; BORDER-TOP-COLOR: #ece9d8; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; BACKGROUND-COLOR: transparent; mso-border-bottom-alt: solid windowtext .5pt; mso-border-top-alt: solid windowtext 1.0pt; mso-border-right-alt: solid windowtext .5pt" 
    width=147>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><SPAN lang=EN-US><FONT 
      face="Times New Roman" size=2>CF_TEXT</FONT></SPAN></P></TD>
    <TD 
    style="PADDING-RIGHT: 5.4pt; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 306.55pt; BORDER-TOP-COLOR: #ece9d8; PADDING-TOP: 0cm; BORDER-BOTTOM: windowtext 1pt solid; BACKGROUND-COLOR: transparent; BORDER-RIGHT-COLOR: #ece9d8; mso-border-bottom-alt: solid windowtext .5pt; mso-border-top-alt: solid windowtext 1.0pt; mso-border-left-alt: solid windowtext .5pt" 
    width=409>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><FONT size=2><SPAN 
      style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">文本。每行以</SPAN><SPAN 
      lang=EN-US><FONT face="Times New Roman">CF_LF</FONT></SPAN><SPAN 
      style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">结束，</SPAN><SPAN 
      lang=EN-US><FONT face="Times New Roman">nil</FONT></SPAN><SPAN 
      style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">标志文本结束</SPAN></FONT></P></TD></TR>
  <TR style="mso-yfti-irow: 2">
    <TD 
    style="BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 5.4pt; PADDING-LEFT: 5.4pt; BORDER-LEFT-COLOR: #ece9d8; BORDER-BOTTOM-COLOR: #ece9d8; PADDING-BOTTOM: 0cm; WIDTH: 110.25pt; BORDER-TOP-COLOR: #ece9d8; PADDING-TOP: 0cm; BACKGROUND-COLOR: transparent; mso-border-top-alt: solid windowtext .5pt; mso-border-right-alt: solid windowtext .5pt" 
    width=147>
      <P class=a0 style="MARGIN: 0cm 0cm 0pt"><SPAN lang=EN-US><FONT 
      face="Times New Roman" size=2>CF_BITMAP </FONT></SPAN></P></TD>
    <TD