Code Optimization

[Luckie]

The class could look like this:

Delphi-Quellcode:

TXyz = class
private
  FFile: TFileStream;
public
  property XyzFile: TFileStream read FFile write FFile;
  procedure AddData(...);
  procedure InsertData(...);
end;