[原创]Edit控件使用方法小释（由ilikenba收集整理）

ilikenba

<>本文由ilikenba收集整理</P>
<>Edit控件作为密码输入框：</P>
- _  z% D: v+ r9 J<>Edit控件有一个PasswordChar属性，它的默认值为“#0”，当改变</P>
# L& N0 r5 w: b<>asswordChar的值后，即不为“#0”时，
% F$ O( R* G' F# r$ y7 S$ B9 f不显示所输入的字符，而以PasswordChar所设置的字符显示。当PasswordChar</P>
6 {# H) j4 F* ?2 u4 w<>的值为“#1”至“#9”时，
4 w5 U4 `4 l6 w" ZEdit也是密码输入框，当输入密码时，以一细竖条表示。剪切、复制对已设置为</P>
<>密码输入状态的Edit毫无作用。
*****************************************************************
" n5 u8 c& i* d% Q( z5 U6 }Edit内显示图像：</P>
3 o7 s5 s1 e& Q# D( n<>void __fastcall TForm1::Button1Click(TObject *Sender)
/ b9 h+ y2 V7 w* e{
1 A6 n8 c7 k1 X4 p  HDC dc;
  dc=GetDC(Edit1-&gt;Handle);   </P>
# ^# H) x2 d3 U  |/ q) A- S<>BitBlt(dc,0,0,Image1-&gt;Width,Image1-&gt;Height,Image1-&gticture-&gt;Bitma</P>
1 `1 I4 j2 p- J4 C<>p-&gt;Canvas-&gt;Handle,
  0,0,SRCCOPY);        
; \: T8 E3 \& w  }/ ]( {+ W$ I}
这里使用了BitBlt函数向Edit控件画图。
$ }! i& i, @/ t, S*****************************************************************
. [1 r) d+ y. L+ K9 q去掉Edit控件回车后的提示音：</P>
<>void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &amp;Key)
" X! W: `' u0 e8 t( r' Q{
  if(Key==13)Key=0;        
