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

ilikenba

<>本文由ilikenba收集整理</P>
<>Edit控件作为密码输入框：</P>
* u# |" ^2 ^) q/ W$ z1 o7 I: ^2 u8 z$ f<>Edit控件有一个PasswordChar属性，它的默认值为“#0”，当改变</P>
<>asswordChar的值后，即不为“#0”时，
* `# W  U& I* \不显示所输入的字符，而以PasswordChar所设置的字符显示。当PasswordChar</P>
! T. N# s9 K9 ^<>的值为“#1”至“#9”时，
Edit也是密码输入框，当输入密码时，以一细竖条表示。剪切、复制对已设置为</P>
9 f" S* Q6 A3 n; b9 R<>密码输入状态的Edit毫无作用。
*****************************************************************
Edit内显示图像：</P>
<>void __fastcall TForm1::Button1Click(TObject *Sender)
{
  HDC dc;
4 V* w! }5 q% j9 ~7 j7 c+ \  dc=GetDC(Edit1-&gt;Handle);   </P>
<>BitBlt(dc,0,0,Image1-&gt;Width,Image1-&gt;Height,Image1-&gticture-&gt;Bitma</P>
! S* q6 [7 O- ~: t<>p-&gt;Canvas-&gt;Handle,
6 U  v7 \0 F, z. J  [9 J; m) b" H1 v! f  0,0,SRCCOPY);        
, h$ E* L' }) I% v) L}
! @" k! w) o3 r( H# ]- m1 B这里使用了BitBlt函数向Edit控件画图。
*****************************************************************
3 O+ _# i# f0 R5 G$ O* O! _$ S- }去掉Edit控件回车后的提示音：</P>
<>void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &amp;Key)
{
  if(Key==13)Key=0;        
}
: H% J" S  |% \5 C: h就是拦截输入键，将其值置为0.
0 \' i6 W! \" l" C5 C) E*****************************************************************
, B. P4 P6 j) E去掉Edit进入时自动选择文本功能：</P>
<>将Edit控件的AutoSelect属性设为False.
*****************************************************************
: ~$ H, l+ \' Z- m; U$ h用代码设置Edit选择文本：</P>
% P: P, {0 W0 a) p5 C) v<>void __fastcall TForm1::Edit1Enter(TObject *Sender)
2 `: C' [- p; @4 b' q' ^4 U{
: N! q8 b- C3 I/ Z0 _+ r  Edit1-&gt;SelStart=3;
  Edit1-&gt;SelLength=5;
" @; Q3 E! I/ ]2 f5 n8 H9 s$ e}
因为无论怎样设置属性Edit控件都不会从中间选择文本，所以只能编程实现。
: L1 O8 g# G9 C# _3 t6 h因为SelStart是从0开始计数的。所以实际中是从第四个字符开始选择的。
; u% ?& {! }, G9 o; S4 {* S8 n*****************************************************************
2 q0 Y) }+ o' ]6 g+ R在Edit输入回车键时跳到下一个控件：</P>
# ]# U, X4 t+ ], ?0 e<>void __fastcall TForm1:roEnter(TObject *Sender, char &amp;Key)
{
  int i,od;
) N7 B  T" V- b6 m# N  TEdit *ed;
  if(Key!=13)return;
  ed=(TEdit *)Sender;
