用delphi做一个单位换算的程序

来源：百度知道 编辑：UC知道 时间：2024/05/20 20:48:47
点击一种单位名称，出现几个edit在面板上，任意在一个edit中输入，其他的相应变化
我只会很简单的方法（比如if），可要用到几十种单位，那样就太麻烦了，我还不想用pagecontrol这个控件
希望各位前辈传授方法，当然越详细越好，在此感激不尽！
你说的那个方法我最早也是那么做的，不过那样我觉得面板上不能显示所有单位，必须点下拉选择才行，而且那种方法等于是把那个二维表全打上去了，觉得比较麻烦所以我的意思是：比如选择一种单位（长度、面积什么的）后 ，面板上出现所有关于他的单位名称和edit框，任意在一个edit中输入数字，其他的也相应显示
难道必须把那些数值一个一个都输上去才行吗，qq 251616602

不需要用pagecontrol这个控件.

用下拉框保存单位就可以了,里面可以固定一些值,比如说公斤,尺,英尺,什么的

操作的时候需要先从下拉框选择一个单位.
然后在第一个输入框中输入,输入的时候触发OnChange事件,
根据下拉框中选择的单位计算第二个输入框的值,显示在第二个输入框中..

需要的话你可以给我发消息,把你的需求在详细说下,我给你做个小例子....

d7的Demo里有一个ConvertIt，演示了ConvUtils单元的用法，个人觉得该单元依赖性强，而且有些地方设计得过于复杂，有些地方却略有不足，最好参考它改成自己需要的ConvU。
当然了你也可以到Google上，或者About，torry，codegear找找看也没有更成熟的，改起来会更方便。
如果你是说事件设置的话，你可以遍历edit，设置OnChange和Tag值，根据Tag查找度量单位，再根据两种度量单位的换算的关系，遍历edit改变数值。

用EDIT的ONCHANGE事件可轻松实现

可以用tabcontrol 或者 notebook

这个怎么说呢,要一步步来说才得啊.就是先设计,做好界面,再设计算法的过程,再写代码,这样你的思路就开朗了