ViewVC Help

View File | Revision Log | View Changeset | Root Listing

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

Comparing oup/current/Tools/Template.pas (file contents):
Revision 109 by alloc, Wed Feb 21 03:12:33 2007 UTC vs.
Revision 113 by alloc, Sun Feb 25 17:20:22 2007 UTC

#	Line 152 | Line 152 | begin
152		begin
153		combo_extension.Items.Add('_All files_ (' +
154		IntToStr(ConManager.Connection[FConnectionID].GetFileCount) + ')');
155	+	exts := nil;
156		exts := ConManager.Connection[FConnectionID].GetExtensionsList(EF_ExtCount);
157		for i := 0 to exts.Count - 1 do
158		if Length(FAllowedExts) > 0 then
#	Line 176 | Line 177 | var
177		no_zero_bytes: Boolean;
178		pattern: String;
179		files: TStrings;
179	–	i: Integer;
180		begin
181		if FConnectionID > -1 then
182		begin
#	Line 191 | Line 191 | begin
191		else
192		Extension := '';
193
194	+	files := nil;
195		files := ConManager.Connection[FConnectionID].GetFilesList(extension, pattern, no_zero_bytes, FSortBy);
196
197		filelist.Visible := False;
#	Line 282 | Line 283 | end;
283		procedure TForm_ToolTemplate.combo_connectionChange(Sender: TObject);
284		var
285		name: String;
285	–	nstart, nend: Integer;
286	–	i: Integer;
286		begin
287		if combo_connection.ItemIndex >= 0 then
288		begin

Diff Legend

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