delphi中的perform函数

解决方案 »

  1.   

    Perform(WM_GETTEXT, BufSize, Longint(Buffer));
      

  2.   

    他与sendmessage postmessage一样,就是不用传递句柄,因为他已经有了
      

  3.   

    function TControl.Perform(Msg: Cardinal; WParam, LParam: Longint): Longint;
    var
      Message: TMessage;
    begin
      Message.Msg := Msg;
      Message.WParam := WParam;
      Message.LParam := LParam;
      Message.Result := 0;
      if Self <> nil then WindowProc(Message);
      Result := Message.Result;
    end;从上面代码可以了解,Perform 只不过是使用传入参数构建一个 TMessage 结构,然后传递给窗口的消息处理过程 WindowProc 来处理。
    Perform 发送的消息将会被立即处理。
    SendMessage PostMessage 发送的消息会被加入消息队列,不一定会被立即处理。