mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-31 18:20:42 +02:00
MaskEdit: don't call GetEditText in RealGetText, fixes issue #0026924.
git-svn-id: trunk@46643 -
This commit is contained in:
parent
edd7ba6676
commit
6635435173
@ -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;
|
||||
|
Loading…
Reference in New Issue
Block a user