T(Float)SpinEditEx: In InitializeWnd set Text to represent FValue, otherwise NullValueBehavious will be applied in call to UpdateControl.

This commit is contained in:
Bart 2024-02-21 23:44:31 +01:00
parent f6555a287e
commit a3ba11e5c3

View File

@ -204,6 +204,9 @@ end;
procedure TSpinEditExBase.InitializeWnd;
begin
inherited InitializeWnd;
// at this point Text will be empty, which in UpdateControl will invoke the NullValueBehaviour
// so make sure that Text will represent FValue now
Text := ValueToStr(FValue);
UpdateControl;
end;