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

ilikenba

<>本文由ilikenba收集整理</P>
<>Edit控件作为密码输入框：</P>
/ y9 n( i5 f3 A2 J- X$ `<>Edit控件有一个PasswordChar属性，它的默认值为“#0”，当改变</P>
<>asswordChar的值后，即不为“#0”时，
不显示所输入的字符，而以PasswordChar所设置的字符显示。当PasswordChar</P>
! m& P& ~0 x6 z- N& m<>的值为“#1”至“#9”时，
+ A: G/ V6 ^3 Q" J6 ZEdit也是密码输入框，当输入密码时，以一细竖条表示。剪切、复制对已设置为</P>
<>密码输入状态的Edit毫无作用。
3 d1 D; x; r/ c) V/ @$ K# C*****************************************************************
Edit内显示图像：</P>
<>void __fastcall TForm1::Button1Click(TObject *Sender)
3 j3 h$ F6 P' d. p{
  HDC dc;
9 i$ p; o# }+ `. s/ k  dc=GetDC(Edit1-&gt;Handle);   </P>
<>BitBlt(dc,0,0,Image1-&gt;Width,Image1-&gt;Height,Image1-&gticture-&gt;Bitma</P>
* N" S  D; V! ?- ?# P, X4 X# ]4 d<>p-&gt;Canvas-&gt;Handle,
! X/ h! b) a0 I( F/ o  0,0,SRCCOPY);        
9 x" Q! a+ \& v" A1 m6 y2 q4 C1 R}
这里使用了BitBlt函数向Edit控件画图。
9 C( R' D" [$ b1 U& o. ~*****************************************************************
去掉Edit控件回车后的提示音：</P>
<>void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &amp;Key)
+ l5 R- k+ c$ J{
& H' c9 _, d/ l+ f3 _  if(Key==13)Key=0;        
}
就是拦截输入键，将其值置为0.
*****************************************************************
8 ~0 e+ L( h# H6 O% Q" K去掉Edit进入时自动选择文本功能：</P>
<>将Edit控件的AutoSelect属性设为False.
2 u5 e# |& V7 S8 ]9 F3 i/ x9 k, d8 S*****************************************************************
, g* |  Q5 W2 Y+ }2 K( i: G/ M用代码设置Edit选择文本：</P>
<>void __fastcall TForm1::Edit1Enter(TObject *Sender)
{
  Edit1-&gt;SelStart=3;
, l4 t* }2 S# r* N  Edit1-&gt;SelLength=5;
}
因为无论怎样设置属性Edit控件都不会从中间选择文本，所以只能编程实现。
) {. ?' W/ ~$ S) i因为SelStart是从0开始计数的。所以实际中是从第四个字符开始选择的。
*****************************************************************
# j$ I5 U5 q/ r  R! T1 K. h在Edit输入回车键时跳到下一个控件：</P>
- g. p: p0 z4 ^" X, @: k- y- I, z<>void __fastcall TForm1:roEnter(TObject *Sender, char &amp;Key)
{
  int i,od;
9 I8 \- c: l8 m; \0 j' \1 L  TEdit *ed;
  if(Key!=13)return;
& H% L# e9 N( M2 L  ed=(TEdit *)Sender;
  od=ed-&gt;TabOrder;
  for(i=0;i&lt;ControlCount;i++)
  {
    ed=(TEdit *)Controls;
. R7 o. H( C/ ]0 W( _/ b    if(ed-&gt;TabOrder==(od+1))
    {
$ A3 {1 t& ^# k) U' f      ed-&gt;SetFocus();
      break;
    }
& V+ D% \1 U% B& q- x  }
* A) g+ l6 s' R" f  Key=0;
, ?& z, O& i( M- O}
0 _) S, p6 Z2 c//---------------------------------------------------------------</P>
0 k: E0 p* b6 W! n  g* h<>------------
7 A; r3 F( h7 C9 b* G2 w0 Evoid __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &amp;Key)
{
- Q2 H! X7 f) b- ^; N  ProEnter(Sender,Key);
}
5 O+ M6 I7 \! m0 w8 f( O+ \" x$ R首先，通过键值判断是否为回车键，不是回车就不做处理。通过OnEnter事件的</P>
& x* |2 z# J' ]<>Sender参数确定控件的TabOrder的值。寻找下一个Edit控件，当其TabOrder的</P>
$ s  t; c  d) B7 U<>值比本控件大一时，将焦点设置在该控件上，最后，
0 E: `; G6 |# |. r将OnEnter事件所传递的键值Key设为0，既不让Edit控件处理改键，也消除了由</P>
4 u% D+ m, r3 _1 |( j8 g2 `<>改键引起的提示音。
方法2：</P>
<>void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &amp;Key)
# K; W" M( ^$ e, ^0 h{
9 u* e0 y+ G/ ^+ Q" N  if(Key == VK_RETURN)
# T+ D, H! A4 f  {
1 ^" ^, h8 F, g: J    SendMessage(this-&gt;Handle, WM_NEXTDLGCTL, 0, 0);
6 n9 T7 ^9 g  }5 Q7 [    Key = 0;
3 g6 q8 z+ @% s( u- P. Z  }
}
这里的VK_RETURN可以换成下面的虚拟键值：
键定义：在　winuser.h
#define VK_SPACE 0x20
2 ~- c- g! h# S; O0 g" k. r1 N- O' @#define VK_PRIOR 0x21
#define VK_NEXT 0x22
#define VK_END 0x23
#define VK_HOME 0x24
) M% L! d4 o* c+ i, V" n#define VK_LEFT 0x25
% o$ ?  T7 b/ U  F4 b. s3 m#define VK_UP 0x26
0 r; k+ @* i6 R% y0 d#define VK_RIGHT 0x27
  C& [) W8 \/ H* [1 o* e. m  G) h#define VK_DOWN 0x28
