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

ilikenba

<>本文由ilikenba收集整理</P>
<>Edit控件作为密码输入框：</P>
<>Edit控件有一个PasswordChar属性，它的默认值为“#0”，当改变</P>
; }+ g2 J* q- S<>asswordChar的值后，即不为“#0”时，
不显示所输入的字符，而以PasswordChar所设置的字符显示。当PasswordChar</P>
; A7 e6 y. X0 L, l6 Q& l<>的值为“#1”至“#9”时，
Edit也是密码输入框，当输入密码时，以一细竖条表示。剪切、复制对已设置为</P>
% o& m& Z9 _7 Y% ~6 n& \( Y<>密码输入状态的Edit毫无作用。
*****************************************************************
# V( c; D+ s) i, O3 b. ~Edit内显示图像：</P>
<>void __fastcall TForm1::Button1Click(TObject *Sender)
1 A2 G7 h* x, G* z( d8 L9 Q' n{
, M2 T/ r  _1 ]  t  e. x+ s) P! y$ h  HDC dc;
  dc=GetDC(Edit1-&gt;Handle);   </P>
<>BitBlt(dc,0,0,Image1-&gt;Width,Image1-&gt;Height,Image1-&gticture-&gt;Bitma</P>
7 W7 S$ G8 W3 d<>p-&gt;Canvas-&gt;Handle,
  0,0,SRCCOPY);        
