Как перенести проект с Builder 6 на Microsoft VS2013?

#include <stdio.h>
#include <stdlib.h>
#include <conio.h>
#include <dos.h>
#include <string.h>
#include <vcl.h>
#include <iostream.h>
#include <windows.h>
#include <math.h>
#include <TIME.H>
#include <SYS\TYPES.H>
// Struct
const int STR_SIZE =20;
struct record
{           int Zamov;
        char Posluga[STR_SIZE];
            char Vartist[STR_SIZE];
            char TerminFirma[STR_SIZE];
                char TerminZamovnuk[STR_SIZE];
                char Nadbavka[STR_SIZE];
                char VartistMaterialy[STR_SIZE];
                char PidsymkovaSum[STR_SIZE];
 };
//function prototypes
int ZastBeg();
void ProsmotrBD();
void CreateBD();
void AddRecord();
void AddRecord(const record & r);
void LoadBD();
void SaveBD();
int ChooseRecord();
void EditRecord();
void DeleteRecord();
void FindRecord();
void SortBD();
int Exit();
void ZastEnd();
int Get(int min, long max);
//Globals
static record * records = 0;
static long int nrecords = 0;
const int menupuncts = 10;
static char menu[menupuncts][30] =  {"Prosm",
                     "Do",
                     "Soz",
                     "Zag",
                     "So",
                     "Iz",
                     "Ydal",
                     "Sort",
                     "Poisk",
                     "Exit" };
const int sortmenupuncts = 9;
static char sortmenu[sortmenupuncts][40] =              {"Sort",
                            "Sortir",
                            "Sortir",
                            "Sortir",
                                                        "Sortirk",
                                                        "Sortir",
                                                        "Sortir",
                            "Sortir"};
int YesNoDialog()
{   printf("\n<Enter> - yes, <Esc> - no");
    int c;
    do
    {c = getch();
    }while(c != 13 && c != 27);
    return c;}
int Menu()
{   int choice = 0;
    int loop = 1;
    while(loop == 1)
    {   clrscr();
        for(int i=0;i<menupuncts;++i)
        {   if(i == choice)
            printf("\n >%s< ", menu[i]);
            else
            printf("\n  %s", menu[i]);}
printf("\n\nNazhmite vverx/vniz dlia peredvizhenia kursora, nazhmite <Enter> dlia vibora deistvia");
        int c = getch();
        switch(c)
        {   case 72: --choice;break;
            case 80: ++choice;break;
            case 13: loop = 0;break;
            default:break;  }
        if(choice < 0) choice = menupuncts - 1;
        if(choice >= menupuncts) choice = 0;}
    return choice;}
      void pos( int column, int line)
   {
    COORD coord;
  coord.X = column;
  coord.Y =line ;
  SetConsoleCursorPosition( GetStdHandle( STD_OUTPUT_HANDLE ),   coord);
    }
int ZastBeg()//ZAST_BEG
{
system("color 0" );
  pos(20,10);
     printf("KURSOVAYA RABOTA ");
     pos(20,11);
     printf("Oblik robit bydevelno ozdoblyvalnoi-organizacii");
     pos(20,12);
     printf("Vikonav kursant 3-031 grupu Stepanchuk V.I. ");
int c = getch();   clrscr();  system("color 07" );
return c;}
void ZastEnd()//ZastEnd
{ clrscr();
 printf("Poka!");
 getch();}
int Exit()//Vixod
{ clrscr();
 printf("\n Vi yvereni chto xotite exit?");
 return  YesNoDialog();}
int main()
{   if(ZastBeg() != 27)
    {   int loop = 1;
        while(loop == 1)
        {   int p = Menu();
            switch(p)
            {   case 0: ProsmotrBD(); break;
                case 1: AddRecord(); break;
                case 2: CreateBD(); break;
                case 3: LoadBD(); break;
                case 4: SaveBD(); break;
                case 5: EditRecord(); break;
                case 6: DeleteRecord(); break;
                case 7: SortBD(); break;
                case 8: FindRecord(); break;
                case 9: if(Exit() != 27) loop = 0; break;   }}}
    else ZastEnd();
    return 0;}
static char filename[32]; //FileDialog
char * FileDialog()
{   clrscr();
    printf("Input imia file:");
    fscanf(stdin, "%s", filename);
    return filename;}
