請教使用UpDown 可以修改Increment 的増減量為0.5嗎 |
尚未結案
|
jasper4877
一般會員 發表:17 回覆:4 積分:4 註冊:2004-08-13 發送簡訊給我 |
|
Zard
尊榮會員 發表:24 回覆:396 積分:539 註冊:2003-11-26 發送簡訊給我 |
你可以自已實作 TUpDown 的 OnChangingEx 事件來達成, 給你一個範例.
先在Form上放一個TEdit元件, 一個TUpDown元件.
//--------------------------------------------------------------------------- #include |
jasper4877
一般會員 發表:17 回覆:4 積分:4 註冊:2004-08-13 發送簡訊給我 |
Hi Zard 你好
謝謝你詳細的範例解說,讓小弟我能了解UpDown的其他功能,執行時!正常穩定
我好奇的將增減量從0.5改成0.1郤發現會浮點全部的值域.請問有其它的方法
可以只顯示0,0.1,0.2,0.3,0.4,,,,10;
float fValue;
if (Direction == updUp)
{
fValue = StrToFloat(Edit1->Text);
// fValue += 0.5;
fValue +=0.1; //我好奇的改變為0.1
Edit1->Text = FloatToStr(fValue);
}
|
Zard
尊榮會員 發表:24 回覆:396 積分:539 註冊:2003-11-26 發送簡訊給我 |
引言: Hi Zard 你好 謝謝你詳細的範例解說,讓小弟我能了解UpDown的其他功能,執行時!正常穩定 我好奇的將增減量從0.5改成0.1郤發現會浮點全部的值域.請問有其它的方法 可以只顯示0,0.1,0.2,0.3,0.4,,,,10; float fValue; if (Direction == updUp) { fValue = StrToFloat(Edit1->Text); // fValue += 0.5; fValue +=0.1; //我好奇的改變為0.1 Edit1->Text = FloatToStr(fValue); }修改處我用紅字表示 void __fastcall TForm1::UpDown1ChangingEx(TObject *Sender, bool &AllowChange, short NewValue, TUpDownDirection Direction) { float fValue; if (Direction == updUp) { fValue = StrToFloat(Edit1->Text); fValue += 0.1; Edit1->Text = Format("%.1f", ARRAYOFCONST((fValue))); } else if (Direction == updDown) { fValue = StrToFloat(Edit1->Text); fValue -= 0.1; if (fValue < 0) fValue = 0; Edit1->Text = Format("%.1f", ARRAYOFCONST((fValue))); } } |
jasper4877
一般會員 發表:17 回覆:4 積分:4 註冊:2004-08-13 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |