MaskEdit: don't call GetEditText in RealGetText, fixes issue #0026924.

git-svn-id: trunk@46643 -
This commit is contained in:
bart 2014-10-22 22:21:47 +00:00
parent edd7ba6676
commit 6635435173

View File

@ -1043,7 +1043,7 @@ end;
function TCustomMaskEdit.RealGetText: TCaption;
begin
if not IsMasked then
Result := GetEditText
Result := inherited RealGetText //don't call GetEditText here (issue #0026924)
else
Result := GetTextWithoutMask;
end;