void InputRecord(record & rec) //Vvod zapisi
{   clrscr();
    int c;
    if(kbhit())getch ();
    rec.Zamov = 0;
    rec.Posluga[0] = 0;
        rec.Vartist[0] = 0;
        rec.TerminFirma[0] = 0;
        rec.TerminZamovnuk[0] = 0;
        rec.Nadbavka[0] = 0;
        rec.VartistMaterialy[0] = 0;
        rec.PidsymkovaSum[0] = 0;
 do{            printf("\nInput Zamov :");
        rec.Zamov = Get(1, 9999);
        printf("\nInput Posluga :");
        while(rec.Posluga[0] == 0)gets(rec.Posluga);
        printf("\nInput Vartist :");
        while(rec.Vartist[0] == 0)gets(rec.Vartist);
        printf("\nInput TerminFirma :");
        while(rec.TerminFirma[0] == 0)gets(rec.TerminFirma);
        printf("\nInput TerminZamovnuk :");
        while(rec.TerminZamovnuk[0] == 0)gets(rec.TerminZamovnuk);
                printf("\nInput Nadbavka :");
        while(rec.Nadbavka[0] == 0)gets(rec.Nadbavka);
                printf("\nInput VartistMaterialy :");
        while(rec.VartistMaterialy[0] == 0)gets(rec.VartistMaterialy);
                printf("\nInput PidsymkovaSum :");
        while(rec.PidsymkovaSum[0] == 0)gets(rec.PidsymkovaSum);
        printf("\nVi yvereni?");
        c = YesNoDialog();
    }while(c != 13);}
void AddRecord(const record & r) //DobavlenieRecord
{   ++nrecords;
    record * newrecords = new record[nrecords];
    if(records) {
    memcpy(newrecords, records, (nrecords - 1) * sizeof(record));}
    delete[] records;
    records = newrecords;
    records[nrecords - 1] = r;}
void AddRecord()
{   record r;
    InputRecord(r);
    AddRecord(r);}
int IsInString(const char *string, const char *search_for) //poisk zapisi
{   int maxpos=0;
    while(search_for[++maxpos]!=0);
    int len=0;
    while(string[++len]!=0);
    for (int i=0; i<len; i++)
    {   int add=0;
        while(string[i+add] == search_for[add])
        {   if(add==maxpos-1)return 1;
            ++add;}}
    return 0;}
int RecordsSimilar(const record & a,const record & b)
{   int result = 1;
    if(b.Zamov != -1)if(a.Zamov != b.Zamov)result = 0;
    if(b.Posluga[0] != '-' && b.Posluga[1] != 0)if(IsInString(a.Posluga, b.Posluga) == 0)result = 0;
    if(b.Vartist[0] != '-' && b.Vartist[1] != 0)if(IsInString(a.Vartist, b.Vartist) == 0)result = 0;
    if(b.TerminFirma[0] != '-' && b.TerminFirma[1] != 0)if(IsInString(a.TerminFirma, b.TerminFirma) == 0)result = 0;
    if(b.TerminZamovnuk[0] != '-' && b.TerminZamovnuk[1] != 0)if(IsInString(a.TerminZamovnuk, b.TerminZamovnuk) == 0)result = 0;
        if(b.Nadbavka[0] != '-' && b.Nadbavka[1] != 0)if(IsInString(a.Nadbavka, b.Nadbavka) == 0)result = 0;
        if(b.VartistMaterialy[0] != '-' && b.VartistMaterialy[1] != 0)if(IsInString(a.VartistMaterialy, b.VartistMaterialy) == 0)result = 0;
        if(b.PidsymkovaSum[0] != '-' && b.PidsymkovaSum[1] != 0)if(IsInString(a.PidsymkovaSum, b.PidsymkovaSum) == 0)result = 0;
    return result;}
