пример с рекордами содержит немало строчек, я сейчас занят, поэтому дам способ полегче: создаёш новый класс от TComponent, затем при помощи TFileStream сохранить этот класс-компонент в файл, получится бинарник с информацией. сохраняются свойства из секции Published класса, сохраняй использую функцию WriteComponent и чтение ReadComponent, если посидеть немного над функцией то можно разобратся
|