Ошибка: Доступ не к тому адресу

[CodeNOT]

В общем при добавлении новой запись мне выдается следующая ошибка:
Project Project1.exe raised exception class EAccessViolation with mewssage 'Access violation at address 0040955B in module 'Project1.exe'.Write of address 00000024'.Process stopped.Use Step or Run to continue.
Как я понял, он записал в непонятный для себя адрес, но как это исправить я не знаю. Причем тестировал на косоле - все работает, вот собственно код.
считывание из едитов строк:

void __fastcall TForm2::Button1Click(TObject *Sender)
{
string nn=(Edit1->Text).c_str();
string nsur=(Edit2->Text).c_str();
string no=(Edit3->Text).c_str();
string ns=(Edit4->Text).c_str();
string nh=(Edit5->Text).c_str();
string nr=(Edit6->Text).c_str();
string np=(Edit7->Text).c_str();
main->AddPeople(ns,nh,np,nn,nsur,no,nr);

}

Подключение самого модуля создание указателя на класс:

#include "modphone.cpp"
#include "Unit1.h"
#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
Main *main=new Main();

Функция добавления:

string AddPeople(string ns,string nh,string np,string nn,string nsur,string no,string nr){
                        bool flag=false;
                        if(ns!=""&&nh!=""&&np!=""&&nn!=""&&nsur!=""&&no!=""&&nr!=""){
                                flag=true;
                                n++;
                                general[n]=new CPeople(ns,nh,np,nn,nsur,no,nr);
                                peoples++;
                        }
                                if(!flag) return "\n ERROR ";
                                else return "\n PEOPLE ADD ";
                }

general - это указатель на класс предок, я его создал в конструкторе Main();

Конструктор добавления в СPeople:

        CPeople(string nstreet,string nhouse,string nphone,string nname,string nsurname,string notch,string nroom):CGeneral(nstreet,nhouse,nphone){
                NAME=nname;
                SURNAME=nsurname;
                OTCH=notch;
                ROOM=nroom;
        }

Конструктор добавления в CGeneral:

 CGeneral::CGeneral(string nstreet,string nhouse,string nphone){
                STREET=nstreet;
                HOUSE=nhouse;
                PHONE=nphone;
        }

Делал точку останова, смотрел какие значения принимают переменные, все верно, а из-за чего ошибка выскакивает я не знаю(

[UltimaBeaR]

узнай после выполнения какой строчки кода вылезает это сообщение (либо как-то останови после вылазения ошибки, либо сделай вначале точку останова и по шагам проходи пока не вылезет). Сам эксепшн это ошибка доступа к памяти - значит что ты пытаешся писать память в адреса которые помечены как только для чтения - это означает что у тебя в коде ошибки работы с памятью