Всем вечер добрый.
Нуждаюсь в небольшой помощи, народ, выручайте!
В общем, есть задание:
Клиентская программа оправляет на сервер пару целых чисел a и b, а также символ арифметической операции «+», «-», «*», «/» (числа и знак операции задаются через пользовательский интерфейс клиента), а сервер возвращает результат выполненной арифметической операции. Если происходит деление на 0, то сервер возвращает сообщение об ошибке «Divide overflow».
Есть листинг клиентской программы:
#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;
}
Никак что-то не сориентируюсь, как разбить введенную в клиенте строку на отдельные символы.
И, после разбиения, что делать с числами - понятно. А вот как дать понять серверу, что, например, третий введенный символ в строке - это символ арифметической операции, и как использовать его в решении примера?
То есть, вводим, например, "2;3;+". Пусть разбиваем a=2, b=3, c=+. Как потом при присвоении, скажем, d=2+3, использовать переменную c?
