Source position: winapih.inc line 209
function PeekMessage(
var lpMsg: TMsg;
Handle: HWND;
wMsgFilterMin: LongWord;
wMsgFilterMax: LongWord;
wRemoveMsg: LongWord
):Boolean;