$ V3 v  U0 G* ^, S7 q% L' X}
就是拦截输入键，将其值置为0.
% [9 }7 O8 R  |. k# }*****************************************************************
$ K+ {- w6 }( b8 t0 g去掉Edit进入时自动选择文本功能：</P>
1 a  k  k( F" z5 o& z<>将Edit控件的AutoSelect属性设为False.
* `4 j5 r/ l! e  x5 Z# \*****************************************************************
& h/ A# l  I6 d7 d用代码设置Edit选择文本：</P>
" _( s# w) ]& E7 C9 ~4 j8 j5 C9 e<>void __fastcall TForm1::Edit1Enter(TObject *Sender)
7 s' R1 t/ r! f{
( h8 ?. B4 @- `5 t" C; Y  Edit1-&gt;SelStart=3;
  Edit1-&gt;SelLength=5;
+ F. ^/ s# O- y3 ]3 L- S/ T7 \9 V}
因为无论怎样设置属性Edit控件都不会从中间选择文本，所以只能编程实现。
因为SelStart是从0开始计数的。所以实际中是从第四个字符开始选择的。
/ Z$ X. E5 l) f. ]*****************************************************************
) p( z3 ^% i* c$ o) P在Edit输入回车键时跳到下一个控件：</P>
<>void __fastcall TForm1:roEnter(TObject *Sender, char &amp;Key)
& o2 a) r: o, ^  m{
  int i,od;
  TEdit *ed;
' C1 i- ~0 R% y; U  if(Key!=13)return;
  ed=(TEdit *)Sender;
% t+ G/ e8 u4 m, `' }6 d% t: t9 M7 p$ Z: H  od=ed-&gt;TabOrder;
/ @' Q& {6 c, j1 Y  for(i=0;i&lt;ControlCount;i++)
; q0 `5 w3 M; R3 P7 i& _; O2 F1 @  {
    ed=(TEdit *)Controls;
6 [& n  Z& Z5 A/ v    if(ed-&gt;TabOrder==(od+1))
    {
+ X' W9 G2 s" f      ed-&gt;SetFocus();
      break;
& i" u) u" x/ w% I9 b4 j    }
& E0 Q+ E& ^; U  t7 i  }
" F- {- i3 B9 w# Z$ x' j  Key=0;
, v2 W. K3 y8 {$ t}
' P3 b/ {) A' N, {' D$ S//---------------------------------------------------------------</P>
! D' X9 R& V; u$ g, N<>------------
$ ?* l' w: @. q* j0 ?2 f1 yvoid __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &amp;Key)
{
  ProEnter(Sender,Key);
" p, n4 t) L" W( J}
首先，通过键值判断是否为回车键，不是回车就不做处理。通过OnEnter事件的</P>
<>Sender参数确定控件的TabOrder的值。寻找下一个Edit控件，当其TabOrder的</P>
- P& i! P2 B) _! T4 B" Q<>值比本控件大一时，将焦点设置在该控件上，最后，
将OnEnter事件所传递的键值Key设为0，既不让Edit控件处理改键，也消除了由</P>
- X9 e3 z3 A8 ^0 L6 b<>改键引起的提示音。
方法2：</P>
7 ~7 A# _/ C- }) q, k% P6 J% R<>void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &amp;Key)
{
  if(Key == VK_RETURN)
  {
8 }8 ^+ ~! T! m# Y; V    SendMessage(this-&gt;Handle, WM_NEXTDLGCTL, 0, 0);
    Key = 0;
  }
}
4 \0 Q2 z# ^) e0 F" I# f这里的VK_RETURN可以换成下面的虚拟键值：
键定义：在　winuser.h
#define VK_SPACE 0x20
#define VK_PRIOR 0x21
#define VK_NEXT 0x22
/ w. \+ I7 M6 N! H, k1 i! o' L4 ?#define VK_END 0x23
#define VK_HOME 0x24
  N5 d7 v  \  I/ |  \+ g# e, u#define VK_LEFT 0x25
* E3 b( ?: E( d5 \& S9 G) {#define VK_UP 0x26
% A# J$ C! i, D#define VK_RIGHT 0x27
( r( T9 `8 Y0 C#define VK_DOWN 0x28
#define VK_SELECT 0x29
+ ~& L1 H. P( Q- c#define VK_PRINT 0x2A
#define VK_EXECUTE 0x2B
#define VK_SNAPSHOT 0x2C
#define VK_INSERT 0x2D
#define VK_DELETE 0x2E
#define VK_HELP 0x2F
*****************************************************************
5 I; K5 A8 b# n& Y将Pannel上的所有的Edit控件的Text属性清空：</P>
) w2 ~6 x6 O- V( x3 C  h: n<>for(int i=0; i&ltanel1-&gt;ControlCount; i++)
{
% H4 {, y* ^, h  E4 o        if( Panel1-&gt;Controls-&gt;ClassNameIs("TEdit"))
) [& K- h1 T+ _- K, ^9 D$ \4 J& k! O        {
                ((TEdit *)Panel1-&gt;Controls)-&gt;Text = "";</P>
<>        }
}
*****************************************************************
: e9 F' M: ^0 K- c2 W0 [6 BEdit控件OnKeyPress和OnKeyDown事件对应的消息：</P>
" l# {; D' t- |+ \4 X& ]2 z<>Edit得OnKeyPress事件对应的是Windows得WM_CHAR消息,  
而OnKeyDown对应的就是WM_KEYDOWN消息。
*****************************************************************
动态创建Edit组件：</P>
<>void __fastcall TForm1::Button1Click(TObject *Sender)
9 g+ W- b! T3 `# a1 ]) R/ q, E{
TEdit *ed;
' V+ s! {5 A9 R2 p: \" u$ C1 wed=new TEdit(this);
6 u  N' {' T' g0 q9 K& H. }ed-&gtarent=this;
ed-&gt;Left=10;
8 ?; ?( j6 \% N* {# I3 R  `" e  Med-&gt;Top=10;
5 h8 o. ^" K( ?& X' \}  
Edit控件的Parent属性在动态生成时一定要赋值，否则它将无法显示。
*****************************************************************
7 K% U- C5 a9 g" A5 d# a得到其它窗体上的Edit控件的Text属性值：</P>
<>void __fastcall TForm1::Button3Click(TObject *Sender)
{
2 \: f; t$ e* r9 G  HWND ff,tt;
/ m- S9 U: i0 a1 P  char s[20];
  ff=FindWindow(NULL,"运行");//首先运行标题为“运行”的窗体
  if (ff!=0)
  {
    tt=GetNextDlgTabItem(ff,NULL,false);
- U4 ^. k) W1 m3 P+ E    SendMessage(tt,EM_SETPASSWORDCHAR,0,0);
0 @& u) L5 G' G9 Z6 [    SendMessage(tt,WM_GETTEXT,20,(long)(s));
! \8 J% N0 d6 y  \    Edit2-&gt;Text=String(s);
" A8 n6 A8 i" r, S; E  }
$ q* V2 A2 Z+ n( b}
如果所要得到的Edit控件的Tab属性不是第一个可以多次利GetNextDlgTabItem
方法。</P>