Home
last modified time | relevance | path

Searched refs:CharMsg (Results 1 – 25 of 32) sorted by relevance

12

/dports/editors/lazarus/lazarus/lcl/interfaces/carbon/
H A Dcarbonprivatewindow.inc718 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 Dcarbonprivatewindow.inc718 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 Dcarbonprivatewindow.inc718 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 Dcarbonprivatewindow.inc718 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 Dgtk3widgets.pas1953 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 Dgtk3widgets.pas1953 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 Dgtk3widgets.pas2019 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 Dgtk3widgets.pas2019 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 Dqtwidgets.pas3107 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 Dqtwidgets.pas3015 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 Dqtwidgets.pas3025 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 Dqtwidgets.pas3107 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 Dqtwidgets.pas3006 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 Dqtwidgets.pas3025 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 Dqtwidgets.pas3015 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 Dqtwidgets.pas3006 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 Dmkwcrt.pas302 Procedure CharMsg(Message: TMsg); procedure
/dports/news/husky-areafix/husky-areafix-1.9.20191207/protick/
H A Dmkwcrt.pas302 Procedure CharMsg(Message: TMsg); procedure
/dports/news/husky-fidoconf/husky-fidoconf-1.9.20191207/protick/
H A Dmkwcrt.pas302 Procedure CharMsg(Message: TMsg); procedure
/dports/news/husky-fidoconf/husky-fidoconf-1.9.20191207/promknl/
H A Dmkwcrt.pas302 Procedure CharMsg(Message: TMsg); procedure
/dports/news/husky-sqpack/husky-sqpack-1.9.20191207/promknl/
H A Dmkwcrt.pas302 Procedure CharMsg(Message: TMsg); procedure
/dports/news/husky-sqpack/husky-sqpack-1.9.20191207/protick/
H A Dmkwcrt.pas302 Procedure CharMsg(Message: TMsg); procedure
/dports/news/husky-smapi/husky-smapi-1.9.20191207,1/promknl/
H A Dmkwcrt.pas302 Procedure CharMsg(Message: TMsg); procedure
/dports/news/husky-smapi/husky-smapi-1.9.20191207,1/protick/
H A Dmkwcrt.pas302 Procedure CharMsg(Message: TMsg); procedure
/dports/news/husky-huskylib/husky-huskylib-1.9.20191207/promknl/
H A Dmkwcrt.pas302 Procedure CharMsg(Message: TMsg); procedure

12