ViewVC Help

View File | Revision Log | View Changeset | Root Listing

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

Comparing oup/current/Tools/Template.pas (file contents):
Revision 51 by alloc, Sat Dec 23 22:16:42 2006 UTC vs.
Revision 53 by alloc, Sat Dec 23 23:36:07 2006 UTC

#	Line 83 | Line 83 | procedure TForm_ToolTemplate.RecreateLis
83		var
84		i:    LongWord;
85		exts: TStringArray;
86	–	f, c1,c2: Int64;
87	–	time1,time2,time3: Double;
86		begin
89	–	QueryPerformanceFrequency(f);
90	–	QueryPerformanceCounter(c1);
87		combo_extension.Items.Clear;
88		combo_extension.Items.Add('_All files_ (' +
89		IntToStr(OniDataConnection.GetFilesCount) + ')');
#	Line 101 | Line 97 | QueryPerformanceCounter(c1);
97		end;
98		end else
99		combo_extension.Items.Add(exts[i]);
104	–	QueryPerformanceCounter(c2);
105	–	time1 := (c2 - c1) / f;
100		combo_extension.ItemIndex := 0;
101		combo_extensionClick(Self);
108	–	QueryPerformanceCounter(c1);
109	–	time2 := (c1 - c2) / f;
110	–	ShowMessage(FloatToStr(time1) +#13+#10+ FloatToStr(time2));
102		end;
103
104

Diff Legend

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