mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-11-20 10:59:23 +01:00
CaculatorForm: fix TCalculatorPanel.FindButton for buttons after the Square root button.
git-svn-id: trunk@52862 -
This commit is contained in:
parent
b272a2aa9f
commit
602280cef5
@ -567,7 +567,7 @@ end;
|
||||
|
||||
function TCalculatorPanel.FindButton(Key: Char): TCustomSpeedButton;
|
||||
const
|
||||
ButtonChars = '0123456789_./*-+Q%R='#8'C';
|
||||
ButtonChars = '0123456789_./*-+QS%R='#8'C';
|
||||
var
|
||||
I: Integer;
|
||||
BtnTag: Longint;
|
||||
|
||||
Loading…
Reference in New Issue
Block a user