Patch for more Delphi messages compatibility
Original Reporter info from Mantis: Stephano
-
Reporter name:
Original Reporter info from Mantis: Stephano
- Reporter name:
Description:
Attached is a patch that adds Delphi compatible message definitions.
- As I am not sure about 64 bit and little/big endian differences, some of the messages may need to be adapted accordingly, especially that I defined TCMChildKey to be in line with TLMKey which takes these factors into consideration.
- TLMEnter and TLMExit are defined in the original LMessages unit as TLMNoPara and not TLMNoParams (they are different). Is this supposed to be the case?
TLMNoPara = record
Msg: Cardinal;
end;
{$ifndef WINDOWS}
TLMNoParams = record
Msg: Cardinal;
{$ifdef cpu64}
UnusedMsg: Cardinal;
{$endif}
Unused: array[0..1] of PtrInt;
Result: LRESULT;
end;
{$else}
TLMNoParams = TWMNoParams;
{$endif}