LCL: fixed calling of wrong inherited method in TCustomEdit.KeyUpAfterInterface(). fixes #17332

git-svn-id: trunk@27250 -
This commit is contained in:
zeljko 2010-09-02 18:31:38 +00:00
parent 42a3b3918b
commit bf1bdb52a7

View File

@ -425,7 +425,7 @@ end;
procedure TCustomEdit.KeyUpAfterInterface(var Key: Word; Shift: TShiftState);
begin
inherited KeyUp(Key, Shift);
inherited KeyUpAfterInterface(Key, Shift);
if Key = VK_RETURN then
begin
EditingDone;