Problem with polish national sign (keyboard) in chat memo

[moskwa]

Hello,
in AI Chat memo when you click (using polish programmers keyboard) right Alt+a that should write to memo letter "ą" its write letter and select all text in memo :-( This is because of the wrong key checking in mmQuestionKeyUp (DelphiAIDev.Chat.View) :

procedure TDelphiAIDevChatView.mmQuestionKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
if (ssCtrl in Shift) and (Key = 65) then
begin
mmQuestion.SelectAll;
Key := 0;
end;
end;

it should be :

procedure TDelphiAIDevChatView.mmQuestionKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
if ( Shift=[ssCtrl] ) and (Key = 65) then
begin
mmQuestion.SelectAll;
Key := 0;
end;
end;

This will solve the problem for polish developers ;-)

Regards
Marcin