Клиент-серверный калькулятор (дописать программу)

#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
ClientSocket1->Address=Edit1->Text;// тут вводим IP сервера
ClientSocket1->Active=true;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
ClientSocket1->Socket->SendText(Edit2->Text); // в этот эдит вводим через ";" пару чисел и символ арифметической операции
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::ClientSocket1Read(TObject *Sender,
      TCustomWinSocket *Socket)
{
Edit3->Text=Socket->ReceiveText();
}

//---------------------------------------------------------------------------
 
#include <vcl.h>
#include <math.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
 
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
ServerSocket1->Active=true;
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::ServerSocket1ClientRead(TObject *Sender,
      TCustomWinSocket *Socket)
{
Edit1->Text=Socket->ReceiveText();
TStringList * MyList = new TStringList();
MyList->Delimiter = L';';
MyList->DelimitedText=Edit1->Text;
//
//
//
//
//
//
//
}
delete MyList;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
ServerSocket1->Active=false;
}

UnicodeString SplitString(UnicodeString str, UnicodeString sep, int need)
{
    for (int i = 0; i < need; i++)
    {
        str = str.SubString(str.Pos(sep)+1, str.Length());
    }
    return str.SubString(0, str.Pos(sep)-1);
}

SplitString("10;10;+;", ";", 2);

float a=StrToFloat(MyList->operator [](0));
float b=StrToFloat(MyList->operator [](1));
float c=StrToFloat(MyList->operator [](2));

 // ...
int result=0;
switch (c) {
       case '+':
           result = a+b;
           break;
       case '-':
           result = a-b;
           break;
        // и т.д., главное про break не забыть.
       default:
           ShowMessage("Неизвестная операция");
}

float a=StrToFloat(MyList->operator [](0));
float b=StrToFloat(MyList->operator [](1));
float c=StrToFloat(MyList->operator [](2));

UnicodeString str = "blah blah blah";
char c = str.c_str()[0]; // Т.к. c_str возвращает массив, берём только первый его элемент.
// В 'c' теперь хранится буква 'b', т.к. это первая буква в строке 'str'.

float a=StrToFloat(MyList->operator [](0));
float b=StrToFloat(MyList->operator [](1));
char c=MyList->operator [](2)[0];