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

EditBtn: change name of parameter Action into Accept in TAcceptValueEvent.

Browse Source 
Resolves issue #0024906.

git-svn-id: trunk@42539 -
This commit is contained in:
bart 2013-09-01 10:20:49 +00:00
parent 79bd788aa9
commit 5f60f3f425
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/editbtn.pas
View File

@ -699,7 +699,7 @@ type
{ TCalcEdit }
TAcceptValueEvent = procedure(Sender: TObject; var AValue: Double; var Action: Boolean) of object;
TAcceptValueEvent = procedure(Sender: TObject; var AValue: Double; var Accept: Boolean) of object;
TCalcEdit = class(TCustomEditButton)
private
FDialogTitle: String;