#define VK_SELECT 0x29
3 A8 F: _$ v  B#define VK_PRINT 0x2A
. v% P) ~  ^: \( C+ ~#define VK_EXECUTE 0x2B
#define VK_SNAPSHOT 0x2C
8 O: M0 r" F. }: h8 O0 v6 A#define VK_INSERT 0x2D
* j1 ?3 n& h" A9 K. y#define VK_DELETE 0x2E
#define VK_HELP 0x2F
3 V6 s8 B; X; R6 v; U. u) R*****************************************************************
- }! C: x% {; z: `% f0 D将Pannel上的所有的Edit控件的Text属性清空：</P>
<>for(int i=0; i&ltanel1-&gt;ControlCount; i++)
0 N4 b7 O' C. M9 X: `; {- @{
+ A& A; ^! ~# z* ?- |0 O( w        if( Panel1-&gt;Controls-&gt;ClassNameIs("TEdit"))
% [; ~0 h  K  `" ]* Y        {
                ((TEdit *)Panel1-&gt;Controls)-&gt;Text = "";</P>
<>        }
}
( I7 Z: n5 b6 E7 X  w*****************************************************************
8 i0 k( z% l+ W" t- B+ b, TEdit控件OnKeyPress和OnKeyDown事件对应的消息：</P>
  |8 }# z3 L* X* ^3 R) s% Y  d<>Edit得OnKeyPress事件对应的是Windows得WM_CHAR消息,  
0 A& Y! G! C6 T) Y3 ]0 a而OnKeyDown对应的就是WM_KEYDOWN消息。
*****************************************************************
动态创建Edit组件：</P>
- N, {) X5 v8 J  z<>void __fastcall TForm1::Button1Click(TObject *Sender)
% X1 P2 C% t4 G! [2 ~* m{
TEdit *ed;
ed=new TEdit(this);
ed-&gtarent=this;
! ?8 b3 }( k$ `. _4 y$ M2 i" Y8 ded-&gt;Left=10;
* J0 I- B1 u& P0 med-&gt;Top=10;
}  
Edit控件的Parent属性在动态生成时一定要赋值，否则它将无法显示。
  m7 C5 t8 q1 P2 `: j8 }1 y  X* J4 i4 l) X*****************************************************************
0 L$ p* C2 {+ J" o; R2 O. R1 _得到其它窗体上的Edit控件的Text属性值：</P>
<>void __fastcall TForm1::Button3Click(TObject *Sender)
3 Q! M$ p6 A- P. P{
  HWND ff,tt;
  char s[20];
  ff=FindWindow(NULL,"运行");//首先运行标题为“运行”的窗体
  if (ff!=0)
9 S% `8 k/ ^: d% R  {
( ^& c5 C/ r4 G2 U7 U4 h7 V    tt=GetNextDlgTabItem(ff,NULL,false);
# B$ ]6 ^( U5 K' |2 G( f    SendMessage(tt,EM_SETPASSWORDCHAR,0,0);
! H+ a! _3 ~" \; I5 V    SendMessage(tt,WM_GETTEXT,20,(long)(s));
8 ]- A" A3 e4 j3 w/ g    Edit2-&gt;Text=String(s);
+ \1 ^( u: v6 P; M, ?  }
3 [* f" o% L" j! W! c5 D% }6 j6 k) Z}
如果所要得到的Edit控件的Tab属性不是第一个可以多次利GetNextDlgTabItem
方法。</P>