如何使用UpDown控件？

[nuaalj]

当把UpDown控件和Edit控件associate起来时，正常，
但设associate=false，并写：
void __fastcall TForm1::UpDown1Click(TObject *Sender, TUDBtnType Button)
{
short value=StrToFloat(Edit1->Text);
if(Button==btPrev) value=value+1;
if(Button==btNext) value=value-1;
Edit1->Text=value;
}
无法正常工作，请问这是为什么？如何解决？
另外：如何使用UpDown控件，使得Edit中输入的数字进行0.1的增减？？

[slhuang]

在UuDown的click事件里加入：

void __fastcall TForm1::UpDown1Click(TObject *Sender, TUDBtnType Button)
{
Edit1->Text=Edit1->Text+1; // +
// Edit1->Text=Edit1->Text-1; // -

}

[slhuang]

如何使用UpDown控件，使得Edit中输入的数字进行0.1的增减？？


在UuDown的click事件里加入：

void __fastcall TForm1::UpDown1Click(TObject *Sender, TUDBtnType Button)
{
Edit1->Text=Edit1->Text+1; // +
Edit1->Text=Edit1->Text-1; // -

}
//---------------------------------------------------------------------------

[slhuang]

另，第一个问题肯定有问题啦！……你不把他们关联起来，他们怎么知道自己要协调工作啊？
就好象你和你的同事在一个办公室一样。