LCL: TDateEdit: fix not calling OnEditingDone (bug introduced in r53938 #afa3922372 by me). Issue #0031278.

git-svn-id: trunk@54010 -
This commit is contained in:
bart 2017-01-26 17:29:07 +00:00
parent d1c43f56a2
commit dd81ed3150

View File

@ -1638,7 +1638,7 @@ procedure TDateEdit.EditEditingDone;
var
AText: String;
begin
inherited EditingDone;
inherited EditEditingDone;
if DirectInput then
begin
AText := DateToText(GetDate);