|
:
:
: void __fastcall TDataViewForm::XEditKeyPress(TObject *Sender, char &Key)
: {
///////////: int point = 0;
: static int point = 0; // 님이 하시려는거는 이걸 static으로 하셔야 할겁니다. ^^
// 다른부분은 잘 모르겠구여..일단 이게 제일 문제네요.
: float inc;
:
: if(XEdit->Text.Length()>0)
: {
: if((Key<48||Key>57) && Key!=8 && Key!=46 && Key!=13) Key = 0;
:
: if(Key == 46 && point == 0) point ++; // *
:
: if(Key == 46 && point != 0) // *
: { // *
: ShowMessage("Retry"); // *
: XEdit->Text = " "; // *
: } // *
:
: ................................
:
: }
:
: else if(Key<48||Key>57) Key = 0;
:
: }
|