paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-26 15:00:26 +02:00
Code Issues Packages Projects Releases Wiki Activity

Merged revision(s) 52862 #602280cef5 from trunk:

Browse Source 
CaculatorForm: fix TCalculatorPanel.FindButton for buttons after the Square root button.
........

git-svn-id: branches/fixes_1_6@52891 -
This commit is contained in:
maxim 2016-08-29 22:18:48 +00:00
parent 469aa3f707
commit 0afe553727
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/forms/calcform.pas
View File

@ -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;