« on: January 23, 2025, 09:57:53 am »
Windows 10, 64 bit, Lazarus 4RC2, 32 bit.
I create a TRichMemo, then I add a popup and link the popup with the RichMemo.
When I right click the memo or I press “Shift + F10” the popup menu is shown.
When I press the menu key on the keyboard the popup menu is not shown, some small rectangle is shown on the place of the mouse instead.
I succeeded in making a workaround, which works:
procedure TForm1.RichMemo1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
if (Key = 93) then
begin
PopupMenu1.PopUp; //or maybe better TRichMemo(Sender).PopupMenu.PopUp;
key := 0;
end;
end;
So probably the Menu key invokes something which probably should not be invoked.
« Last Edit: January 23, 2025, 10:04:46 am by CM630 »

Logged
Лазар 4,0RC2 32 bit (sometimes 64 bit); FPC3,2,2