안녕하세요? 개박살입니다.

소스를 보니까, 이부분만 바꾸면 계산은 되더군요 ^^;

void __fastcall TForm1::btn_equalClick(TObject *Sender)
{
    AnsiString  Temp = Label1->Caption;
    if       (Operator == "/")  {
        Label1->Caption = FloatToStr((Pre_Num / StrToFloat(Temp)));
    } else if(Operator == "*")  {   // 나누기 연산 결과를 출력한다.
        Label1->Caption = FloatToStr((Pre_Num * StrToFloat(Temp)));
    } else if(Operator == "+")  {   // 곱하기 연산 결과를 출력한다.
        Label1->Caption = FloatToStr((Pre_Num + StrToFloat(Temp)));
    } else if(Operator == "-")  {   // 더하기 연산 결과를 출력한다.
        Label1->Caption = FloatToStr((Pre_Num - StrToFloat(Temp)));
    }

    FormCreate(this);
    // 모든 변수를 초기화 한다.
}

이함수만 이렇게 바꿔보세요~
그럼 이만..

문찬호 님이 쓰신 글 :
: 저는 이제 막 빌더를 사용하는 초보 프로그래머입니다.
: 현재 모 출판사의 빌더 책으로 공부하고 있습니다. 그런데 책중 예제 프로젝트를 테스트하던 중
: 도저히 이해가 되지 않는 프로그램이 있어서 이렇게 글을 올립니다.
: 계산기 프로그램인데요. 저로서는 아무리 살펴보아도 논리적으로 에러를 찾을수 없습니다만 어떻게
: 된건지 이해할 수 없는 계산이 나오는 군요. 프로그램을 살펴보시고 에러 좀 잡아주세요.
: 꼭 좀 부탁드릴께요.