請問大大，我要如何將1，2…變成01，02…，我是要用在CSpinEdit這個元件中，且CSpinEdit可以正常的再輸入。 發表人 - taishyang 於 2004/01/12 23:25:21

kimi您好: 試試下面的code

void __fastcall TForm1::CSpinEdit1Change(TObject *Sender)
{
 int i=CSpinEdit1->Value;
 AnsiString buf;
 if (i>=0)
   buf.printf("d",i);
 else
   buf.printf("d",i);
  CSpinEdit1->Text=buf;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 ShowMessage(CSpinEdit1->Value);
}

P.S:請注意,您已經多次PO錯版囉~~ 順心 <>～我也是在學習的階段,回答的不好請您多多見諒與指教～

大大我有寫了下面的程式，可以直接輸出01，02… AnsiString sz; sz.printf("d",CSpinEdit1->Text.ToInt()); Comm1->OutputString(sz) 但是我一直有個問題，就是CSpinEdit1之中，一直無法直接輸入， 請問大大我要如何更改我上面的程式!! 發表人 - kimi 於 2004/01/13 13:42:45

kimi您好: 那試試改成這樣 

bool Keying=false;
void __fastcall TForm1::CSpinEdit1Change(TObject *Sender)
{
 if (Keying==false)
 {
  int i=CSpinEdit1->Value;
   AnsiString buf;
  if (i>=0)
    buf.printf("d",i);
  else
    buf.printf("d",i);       CSpinEdit1->Text=buf;
 }
}
//---------------------------------------------------------------------------    void __fastcall TForm1::CSpinEdit1KeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
 Keying=true;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::CSpinEdit1KeyUp(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
 Keying=false;
}
//---------------------------------------------------------------------------

順心 <>～我也是在學習的階段,回答的不好請您多多見諒與指教～

謝謝大大的幫助!! 我可以用了