Как можно удалить запись из середины нетепизированного файла?

← →
Baks (2010-05-12 20:29) [0]

Подскажите как можно удалить запись из середины нетепизированного файла. Аналог базы данных. Для записи использую функции:

var F: File;

AssignFile(F, FName);
Reset(F, 1);
Seek(F, );
Write(F, Data, SizeOf(Data));
CloseFile(F);

Можно ли с их помощью это выполнить?

← →
turbouser © (2010-05-12 20:39) [1]

> Baks (12.05.10 20:29)

> Аналог базы данных.

При удалении записи из таблицы в БД в файле ничего не удаляется. Просто место, которое занимала запись помечается как не используемое и занимается позднее другими данными. "Физически" данные в файле БД удаляются при упаковке.

← →
turbouser © (2010-05-12 20:40) [2]

> Baks (12.05.10 20:29)

> Можно ли с их помощью это выполнить?

Можно. Перезаписью в другой файл.

← →
test © (2010-05-12 22:12) [3]

Baks (12.05.10 20:29)
1 Считай файл
2 Проверь та ли эта запись?(*которую надо удалить*)
3 пропусти запись структуры которую надо удалить.
4 ???
5 PROFIT

> Baks (12.05.10 20:29)

> нетепизированного файла
> Write(F, Data, SizeOf(Data));

Судя по этому оператору, похоже, что файл все же типизированный (то есть, с фиксированным размером записи). Значит, так его и надо объявлять.

Как можно удалить запись из середины нетепизированного файла? Найти похожие ветки