Повреждена куча при работе с динам. памятью. Почему? Как исправить?

/*
Задание:
Описать базовый класс СТРОКА
Обязательные поля класса:
# Указатель на char - хранит адрес динамически выделенной памяти для размещения символов строки;
# Значение типа int - хранит длину строки в байтах;
Обязательные методы:
# Конструктор без параметров;
# Конструктор, принимающий в качестве параметра С-строку (заканчивается нулевым байтом);
# Конструктор, принимающий в качестве параметра символ;
# Конструктор копирования;
# Получение длины строки;
# Очистка строки (сделать строку пустой);
# Деструктор.
 
Описать производный от СТРОКА класс БИТОВАЯ_СТРОКА
Строки данного класса могут содержать только символы '0' и '1'. Если в составе инициализирующей строки будут встречены любые символы,
отличные от допустимых, БИТОВАЯ_СТРОКА принимает нулевое значение. Содержимое данных строк рассматривается как двоичное число.
Отрицательные числа хранятся в дополнительном коде.
Обязательные методы:
# Конструктор без параметров;
# Конструктор, принимающий в качестве параметра С-строку (заканчивается нулевым байтом);
# Конструктор копирования;
# Деструктор;
# Изменение знака на противоположный (перевод числа в дополнительный код).
 
Переопределить следующие операции (длина строки результата равна длине большей из строк; в случае необходимости
более короткая битовая строка расширяется влево знаковым разрядом):
# Присваивание (=);
    # Сложение (+) - арифметическая сумма строк;
# Операция (==) - проверка на равенство.
Разроботчик вправе вводить любое (с обоснованием необходимости) число дополнительных полей и методов.
 
Написать тестовую программу, которая
    # Динамически выделяет массив указателей на базовый класс (4-6);
    # В режиме диалога заполняет этот массив указателями на производные классы,
при этом экземпляры производных классов создаются динамически с заданием начальных значений;
    # Для созданных экземпляров производных классов выполняет проверку всех разработанных методов 
    с выводом исходных данных и результатов на дисплей.
Для конструкторов копирования каждого класса предусмотреть диагностическую печать количества его вызовов 
в определенное место дисплея
(рекомендуется использовать статические члены класса).
Режим диалога обеспечивается с помощью иерархического меню.
*/
 
#include <stdio.h>
#include <locale.h>
#include <conio.h>
#include <string.h>
#include <iostream>
using namespace std;
 
int GetLen(char *str);
 
class Cstring
{
protected:
    char *STRpointer;   // хранит адрес динамически выделенной памяти для размещения символов строки;
    int length;         // хранит длину строки в байтах;
    
public:
    Cstring(){
        printf ("Cstring()\n");
        STRpointer = new char;
        *STRpointer = '\0';
        length = sizeof(char);      
    }
    
    Cstring(char *strInit); // Конструктор, принимающий в качестве параметра С-строку (заканчивается нулевым байтом)
    Cstring(char chInit);   // Конструктор, принимающий в качестве параметра символ
    Cstring(const Cstring &Obj);        // Конструктор копирования
 
// Вывод строки на экран
    void GetStr(){
        printf ("Строка: %s\n", STRpointer);
    }
 
// Получение длины строки
    void GetLength(){
        printf ("Строка длинной %d занимает %d байт \n", length/sizeof(char), length);
    }
 
// Очистка строки (сделать строку пустой);  
    void Clrstr(){
        STRpointer[0] = '\0' ;
    }
 
    ~Cstring(){ 
    delete [] STRpointer; 
    }
};
 
Cstring::Cstring(char *strInit){
    printf ("Cstring(char *strInit)\n");
    int size = GetLen(strInit); // получаем размер инициализирующей строки
    length = sizeof(char)*size;     // записываем размер строки в байтах
    STRpointer = new char [length];
    if (STRpointer == NULL) 
    {   
        printf ("\nПамять не выделена\n"); 
        getch();
    }
    strcpy(STRpointer, strInit);
}
 