void FindRecord()
{   if(!records)
    {   clrscr();
        printf("\nNet zapisi, nazhmite lubyu klavishy.");
        getch();    }
    else{   clrscr();
        record rec;
        if(kbhit())getch ();
        rec.Zamov = 0;
        rec.Posluga[0] = 0;
                rec.Vartist[0] = 0;
                rec.TerminFirma[0] = 0;
                rec.TerminZamovnuk[0] = 0;
        rec.Nadbavka[0] = 0;
                rec.VartistMaterialy[0] = 0;
                rec.PidsymkovaSum[0] = 0;
        printf("Input nazvanie zagolovka zapisi,dlia poiska po\n");
      printf("\nInput Zamov,\nprint -1 if you don't want to search by this field:");
        rec.Zamov = Get(-1, 90000);
       printf("\nInput Posluga ,\nprint "-" if you don't want to search by this field:");
        while(rec.Posluga[0] == 0)gets(rec.Posluga);
        printf("\nInput Vartist ,\nprint "-" if you don't want to search by this field:");
        while(rec.Vartist[0] == 0)gets(rec.Vartist);
       printf("\nInput TerminFirma ,\nprint "-" if you don't want to search by this field:");
        while(rec.TerminFirma[0] == 0)gets(rec.TerminFirma);
       printf("\nInput TerminZamovnuk ,\nprint "-" if you don't want to search by this field:");
        while(rec.TerminZamovnuk[0] == 0)gets(rec.TerminZamovnuk);
                 printf("\nInput Nadbavka ,\nprint "-" if you don't want to search by this field:");
        while(rec.Nadbavka[0] == 0)gets(rec.Nadbavka);
        printf("\nInput VartistMaterialy ,\nprint "-" if you don't want to search by this field:");
        while(rec.VartistMaterialy[0] == 0)gets(rec.VartistMaterialy);
       printf("\nInput PidsymkovaSum ,\nprint "-" if you don't want to search by this field:");
        while(rec.PidsymkovaSum[0] == 0)gets(rec.PidsymkovaSum);
        record * oldrecords = records;
        int oldnrecords = nrecords;
        records = 0;
        nrecords = 0;
        int n = 0;
        for(int i=0;i<oldnrecords;++i)
        {if(RecordsSimilar(oldrecords[i], rec) == 1)
            {   AddRecord(oldrecords[i]);
                ++n;}
        }   if(n>0)
        {   printf("\n%d Zapis naidena! Nazhmite ludyu klavishy dlia prosmotra.", n);
            getch();
ProsmotrBD();
        }   else
        {   printf("Nichego ne naideno.");
            getch();    }
        if(records)delete[] records;
        records = oldrecords;
        nrecords = oldnrecords;}}
void OutputRecord(record & rec) //Vivod zapisi
{   printf("%-10d%-17s%-17s%-17s%-17s", rec.Zamov, rec.Posluga, rec.Vartist, rec.TerminFirma, rec.TerminZamovnuk, rec.Nadbavka, rec.VartistMaterialy, rec.PidsymkovaSum);}
void OutputTable(int start, int n) //Vivod tablici
{   if(!records)
    {   clrscr();
        printf("\nNet zapisi, nazhmite lubyu klavishy.");
        getch();
    }   else
    {   if(start<0)start = 0;
        if(start + n > nrecords) n = nrecords - start;
        if(n>0)
        {   printf("N: |Zamov|Posluga|Vartist|TerminFirma|TerminZamovnuk|Nadbavka|VartistMaterialy|PidsymkovaSum \n");
            for(int i=start;i<start+n;++i)
            {   printf("\n%-3d", (i % nrecords)+1);
                OutputRecord(records[(i % nrecords)]);}}}}
int SortMenu()//SortirovkaMenu
{   int choice = 0;
    int loop = 1;
    while(loop == 1)
    {   clrscr();
        for(int i=0;i<sortmenupuncts;++i)
        {   if(i == choice)
            printf("\n >%s< ", sortmenu[i]);
            else
            printf("\n  %s", sortmenu[i]);  }
    printf("\n\nNazhmite vverx/vniz dlia peredvizhenia kursora, nazhmite <Enter> dlia vibora deistvia.");
        int c = getch();
        switch(c)
        {   case 72: --choice;break;
            case 80: ++choice;break;
            case 13: loop = 0;break;
            default:break;  }
        if(choice < 0) choice = sortmenupuncts - 1;
        if(choice >= sortmenupuncts) choice = 0;    }
    return choice;}
static record c;
void swap(record & a, record & b) //Sortirovka BD
{   c = a;
    a = b;
    b = c;}
