В тексте удалить символы, заключенные в круглые скобки, вместе со скобками

//---------------------------------------------------------------------------
#include <iostream.h>
#include <math.h>
#include <string.h>
#include <cstring.h>
#include <string>
#include <cstring>
#include <vcl.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)
{
int i;
char s[] = "Some text (some other text) and ( else some text )";
for(i=1;i<=(length(s));i++)
if (s[i] = '(') delete(s, i, pos(')', s) - i + 1);
Memo2->Lines->Add(s);
}
//---------------------------------------------------------------------------
[C++ Error] Unit1.cpp(27): E2268 Call to undefined function 'length'
[C++ Warning] Unit1.cpp(28): W8060 Possibly incorrect assignment
[C++ Error] Unit1.cpp(28): E2268 Call to undefined function 'pos'
[C++ Error] Unit1.cpp(28): E2158 Operand of 'delete' must be non-const pointer

if (s[i] == '(')

#include <string.h>
#include <vcl.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)
{
int i;
char s[1000] = "Some text (some other text) and ( else some text )";
char *s1=s, *s2=s;
while(s1=strstr(s,"("))
        {s2=strstr(s,")");
        *s1=0;
        s2++;
        strcat(s,s2);
        }
 
Form1->Memo2->Lines->Add(s);