String input = "123;abv;@#$";
  TStringList *lst = new TStringList;
  try 
   {
    TReplaceFlags fFlags;

int __fastcall TForm1::Primer(int a, int b)
{
 return a+b;