StrTmp = "";
                Query1->Close();
                Query1->SQL->Clear();
                StrTmp = "insert into Data_text (Number, Inte1, Mag1) values (";
                StrTmp = StrTmp + i + "," + freTmp + "," + magTmp + ")";
                Query1->SQL->Add(StrTmp);
                Query1->Prepare();

                if (Query1->Prepared)
                {
                        Query1->ExecSQL(); -->이 부분에서 자꾸 에러가...
                }
               
                Query1->Close();
                Query1->Active = true;