WhiteUnicorn

	#WhiteUnicorn/ StartPage/ Documentation/DelphiFAQ >

Frequently Asked Questions

How can I assign a file variable in a Record?

Question:

How can I assign a file variable in a Record?

Answer:

While the Object Pascal language does not allow a direct assignment
of a file variable, you can use the Move() procedure to move the
contents of the variable to another variable. Note: If you save the
record to a file for recall at a later date, you will need to
re-initialize the file variable.

Example:

  TMyRec = Record
    f : file;
    OtherField : integer;
  end;

procedure TForm1.Button1Click(Sender: TObject);
var
  f : file;
  MyRec : TMyRec;
begin
  AssignFile(f, 'SomeFile.txt');
 {This line will not compile}
  MyRec.f := f;
 {This line will!}
  Move(f, MyRec.f, sizeof(f));
  Rewrite(MyRec.f);
  CloseFile(MyRec.f);
end;

	#WhiteUnicorn/ StartPage/ Documentation/DelphiFAQ >

	Anastasija aka WhiteUnicorn	LiveJournal PhotoFile