void SortBD()
{   if(!records)
    {   clrscr();
        printf("\nNet zapisi, nazhmite lubyu klavishy.");
        getch();
    }   else
    {   int c = SortMenu();
        switch(c)
        {       case 0:
            {   for(int i=0;i<nrecords;++i)
                for(int k=0;k<nrecords-1;++k)
                if(records[k].Zamov > records[k+1].Zamov)swap(records[k], records[k+1]);
                break;}
                        case 1:
            {   for(int i=0;i<nrecords;++i)
                for(int k=0;k<nrecords-1;++k)
                if(strcmp(records[k].Posluga, records[k+1].Posluga) > 0)swap(records[k], records[k+1]);
                break;}
            case 2:
            {   for(int i=0;i<nrecords;++i)
                for(int k=0;k<nrecords-1;++k)
                if(strcmp(records[k].Vartist, records[k+1].Vartist) > 0)swap(records[k], records[k+1]);
                break;}
                        case 3:
            {   for(int i=0;i<nrecords;++i)
                for(int k=0;k<nrecords-1;++k)
              if(strcmp(records[k].TerminFirma, records[k+1].TerminFirma) > 0)swap(records[k], records[k+1]);
                break;}
            case 4:
            {   for(int i=0;i<nrecords;++i)
                for(int k=0;k<nrecords-1;++k)
              if(strcmp(records[k].TerminZamovnuk, records[k+1].TerminZamovnuk) > 0)swap(records[k], records[k+1]);
                break;}
                      case 5:
            {   for(int i=0;i<nrecords;++i)
                for(int k=0;k<nrecords-1;++k)
              if(strcmp(records[k].Nadbavka, records[k+1].Nadbavka) > 0)swap(records[k], records[k+1]);
                break;}
                        case 6:
            {   for(int i=0;i<nrecords;++i)
                for(int k=0;k<nrecords-1;++k)
              if(strcmp(records[k].VartistMaterialy, records[k+1].VartistMaterialy) > 0)swap(records[k], records[k+1]);
                break;}
                        case 7:
            {   for(int i=0;i<nrecords;++i)
                for(int k=0;k<nrecords-1;++k)
              if(strcmp(records[k].PidsymkovaSum, records[k+1].PidsymkovaSum) > 0)swap(records[k], records[k+1]);
                break;}
            }}}

Часть 2
void ProsmotrBD()//ProsmotrBD
{   if(!records)
    {   clrscr();
        printf("\nNet zapisi, nazhmite lubyu klavishy.");
        getch();}
    else
    {   int loop = 1;
        int n = 0;
        while(loop == 1)
        {   clrscr();
            OutputTable(n, 20);
            printf("\n\nNazhmite vverx dlia peredvizhenie vverx, vniz dlia peredvizhenia vniz,\n <Esc> dlia vozvrata v menu.");
            int c = getch();
            switch(c)
            {   case 72: --n;break;
                case 80: ++n;break;
                case 27: loop = 0;break;
                default:break;}
            if(n < 0) n = 0;
            if(n >= nrecords - 10) n = nrecords - 10;}}}
int ChooseRecord()//ViborZapisi
{   int choice = -1;
    if(!records)
    {   clrscr();
        printf("\nNet zapisi, nazhmite lubyu klavishy.");
        getch();}
    else
    {   int loop = 1;
        int n = 0;
        while(loop == 1)
        {   clrscr();
            printf("N: |Zamov|Posluga|Vartist|TerminFirma|TerminZamovnuk|Nadbavka|VartistMaterialy|PidsymkovaSum\n");
            printf("\n%d", n + 1);
            OutputRecord(records[n]);
            printf("\n\nNazmite vverx dlia prosmotra sledyushei zapisi, vniz dlia prosmotra predidyshei,\n<Esc> to return to menu, <Enter> to choose record.");
            int c = getch();
            switch(c)
            {   case 72: ++n;break;
                case 80: --n;break;
                case 27: loop = 0;break;
                case 13: loop = 0;choice = n;break;
                default:break;}
            if(n < 0) n = nrecords - 1;
            if(n >= nrecords) n = 0;}}
    return choice;}
void EditRecord()//RedaktirovanieZapisi
{   int c = ChooseRecord();
    if(c>=0 && c<nrecords)
    {   printf("\n\nVi yvereni shto xotite to reinput this zapis?");
        if(YesNoDialog() == 13)
        {InputRecord(records[c]);}}}
