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

ilikenba

<>本文由ilikenba收集整理</P>
<>Edit控件作为密码输入框：</P>
1 D' W; @' ~1 b<>Edit控件有一个PasswordChar属性，它的默认值为“#0”，当改变</P>
<>asswordChar的值后，即不为“#0”时，
+ q' F9 R* ]6 v- g" x不显示所输入的字符，而以PasswordChar所设置的字符显示。当PasswordChar</P>
<>的值为“#1”至“#9”时，
Edit也是密码输入框，当输入密码时，以一细竖条表示。剪切、复制对已设置为</P>
( b! ^* V3 d) E" }+ p<>密码输入状态的Edit毫无作用。
* T/ ]0 Q4 y8 q  P*****************************************************************
Edit内显示图像：</P>
<>void __fastcall TForm1::Button1Click(TObject *Sender)
{
  HDC dc;
  dc=GetDC(Edit1-&gt;Handle);   </P>
, Y* D7 J7 i  m! y. w<>BitBlt(dc,0,0,Image1-&gt;Width,Image1-&gt;Height,Image1-&gticture-&gt;Bitma</P>
<>p-&gt;Canvas-&gt;Handle,
  0,0,SRCCOPY);        
8 Q& z8 x$ F9 z: X8 A}
1 r) H4 u9 q, m1 z$ U* X* E. a这里使用了BitBlt函数向Edit控件画图。
*****************************************************************
去掉Edit控件回车后的提示音：</P>
<>void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &amp;Key)
' e. A* ~8 J7 ~/ {{
+ Y4 A9 f! f- F3 G) R3 h; Z  if(Key==13)Key=0;        
}
4 r# B8 X( w: e+ E就是拦截输入键，将其值置为0.
*****************************************************************
去掉Edit进入时自动选择文本功能：</P>
0 P7 E& ~( p/ B<>将Edit控件的AutoSelect属性设为False.
. t& V0 W' M2 N7 Z*****************************************************************
用代码设置Edit选择文本：</P>
/ v% X: a2 u8 W. B3 Z: {& B+ [4 Q, f9 b& R; Q<>void __fastcall TForm1::Edit1Enter(TObject *Sender)
{
  Edit1-&gt;SelStart=3;
  Edit1-&gt;SelLength=5;
}
因为无论怎样设置属性Edit控件都不会从中间选择文本，所以只能编程实现。
% m( s. c. n$ E7 W. g5 t因为SelStart是从0开始计数的。所以实际中是从第四个字符开始选择的。
*****************************************************************
在Edit输入回车键时跳到下一个控件：</P>
<>void __fastcall TForm1:roEnter(TObject *Sender, char &amp;Key)
8 J+ f- e9 K: ^# J( S( X& Y3 r{
  int i,od;
  TEdit *ed;
  if(Key!=13)return;
  ed=(TEdit *)Sender;
  od=ed-&gt;TabOrder;
  for(i=0;i&lt;ControlCount;i++)
& i  {" |  e$ K* C& w# m  {
8 t" q" S0 T+ g5 J* S    ed=(TEdit *)Controls;
    if(ed-&gt;TabOrder==(od+1))
    {
      ed-&gt;SetFocus();
      break;
4 F. O; a- t( I; M5 A    }
, _( l; W* h3 {8 K  }
% D3 f' q0 R- k6 Q4 j5 E- h( O6 h  Key=0;
}
6 k8 Y  Y; q8 B& _2 Y& T; \//---------------------------------------------------------------</P>
<>------------
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &amp;Key)
{
  ProEnter(Sender,Key);
% x2 Q- z1 U3 D' o. @2 Q% q}
首先，通过键值判断是否为回车键，不是回车就不做处理。通过OnEnter事件的</P>
% s& J+ t2 z4 Q& v<>Sender参数确定控件的TabOrder的值。寻找下一个Edit控件，当其TabOrder的</P>
<>值比本控件大一时，将焦点设置在该控件上，最后，
将OnEnter事件所传递的键值Key设为0，既不让Edit控件处理改键，也消除了由</P>
+ D6 r1 Y! U# ?' y$ D<>改键引起的提示音。
. K6 F+ M6 i* ~& G0 k- d! {3 r方法2：</P>
<>void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &amp;Key)
( k' ^- V- m' G{
  if(Key == VK_RETURN)
" G# a  X9 o6 Q5 K  k7 O+ R  {
    SendMessage(this-&gt;Handle, WM_NEXTDLGCTL, 0, 0);
    Key = 0;
, {' K7 D) Q/ `& x% q4 X6 k  }
+ i: R! C% Z/ Z) g% {6 O}
9 K2 @. L- R( F这里的VK_RETURN可以换成下面的虚拟键值：
键定义：在　winuser.h
#define VK_SPACE 0x20
#define VK_PRIOR 0x21
#define VK_NEXT 0x22
6 U' v6 }$ X) r# t" k+ Q#define VK_END 0x23
1 A2 `! d# w) ^: @" _1 _6 y) N#define VK_HOME 0x24
#define VK_LEFT 0x25
#define VK_UP 0x26
#define VK_RIGHT 0x27
#define VK_DOWN 0x28
#define VK_SELECT 0x29
! }8 }" H# ^) q1 x4 w#define VK_PRINT 0x2A
% S7 y: @" c$ p0 }0 Z#define VK_EXECUTE 0x2B
#define VK_SNAPSHOT 0x2C
#define VK_INSERT 0x2D
* o# V* Q3 ]" T' T6 @" \4 v. i: L+ K#define VK_DELETE 0x2E
" w9 M* x$ l7 K2 u3 I2 z% V#define VK_HELP 0x2F
*****************************************************************
4 u: z# ]' I$ n  u将Pannel上的所有的Edit控件的Text属性清空：</P>
<>for(int i=0; i&ltanel1-&gt;ControlCount; i++)
- f/ l! h5 j6 j7 p) ?) I2 w2 j{
        if( Panel1-&gt;Controls-&gt;ClassNameIs("TEdit"))
! e8 d3 f2 a0 O# s; B  m4 g        {
                ((TEdit *)Panel1-&gt;Controls)-&gt;Text = "";</P>
<>        }
}
*****************************************************************
Edit控件OnKeyPress和OnKeyDown事件对应的消息：</P>
5 N! N8 Z' U1 ?  b<>Edit得OnKeyPress事件对应的是Windows得WM_CHAR消息,  
而OnKeyDown对应的就是WM_KEYDOWN消息。
*****************************************************************
5 ^* J4 p2 {( H+ z7 P- a动态创建Edit组件：</P>
6 t# R8 K9 J0 p, E! N<>void __fastcall TForm1::Button1Click(TObject *Sender)
, o, P8 ?" H* ~- [- Y$ C$ f{
TEdit *ed;
ed=new TEdit(this);
ed-&gtarent=this;
ed-&gt;Left=10;
! x. W  s' V9 Y9 [ed-&gt;Top=10;
}  
: K* V6 @% v+ P' [3 [$ WEdit控件的Parent属性在动态生成时一定要赋值，否则它将无法显示。
1 k6 P, Z) G, A8 w*****************************************************************
得到其它窗体上的Edit控件的Text属性值：</P>
- d; F$ K& L) N$ F9 s+ N<>void __fastcall TForm1::Button3Click(TObject *Sender)
{
( k4 J( v/ |1 L3 l$ V+ O  HWND ff,tt;
1 Z8 e6 }5 m% }; f  \  char s[20];
/ a9 p6 T0 |; @) }* W$ [  ff=FindWindow(NULL,"运行");//首先运行标题为“运行”的窗体
  if (ff!=0)
  {
    tt=GetNextDlgTabItem(ff,NULL,false);
! f- D8 w2 T1 [# B; [8 V    SendMessage(tt,EM_SETPASSWORDCHAR,0,0);
' B! S% }, f( d* M4 ?8 c  B    SendMessage(tt,WM_GETTEXT,20,(long)(s));
    Edit2-&gt;Text=String(s);
  }
5 J: [, @! d# m4 Q8 X1 J7 N}
如果所要得到的Edit控件的Tab属性不是第一个可以多次利GetNextDlgTabItem
* `. A! v+ _6 e9 M8 B4 Y+ ^0 K5 @方法。</P>