Удаление элемента односвязного списка бинарного файла

#pragma once
#include <iostream>
#include <fstream>
using namespace std;
class bin_file : public fstream
{
private:
    int next;
    int length;
    char *str;
public:
    static char *name_list;
    void set_elem(char *_str);
    void add_elem();
    void show_list();
    void add_txtfile(char * name_file);
    void create_txtfile(char *name_file);
    bin_file() :fstream() {};
    bin_file(const char *name, int p) :fstream(name, ios::in | ios::out | ios::binary)
    {
        int i = 0;
        if (p == 0)
        {
            write(name_list, strlen(name_list));
            write((char *)&i, 4); //указатель на след
            write((char *)&i, 4);//длина строки
        }
    };
};
void bin_file::set_elem(char *_str)
{
    length = strlen(_str);
    next = 0;
    str = _strdup(_str);
};
void bin_file::add_elem()
{
    seekp(7, ios::beg);//длина первого элемента
    int first_lng = 0;
    read((char *)&first_lng, 4);
    if (first_lng == 0) { //список пуст
        seekp(3, ios::beg);//первый элемент
        write((char *)&next, 4);//файловый указатель на след элемент
        write((char *)&length, 4);//длина строки
        write(str, length);//строка
    }
    else
    {
        seekp(3, ios::beg);
        int _next;
        int _length;
        do {
            read((char *)&_next, 4);//указ на след
            read((char *)&_length, 4);//указ на след
            int _pos = tellp();//текущая позиция
            if (_next == 0) {
                seekp(_pos - 8, ios::beg);//позиция на указатель
                int tmp_point = _pos + _length;
                write((char *)&tmp_point, 4);//пишем адрес позиции следующего
                seekp(tmp_point, ios::beg);//указ на записываемый элемент
                write((char *)&next, 4);//файловый указатель на след элемент
                write((char *)&length, 4);//длина строки
                write(str, length);//строка
                break;
            }
            seekp(_next);
        } while (1);
    }
};
void bin_file::show_list()
{
    int _next;
    int _length;
    char *strout;
    seekp(3, ios::beg);//заголовок
    do
    {
        read((char *)&_next, 4);//next
        read((char *)&_length, 4);
        strout = new char[_length];
        read(strout, _length);
        cout << endl;
        for (int _i = 0; _i<_length; _i++)
            cout << strout[_i];
        seekp(_next);
    } while (_next != 0);
    cout << endl;
};
void bin_file::add_txtfile(char *name_file)
{
    ifstream mystr(name_file);
    if (!out) { //проверка создания файла
        cout << "Нельзя открыть файл" << endl;
        return;
    }
    int _k = 0;
    char word[64];
    while (!mystr.eof())
    {
        mystr >> word;
        set_elem(word);
        add_elem();
    }
};
void bin_file::create_txtfile(char *name_file)
{
    ofstream out(name_file);
    if (!out) { //проверка создания файла
        cout << "Нельзя создать файл" << endl;
        return;
    }
    int _next;
    int _length;
    char *strout;
    seekp(3, ios::beg);//заголовок
    do {
        read((char *)&_next, 4);//next
        read((char *)&_length, 4);
        strout = new char[_length];
        read(strout, _length);
        strout[_length] = '\0';
        //for(int _i=0;_i<_length;_i++)
        out << strout << " ";
        seekp(_next);
    } while (_next != 0);
};

#include "redactor.h"
#include <conio.h>
#include <time.h>
#include <iomanip>
#include <fstream>
#include <iostream>
char * bin_file::name_list = "bin";
int main()
{
    setlocale(LC_ALL, "rus");
    bin_file *file;
    try {
        while (1)
        {
            system("cls");
            cout << "1. Открыть поток с новым файлом" << endl;
            cout << "2. Открыть поток с созданным файлом" << endl;
            cout << "3. Добавить элемент" << endl;
            cout << "4. Удалить элемент" << endl;
            cout << "5. Показать список" << endl;
            cout << "6. Запись из текстового в двоичный файл" << endl;
            cout << "7. Считывание из двоичного в текстовый файл" << endl;
            cout << endl;
            switch (_getch())
            {
            case '1':
            {
                file = new bin_file("test.bin", 0);
                if (!file)
                    throw 1;
                else
                    cout << "Поток открыт" << endl;
                system("pause");
                break;
            }
            case '2':
            {
                file = new bin_file("test.bin", 1);
                if (!file)
                    throw 1;
                else
                    cout << "Поток открыт" << endl;
                system("pause");
                break;
            }
            case '3':
            {
                char _ch[100];
                cout << "Введите строку: ";
                cin.getline(_ch, 100);
                file->set_elem(_ch);
                file->add_elem();
                break;
            }
            case '5':
            {
                file->show_list();
                system("pause");
                break;
            }
            case '6':
            {
                long t1 = clock();
                file->add_txtfile("file.txt");
                long t2 = clock();
                cout << "Файл записан" << endl;
                cout << "Затраченое время на запись: " << t2 - t1 << endl;
                system("pause");
                break;
            }
            case '7':
            {
                file->create_txtfile("out_file.txt");
                cout << "Файл считан";
                break;
            }
            case '0':
            {
                return 0;
            }
            }
        }
    }
    catch (int)
    {
        cerr << "Файл не найден";
    };
    _getch(); return 0;
}