роблема с созданием объекта динамического массива Класса

[GDA230105]

Пишу в С++Builder 6. При работе программы вылетает ошибка на строке BookS[kolvo] = Buf; //Внесение данных в динамический массив..
Ошибка следующего содержания: Project BookZ.exe raised exception class EAccessViolation with message 'Access violation at sddress 400068A4 in module 'rtl60.bpl'. Write of address 00000000'. Process stopped. Use Step or Run to continue.
Подскажите выход из ситуации- в чем ошибка и как исправить?

функция класса:

void Tlibrary_list::AddBook (const AnsiString way_to_the_book,const AnsiString way_to_the_cover,const AnsiString name,const AnsiString author,const AnsiString publishing_house,const int year_of_publication,const int pages,const AnsiString language)
{
TBookS Buf; //Временный объект хранения данных по книге
Buf.way_to_the_book=way_to_the_book; //Путь к книге
Buf.way_to_the_cover=way_to_the_cover; //Путь к обложке
Buf.name=name; //Название
Buf.author=author; //Автор
Buf.publishing_house=publishing_house; //Издательство
Buf.year_of_publication=year_of_publication; //Год издания
Buf.pages=pages; //Кол-во страниц
Buf.language=language; //Язык
BookS = (TBookS*)ReallocMemory(BookS, (kolvo+1)*sizeof(Buf)); // переопределение размера массива
BookS[kolvo] = Buf; //Внесение данных в динамический массив
kolvo=kolvo+1; // кол-во книг в списке
}

Описание класса TBookS

class TBookS //Библиотечный перечень
{
public: // User declarations
TBookS(void); //Конструктор информации о книге
//Первичные данные
AnsiString way_to_the_book; //Путь к книге
AnsiString way_to_the_cover; //Путь к обложке
//подробности о книге
AnsiString name; //Название
AnsiString author; //Автор
AnsiString publishing_house; //Издательство
int year_of_publication; //Год издания
int pages; //Кол-во страниц
AnsiString language; //Язык
};

[Smitt&Wesson]

Эта ошибка возникает из-за того, что неверно организована инициализация класса.
Вы пытаетесь к элементам класса, обратиться как к элементам структуры.

Access violation at sddress 400068A4 in module 'rtl60.bpl'. Write of address 00000000'

Билдер Вам сообщает, что вы пытаетесь обратиться к адресу - 400068A4, а фактически обращаетесь к 00000000.
Ниже дан пример правильной инициализации класса.

TBookS Buf = new TBookS(); //Временный объект хранения данных по книге
Buf->way_to_the_book=way_to_the_book ; //Путь к книге
.........................
delete Buf;

[p51x]

Билдер Вам сообщает, что вы пытаетесь обратиться к адресу - 400068A4

Уж точно не так... Это место, где возникл эксепшн, адрес команды

[Smitt&Wesson]

Сообщение от p51x

Уж точно не так... Это место, где возникл эксепшн, адрес команды

Да, да, точно. Теорию немного подзабыл.
Но метод устранения верен.