StrToFloat에서 에러난것 아닌가요?

문자열을 Float형으로 변환하는 함수인데 문자열안에  숫자나 점이 아닌 다른 문자가 있는가보네요

그럼..


비익조 님이 쓰신 글 :
: 제가 완전 초보인데
:
: 계산기를 만들어 볼려고 하는데 이상한 오류가 뜨네요
:
: 직접 짠거는 아니고 다른사람들이 작성한 소스 를 응용해서 해봤는데
:
: 않되요 고수님들 도와주세요
:
: 어떤 오류인지는 그림파일로 올리겠습니다
:
: 아래는 제가 응용한 소스입니다
:
: #include <vcl.h>
: #pragma hdrstop
:
: #include "computer.h"
: //---------------------------------------------------------------------------
: #pragma package(smart_init)
: #pragma resource "*.dfm"
: TForm1 *Form1;
: double Pre_num; //처음입력한 수를 기억
: bool Dot_Check;
: int InNew;     // 처음입력한수를 체크
:
:
: //---------------------------------------------------------------------------
: __fastcall TForm1::TForm1(TComponent* Owner)
:         : TForm(Owner)
: {
: }
: //---------------------------------------------------------------------------
: void __fastcall TForm1::FormCreate(TObject *Sender)
: {
:         Pre_num = 0 ;
:         Dot_Check = false ;
:         InNew = true ;
:         operater = "" ;
:         Edit1->Font->Style = Edit1->Font->Style << fsBold ;
: }
: //---------------------------------------------------------------------------
: void __fastcall TForm1::Button1Click(TObject *Sender)
: {
:         if(operater.Length()<1)
:                 sNum1+="1" ;
:         else
:                 sNum2+="1" ;
:         if (InNew)
:         {
:                 Edit1->Text = "" ;
:                 InNew = false ;
:         }
:         if (Edit1->Text == "0")
:                 Edit1->Text = "1" ;
:
:         else
:                 Edit1->Text=Edit1->Text + "1" ;
: }
:
:
:
: //---------------------------------------------------------------------------
:
: void __fastcall TForm1::Button2Click(TObject *Sender)
: {
:         if(operater.Length()<2)
:                 sNum1+="2" ;
:         else
:                 sNum2+="2" ;
:         if (InNew)
:         {
:                 Edit1->Text = "" ;
:                 InNew = false;
:         }
:         if (Edit1->Text == "0")
:                 Edit1->Text = "2" ;
:
:         else
:                 Edit1->Text=Edit1->Text + "2" ;
: }
: //---------------------------------------------------------------------------
:
: void __fastcall TForm1::Button3Click(TObject *Sender)
: {
:         if(operater.Length()<3)
:                 sNum1+="3" ;
:         else
:                 sNum2+="3" ;
:         if (InNew)
:         {
:                 Edit1->Text = "" ;
:                 InNew = false;
:         }
:         if (Edit1->Text == "0")
:                 Edit1->Text = "3" ;
:
:         else
:                 Edit1->Text=Edit1->Text + "3" ;
: }
: //---------------------------------------------------------------------------
:
: void __fastcall TForm1::Button4Click(TObject *Sender)
: {
:         if(operater.Length()<4)
:                 sNum1+="4" ;
:         else
:                 sNum2+="4" ;
:         if (InNew)
:         {
:                 Edit1->Text = "" ;
:                 InNew = false;
:         }
:         if (Edit1->Text == "0")
:                 Edit1->Text = "4" ;
:
:         else
:                 Edit1->Text=Edit1->Text + "4" ;
: }
: //---------------------------------------------------------------------------
:
: void __fastcall TForm1::Button5Click(TObject *Sender)
: {
:         if(operater.Length()<5)
:                 sNum1+="5" ;
:         else
:                 sNum2+="5" ;
:         if (InNew)
:         {
:                 Edit1->Text = "" ;
:                 InNew = false;
:         }
:         if (Edit1->Text == "0")
:                 Edit1->Text = "5" ;
:
:         else
:                 Edit1->Text=Edit1->Text + "5" ;
: }
: //---------------------------------------------------------------------------
:
: void __fastcall TForm1::Button6Click(TObject *Sender)
: {
:         if(operater.Length()<6)
:                 sNum1+="6" ;
:         else
:                 sNum2+="6" ;
:         if (InNew)
:         {
:                 Edit1->Text = "" ;
:                 InNew = false;
:         }
:         if (Edit1->Text == "0")
:                 Edit1->Text = "6" ;
:
:         else
:                 Edit1->Text=Edit1->Text + "6" ;
: }
: //---------------------------------------------------------------------------
:
: void __fastcall TForm1::Button7Click(TObject *Sender)
: {
:         if(operater.Length()<7)
:                 sNum1+="7" ;
:         else
:                 sNum2+="7" ;
:         if (InNew)
:         {
:                 Edit1->Text = "" ;
:                 InNew = false;
:         }
:         if (Edit1->Text == "0")
:                 Edit1->Text = "7" ;
:
:         else
:                 Edit1->Text=Edit1->Text + "7" ;
: }
: //---------------------------------------------------------------------------
:
: void __fastcall TForm1::Button8Click(TObject *Sender)
: {
:         if(operater.Length()<8)
:                 sNum1+="8" ;
:         else
:                 sNum2+="8" ;
:         if (InNew)
:         {
:                 Edit1->Text = "" ;
:                 InNew = false;
:         }
:         if (Edit1->Text == "0")
:                 Edit1->Text = "8" ;
:
:         else
:                 Edit1->Text=Edit1->Text + "8" ;
: }
: //---------------------------------------------------------------------------
:
: void __fastcall TForm1::Button9Click(TObject *Sender)
: {
:         if(operater.Length()<9)
:                 sNum1+="9" ;
:         else
:                 sNum2+="9" ;
:         if (InNew)
:         {
:                 Edit1->Text = "" ;
:                 InNew = false;
:         }
:         if (Edit1->Text == "0")
:                 Edit1->Text = "9" ;
:
:         else
:                 Edit1->Text=Edit1->Text + "9" ;
: }
: //---------------------------------------------------------------------------
:
: void __fastcall TForm1::Button10Click(TObject *Sender)
: {
:         if(operater.Length()<0)
:                 sNum1+="0" ;
:         else
:                 sNum2+="0" ;
:         if (InNew)
:         {
:                 Edit1->Text = "" ;
:                 InNew = false;
:         }
:         if (Edit1->Text == "0")
:                 return ;
:
:         else
:                 Edit1->Text=Edit1->Text + "0" ;
: }
: //---------------------------------------------------------------------------
: void __fastcall TForm1::Button16Click(TObject *Sender)
: {
:         if (InNew)
:         {
:                 Edit1->Text = "" ;
:                 InNew = false ;
:         }
:
:         if (Dot_Check) return ;
:        
:         Edit1->Text = Edit1->Text + "." ;
:        
:         Dot_Check = true ;
:        
: }
: //---------------------------------------------------------------------------
:
: void __fastcall TForm1::Button12Click(TObject *Sender)//더하기
: {
:         Pre_num = StrToInt(Edit1->Text) ;
:        
:         InNew = true ;
:         Dot_Check = false ;
:         operater = Button12->Caption ;
:         Edit1 -> Text = Edit1 -> Text + "+" ;
: }
: //---------------------------------------------------------------------------
:
: void __fastcall TForm1::Button13Click(TObject *Sender)//빼기
: {
:
:         Pre_num = StrToInt(Edit1->Text) ;
:        
:         InNew = true ;
:         Dot_Check = false ;
:         operater = Button13->Caption ;
:         Edit1 -> Text = Edit1 -> Text + "-" ;
: }
: //---------------------------------------------------------------------------
:
: void __fastcall TForm1::Button14Click(TObject *Sender)//곱하기
: {
:
:         Pre_num = StrToInt(Edit1->Text) ;
:        
:         InNew = true ;
:         Dot_Check = false ;
:         operater = Button14->Caption ;
:         Edit1 -> Text = Edit1 -> Text + "*" ;
: }
: //---------------------------------------------------------------------------
:
: void __fastcall TForm1::Button15Click(TObject *Sender)//나누기
: {
:         Pre_num = StrToInt( Edit1->Text ) ;
:        
:         InNew = true ;
:         Dot_Check = false ;
:         operater = Button15->Caption ;
:         Edit1 -> Text = Edit1 -> Text + "/" ;
: }
: //---------------------------------------------------------------------------
:
: void __fastcall TForm1::ButtonClearClick(TObject *Sender)
: {
:         sNum1=sNum2=operater="" ;
:         Edit1->Clear() ;
:         Dot_Check = false ;
: }
: //---------------------------------------------------------------------------
:
: void __fastcall TForm1::Button11Click(TObject *Sender)
: {
:        
:         float   fNum1 = StrToFloat( sNum1 ) ;
:
:         float   fNum2 = StrToFloat( sNum2 ) ;
:
:         float   fResult ;
:
:        
:         if ( operater == '+' )
:                 fResult = fNum1 + fNum2 ;
:                
:         else if ( operater == '-' )
:                 fResult = fNum1 - fNum2 ;
:                
:                
:         else if ( operater == '/' )
:                 fResult = fNum1 / fNum2 ;
:                
:                
:         else if ( operater == '*' )
:                 fResult = fNum1 * fNum2 ;
:                
:         Edit1->Text = sNum1+ operater + sNum2 + "="+FloatToStr(fResult) ;