void DeleteRecord()//Ydalenie zapisi
{   int c = ChooseRecord();
    if(c>=0 && c<nrecords)
    {   printf("\n\nVi yvereni?chto xotite ydalit ety zapis?");
        if(YesNoDialog() == 13)
        {   --nrecords;
            if(nrecords <= 0)
            {   delete[] records;
                records = 0;}
            else{   record * newrecords = new record[nrecords];
                int k = 0;
                for(int i=0;i<nrecords+1;++i)
                {if(i!=c)       {   newrecords[k] = records[i];
                        ++k;}}
                delete[] records;
                records = newrecords;}}}}
void CreateBD()//SozdanieBD
{   if(records)
    {   clrscr();
        printf("Baza dannix ne soxranena!Xotite soxranit ee?");
        if(YesNoDialog() == 13) SaveBD();
        delete[] records;}
    do{ printf("Input novyu zapis:\n");
        AddRecord();
        printf("\n\nXotite prodolzhit?");}
    while(YesNoDialog() !=27);}
void SaveBD()//SoxranenieBD
{   if(!records)
    {   clrscr();
        printf("\nNechego to save!!! ,nazhmite lubyu klavishy.");
        getch();
        return;}
    FILE * m_fp=fopen(FileDialog(), "wb");
    if(m_fp)
    {   //Header
        fwrite("Baza_dann",1,9,m_fp);
        //Number of records
        fwrite(&nrecords, 1, sizeof(long int), m_fp);
        record * r = records;       //Records
        for(int i=0;i<nrecords;++i)
        {       fwrite(&(r->Zamov), 1, sizeof(long int), m_fp);
                        fwrite(&(r->Posluga), 1, STR_SIZE - 1, m_fp);
            fwrite(&(r->Vartist), 1,STR_SIZE - 1, m_fp);
            fwrite(&(r->TerminFirma), 1,STR_SIZE - 1, m_fp);
            fwrite(&(r->TerminZamovnuk), 1,STR_SIZE - 1, m_fp);
                        fwrite(&(r->Nadbavka), 1,STR_SIZE - 1, m_fp);
                        fwrite(&(r->VartistMaterialy), 1,STR_SIZE - 1, m_fp);
                        fwrite(&(r->PidsymkovaSum), 1,STR_SIZE - 1, m_fp);
            ++r;}
        fclose(m_fp);}
    else
    {   printf("\nNevozmozhno sozdat file!");
        getch();}}
void LoadBD()//ZagryzkaBD
{   if(records)
    {   clrscr();
        printf("Baza dannix ne soxranena!Xotite soxranit ee?");
        if(YesNoDialog() == 13) SaveBD();
        delete[] records;}
    FILE * m_fp=fopen(FileDialog(), "rb");
    if(m_fp)
    {   fseek(m_fp, 0, SEEK_SET);
        char header[10];
        fread(header,1,9,m_fp);
        header[9] = 0;
        char true_header[] = "Baza_dann";
        if(memcmp(header,true_header,9) != 0)
        {   printf("Wrong file format!!!");
            getch();
            return; }//Number of records
        fread(&nrecords, 1, sizeof(long int), m_fp);
        if(nrecords<0) nrecords = 0;
        records = new record[nrecords];
        record * r = records;
        for(int i=0;i<nrecords;++i)
        {       fread(&(r->Zamov), 1, sizeof(long int), m_fp);
                        fread(&(r->Posluga), 1, STR_SIZE - 1, m_fp);
            fread(&(r->Vartist), 1, STR_SIZE - 1, m_fp);
            fread(&(r->TerminFirma), 1, STR_SIZE - 1, m_fp);
            fread(&(r->TerminZamovnuk), 1, STR_SIZE - 1, m_fp);
                        fread(&(r->Nadbavka), 1, STR_SIZE - 1, m_fp);
                        fread(&(r->VartistMaterialy), 1, STR_SIZE - 1, m_fp);
                        fread(&(r->PidsymkovaSum), 1, STR_SIZE - 1, m_fp);
            ++r;}
        fclose(m_fp);}
    else                     
    {   printf("\nFile ne naiden");
        getch();}}
int Get(int min, long max)
{   int i = 0;
    fscanf(stdin, "%d", &i);
    fflush(stdin);
    while ((i==0)||(i>max)||(i<min))
    {   cprintf("Neverniy vvod, povtorite popitku (%d - %d): ", min,max);
        fscanf(stdin, "%d", &i);
        fflush(stdin);  }
    return i;}