--- oup/current/FileClasses/TXAN.pas	2007/06/12 17:35:56	214
+++ oup/current/FileClasses/TXAN.pas	2007/06/12 20:31:54	215
@@ -7,9 +7,6 @@ uses
 
 type
   TFile_TXAN = class(TFile)
-    protected
-      procedure InitDatLinks; override;
-      procedure InitRawList; override;
     public
       procedure InitDataFields; override;
   end;
@@ -55,26 +52,5 @@ begin
 end;
 
 
-procedure TFile_TXAN.InitDatLinks;
-var
-  links: Integer;
-  i: Integer;
-begin
-  ConManager.Connection[FConnectionID].LoadDatFilePart(FFileID, $1C, SizeOf(links), @links);
-  SetLength(FDatLinks, links);
-  for i := 0 to links - 1 do
-  begin
-    FDatLinks[i].SrcOffset := $20 + $4 * i;
-    FDatLinks[i].DestID := GetDatLinkValue(FFileStream, FDatLinks[i].SrcOffset);
-    FDatLinks[i].PosDestExts := 'TXMP';
-  end;
-end;
-
-
-procedure TFile_TXAN.InitRawList;
-begin
-  SetLength(FRawParts, 0);
-end;
-
 end.