Cstring::Cstring (char chInit){
    printf ("Cstring(char chInit)\n");
    STRpointer = new char;
    if (STRpointer == NULL) 
    {   
        printf ("\nПамять не выделена\n"); 
        getch();
    }
    
    *STRpointer = chInit;
    length = sizeof(char);
}
 
Cstring::Cstring(const Cstring &Obj){
    printf ("Cstring(const Cstring &Obj)\n");
    STRpointer = new char [Obj.length];
    length = Obj.length;
    strcpy(STRpointer, Obj.STRpointer);
}
 
 
 
class BString: public Cstring
{
public:
    bool BoolCheck(); // Проверка строки на бинарность
    void MakeTwosComplement();  // Перевод числа в дополнительный код
    
//  BString operator+ (BString op2);    // арифметическая сумма строк
    BString operator= (BString op2);    // присваивание
    bool operator== (BString op2);  // проверка на равенство
    
//  Конструктор без параметров
    BString(): Cstring() { printf ("BString()\n");  }
    
// Конструктор, принимающий в качестве параметра С-строку (заканчивается нулевым байтом)   
    BString ( char *strInit ): Cstring (strInit)    {
        printf ("BString(char *strInit)\n");
        if ( BoolCheck()==0 ) /*Если строка не является двоичной - обнуляем*/
        {
        *STRpointer = '\0';
        length = sizeof(char);
        }
    }   
    
// Конструктор копирования
    BString::BString(const BString &Obj): Cstring (Obj) 
    { 
        printf ("BString(const BString &Obj)"); 
    } 
    
};
 
bool BString::BoolCheck(){
    int size = length / sizeof(char);
    
    // В ASCII: 0 - 48, 1 - 49
    for (int i=0; i < size-1; i++)
    {
        if ( STRpointer[i] != 48 &&  STRpointer[i] != 49) 
            return 0; // Строка не двоичная         
    }
    
    return 1; // Строка двоичная
}
 
void BString::MakeTwosComplement()
{
    int size = length / sizeof(char);
    if(STRpointer[0] == 48) return;
    
//  Инвертирование
    if(STRpointer[0] == 49)
    {
        for (int i = 1; i < size-1; i++)
        {
            if (STRpointer[i] == 48) STRpointer[i] = 49;
            else 
                if (STRpointer[i] == 49) STRpointer[i] = 48;
        }
    }
// Прибавление единицы (инвертируем числа двигаясь с конца к началу, пока не встретим 0)
    for (int i=size-1; i>0; i--)
    {
        if (STRpointer[i] == 48) 
        {
            STRpointer[i] = 49;
            return;
        }
        
        if (STRpointer[i] == 49) STRpointer[i] = 48;
    }
}
 
BString BString::operator= (BString op2)
{
    int size = op2.length / sizeof(char);
    char *temp = new char[size];
    strcpy(temp, op2.STRpointer);
    delete [] STRpointer;
    STRpointer = temp;
 
    return *this;
}
 
//BString BString::operator+ (BString op2)
//{
//  int size1 = length / sizeof(char);
//  int size2 = op2.length / sizeof(char);
//  if (size1 >= size2) 
//      char *temp = new char[size1];
//  if (size1 < size2) 
//      char *temp = new char[size2];
//  // недописано
//}
 
bool BString::operator== (BString op2)
{
    int size1 = length / sizeof(char);
    int size2 = op2.length / sizeof(char);
    
    if (size1 != size2) return 0;
    
    for (int i=0; i < size1-1; i++)
    {
        if (STRpointer[i] != op2.STRpointer[i]) return 0;
    }
    
    return 1;
}
 
int main ()
{
    setlocale (LC_ALL, "Russian");
    
    BString str1;
    BString str2("10001");
    BString str3("11011");
 
 
    str1.GetStr();
    str1.GetLength();
 
    str2.GetStr();
    str2.GetLength();
    str3.GetStr();
    str3.GetLength();
 
    str1=str3;
 
    str1.GetStr();
    str2.GetStr();
    str3.GetStr();
 
    getch();
    return 0;
}
 
int GetLen(char *str){
    int i=0;
    for( ; str[i]!='\0' ; i++);
    return i+1;
}