已知Delphi的Tupdown控件的步进值是整数类型,每次只能以1为单元去增加或减少,现在我需要步进值为0.1需要怎么做
3条回答 默认 最新
threenewbee 2023-06-29 16:55关注UpDown1的Changing里面写
var v: Double; begin v := StrToFloat(Edit1.Text); if UpDown1.Position < v then v := v + 0.1 else v := v - 0.1; UpDown1.Position := v; AllowChange := False; end;本回答被题主选为最佳回答 , 对您是否有帮助呢?解决 无用评论 打赏 举报