ViewVC Help

View File | Revision Log | View Changeset | Root Listing

root/Oni2/oup/current/Tools/TxmpReplace.pas

Comparing oup/current/Tools/TxmpReplace.pas (file contents):
Revision 204 by alloc, Sun May 27 20:03:41 2007 UTC vs.
Revision 206 by alloc, Sun May 27 23:31:26 2007 UTC

#	Line 41 | Line 41 | var
41
42		implementation
43		{$R *.dfm}
44	<	uses Main, ConnectionManager, ImagingTypes;
44	>	uses Main, ConnectionManager, ImagingTypes, TXMP;
45
46
47
#	Line 224 | Line 224 | end;
224
225
226		procedure TForm_TxmpReplace.FormCreate(Sender: TObject);
227	+	var
228	+	TXMP: TFile_TXMP;
229		begin
230		inherited;
231		OniImage_Old := TOniImage.Create;
#	Line 231 | Line 233 | begin
233		Self.AllowedExts := 'TXMP';
234		Self.OnNewFileSelected := SelectFile;
235		opend.Filter := saved.Filter;
236	+
237	+	TXMP := TFile_TXMP.Create(ConnectionID, 8552);
238	+	TXMP.Free;
239		end;
240
241

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines (old)
>	Changed lines (new)