Re: [Lazarus] Forms.pp function error?

2018-10-16 Thread AlexeyT via Lazarus
Value $400 makes sense. And also this must be changed then: function KeysToShiftState(Keys: PtrUInt): TShiftState; it uses same constants. Alex -- ___ Lazarus mailing list Lazarus@lists.lazarus-ide.org https://lists.lazarus-ide.org/listinfo/lazarus

Re: [Lazarus] Forms.pp function error?

2018-10-16 Thread Michael Van Canneyt via Lazarus
On Tue, 16 Oct 2018, AlexeyT via Lazarus wrote: On 16.10.2018 09:56, Michael Van Canneyt via Lazarus wrote: There does not need to be if there is no corresponding MK_nnn value ? What would be the MK_nnn value for ssAlt ? We can  add in, LCLType.pp: const   // Mouse message key states  

Re: [Lazarus] Forms.pp function error?

2018-10-16 Thread AlexeyT via Lazarus
On 16.10.2018 09:56, Michael Van Canneyt via Lazarus wrote: There does not need to be if there is no corresponding MK_nnn value ? What would be the MK_nnn value for ssAlt ? We can  add in, LCLType.pp: const   // Mouse message key states   MK_LBUTTON  = 1;   MK_RBUTTON = 2;   MK_SHIFT = 4;