Оператор "delete" и ошибка "_BLOCK_TYPE_IS_VALID(pHead->nBlockUse) Error"

class Person {
private:
    string name;
    string sname;
public:
    Person(char * n="Name",char * s="Surname") : name(n), sname(s) {}
    ~Person() {}
    virtual void Set();
    virtual void Show() const {
        cout << name << " " << sname << endl;
    }
};
 
class Gunslinger: virtual public Person {
private:
    int count;
protected:
    double Draw() const { return 3.14; }
public:
    Gunslinger(const int & a=0,char * n="Name",char * s="Surname") : Person(n,s), count(a) {}
    void Set();
    int GetCount() const {
        return count;
    }
    void Show() const {
        Person::Show();
        cout << "Количество насечек: " << count << endl;
        cout << "Время приведения в боеготовность: " << Draw() << " секунды." << endl;
    }
};
 
struct Card {
    short name;
    char * suit;
};
class Deck {
private:
    Card Cards[52];
    static char * suits[4];
public:
    Deck();
    Card randomcard() const { return Cards[rand()%51]; }
    friend ostream & operator<<(ostream & os, const Card & C);
};
 
class PokerPlayer : virtual public Person {
private:
    Deck D;
protected:
    Card Draw() const { return D.randomcard(); }
public:
    PokerPlayer(char * n="Name",char * s="Surname") : D(), Person(n,s) {}
    void Set();
    void Show() const { 
        Person::Show();
        cout << Draw();
    }
};
class BadDude: public Gunslinger, public PokerPlayer {
private:
    double Gdraw() const { return Gunslinger::Draw(); }
    Card Cdraw() const { return PokerPlayer::Draw(); }
public:
    BadDude(const int & a=0,char * n="Name",char * s="Surname") : Person(n,s), Gunslinger(a,n,s), PokerPlayer(n,s) {}
    void Set();
    void Show() const {
        Person::Show();
        cout << "Количество насечек: " << Gunslinger::GetCount() << endl;
        cout << "Время приведения в боеготовность: " << Gdraw() << " секунды." << endl;
        cout << "Карта: " << Cdraw() << endl;
    }
};

char * Deck::suits[4]={"spades","clubs","diamonds","hearts"};
 
Deck::Deck() {
    srand(time(NULL));
    int t=2, s=0;
    for(int i=0;i<52;i++,t++) {
        if(t==15) {
            t=2;
            s++;
        }
        Cards[i].name=t;
        Cards[i].suit=suits[s];
        }
};
 
ostream & operator<<(ostream & os, const Card & C) {
    cout << C.name << " of " << C.suit << endl;
    return os;
}
void Person::Set() {
    cout << "Введите имя: ";
    getline(cin,name);
    cout << "Введите фамилию: ";
    getline(cin,sname);
}
void Gunslinger::Set() {
    Person::Set();
    cout << "Введите количество насечек: ";
    cin >> count;
}
void PokerPlayer::Set() {
    Person::Set();
}
void BadDude::Set() {
    Gunslinger::Set();
}

void main() {
setlocale(LC_ALL,"Russian");
 
Person * Guys[5]; 
int ct; 
for (ct=0;ct<5;ct++) 
{ 
char choice; 
cout << "Enter the guy category:\n"
<< "p: person g: gunslinger " 
<< "o: pokerplayer b:baddude q: quit\n";
cin >> choice; 
while (strchr("pgobq", choice) == NULL) 
{ 
cout << "Please enter a p, g, o, b or q: "; 
cin >> choice; 
} 
if (choice == 'q') 
break; 
switch(choice) 
{ 
case 'p': Guys[ct] = new Person; 
break; 
case 'g': Guys[ct] = new Gunslinger; 
break; 
case 'o': Guys[ct] = new PokerPlayer;
break;
case 'b': Guys[ct] = new BadDude;
break;
} 
cin.get(); 
Guys[ct]->Set(); 
} 
cout << "\nHere is your staff:\n"; // вывод списка работников 
int i; 
for(i=0;i<ct;i++) 
{ 
cout << endl;
cout << "Объект № " << i+1 << ":\n\n";
Guys[i]->Show(); 
}
for(i=0;i<ct;i++)
delete Guys[i];
cout << "\nDone!\n\n";
}