--- oup/current/Tools/TxmpReplace.pas	2007/05/27 23:31:26	206
+++ oup/current/Tools/TxmpReplace.pas	2007/06/04 22:07:29	209
@@ -233,9 +233,6 @@ begin
   Self.AllowedExts := 'TXMP';
   Self.OnNewFileSelected := SelectFile;
   opend.Filter := saved.Filter;
-
-  TXMP := TFile_TXMP.Create(ConnectionID, 8552);
-  TXMP.Free;
 end;