haiou327’blog

SendMessage基础知识 函数功能：该函数将指定的消息发送到一个或多个窗口。此函数为指定的窗口调用窗口程序，直到窗口程序处理完消息再返回。而函数PostMessage不同，将一个消息寄送到一个线程的消息队列后立即返回。    函数原型：LRESULT   SendMessage（HWND   hWnd，UINT   Msg，WPARAM   wParam，LPARAM   IParam）

var hform: Cardinal; begin hForm := FindWindow('SciCalc', nil); //计算器 if hform <> 0 then //计算器是否启动 begin if IsIconic(hform) then //是否最小化 begin SetFor