/dports/editors/lazarus/lazarus/lcl/interfaces/carbon/ |
H A D | carbonprivatewindow.inc | 718 CharMsg: TLMChar; 800 FillChar(CharMsg{%H-}, SizeOf(CharMsg), 0); 801 if IsSysKey then CharMsg.Msg := CN_SYSCHAR 802 else CharMsg.Msg := CN_CHAR; 803 CharMsg.KeyData := KeyData; 804 CharMsg.CharCode := ord(KeyChar); 807 if (DeliverMessage(Widget.LCLObject, CharMsg) <> 0) or (CharMsg.CharCode=VK_UNKNOWN) then 819 if CharMsg.CharCode<>ord(KeyChar) then 820 LCLCharToMacEvent(Char(CharMsg.CharCode)); 834 //CharMsg.Msg := LM_SYSCHAR [all …]
|
/dports/editors/lazarus-devel/lazarus-6df7e8756882f7d7f28f662011ee72f21746c580/lcl/interfaces/carbon/ |
H A D | carbonprivatewindow.inc | 718 CharMsg: TLMChar; 800 FillChar(CharMsg{%H-}, SizeOf(CharMsg), 0); 801 if IsSysKey then CharMsg.Msg := CN_SYSCHAR 802 else CharMsg.Msg := CN_CHAR; 803 CharMsg.KeyData := KeyData; 804 CharMsg.CharCode := ord(KeyChar); 807 if (DeliverMessage(Widget.LCLObject, CharMsg) <> 0) or (CharMsg.CharCode=VK_UNKNOWN) then 819 if CharMsg.CharCode<>ord(KeyChar) then 820 LCLCharToMacEvent(Char(CharMsg.CharCode)); 834 //CharMsg.Msg := LM_SYSCHAR [all …]
|
/dports/editors/lazarus-qt5/lazarus/lcl/interfaces/carbon/ |
H A D | carbonprivatewindow.inc | 718 CharMsg: TLMChar; 800 FillChar(CharMsg{%H-}, SizeOf(CharMsg), 0); 801 if IsSysKey then CharMsg.Msg := CN_SYSCHAR 802 else CharMsg.Msg := CN_CHAR; 803 CharMsg.KeyData := KeyData; 804 CharMsg.CharCode := ord(KeyChar); 807 if (DeliverMessage(Widget.LCLObject, CharMsg) <> 0) or (CharMsg.CharCode=VK_UNKNOWN) then 819 if CharMsg.CharCode<>ord(KeyChar) then 820 LCLCharToMacEvent(Char(CharMsg.CharCode)); 834 //CharMsg.Msg := LM_SYSCHAR [all …]
|
/dports/editors/lazarus-qt5-devel/lazarus-6df7e8756882f7d7f28f662011ee72f21746c580/lcl/interfaces/carbon/ |
H A D | carbonprivatewindow.inc | 718 CharMsg: TLMChar; 800 FillChar(CharMsg{%H-}, SizeOf(CharMsg), 0); 801 if IsSysKey then CharMsg.Msg := CN_SYSCHAR 802 else CharMsg.Msg := CN_CHAR; 803 CharMsg.KeyData := KeyData; 804 CharMsg.CharCode := ord(KeyChar); 807 if (DeliverMessage(Widget.LCLObject, CharMsg) <> 0) or (CharMsg.CharCode=VK_UNKNOWN) then 819 if CharMsg.CharCode<>ord(KeyChar) then 820 LCLCharToMacEvent(Char(CharMsg.CharCode)); 834 //CharMsg.Msg := LM_SYSCHAR [all …]
|
/dports/editors/lazarus/lazarus/lcl/interfaces/gtk3/ |
H A D | gtk3widgets.pas | 1953 CharMsg: TLMChar; 2097 FillChar(CharMsg, SizeOf(CharMsg), 0); 2098 CharMsg.Msg := CN_CharMsg[IsSysKey]; 2099 CharMsg.KeyData := Msg.KeyData; 2101 CharMsg.CharCode := Word(AChar); 2102 NotifyApplicationUserInput(LCLObject, CharMsg.Msg); 2107 Result := (DeliverMessage(CharMsg, True) <> 0) or (CharMsg.CharCode = VK_UNKNOWN); 2121 CharMsg.Msg := LM_CharMsg[IsSysKey]; 2123 NotifyApplicationUserInput(LCLObject, CharMsg.Msg); 2128 DeliverMessage(CharMsg, True);
|
/dports/editors/lazarus-qt5/lazarus/lcl/interfaces/gtk3/ |
H A D | gtk3widgets.pas | 1953 CharMsg: TLMChar; 2097 FillChar(CharMsg, SizeOf(CharMsg), 0); 2098 CharMsg.Msg := CN_CharMsg[IsSysKey]; 2099 CharMsg.KeyData := Msg.KeyData; 2101 CharMsg.CharCode := Word(AChar); 2102 NotifyApplicationUserInput(LCLObject, CharMsg.Msg); 2107 Result := (DeliverMessage(CharMsg, True) <> 0) or (CharMsg.CharCode = VK_UNKNOWN); 2121 CharMsg.Msg := LM_CharMsg[IsSysKey]; 2123 NotifyApplicationUserInput(LCLObject, CharMsg.Msg); 2128 DeliverMessage(CharMsg, True);
|
/dports/editors/lazarus-devel/lazarus-6df7e8756882f7d7f28f662011ee72f21746c580/lcl/interfaces/gtk3/ |
H A D | gtk3widgets.pas | 2019 CharMsg: TLMChar; 2166 FillChar(CharMsg{%H-}, SizeOf(CharMsg), 0); 2167 CharMsg.Msg := CN_CharMsg[IsSysKey]; 2168 CharMsg.KeyData := Msg.KeyData; 2170 CharMsg.CharCode := Word(AChar); 2171 NotifyApplicationUserInput(LCLObject, CharMsg.Msg); 2176 Result := (DeliverMessage(CharMsg, True) <> 0) or (CharMsg.CharCode = VK_UNKNOWN); 2190 CharMsg.Msg := LM_CharMsg[IsSysKey]; 2192 NotifyApplicationUserInput(LCLObject, CharMsg.Msg); 2197 DeliverMessage(CharMsg, True);
|
/dports/editors/lazarus-qt5-devel/lazarus-6df7e8756882f7d7f28f662011ee72f21746c580/lcl/interfaces/gtk3/ |
H A D | gtk3widgets.pas | 2019 CharMsg: TLMChar; 2166 FillChar(CharMsg{%H-}, SizeOf(CharMsg), 0); 2167 CharMsg.Msg := CN_CharMsg[IsSysKey]; 2168 CharMsg.KeyData := Msg.KeyData; 2170 CharMsg.CharCode := Word(AChar); 2171 NotifyApplicationUserInput(LCLObject, CharMsg.Msg); 2176 Result := (DeliverMessage(CharMsg, True) <> 0) or (CharMsg.CharCode = VK_UNKNOWN); 2190 CharMsg.Msg := LM_CharMsg[IsSysKey]; 2192 NotifyApplicationUserInput(LCLObject, CharMsg.Msg); 2197 DeliverMessage(CharMsg, True);
|
/dports/editors/lazarus-qt5-devel/lazarus-6df7e8756882f7d7f28f662011ee72f21746c580/lcl/interfaces/qt5/ |
H A D | qtwidgets.pas | 3107 CharMsg: TLMChar; 3161 Text := Char(CharMsg.CharCode); 3193 FillChar(CharMsg{%H-}, SizeOf(CharMsg), #0); 3537 FillChar(CharMsg, SizeOf(CharMsg), 0); 3538 CharMsg.Msg := CN_CharMsg[IsSysKey]; 3539 CharMsg.KeyData := KeyMsg.KeyData; 3541 CharMsg.CharCode := Word(AChar); 3545 WriteLn(' message: ', CharMsg.Msg); 3552 if (DeliverMessage(CharMsg, True) <> 0) or (CharMsg.CharCode = VK_UNKNOWN) then 3568 WriteLn(' message: ', CharMsg.Msg); [all …]
|
/dports/editors/lazarus/lazarus/lcl/interfaces/qt/ |
H A D | qtwidgets.pas | 3015 CharMsg: TLMChar; 3069 Text := Char(CharMsg.CharCode); 3101 FillChar(CharMsg{%H-}, SizeOf(CharMsg), #0); 3445 FillChar(CharMsg, SizeOf(CharMsg), 0); 3446 CharMsg.Msg := CN_CharMsg[IsSysKey]; 3447 CharMsg.KeyData := KeyMsg.KeyData; 3449 CharMsg.CharCode := Word(AChar); 3453 WriteLn(' message: ', CharMsg.Msg); 3460 if (DeliverMessage(CharMsg, True) <> 0) or (CharMsg.CharCode = VK_UNKNOWN) then 3476 WriteLn(' message: ', CharMsg.Msg); [all …]
|
/dports/editors/lazarus/lazarus/lcl/interfaces/qt5/ |
H A D | qtwidgets.pas | 3025 CharMsg: TLMChar; 3079 Text := Char(CharMsg.CharCode); 3111 FillChar(CharMsg{%H-}, SizeOf(CharMsg), #0); 3455 FillChar(CharMsg, SizeOf(CharMsg), 0); 3456 CharMsg.Msg := CN_CharMsg[IsSysKey]; 3457 CharMsg.KeyData := KeyMsg.KeyData; 3459 CharMsg.CharCode := Word(AChar); 3463 WriteLn(' message: ', CharMsg.Msg); 3470 if (DeliverMessage(CharMsg, True) <> 0) or (CharMsg.CharCode = VK_UNKNOWN) then 3486 WriteLn(' message: ', CharMsg.Msg); [all …]
|
/dports/editors/lazarus-devel/lazarus-6df7e8756882f7d7f28f662011ee72f21746c580/lcl/interfaces/qt5/ |
H A D | qtwidgets.pas | 3107 CharMsg: TLMChar; 3161 Text := Char(CharMsg.CharCode); 3193 FillChar(CharMsg{%H-}, SizeOf(CharMsg), #0); 3537 FillChar(CharMsg, SizeOf(CharMsg), 0); 3538 CharMsg.Msg := CN_CharMsg[IsSysKey]; 3539 CharMsg.KeyData := KeyMsg.KeyData; 3541 CharMsg.CharCode := Word(AChar); 3545 WriteLn(' message: ', CharMsg.Msg); 3552 if (DeliverMessage(CharMsg, True) <> 0) or (CharMsg.CharCode = VK_UNKNOWN) then 3568 WriteLn(' message: ', CharMsg.Msg); [all …]
|
/dports/editors/lazarus-devel/lazarus-6df7e8756882f7d7f28f662011ee72f21746c580/lcl/interfaces/qt/ |
H A D | qtwidgets.pas | 3006 CharMsg: TLMChar; 3060 Text := Char(CharMsg.CharCode); 3092 FillChar(CharMsg{%H-}, SizeOf(CharMsg), #0); 3436 FillChar(CharMsg, SizeOf(CharMsg), 0); 3437 CharMsg.Msg := CN_CharMsg[IsSysKey]; 3438 CharMsg.KeyData := KeyMsg.KeyData; 3440 CharMsg.CharCode := Word(AChar); 3444 WriteLn(' message: ', CharMsg.Msg); 3451 if (DeliverMessage(CharMsg, True) <> 0) or (CharMsg.CharCode = VK_UNKNOWN) then 3467 WriteLn(' message: ', CharMsg.Msg); [all …]
|
/dports/editors/lazarus-qt5/lazarus/lcl/interfaces/qt5/ |
H A D | qtwidgets.pas | 3025 CharMsg: TLMChar; 3079 Text := Char(CharMsg.CharCode); 3111 FillChar(CharMsg{%H-}, SizeOf(CharMsg), #0); 3455 FillChar(CharMsg, SizeOf(CharMsg), 0); 3456 CharMsg.Msg := CN_CharMsg[IsSysKey]; 3457 CharMsg.KeyData := KeyMsg.KeyData; 3459 CharMsg.CharCode := Word(AChar); 3463 WriteLn(' message: ', CharMsg.Msg); 3470 if (DeliverMessage(CharMsg, True) <> 0) or (CharMsg.CharCode = VK_UNKNOWN) then 3486 WriteLn(' message: ', CharMsg.Msg); [all …]
|
/dports/editors/lazarus-qt5/lazarus/lcl/interfaces/qt/ |
H A D | qtwidgets.pas | 3015 CharMsg: TLMChar; 3069 Text := Char(CharMsg.CharCode); 3101 FillChar(CharMsg{%H-}, SizeOf(CharMsg), #0); 3445 FillChar(CharMsg, SizeOf(CharMsg), 0); 3446 CharMsg.Msg := CN_CharMsg[IsSysKey]; 3447 CharMsg.KeyData := KeyMsg.KeyData; 3449 CharMsg.CharCode := Word(AChar); 3453 WriteLn(' message: ', CharMsg.Msg); 3460 if (DeliverMessage(CharMsg, True) <> 0) or (CharMsg.CharCode = VK_UNKNOWN) then 3476 WriteLn(' message: ', CharMsg.Msg); [all …]
|
/dports/editors/lazarus-qt5-devel/lazarus-6df7e8756882f7d7f28f662011ee72f21746c580/lcl/interfaces/qt/ |
H A D | qtwidgets.pas | 3006 CharMsg: TLMChar; 3060 Text := Char(CharMsg.CharCode); 3092 FillChar(CharMsg{%H-}, SizeOf(CharMsg), #0); 3436 FillChar(CharMsg, SizeOf(CharMsg), 0); 3437 CharMsg.Msg := CN_CharMsg[IsSysKey]; 3438 CharMsg.KeyData := KeyMsg.KeyData; 3440 CharMsg.CharCode := Word(AChar); 3444 WriteLn(' message: ', CharMsg.Msg); 3451 if (DeliverMessage(CharMsg, True) <> 0) or (CharMsg.CharCode = VK_UNKNOWN) then 3467 WriteLn(' message: ', CharMsg.Msg); [all …]
|
/dports/news/husky-areafix/husky-areafix-1.9.20191207/promknl/ |
H A D | mkwcrt.pas | 302 Procedure CharMsg(Message: TMsg); procedure
|
/dports/news/husky-areafix/husky-areafix-1.9.20191207/protick/ |
H A D | mkwcrt.pas | 302 Procedure CharMsg(Message: TMsg); procedure
|
/dports/news/husky-fidoconf/husky-fidoconf-1.9.20191207/protick/ |
H A D | mkwcrt.pas | 302 Procedure CharMsg(Message: TMsg); procedure
|
/dports/news/husky-fidoconf/husky-fidoconf-1.9.20191207/promknl/ |
H A D | mkwcrt.pas | 302 Procedure CharMsg(Message: TMsg); procedure
|
/dports/news/husky-sqpack/husky-sqpack-1.9.20191207/promknl/ |
H A D | mkwcrt.pas | 302 Procedure CharMsg(Message: TMsg); procedure
|
/dports/news/husky-sqpack/husky-sqpack-1.9.20191207/protick/ |
H A D | mkwcrt.pas | 302 Procedure CharMsg(Message: TMsg); procedure
|
/dports/news/husky-smapi/husky-smapi-1.9.20191207,1/promknl/ |
H A D | mkwcrt.pas | 302 Procedure CharMsg(Message: TMsg); procedure
|
/dports/news/husky-smapi/husky-smapi-1.9.20191207,1/protick/ |
H A D | mkwcrt.pas | 302 Procedure CharMsg(Message: TMsg); procedure
|
/dports/news/husky-huskylib/husky-huskylib-1.9.20191207/promknl/ |
H A D | mkwcrt.pas | 302 Procedure CharMsg(Message: TMsg); procedure
|