API 熟悉的朋友请帮忙

Question

http://topic.csdn.net/t/20020222/13/537288.html 我和这位朋友的问题是一样的做了一个比较小的程序，EDIT是用CreateWindow创建的，但是获得不了键盘消息，鼠标点击的可以，为什么呢？
如何解决？我的代码如下var
  hEdit：HWNDbegin
  hEdit:=CreateWindowEx(WS_EX_CLIENTEDGE,'Edit','',WS_VISIBLE or WS_CHILD or ES_LEFT or ES_MULTILINE or ES_WANTRETURN,18,190,120,21,Handle,0,hInstance,nil);
end
if (LPARAM=HEDIT) and (uMsg=WM_KEYDOWN) then
  BEGIN
    mESSAGEBOX(HANDLE,'','',MB_OK);
  END;   //我输入任何东东，都没有反应请高手们指点。

Answer 1

你要指定自己的消息处理函数，case message of 等等

Answer 2

CreateWindowLong 赋予 截获消息。
具体怎么做，比较复杂。
我就帮你领一个门吧。
呵呵。

Answer 3

 
var 
  lcstr:array[0..99] of char;
  edit1:THandle;
begin
  edit1:=CreateWindowEx(0,'edit','',ws_Child or ws_Visible or
                      WS_DLGFRAME ,0,0,30,30,hWnd,id_edit1,hInstance,nil);// get string
  SendMessage(edit1, WM_GetText, 256, LongInt(@lcstr[0]));
//
end;