Add(InlineCode,10797942,301,539)
{
 WorkPoints=#18:work_doSendMessage|
 DataPoints=#11:data_Handle|12:data_Message|11:data_WParam|11:data_LParam|
 Code=#15:unit HiAsmUnit;|0:|9:interface|0:|39:uses Kol,Windows,Share,Debug, Messages;|1: |4:type|31: THISendMessage = class(TDebug)|10:   private|9:   public|26:    data_Handle:THI_Event;|27:    data_Message:THI_Event;|26:    data_WParam:THI_Event;|26:    data_LParam:THI_Event;|4:    |62:    procedure work_doSendMessage(var _Data:TData; Index:word);|5: end;|0:|50:implementation                                    |0:|44:procedure THISendMessage.work_doSendMessage;|11:var h:HWND;|17:    w,l:cardinal;|5:begin|40:  h := ReadInteger(_Data,data_Handle,0);|38:  w := ReadInteger(_Data,data_WParam);|38:  l := ReadInteger(_Data,data_LParam);|53:  SendMessage(h,ReadInteger(_Data,data_Message),w,l);|4:end;|0:|4:end.|
}