J'arrive pas a continue mon prog de calculatr

Bonjour,
salut tt le mond
je veu programmè un programme de calculatrice par le c++ builder 6 par le language C
j termine le graphisme et quelque truc de numiros (1....9) et les buttons retour et C et CE
mè j'arrive pas a continue parceque j trouve un problem avec l'adition et la multiplication et...ect ...
voil mon code source de premier programme

#include <vcl.h>
#pragma hdrstop

#include "Calculatrice.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TMachine *Machine;
//=========================================

char affichage[25];
char affichageClear[25];
int a,b;
long resultat;
//---------------------------------------------------------------------------
__fastcall TMachine::TMachine(TComponent* Owner)
: TForm(Owner)
{
}
//-----------------button (1)--------------------------- b1 execut-------------------------------
void __fastcall TMachine::UnClick(TObject *Sender)
{

strcat(affichage,"1");
Affiche->Caption = affichage;

}
//----------------------------------------------------- b1 execut----------------------

void __fastcall TMachine::DeuxClick(TObject *Sender)
{
strcat(affichage,"2");
Affiche->Caption = affichage;
}
//-------------------------------------------------- b1 execut-------------------------

void __fastcall TMachine::TroisClick(TObject *Sender)
{
strcat(affichage,"3");
Affiche->Caption = affichage;
}
//-------------------------------------------------- b1 execut-------------------------

void __fastcall TMachine::QuatreClick(TObject *Sender)
{
strcat(affichage,"4");
Affiche->Caption = affichage;
}
//--------------------------button (5)------------- b1 execut-----------------------------------

void __fastcall TMachine::CinqClick(TObject *Sender)
{
strcat(affichage,"5");
Affiche->Caption = affichage;
}
//------------------------------------------------- b1 execut--------------------------

void __fastcall TMachine::SixClick(TObject *Sender)
{
strcat(affichage,"6");
Affiche->Caption = affichage;
}
//------------------------------------------------ b1 execut---------------------------

void __fastcall TMachine::SeptClick(TObject *Sender)
{
strcat(affichage,"7");
Affiche->Caption = affichage;
}
//---------------------------------------------- b1 execut-----------------------------

void __fastcall TMachine::HuitClick(TObject *Sender)
{
strcat(affichage,"8");
Affiche->Caption = affichage;
}
//---------------------------------------- b1 execut-----------------------------------

void __fastcall TMachine::NeufClick(TObject *Sender)
{
strcat(affichage,"9");
Affiche->Caption = affichage;
}
//------------------------------------------button (0) b1 execut---------------------------------

void __fastcall TMachine::ZeroClick(TObject *Sender)
{
strcat(affichage,"0");
Affiche->Caption = affichage;
}
//-------------------------------button(C)----------- b1 execut---------------------------------

void __fastcall TMachine::Init2Click(TObject *Sender)
{
Affiche->Caption='0';
affichage[0]='\0';

}
//-------------------------------button (CE)------- b1 execut------------------------------------

void __fastcall TMachine::InitClick(TObject *Sender)
{
Affiche->Caption='0';
affichage[0]='\0';

}
//------------------------------------Button (,)--- b1 execut------------------------------------

void __fastcall TMachine::Button5Click(TObject *Sender)
{
//int i,s;
//s=strlen(affichage);
//for(i=0;i<s;i++)

//if(affichage[i] !=',')

//Affiche->Caption = affichage;

// else
strcat(affichage,",");
Affiche->Caption = affichage;

}
//--------------------------------------button (-/+) non exec-------------------------------------

void __fastcall TMachine::Button4Click(TObject *Sender)
{
//if((Affiche->Caption)>0) Affiche->Caption =(Affiche->Caption)<0 ;
//else
//Affiche->Caption =Affiche->Caption
}
//------------------------------button (RETOUR) b1 execut---------------------------------------------

void __fastcall TMachine::RetourClick(TObject *Sender)
{
int position = StrLen(affichage);//detection du dernier caractère
affichage[position-1] = 0;//effacement du dernier caractère visible
Affiche->Caption = affichage;
}
//--------------------------------------button (+) non execut-------------------------------------

void __fastcall TMachine::Button6Click(TObject *Sender)
{

a= StrToInt(affichage);
//Affiche->Caption='0';
affichage[0]='\0';
//b= StrToInt(affichage);

}
//----------------------------------button (=) quelque prob-----------------------------------------

void __fastcall TMachine::Button10Click(TObject *Sender)
{
resultat=0 ;
b = StrToInt(affichage);
resultat = a + b;
Affiche->Caption=("%d",resultat);

}
//---------------------------------------------------------------------------