TWMNoParams = packed record
  Msg: Cardinal;
  Unused: array[0..3] of Word;
  Result: Longint;
end;

struct TWMNoParams {
  unsigned Msg;
  array[0..3] of Word Unused;
  Longint Result;
};