4 G' `# J: F, K( e  od=ed-&gt;TabOrder;
  for(i=0;i&lt;ControlCount;i++)
  {
0 [( r+ I& ]3 z    ed=(TEdit *)Controls;
# H; V1 ^# [+ B' D    if(ed-&gt;TabOrder==(od+1))
4 d* B6 t' x' i* n    {
      ed-&gt;SetFocus();
      break;
1 |4 z+ }! ^' R( u: b8 i% X2 b    }
  }
* ?* D. k1 j0 S" e0 p# @$ \- A; d" S  Key=0;
}
//---------------------------------------------------------------</P>
% O5 B) ?& |2 V" a, |. x) m<>------------
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &amp;Key)
9 T: ]' p# L: }4 W1 O* g6 y. `* b{
  ProEnter(Sender,Key);
}
: n- b; ^- c5 E首先，通过键值判断是否为回车键，不是回车就不做处理。通过OnEnter事件的</P>
7 O+ r8 i3 {+ @1 H! n  X<>Sender参数确定控件的TabOrder的值。寻找下一个Edit控件，当其TabOrder的</P>
<>值比本控件大一时，将焦点设置在该控件上，最后，
将OnEnter事件所传递的键值Key设为0，既不让Edit控件处理改键，也消除了由</P>
<>改键引起的提示音。
& y8 k* E) M: p* `方法2：</P>
% M, ?; C+ m- v# s! w" |<>void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &amp;Key)
{
  if(Key == VK_RETURN)
) e* ?: f+ V; O& Z5 w& J: P& s% `9 a  {
' Z% n! N1 M0 K0 j    SendMessage(this-&gt;Handle, WM_NEXTDLGCTL, 0, 0);
9 q) n3 x- E' O, q% l- S8 f, t1 x    Key = 0;
' o9 k5 {3 K- D  }
! [; d- Y+ [+ B+ b! x" a* n( R}
% S7 K* L1 F, V$ @这里的VK_RETURN可以换成下面的虚拟键值：
6 u: a: A& e* g键定义：在　winuser.h
#define VK_SPACE 0x20
#define VK_PRIOR 0x21
( t  H4 `# C. q9 `& ~5 @* f. a#define VK_NEXT 0x22
#define VK_END 0x23
#define VK_HOME 0x24
#define VK_LEFT 0x25
$ f, c3 `7 a) N5 u. T#define VK_UP 0x26
3 a5 Z) |- P! O0 x1 L#define VK_RIGHT 0x27
$ ?7 f6 H$ C/ C. A. j" F* E; I#define VK_DOWN 0x28
. z, O& i9 q# V' h5 l#define VK_SELECT 0x29
6 \9 B9 r% w! O& I#define VK_PRINT 0x2A
# s# `7 z& f: u; n* T: h3 S9 ]#define VK_EXECUTE 0x2B
1 |5 B! P" A5 P6 m7 n#define VK_SNAPSHOT 0x2C
#define VK_INSERT 0x2D
#define VK_DELETE 0x2E
1 w" I6 D& D) Q& w2 C- e8 r6 s#define VK_HELP 0x2F
+ Y/ G- h' Q$ o3 F9 X3 w8 c*****************************************************************
将Pannel上的所有的Edit控件的Text属性清空：</P>
) M( s9 J# K. j( |9 V! ^7 g: A<>for(int i=0; i&ltanel1-&gt;ControlCount; i++)
{
3 _0 \/ B& G' l% w4 h2 s        if( Panel1-&gt;Controls-&gt;ClassNameIs("TEdit"))
1 ~( e# C6 c+ B* ?) }. M        {
. b; y" o4 |- [                ((TEdit *)Panel1-&gt;Controls)-&gt;Text = "";</P>
, s) K+ b- x: \$ @* z7 j( p( _+ n<>        }
. |; U7 ]( D# H) s}
' _9 @2 }* ^& P( ~- B*****************************************************************
Edit控件OnKeyPress和OnKeyDown事件对应的消息：</P>
<>Edit得OnKeyPress事件对应的是Windows得WM_CHAR消息,  
而OnKeyDown对应的就是WM_KEYDOWN消息。
. H# k- K" b4 [4 {$ f*****************************************************************
动态创建Edit组件：</P>
<>void __fastcall TForm1::Button1Click(TObject *Sender)
! V7 |) O  S- |' U+ t# I& n- P{
TEdit *ed;
ed=new TEdit(this);
ed-&gtarent=this;
ed-&gt;Left=10;
% r$ j5 q7 g( T" i: wed-&gt;Top=10;
9 k) _3 Z& w1 t9 ~3 o4 A- Q+ }* Z}  
Edit控件的Parent属性在动态生成时一定要赋值，否则它将无法显示。
. ?( ]- ?3 b, H1 t  k) X$ V*****************************************************************
得到其它窗体上的Edit控件的Text属性值：</P>
9 ?# w# M% Z! `* _5 Z<>void __fastcall TForm1::Button3Click(TObject *Sender)
{
  HWND ff,tt;
  char s[20];
  ff=FindWindow(NULL,"运行");//首先运行标题为“运行”的窗体
) [. w# ]4 l# x9 q  if (ff!=0)
  {
% T3 H! A5 |  A' R5 i6 K    tt=GetNextDlgTabItem(ff,NULL,false);
    SendMessage(tt,EM_SETPASSWORDCHAR,0,0);
    SendMessage(tt,WM_GETTEXT,20,(long)(s));
/ A$ \, c0 w/ q1 e; V: @& I    Edit2-&gt;Text=String(s);
% s; T, _. j" ~# L  }
: X( j, N, B5 |! J* G}
如果所要得到的Edit控件的Tab属性不是第一个可以多次利GetNextDlgTabItem
方法。</P>