如何让TUpDown支持long int

[华山沦贱]

UpDown的max是short类型，最大只支持32768，现有有个软件需要做到支持0---60000，自己试着改写ChangingEx，还是没法让关联的edit在60000以内增减

[hongss]

自己用Btn弄一个

[ooolinux]

用UpDown合适吗？这么大的数鼠标点击坏。

[日立奔腾浪潮微软松下联想]

只需要修改一下TCustomUpDown的源码，把 FMin: SmallInt; FMax: SmallInt; FNewValue: SmallInt; FNewValueDelta: SmallInt; FPosition: SmallInt; 和 property Min: SmallInt read FMin write SetMin default 0; property Max: SmallInt read FMax write SetMax default 100; property Position: SmallInt read GetPosition write SetPosition default 0; 的类型改成integer就可以了。

[My_Love]

等待最佳答案中。。。