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

ilikenba

<>本文由ilikenba收集整理</P>
, C! v  }, {- \) w: T<>Edit控件作为密码输入框：</P>
<>Edit控件有一个PasswordChar属性，它的默认值为“#0”，当改变</P>
<>asswordChar的值后，即不为“#0”时，
, S* @. D: Y1 i9 L) F不显示所输入的字符，而以PasswordChar所设置的字符显示。当PasswordChar</P>
<>的值为“#1”至“#9”时，
# i* Z6 U0 C& K- z5 S3 V0 xEdit也是密码输入框，当输入密码时，以一细竖条表示。剪切、复制对已设置为</P>
. L8 o$ n, i# H6 q8 D2 X7 K8 Z<>密码输入状态的Edit毫无作用。
*****************************************************************
* o) P' X: c. @8 A( CEdit内显示图像：</P>
  u7 [4 Q5 X9 O' q<>void __fastcall TForm1::Button1Click(TObject *Sender)
( m6 q' }: H1 ~2 a( k  ~{
! v1 r1 _8 ^9 D6 V  HDC dc;
2 ^' S0 ^& K0 c5 P  dc=GetDC(Edit1-&gt;Handle);   </P>
<>BitBlt(dc,0,0,Image1-&gt;Width,Image1-&gt;Height,Image1-&gticture-&gt;Bitma</P>
" K: Q$ T* m3 H2 [3 W0 b% _<>p-&gt;Canvas-&gt;Handle,
" g: q  X7 V7 _8 I' e% Z: S  0,0,SRCCOPY);        
}
这里使用了BitBlt函数向Edit控件画图。
# y! _* u  g* L- u! L! ^7 {3 S  ?* r*****************************************************************
去掉Edit控件回车后的提示音：</P>
+ y6 P* p$ U) ?, B0 S<>void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &amp;Key)
{
0 [( ^  }& p0 Z2 l5 T2 }  if(Key==13)Key=0;        
1 X3 ?" i' L8 U}
: ^, U9 D' P' {& i/ j% j就是拦截输入键，将其值置为0.
*****************************************************************
# ~) f0 E! N: b( a8 k7 G# Q去掉Edit进入时自动选择文本功能：</P>
$ Y+ \# y. [$ K8 e<>将Edit控件的AutoSelect属性设为False.
*****************************************************************
用代码设置Edit选择文本：</P>
<>void __fastcall TForm1::Edit1Enter(TObject *Sender)
) P) v+ _2 R  I2 B* @6 l. [  w% [{
+ d1 C' g1 r: k  Edit1-&gt;SelStart=3;
8 B- ?, J4 o: J/ n  z  Edit1-&gt;SelLength=5;
  G: m6 G# M- X0 F6 |5 w  a}
因为无论怎样设置属性Edit控件都不会从中间选择文本，所以只能编程实现。
因为SelStart是从0开始计数的。所以实际中是从第四个字符开始选择的。
*****************************************************************
1 l: N7 A  p  r& M+ S- h/ v在Edit输入回车键时跳到下一个控件：</P>
<>void __fastcall TForm1:roEnter(TObject *Sender, char &amp;Key)
{
  int i,od;
6 a1 n! E5 A% \$ L  TEdit *ed;
) y" l/ e$ w7 p  [$ o  if(Key!=13)return;
  ed=(TEdit *)Sender;
0 V4 ?3 d+ w1 x+ Y/ y0 z& u& m2 ]  q  w  od=ed-&gt;TabOrder;
8 |5 d- k1 e: W5 v# R  for(i=0;i&lt;ControlCount;i++)
  {
* q  ~: I/ L" E$ H4 M    ed=(TEdit *)Controls;
    if(ed-&gt;TabOrder==(od+1))
/ G. Y2 L1 Q5 K' D" Y2 Q- h    {
; n* X; W/ [2 s+ f9 l      ed-&gt;SetFocus();
      break;
    }
% `# Q# C- n7 a( Z: K5 S9 Y+ o* F  }
& n- q! U7 H. M' X& f/ W/ K$ t  Y  Key=0;
}
//---------------------------------------------------------------</P>
<>------------
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &amp;Key)
{
  ProEnter(Sender,Key);
}
: m# o7 [9 e0 M, R- p! I首先，通过键值判断是否为回车键，不是回车就不做处理。通过OnEnter事件的</P>
" P% @' v. R) d( {% P- q<>Sender参数确定控件的TabOrder的值。寻找下一个Edit控件，当其TabOrder的</P>
8 u9 u" l& R" T/ K1 U<>值比本控件大一时，将焦点设置在该控件上，最后，
2 i5 B/ d4 N, d将OnEnter事件所传递的键值Key设为0，既不让Edit控件处理改键，也消除了由</P>
8 A/ }6 t+ c4 x9 a/ ]( z# o5 m<>改键引起的提示音。
方法2：</P>
( ]4 s4 G+ ?& p- }: p* C3 p  q& k<>void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &amp;Key)
{
  if(Key == VK_RETURN)
  {
0 g0 h* ^# Y0 P2 K1 R    SendMessage(this-&gt;Handle, WM_NEXTDLGCTL, 0, 0);
    Key = 0;
. i; [3 x" {8 c( H3 h& x+ V8 y9 a  }
/ i5 w7 o: i! Y0 v: ^}
9 Z' U) _' F; `这里的VK_RETURN可以换成下面的虚拟键值：
0 M; T; v$ F& N/ ?: O# Y键定义：在　winuser.h
9 E# x  F! b1 {2 w# J#define VK_SPACE 0x20
. e* W2 T: W- N" J4 R#define VK_PRIOR 0x21
#define VK_NEXT 0x22
#define VK_END 0x23
#define VK_HOME 0x24
8 L% _# I* W0 k' j0 T+ D#define VK_LEFT 0x25
#define VK_UP 0x26
#define VK_RIGHT 0x27
9 h  Q# y7 J+ Y8 W/ E#define VK_DOWN 0x28
#define VK_SELECT 0x29
5 [2 Z0 I$ G, u4 ?; U. d8 Y#define VK_PRINT 0x2A
#define VK_EXECUTE 0x2B
1 M+ Z* J; \( e  {#define VK_SNAPSHOT 0x2C
$ D  e6 {% S, w. s1 N% Y4 T#define VK_INSERT 0x2D
#define VK_DELETE 0x2E
#define VK_HELP 0x2F
*****************************************************************
8 ^5 p9 G& ], ?- h. K将Pannel上的所有的Edit控件的Text属性清空：</P>
! J6 h- P( t9 A8 E<>for(int i=0; i&ltanel1-&gt;ControlCount; i++)
' _9 B" v, b. {3 l' O{
# ~  k. e; x4 k4 u, t% X        if( Panel1-&gt;Controls-&gt;ClassNameIs("TEdit"))
        {
' e8 N2 c1 N" E9 d* m                ((TEdit *)Panel1-&gt;Controls)-&gt;Text = "";</P>
<>        }
4 R; @* i7 f( Z" s) L}
*****************************************************************
Edit控件OnKeyPress和OnKeyDown事件对应的消息：</P>
<>Edit得OnKeyPress事件对应的是Windows得WM_CHAR消息,  
& U3 c$ H. j! c而OnKeyDown对应的就是WM_KEYDOWN消息。
! J( S9 q- \0 R0 H: b( Y% a*****************************************************************
! V5 _# `0 ]; ?' V; Y; |) r" v动态创建Edit组件：</P>
<>void __fastcall TForm1::Button1Click(TObject *Sender)
! X, h8 ]% ], Z7 O' Q& ~/ m7 y{
TEdit *ed;
* {: V% e( x$ O( a7 }4 ?4 eed=new TEdit(this);
ed-&gtarent=this;
ed-&gt;Left=10;
ed-&gt;Top=10;
3 c6 z6 I3 r9 c. l}  
Edit控件的Parent属性在动态生成时一定要赋值，否则它将无法显示。
1 {# O. `4 F) H*****************************************************************
得到其它窗体上的Edit控件的Text属性值：</P>
<>void __fastcall TForm1::Button3Click(TObject *Sender)
{
( j0 S1 {/ w4 M- p" g+ o  HWND ff,tt;
  char s[20];
/ Z; d) S! l% Q, P) |  ff=FindWindow(NULL,"运行");//首先运行标题为“运行”的窗体
# N% F6 C0 d# f/ b  H0 v  if (ff!=0)
  {
    tt=GetNextDlgTabItem(ff,NULL,false);
    SendMessage(tt,EM_SETPASSWORDCHAR,0,0);
  J* z, h) e, b- A: W8 r# r    SendMessage(tt,WM_GETTEXT,20,(long)(s));
    Edit2-&gt;Text=String(s);
! `2 V( F6 |; h! T! _7 ~' m  }
1 z  o: I9 x0 `* U" x}
$ _0 o0 u7 b8 M, q% A如果所要得到的Edit控件的Tab属性不是第一个可以多次利GetNextDlgTabItem
方法。</P>