Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Аватара для Netscaper

Пользователь


Сообщения: 84
Благодарности: 0

Профиль | Отправить PM | Цитировать


Можно использовать TFileStream для чтения/записи данных. Можно стандартный ввод/вывод типа AssignFile, ReSet, ReWrite, BlockRead, BlockWrite и т.п.
Пример сохранения структуры Data в файл «data.dat» с помощью потока TFileStream:
Код: Выделить весь код
procedure TForm1.FormClick(Sender: TObject);
var F : TFileStream;
  Data : record
    A, B, C: Integer;
  end;
begin
  with Data do
  begin
    A := 2;
    B := 10;
    C := B - A;
  end;
  F := TFileStream.Create('data.dat', fmCreate);
  F.WriteBuffer(Data, sizeof(Data));
  F.Free;

end;
Насчёт базы данных. Зачем это надо, вообще? Можно подключить BDE (TTable, TQuery, TDatabase), ADO (TADOTable, TADOQuery, TADOConnection), Interbase (TIBTable, TIBQuery) и т.д. Много всяких баз можно подключить... Всё, конечно, зависит от цели подключения и возможностей

Отправлено: 11:16, 12-12-2004 | #2