TdxBarSpinEdit Example

• Jul 29, 2021

This example demonstrates how you can handle the TdxBarSpinEdit.OnCurChange event to dynamically change the incremental step against the range of an edited value.

// The ValueType property should be set to svtFloat.
// The OnCurChange event handler.
procedure TForm1.dxBarSpinEdit1CurChange(Sender: TObject);
begin
  with Sender as TdxBarSpinEdit do
    if (CurValue > 3) and (CurValue < 5) then
      Increment := 0.01
    else
      Increment := 0.1;
end;