2 e( g+ ~: c1 \+ k}
& O& u8 ]3 a/ p0 D: _, \3 N0 @这里使用了BitBlt函数向Edit控件画图。
*****************************************************************
去掉Edit控件回车后的提示音：</P>
( B, B- [( T: g3 N. p<>void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &amp;Key)
{
  if(Key==13)Key=0;        
0 u* c4 ]  V. {}
) n* O  Z( O# a: X3 h- e就是拦截输入键，将其值置为0.
*****************************************************************
. B9 i( d/ d8 o7 j5 e: @去掉Edit进入时自动选择文本功能：</P>
0 R6 [4 J& W/ l$ v<>将Edit控件的AutoSelect属性设为False.
*****************************************************************
用代码设置Edit选择文本：</P>
/ `6 G  n: S4 [, r# K' E" Y; M<>void __fastcall TForm1::Edit1Enter(TObject *Sender)
" @& s& ~% Z0 i' A, S; H( a{
  Edit1-&gt;SelStart=3;
  Edit1-&gt;SelLength=5;
' W$ T( d2 l7 V2 T- p}
因为无论怎样设置属性Edit控件都不会从中间选择文本，所以只能编程实现。
2 S5 Z% h' y3 I; \因为SelStart是从0开始计数的。所以实际中是从第四个字符开始选择的。
/ o$ S, ]7 ?5 C5 ?) K; T*****************************************************************
* }( F. F) b+ D: ?. {在Edit输入回车键时跳到下一个控件：</P>
0 n! z8 P* X5 s; v* s# r: C* _5 |<>void __fastcall TForm1:roEnter(TObject *Sender, char &amp;Key)
8 [" f: R$ e( q. V) P% D" m( w{
; F1 R9 [# |5 d7 r: }: l- B- `; D  int i,od;
  TEdit *ed;
" {9 d7 J3 W2 M: k" Z- v% o  if(Key!=13)return;
/ {$ |5 R* o0 h$ m  ed=(TEdit *)Sender;
  od=ed-&gt;TabOrder;
" T8 p/ O. J5 n. v3 P% z9 o- ~  for(i=0;i&lt;ControlCount;i++)
! a0 ^: _, d3 c9 Z  {
    ed=(TEdit *)Controls;
    if(ed-&gt;TabOrder==(od+1))
    {
      ed-&gt;SetFocus();
      break;
    }
' ]1 Z, _5 v" C  }
  Key=0;
9 m& h* p* `3 a}
//---------------------------------------------------------------</P>
. g  r7 l. v7 Q$ F4 u8 J<>------------
3 j, `. l) k1 K. t/ Uvoid __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &amp;Key)
+ U) n( S$ ^* J8 T; B{
: U" x1 _1 [" |1 C6 O  ProEnter(Sender,Key);
}
首先，通过键值判断是否为回车键，不是回车就不做处理。通过OnEnter事件的</P>
4 _/ e+ I7 y2 E! D5 c3 G4 u6 y" N<>Sender参数确定控件的TabOrder的值。寻找下一个Edit控件，当其TabOrder的</P>
<>值比本控件大一时，将焦点设置在该控件上，最后，
将OnEnter事件所传递的键值Key设为0，既不让Edit控件处理改键，也消除了由</P>
<>改键引起的提示音。
' Z! P1 t7 D' Z. z. h/ W- D方法2：</P>
<>void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &amp;Key)
- k: a, M1 ~+ E; H0 x. k% p{
  if(Key == VK_RETURN)
  {
    SendMessage(this-&gt;Handle, WM_NEXTDLGCTL, 0, 0);
& P! @8 n2 g" L: P* V- C# T/ D$ b5 I    Key = 0;
6 C* Q/ u$ \. w) o) @  }
. @5 U1 b9 M' W# k, X3 C! s. N}
' v( @  X2 X& ^! W' C( X; l( m这里的VK_RETURN可以换成下面的虚拟键值：
键定义：在　winuser.h
#define VK_SPACE 0x20
#define VK_PRIOR 0x21
#define VK_NEXT 0x22
) ~- k* A" D, p3 |#define VK_END 0x23
#define VK_HOME 0x24
#define VK_LEFT 0x25
0 f& M0 t/ M' P#define VK_UP 0x26
. v* x/ ], B- h8 {7 X#define VK_RIGHT 0x27
#define VK_DOWN 0x28
, p1 a) _& F5 h7 L+ U#define VK_SELECT 0x29
, }/ M0 X* ^1 o2 v#define VK_PRINT 0x2A
7 N/ z' W/ z, Y8 ~2 I# b#define VK_EXECUTE 0x2B
; q/ m& q" P+ }8 M3 o6 w1 J6 r#define VK_SNAPSHOT 0x2C
- [8 E4 Z8 }0 L* `" R9 n#define VK_INSERT 0x2D
#define VK_DELETE 0x2E
/ o2 ~% l$ N# G! `& K% h#define VK_HELP 0x2F
*****************************************************************
/ d. ]7 Q, X: t将Pannel上的所有的Edit控件的Text属性清空：</P>
<>for(int i=0; i&ltanel1-&gt;ControlCount; i++)
{
( O% `9 _  }! _  i4 k- U0 o' \        if( Panel1-&gt;Controls-&gt;ClassNameIs("TEdit"))
+ G0 v  Z- e% y0 g1 o+ v        {
                ((TEdit *)Panel1-&gt;Controls)-&gt;Text = "";</P>
3 Q. T6 A% x; ]4 M! F; I0 J- e<>        }
6 f/ k  i+ @1 p5 n( X+ x}
6 i* w& K+ X7 v+ u. j( Y* J8 N/ @*****************************************************************
' D- ^" V: c% |# j6 REdit控件OnKeyPress和OnKeyDown事件对应的消息：</P>
<>Edit得OnKeyPress事件对应的是Windows得WM_CHAR消息,  
而OnKeyDown对应的就是WM_KEYDOWN消息。
*****************************************************************
动态创建Edit组件：</P>
<>void __fastcall TForm1::Button1Click(TObject *Sender)
) Z0 b0 b+ Q- c) u* P1 ]{
6 e8 ~$ s& e9 ~; i# U2 T9 q& b# x; aTEdit *ed;
ed=new TEdit(this);
# C) U/ }) L) Ced-&gtarent=this;
ed-&gt;Left=10;
ed-&gt;Top=10;
}  
Edit控件的Parent属性在动态生成时一定要赋值，否则它将无法显示。
*****************************************************************
得到其它窗体上的Edit控件的Text属性值：</P>
/ J0 M4 x* W$ S( H3 Z- d) d  j<>void __fastcall TForm1::Button3Click(TObject *Sender)
{
  HWND ff,tt;
  char s[20];
% z8 I8 s) t4 T) R! m  ff=FindWindow(NULL,"运行");//首先运行标题为“运行”的窗体
7 H3 H7 h, S  S0 T  if (ff!=0)
  f7 a3 |9 W% P7 S3 Z  {
! E3 ^5 [/ S2 c# ?7 {    tt=GetNextDlgTabItem(ff,NULL,false);
$ G7 S3 A5 O, {. w' L' T2 F    SendMessage(tt,EM_SETPASSWORDCHAR,0,0);
* Q# _* `* i8 ^0 A: h2 {    SendMessage(tt,WM_GETTEXT,20,(long)(s));
    Edit2-&gt;Text=String(s);
  }
}
如果所要得到的Edit控件的Tab属性不是第一个可以多次利GetNextDlgTabItem
方法。</P>