• R/O
  • HTTP
  • SSH
  • HTTPS

Commit

Tags
Keine Tags

Frequently used words (click to add to your profile)

javac++androidlinuxc#windowsobjective-ccocoa誰得qtpythonphprubygameguibathyscaphec計画中(planning stage)翻訳omegatframeworktwitterdomtestvb.netdirectxゲームエンジンbtronarduinopreviewer

ギコナビ


Commit MetaInfo

Revisionba2e8620e782ea11486a85061e686aeafe3ebefb (tree)
Zeit2005-11-21 23:58:01
Autorcvs2git <cvs2git>
Commitercvs2git

Log Message

This commit was manufactured by cvs2svn to create tag 'v1_51_0_618'.

Ändern Zusammenfassung

Diff

--- /dev/null
+++ b/Doxyfile
@@ -0,0 +1,224 @@
1+# Doxyfile 1.4.5
2+
3+#---------------------------------------------------------------------------
4+# Project related configuration options
5+#---------------------------------------------------------------------------
6+PROJECT_NAME = gikonavi
7+PROJECT_NUMBER = b51
8+OUTPUT_DIRECTORY =
9+CREATE_SUBDIRS = NO
10+OUTPUT_LANGUAGE = Japanese
11+USE_WINDOWS_ENCODING = NO
12+BRIEF_MEMBER_DESC = YES
13+REPEAT_BRIEF = YES
14+ABBREVIATE_BRIEF =
15+ALWAYS_DETAILED_SEC = NO
16+INLINE_INHERITED_MEMB = NO
17+FULL_PATH_NAMES = NO
18+STRIP_FROM_PATH =
19+STRIP_FROM_INC_PATH =
20+SHORT_NAMES = NO
21+JAVADOC_AUTOBRIEF = NO
22+MULTILINE_CPP_IS_BRIEF = NO
23+DETAILS_AT_TOP = NO
24+INHERIT_DOCS = YES
25+SEPARATE_MEMBER_PAGES = NO
26+TAB_SIZE = 2
27+ALIASES =
28+OPTIMIZE_OUTPUT_FOR_C = NO
29+OPTIMIZE_OUTPUT_JAVA = NO
30+BUILTIN_STL_SUPPORT = NO
31+DISTRIBUTE_GROUP_DOC = NO
32+SUBGROUPING = YES
33+#---------------------------------------------------------------------------
34+# Build related configuration options
35+#---------------------------------------------------------------------------
36+EXTRACT_ALL = YES
37+EXTRACT_PRIVATE = YES
38+EXTRACT_STATIC = YES
39+EXTRACT_LOCAL_CLASSES = YES
40+EXTRACT_LOCAL_METHODS = YES
41+HIDE_UNDOC_MEMBERS = NO
42+HIDE_UNDOC_CLASSES = NO
43+HIDE_FRIEND_COMPOUNDS = NO
44+HIDE_IN_BODY_DOCS = NO
45+INTERNAL_DOCS = NO
46+CASE_SENSE_NAMES = YES
47+HIDE_SCOPE_NAMES = NO
48+SHOW_INCLUDE_FILES = YES
49+INLINE_INFO = YES
50+SORT_MEMBER_DOCS = YES
51+SORT_BRIEF_DOCS = NO
52+SORT_BY_SCOPE_NAME = NO
53+GENERATE_TODOLIST = YES
54+GENERATE_TESTLIST = YES
55+GENERATE_BUGLIST = YES
56+GENERATE_DEPRECATEDLIST= YES
57+ENABLED_SECTIONS =
58+MAX_INITIALIZER_LINES = 30
59+SHOW_USED_FILES = YES
60+SHOW_DIRECTORIES = YES
61+FILE_VERSION_FILTER =
62+#---------------------------------------------------------------------------
63+# configuration options related to warning and progress messages
64+#---------------------------------------------------------------------------
65+QUIET = NO
66+WARNINGS = YES
67+WARN_IF_UNDOCUMENTED = YES
68+WARN_IF_DOC_ERROR = YES
69+WARN_NO_PARAMDOC = NO
70+WARN_FORMAT = "$file:$line: $text"
71+WARN_LOGFILE =
72+#---------------------------------------------------------------------------
73+# configuration options related to the input files
74+#---------------------------------------------------------------------------
75+INPUT =
76+FILE_PATTERNS = *.pas \
77+ *.dpr
78+RECURSIVE = YES
79+EXCLUDE =
80+EXCLUDE_SYMLINKS = NO
81+EXCLUDE_PATTERNS =
82+EXAMPLE_PATH =
83+EXAMPLE_PATTERNS =
84+EXAMPLE_RECURSIVE = NO
85+IMAGE_PATH =
86+INPUT_FILTER = pas2doxj.bat
87+FILTER_PATTERNS =
88+FILTER_SOURCE_FILES = YES
89+#---------------------------------------------------------------------------
90+# configuration options related to source browsing
91+#---------------------------------------------------------------------------
92+SOURCE_BROWSER = NO
93+INLINE_SOURCES = NO
94+STRIP_CODE_COMMENTS = YES
95+REFERENCED_BY_RELATION = YES
96+REFERENCES_RELATION = YES
97+USE_HTAGS = NO
98+VERBATIM_HEADERS = YES
99+#---------------------------------------------------------------------------
100+# configuration options related to the alphabetical class index
101+#---------------------------------------------------------------------------
102+ALPHABETICAL_INDEX = NO
103+COLS_IN_ALPHA_INDEX = 5
104+IGNORE_PREFIX =
105+#---------------------------------------------------------------------------
106+# configuration options related to the HTML output
107+#---------------------------------------------------------------------------
108+GENERATE_HTML = YES
109+HTML_OUTPUT = html
110+HTML_FILE_EXTENSION = .html
111+HTML_HEADER =
112+HTML_FOOTER =
113+HTML_STYLESHEET =
114+HTML_ALIGN_MEMBERS = YES
115+GENERATE_HTMLHELP = NO
116+CHM_FILE =
117+HHC_LOCATION =
118+GENERATE_CHI = NO
119+BINARY_TOC = NO
120+TOC_EXPAND = NO
121+DISABLE_INDEX = NO
122+ENUM_VALUES_PER_LINE = 4
123+GENERATE_TREEVIEW = NO
124+TREEVIEW_WIDTH = 250
125+#---------------------------------------------------------------------------
126+# configuration options related to the LaTeX output
127+#---------------------------------------------------------------------------
128+GENERATE_LATEX = NO
129+LATEX_OUTPUT = latex
130+LATEX_CMD_NAME = latex
131+MAKEINDEX_CMD_NAME = makeindex
132+COMPACT_LATEX = NO
133+PAPER_TYPE = a4wide
134+EXTRA_PACKAGES =
135+LATEX_HEADER =
136+PDF_HYPERLINKS = NO
137+USE_PDFLATEX = NO
138+LATEX_BATCHMODE = NO
139+LATEX_HIDE_INDICES = NO
140+#---------------------------------------------------------------------------
141+# configuration options related to the RTF output
142+#---------------------------------------------------------------------------
143+GENERATE_RTF = NO
144+RTF_OUTPUT = rtf
145+COMPACT_RTF = NO
146+RTF_HYPERLINKS = NO
147+RTF_STYLESHEET_FILE =
148+RTF_EXTENSIONS_FILE =
149+#---------------------------------------------------------------------------
150+# configuration options related to the man page output
151+#---------------------------------------------------------------------------
152+GENERATE_MAN = NO
153+MAN_OUTPUT = man
154+MAN_EXTENSION = .3
155+MAN_LINKS = NO
156+#---------------------------------------------------------------------------
157+# configuration options related to the XML output
158+#---------------------------------------------------------------------------
159+GENERATE_XML = NO
160+XML_OUTPUT = xml
161+XML_SCHEMA =
162+XML_DTD =
163+XML_PROGRAMLISTING = YES
164+#---------------------------------------------------------------------------
165+# configuration options for the AutoGen Definitions output
166+#---------------------------------------------------------------------------
167+GENERATE_AUTOGEN_DEF = NO
168+#---------------------------------------------------------------------------
169+# configuration options related to the Perl module output
170+#---------------------------------------------------------------------------
171+GENERATE_PERLMOD = NO
172+PERLMOD_LATEX = NO
173+PERLMOD_PRETTY = YES
174+PERLMOD_MAKEVAR_PREFIX =
175+#---------------------------------------------------------------------------
176+# Configuration options related to the preprocessor
177+#---------------------------------------------------------------------------
178+ENABLE_PREPROCESSING = YES
179+MACRO_EXPANSION = NO
180+EXPAND_ONLY_PREDEF = NO
181+SEARCH_INCLUDES = YES
182+INCLUDE_PATH =
183+INCLUDE_FILE_PATTERNS =
184+PREDEFINED =
185+EXPAND_AS_DEFINED =
186+SKIP_FUNCTION_MACROS = YES
187+#---------------------------------------------------------------------------
188+# Configuration::additions related to external references
189+#---------------------------------------------------------------------------
190+TAGFILES =
191+GENERATE_TAGFILE =
192+ALLEXTERNALS = NO
193+EXTERNAL_GROUPS = YES
194+PERL_PATH = /usr/bin/perl
195+#---------------------------------------------------------------------------
196+# Configuration options related to the dot tool
197+#---------------------------------------------------------------------------
198+CLASS_DIAGRAMS = YES
199+HIDE_UNDOC_RELATIONS = YES
200+HAVE_DOT = NO
201+CLASS_GRAPH = YES
202+COLLABORATION_GRAPH = YES
203+GROUP_GRAPHS = YES
204+UML_LOOK = NO
205+TEMPLATE_RELATIONS = NO
206+INCLUDE_GRAPH = YES
207+INCLUDED_BY_GRAPH = YES
208+CALL_GRAPH = NO
209+GRAPHICAL_HIERARCHY = YES
210+DIRECTORY_GRAPH = YES
211+DOT_IMAGE_FORMAT = png
212+DOT_PATH =
213+DOTFILE_DIRS =
214+MAX_DOT_GRAPH_WIDTH = 1024
215+MAX_DOT_GRAPH_HEIGHT = 1024
216+MAX_DOT_GRAPH_DEPTH = 0
217+DOT_TRANSPARENT = NO
218+DOT_MULTI_TARGETS = NO
219+GENERATE_LEGEND = YES
220+DOT_CLEANUP = YES
221+#---------------------------------------------------------------------------
222+# Configuration::additions related to the search engine
223+#---------------------------------------------------------------------------
224+SEARCHENGINE = NO
--- a/Giko.dfm
+++ b/Giko.dfm
@@ -1,6 +1,6 @@
11 object GikoForm: TGikoForm
2- Left = 176
3- Top = 124
2+ Left = 321
3+ Top = 67
44 HorzScrollBar.Visible = False
55 VertScrollBar.Visible = False
66 AutoScroll = False
@@ -104,7 +104,6 @@ object GikoForm: TGikoForm
104104 RightClickSelect = True
105105 ShowRoot = False
106106 TabOrder = 0
107- OnChanging = TreeViewChanging
108107 OnClick = TreeViewClick
109108 OnCollapsed = TreeViewCollapsed
110109 OnCustomDraw = TreeViewCustomDraw
@@ -126,12 +125,12 @@ object GikoForm: TGikoForm
126125 DesignSize = (
127126 145
128127 25)
129- object SpeedButton1: TSpeedButton
128+ object CabinetCloseSpeedButton: TSpeedButton
130129 Left = 121
131130 Top = 4
132131 Width = 20
133132 Height = 17
134- Hint = #38281#12376#12427
133+ Hint = #12461#12515#12499#12493#12483#12488#12398#34920#31034#29366#24907#12434#22793#26356#12377#12427
135134 Anchors = [akRight]
136135 Flat = True
137136 Font.Charset = SHIFTJIS_CHARSET
@@ -154,7 +153,7 @@ object GikoForm: TGikoForm
154153 ShowHint = True
155154 Spacing = 0
156155 Transparent = False
157- OnClick = CabinetPanelHide
156+ OnClick = CabinetCloseSpeedButtonClick
158157 end
159158 object ToolBar1: TToolBar
160159 Left = 2
@@ -194,20 +193,20 @@ object GikoForm: TGikoForm
194193 List = True
195194 ShowCaptions = True
196195 TabOrder = 2
197- object ToolButton15: TToolButton
196+ object HistoryShowToolButton: TToolButton
198197 Left = 0
199198 Top = 0
200199 AutoSize = True
201200 Caption = #34920#31034
202201 ImageIndex = 0
203202 end
204- object ToolButton18: TToolButton
203+ object HistoryAllClearToolButton: TToolButton
205204 Left = 40
206205 Top = 0
207206 AutoSize = True
208207 Caption = #20840#12463#12522#12450
209208 ImageIndex = 1
210- OnClick = ToolButton18Click
209+ OnClick = HistoryAllClearToolButtonClick
211210 end
212211 end
213212 object FavoriteTreeView: TTreeView
@@ -251,20 +250,20 @@ object GikoForm: TGikoForm
251250 List = True
252251 ShowCaptions = True
253252 TabOrder = 4
254- object ToolButton17: TToolButton
253+ object FavoriteAddToolButton: TToolButton
255254 Left = 0
256255 Top = 0
257- Action = FavoriteAddAction
256+ Action = GikoDM.FavoriteAddAction
258257 AutoSize = True
259258 Caption = #36861#21152'...'
260259 end
261- object ToolButton19: TToolButton
260+ object FavoriteArrangeToolButton: TToolButton
262261 Left = 41
263262 Top = 0
263+ Hint = #12362#27671#12395#20837#12426#25972#29702#12480#12452#12450#12525#12464#12434#38283#12367
264264 AutoSize = True
265265 Caption = #25972#29702'...'
266- ImageIndex = 1
267- OnClick = ToolButton19Click
266+ OnClick = FavoriteArrangeToolButtonClick
268267 end
269268 end
270269 end
@@ -319,10 +318,6 @@ object GikoForm: TGikoForm
319318 OnColumnRightClick = ListViewColumnRightClick
320319 OnCustomDraw = ListViewCustomDraw
321320 OnCustomDrawItem = ListViewCustomDrawItem
322- OnData = ListViewData
323- OnDataFind = ListViewDataFind
324- OnDataHint = ListViewDataHint
325- OnDataStateChange = ListViewDataStateChange
326321 OnKeyDown = ListViewKeyDown
327322 OnKeyUp = ListViewKeyUp
328323 OnMouseDown = ListViewMouseDown
@@ -366,7 +361,7 @@ object GikoForm: TGikoForm
366361 EdgeBorders = []
367362 Flat = True
368363 HotImages = HotToobarImageList
369- Images = ToobarImageList
364+ Images = GikoDM.ToobarImageList
370365 ParentShowHint = False
371366 ShowHint = True
372367 TabOrder = 0
@@ -593,7 +588,7 @@ object GikoForm: TGikoForm
593588 EdgeBorders = []
594589 Flat = True
595590 HotImages = HotToobarImageList
596- Images = ToobarImageList
591+ Images = GikoDM.ToobarImageList
597592 ParentShowHint = False
598593 ShowHint = True
599594 TabOrder = 0
@@ -815,7 +810,6 @@ object GikoForm: TGikoForm
815810 SmallImages = MessageImageList
816811 TabOrder = 1
817812 ViewStyle = vsReport
818- OnAdvancedCustomDrawItem = MessageListViewAdvancedCustomDrawItem
819813 OnResize = MessageListViewResize
820814 end
821815 end
@@ -951,7 +945,7 @@ object GikoForm: TGikoForm
951945 EdgeBorders = []
952946 Flat = True
953947 HotImages = HotToobarImageList
954- Images = ToobarImageList
948+ Images = GikoDM.ToobarImageList
955949 ParentShowHint = False
956950 ShowHint = True
957951 TabOrder = 1
@@ -969,7 +963,7 @@ object GikoForm: TGikoForm
969963 EdgeBorders = []
970964 Flat = True
971965 HotImages = HotToobarImageList
972- Images = ToobarImageList
966+ Images = GikoDM.ToobarImageList
973967 List = True
974968 ShowCaptions = True
975969 TabOrder = 2
@@ -989,8 +983,10 @@ object GikoForm: TGikoForm
989983 object MoveToToolButton: TToolButton
990984 Left = 177
991985 Top = 0
992- Action = MoveToAction
986+ Hint = #12450#12489#12524#12473#12496#12540#12395#34920#31034#12375#12390#12356#12427#12450#12489#12524#12473#12408#31227#21205#12377#12427
993987 AutoSize = True
988+ Caption = #31227#21205
989+ ImageIndex = 33
994990 end
995991 end
996992 object LinkToolBar: TToolBar
@@ -6463,2148 +6459,157 @@ object GikoForm: TGikoForm
64636459 F81FE0FFE007FFFFF83FFFFFF81FFFFF00000000000000000000000000000000
64646460 000000000000}
64656461 end
6466- object ToobarImageList: TImageList
6467- Left = 36
6468- Top = 244
6462+ object ItemImageList: TImageList
6463+ Left = 4
6464+ Top = 276
64696465 Bitmap = {
6470- 494C010136003B00040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
6471- 000000000000360000002800000040000000F0000000010020000000000000F0
6466+ 494C010103000400040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
6467+ 0000000000003600000028000000400000001000000001002000000000000010
6468+ 0000000000000000000000000000000000008400840084008400000000000000
64726469 0000000000000000000000000000000000000000000000000000000000000000
6470+ 0000000000000000000000000000840084008400840084008400848484008484
6471+ 8400848484008484840084848400848484008484840084848400848484008484
6472+ 8400848484008484840084848400840084008400840084008400000000000000
64736473 0000000000000000000000000000000000000000000000000000000000000000
6474+ 0000000000000000000000000000840084000000000000000000000000000000
64746475 0000000000000000000000000000000000000000000000000000000000000000
6476+ 000000000000000000000000000000000000840084008400840084848400C6C6
6477+ C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
6478+ C600C6C6C600C6C6C60000000000840084008400840084008400C6C6C600FFFF
6479+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6480+ FF00FFFFFF00FFFFFF008484840084008400840084008400840084848400C6C6
6481+ C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
6482+ C600C6C6C600C6C6C60000000000840084000000000000000000000000000000
64756483 0000000000000000000000000000000000000000000000000000000000000000
6484+ 000000000000000000000000000000000000840084008400840084848400FFFF
6485+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6486+ FF00FFFFFF00C6C6C60000000000840084008400840084008400C6C6C600FFFF
6487+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6488+ FF00FFFFFF00FFFFFF008484840084008400840084008400840084848400FFFF
6489+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6490+ FF00FFFFFF00C6C6C60000000000840084000000000000000000000000000000
64766491 0000000000000000000000000000000000000000000000000000000000000000
6492+ 000000000000000000000000000000000000840084008400840084848400FFFF
6493+ FF00848484008484840084848400848484008484840084848400848484008484
6494+ 8400FFFFFF00C6C6C60000000000840084008400840084008400C6C6C600FFFF
6495+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6496+ FF00FFFFFF00FFFFFF008484840084008400840084008400840084848400FFFF
6497+ FF00848484008484840084848400848484008484840084848400848484008484
6498+ 8400FFFFFF00C6C6C60000000000840084000000000000000000000000000000
64776499 0000000000000000000000000000000000000000000000000000000000000000
6500+ 000000000000000000000000000000000000840084008400840084848400FFFF
6501+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6502+ FF00FFFFFF00C6C6C60000000000840084008400840084008400C6C6C600FFFF
6503+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6504+ FF00FFFFFF00FFFFFF008484840084008400840084008400840084848400FFFF
6505+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6506+ FF00FFFFFF00C6C6C60000000000840084000000000000000000000000000000
64786507 0000000000000000000000000000000000000000000000000000000000000000
6508+ 000000000000000000000000000000000000840084008400840084848400FFFF
6509+ FF00848484008484840084848400848484008484840084848400848484008484
6510+ 8400FFFFFF00C6C6C60000000000840084008400840084008400C6C6C600FFFF
6511+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6512+ FF00FFFFFF00FFFFFF008484840084008400840084008400840084848400FFFF
6513+ FF00848484008484840084848400848484008484840084848400848484008484
6514+ 8400FFFFFF00C6C6C60000000000840084000000000000000000000000000000
64796515 0000000000000000000000000000000000000000000000000000000000000000
6516+ 000000000000000000000000000000000000840084008400840084848400FFFF
6517+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6518+ FF00FFFFFF00C6C6C60000000000840084008400840084008400C6C6C600FFFF
6519+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6520+ FF00FFFFFF00FFFFFF008484840084008400840084008400840084848400FFFF
6521+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6522+ FF00FFFFFF00C6C6C60000000000840084000000000000000000000000000000
64806523 0000000000000000000000000000000000000000000000000000000000000000
6524+ 000000000000000000000000000000000000840084008400840084848400FFFF
6525+ FF00848484008484840084848400848484008484840084848400848484008484
6526+ 8400FFFFFF00C6C6C60000000000840084008400840084008400C6C6C600FFFF
6527+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6528+ FF00FFFFFF00FFFFFF00848484008400840084008400840084000000FF00FFFF
6529+ FF00848484000000FF0084848400848484008484840084848400848484008484
6530+ 8400FFFFFF00C6C6C60000000000840084000000000000000000000000000000
64816531 0000000000000000000000000000000000000000000000000000000000000000
6532+ 000000000000000000000000000000000000840084008400840084848400FFFF
6533+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6534+ FF00FFFFFF00C6C6C60000000000840084008400840084008400C6C6C600FFFF
6535+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6536+ FF00FFFFFF00FFFFFF00848484008400840084008400840084000000FF000000
6537+ FF00FFFFFF000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6538+ FF00FFFFFF00C6C6C60000000000840084000000000000000000000000000000
64826539 0000000000000000000000000000000000000000000000000000000000000000
6540+ 000000000000000000000000000000000000840084008400840084848400FFFF
6541+ FF00848484008484840084848400848484008484840084848400848484008484
6542+ 8400FFFFFF00C6C6C60000000000840084008400840084008400C6C6C600FFFF
6543+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6544+ FF00FFFFFF00FFFFFF0084848400840084008400840084008400848484000000
6545+ FF000000FF000000FF00848484000000FF000000FF0084848400848484008484
6546+ 8400FFFFFF00C6C6C60000000000840084000000000000000000000000000000
64836547 0000000000000000000000000000000000000000000000000000000000000000
6548+ 000000000000000000000000000000000000840084008400840084848400FFFF
6549+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6550+ FF00FFFFFF00C6C6C60000000000840084008400840084008400C6C6C600FFFF
6551+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6552+ FF00FFFFFF00FFFFFF0084848400840084000000FF000000FF000000FF000000
6553+ FF000000FF000000FF000000FF000000FF00FFFFFF00FFFFFF00FFFFFF00FFFF
6554+ FF00FFFFFF00C6C6C60000000000840084000000000000000000000000000000
64846555 0000000000000000000000000000000000000000000000000000000000000000
6556+ 000000000000000000000000000000000000840084008400840084848400FFFF
6557+ FF00848484008484840084848400848484008484840084848400848484008484
6558+ 8400FFFFFF00C6C6C60000000000840084008400840084008400C6C6C600FFFF
6559+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6560+ FF00FFFFFF00FFFFFF00848484008400840084008400840084000000FF000000
6561+ FF00848484000000FF000000FF00848484008484840084848400848484008484
6562+ 8400FFFFFF00C6C6C60000000000840084000000000000000000000000000000
64856563 0000000000000000000000000000000000000000000000000000000000000000
6564+ 000000000000000000000000000000000000840084008400840084848400FFFF
6565+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
6566+ 0000000000000000000000000000840084008400840084008400C6C6C600FFFF
6567+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF008484
6568+ 840084848400848484008484840084008400840084000000FF000000FF000000
6569+ FF000000FF000000FF000000FF000000FF000000FF00FFFFFF00FFFFFF000000
6570+ 0000000000000000000000000000840084000000000000000000000000000000
64866571 0000000000000000000000000000000000000000000000000000000000000000
6572+ 000000000000000000000000000000000000840084008400840084848400FFFF
6573+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6
6574+ C600FFFFFF008484840084008400840084008400840084008400C6C6C600FFFF
6575+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6576+ FF00FFFFFF00C6C6C60084008400840084000000FF000000FF00848484000000
6577+ FF000000FF000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6
6578+ C600FFFFFF008484840084008400840084000000000000000000000000000000
64876579 0000000000000000000000000000000000000000000000000000000000000000
6580+ 000000000000000000000000000000000000840084008400840084848400FFFF
6581+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6
6582+ C600848484008400840084008400840084008400840084008400C6C6C600FFFF
6583+ FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6584+ FF00C6C6C6008400840084008400840084008400840084008400848484000000
6585+ FF00FFFFFF000000FF000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6
6586+ C600848484008400840084008400840084000000000000000000000000000000
64886587 0000000000000000000000000000000000000000000000000000000000000000
6588+ 0000000000000000000000000000000000008400840084008400848484008484
6589+ 8400848484008484840084848400848484008484840084848400848484008484
6590+ 8400840084008400840084008400840084008400840084008400C6C6C600C6C6
6591+ C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
6592+ C600840084008400840084008400840084008400840084008400848484000000
6593+ FF0084848400848484000000FF00848484008484840084848400848484008484
6594+ 8400840084008400840084008400840084000000000000000000000000000000
64896595 0000000000000000000000000000000000000000000000000000000000000000
6596+ 000000000000000000000000000000000000424D3E000000000000003E000000
6597+ 2800000040000000100000000100010000000000800000000000000000000000
6598+ 000000000000000000000000FFFFFF0000000000000000000000000000000000
64906599 0000000000000000000000000000000000000000000000000000000000000000
64916600 0000000000000000000000000000000000000000000000000000000000000000
64926601 0000000000000000000000000000000000000000000000000000000000000000
64936602 0000000000000000000000000000000000000000000000000000000000000000
6494- 0000000000000000000000000000000000000000000000000000000000000000
6495- 0000000000000000000000000000000000000000000000000000000000000000
6496- 0000000000000000000000000000000000000000000000000000000000000000
6497- 0000000000000000000000000000000000000000000000000000000000000000
6498- 0000000000000000000000000000000000000000000000000000000000000000
6499- 0000000000000000000000000000000000000000000000000000000000000000
6500- 0000000000000000000000000000000000000000000000000000000000000000
6501- 0000000000000000000000000000000000000000000000000000000000000000
6502- 0000000000000000000000000000000000000000000000000000000000000000
6503- 0000000000000000000000000000000000000000000000000000000000000000
6504- 0000000000000000000000000000000000000000000000000000000000000000
6505- 0000000000000000000000000000000000000000000000000000000000000000
6506- 0000000000000000000000000000000000000000000000000000000000000000
6507- 0000000000000000000000000000000000000000000000000000000000000000
6508- 0000000000000000000000000000000000000000000000000000000000000000
6509- 0000000000000000000000000000000000000000000000000000000000000000
6510- 0000000000000000000000000000000000000000000000000000000000000000
6511- 0000000000000000000000000000000000000000000000000000000000000000
6512- 0000000000000000000000000000000000000000000000000000000000000000
6513- 0000000000000000000000000000000000000000000000000000000000000000
6514- 0000000000000000000000000000000000000000000000000000000000000000
6515- 0000000000000000000000000000000000000000000000000000000000000000
6516- 0000000000000000000000000000000000000000000000000000000000000000
6517- 0000000000000000000000000000000000000000000000000000000000000000
6518- 0000000000000000000000000000000000000000000000000000000000000000
6519- 0000000000000000000000000000000000000000000000000000000000000000
6520- 0000000000000000000000000000000000000000000000000000000000000000
6521- 0000000000000000000000000000000000000000000000000000000000000000
6522- 0000000000000000000000000000000000000000000000000000000000000000
6523- 0000000000000000000000000000000000000000000000000000000000000000
6524- 0000000000000000000000000000000000000000000000000000000000000000
6525- 0000000000000000000000000000000000000000000000000000000000000000
6526- 0000000000000000000000000000000000000000000000000000000000000000
6527- 0000000000000000000000000000000000000000000000000000000000000000
6528- 0000000000000000000000000000000000000000000000000000000000000000
6529- 0000000000000000000000000000000000000000000000000000000000000000
6530- 0000000000000000000000000000000000000000000000000000000000000000
6531- 0000000000000000000000000000000000000000000000000000000000000000
6532- 0000000000000000000000000000000000000000000000000000000000000000
6533- 0000000000000000000000000000000000000000000000000000000000000000
6534- 0000000000000000000000000000000000000000000000000000000000000000
6535- 0000000000000000000000000000000000000000000000000000000000000000
6536- 0000000000000000000000000000000000000000000000000000000000000000
6537- 0000000000000000000000000000000000000000000000000000000000000000
6538- 0000000000000000000000000000000000000000000000000000000000000000
6539- 0000000000000000000000000000000000000000000000000000000000000000
6540- 0000000000000000000000000000000000000000000000000000000000000000
6541- 0000000000000000000000000000000000000000000000000000000000000000
6542- 0000000000000000000000000000000000000000000000000000000000000000
6543- 0000000000000000000000000000000000000000000000000000000000000000
6544- 0000000000000000000000000000000000000000000000000000000000000000
6545- 0000000000000000000000000000000000000000000000000000000000000000
6546- 0000000000000000000000000000000000000000000000000000000000000000
6547- 0000000000000000000000000000000000000000000000000000000000000000
6548- 0000000000000000000000000000000000000000000000000000000000000000
6549- 0000000000000000000000000000000000000000000000000000000000000000
6550- 0000000000000000000000000000000000000000000000000000000000000000
6551- 0000000000000000000000000000000000000000000000000000000000000000
6552- 0000000000000000000000000000000000000000000000000000000000000000
6553- 0000000000000000000000000000000000000000000000000000000000000000
6554- 0000000000000000000000000000000000000000000000000000000000000000
6555- 0000000000000000000000000000000000000000000000000000000000000000
6556- 0000000000000000000000000000000000000000000000000000000000000000
6557- 0000000000000000000000000000000000000000000000000000000000000000
6558- 0000000000000000000000000000000000000000000000000000000000000000
6559- 0000000000000000000000000000000000000000000000000000000000000000
6560- 0000000000000000000000000000000000000000000000000000000000000000
6561- 0000000000000000000000000000000000000000000000000000000000000000
6562- 0000000000000000000000000000000000000000000000000000000000000000
6563- 0000000000000000000000000000000000000000000000000000000000000000
6564- 0000000000000000000000000000000000000000000000000000000000000000
6565- 0000000000000000000000000000000000000000000000000000000000000000
6566- 0000000000000000000000000000000000000000000000000000000000000000
6567- 0000000000000000000000000000000000000000000000000000000000000000
6568- 0000000000000000000000000000000000000000000000000000000000000000
6569- 0000000000000000000000000000000000000000000000000000000000000000
6570- 0000000000000000000000000000000000000000000000000000000000000000
6571- 0000000000000000000000000000000000000000000000000000000000000000
6572- 0000000000000000000000000000000000000000000000000000000000000000
6573- 0000000000000000000000000000000000000000000000000000000000000000
6574- 0000000000000000000000000000000000000000000000000000000000000000
6575- 0000000000000000000000000000000000000000000000000000000000000000
6576- 0000000000000000000000000000000000000000000000000000000000000000
6577- 0000000000000000000000000000000000000000000000000000000000000000
6578- 0000000000000000000000000000000000000000000000000000000000000000
6579- 0000000000000000000000000000000000000000000000000000000000000000
6580- 0000000000000000000000000000000000000000000000000000000000000000
6581- 0000000000000000000000000000000000000000000000000000000000000000
6582- 0000000000000000000000000000000000000000000000000000000000000000
6583- 0000000000000000000000000000000000000000000000000000000000000000
6584- 0000000000000000000000000000000000000000000000000000000000000000
6585- 0000000000000000000000000000000000000000000000000000000000000000
6586- 0000000000000000000000000000000000000000000000000000000000000000
6587- 0000000000000000000000000000000000000000000000000000000000000000
6588- 0000000000000000000000000000000000000000000000000000000000000000
6589- 0000000000000000000000000000000000000000000000000000000000000000
6590- 0000000000000000000000000000000000000000000000000000000000000000
6591- 0000000000000000000000000000000000000000000000000000000000000000
6592- 0000000000000000000000000000000000000000000000000000000000000000
6593- 0000000000000000000000000000000000000000000000000000000000000000
6594- 0000000000000000000000000000000000000000000000000000000000000000
6595- 0000000000000000000000000000000000000000000000000000000000000000
6596- 0000000000000000000000000000000000000000000000000000000000000000
6597- 0000000000000000000000000000000000000000000000000000000000000000
6598- 0000000000000000000000000000000000000000000000000000000000000000
6599- 0000000000000000000000000000000000000000000000000000000000000000
6600- 0000000000000000000000000000000000000000000000000000000000000000
6601- 0000000000000000000000000000000000000000000000000000000000000000
6602- 0000000000000000000000000000000000000000000000000000000000000000
6603- 0000000000000000000000000000000000000000000000000000000000000000
6604- 0000000000000000000000000000000000000000000000000000000000000000
6605- 0000000000000000000000000000000000000000000000000000000000000000
6606- 0000000000000000000000000000000000000000000000000000000000000000
6607- 0000000000000000000000000000000000000000000000000000000000000000
6608- 0000000000000000000000000000000000000000000000000000000000000000
6609- 0000000000000000000000000000008484000000000084848400000000000000
6610- 0000000000000000000000000000000000000000000000000000000000000000
6611- 0000000000008484840084848400848484008484840084848400848484000000
6612- 0000000000000000000000000000000000000000000000000000000000000000
6613- 0000000000000000000000000000000000000000000000000000000000000000
6614- 0000000000000000000000000000000000000000000000000000000000000000
6615- 0000000000000000000000000000000000000000000000000000000000000000
6616- 0000000000000000000000000000000000000000000000000000000000000000
6617- 000000000000000000000084840000000000C6C6C600C6C6C600848484000000
6618- 0000000000000000000084848400000000000000000000000000000000000000
6619- 000084848400C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C6008484
6620- 8400000000000000000000000000000000000000000000000000000000000000
6621- 0000000000000000000000000000000000000000000000000000000000000000
6622- 0000000000000000000000000000000000000000000000000000000000000000
6623- 0000000000000000000000000000000000000000000000000000000000000000
6624- 0000000000000000000000000000000000000000000000000000000000000000
6625- 000000000000008484008484840084848400FFFFFF00FFFFFF00848484000000
6626- 0000000000008484840000000000000000000000000000000000000000008484
6627- 8400C6C6C6000000000000000000000000000000000000000000000000000000
6628- 0000848484000000000000000000000000000000000000000000000000000000
6629- 0000000000000000000000000000000000000000000000000000000000000000
6630- 0000000000000000000000000000000000000000000000000000000000000000
6631- 0000000000000000000000000000000000000000000000000000000000000000
6632- 0000000000000000000000000000000000000000000000000000000000000000
6633- 00000084840000FFFF0000000000C6C6C600FFFFFF00FFFFFF00848484000000
6634- 000084848400000000000000000000000000000000000000000084848400C6C6
6635- C600C6C6C6000000000000000000FFFFFF00FFFFFF00FFFFFF00C6C6C6000000
6636- 0000000000008484840000000000000000000000000000000000000000000000
6637- 0000000000000000000000000000000000000000000000000000000000000000
6638- 0000000000000000000000000000000000000000000000000000000000000000
6639- 0000000000000000000000000000000000000000000000000000000000000000
6640- 0000000000000000000000000000000000000000000000000000000000000084
6641- 840000FFFF00FFFFFF0000000000C6C6C600FFFFFF00FFFFFF00848484000000
6642- 0000000000000000000000000000000000000000000084848400C6C6C600C6C6
6643- C600C6C6C6000000000000000000FFFFFF00C6C6C600C6C6C600C6C6C6000000
6644- 000000000000C6C6C60084848400000000000000000000000000000000000000
6645- 0000000000000000000000000000000000000000000000000000000000000000
6646- 0000000000000000000000000000000000000000000000000000000000000000
6647- 0000000000000000000000000000000000000000000000000000000000000000
6648- 00000000000000000000000000000000000000000000008484008484840000FF
6649- FF00FFFFFF0000FFFF000000000000000000FFFFFF00FFFFFF00848484000000
6650- 0000000000000000000000000000000000000000000084848400C6C6C600C6C6
6651- C600C6C6C6000000000000000000FFFFFF00C6C6C600C6C6C600C6C6C6000000
6652- 000000000000C6C6C60084848400000000000000000000000000000000000000
6653- 0000000000000000000000000000000000000000000000000000000000000000
6654- 0000000000000000000000000000000000000000000000000000000000000000
6655- 0000000000000000000000000000000000000000000000000000000000000000
6656- 0000000000000000000000000000000000000084840000FFFF00C6C6C600FFFF
6657- FF0000FFFF00FFFFFF00000000008484840000000000FFFFFF00848484000000
6658- 0000848484008484840084848400848484000000000084848400C6C6C600C6C6
6659- C600C6C6C6000000000000000000000000000000000000000000000000000000
6660- 0000C6C6C600C6C6C60084848400000000000000000000000000000000000000
6661- 0000000000000000000000000000000000000000000000000000000000000000
6662- 0000000000000000000000000000000000000000000000000000000000000000
6663- 0000000000000000000000000000000000000000000000000000000000000000
6664- 0000000000000000000000000000000000000084840000FFFF00C6C6C60000FF
6665- FF00FFFFFF0000FFFF0000000000C6C6C60000000000FFFFFF00848484000000
6666- 0000000000000000000000000000000000000000000084848400C6C6C600C6C6
6667- C600C6C6C6000000000000000000FFFFFF00FFFFFF00FFFFFF0000000000C6C6
6668- C600C6C6C600C6C6C60084848400000000000000000000000000000000000000
6669- 0000000000000000000000000000000000000000000000000000000000000000
6670- 0000000000000000000000000000000000000000000000000000000000000000
6671- 0000000000000000000000000000000000000000000000000000000000000000
6672- 00000000000000000000000000000000000000848400FFFFFF00C6C6C600FFFF
6673- FF0000FFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00848484000000
6674- 0000000000000000000000000000000000000000000084848400C6C6C600C6C6
6675- C600C6C6C6000000000000000000FFFFFF00C6C6C600C6C6C600000000000000
6676- 0000C6C6C600C6C6C60084848400000000000000000000000000000000000000
6677- 0000000000000000000000000000000000000000000000000000000000000000
6678- 0000000000000000000000000000000000000000000000000000000000000000
6679- 0000000000000000000000000000000000000000000000000000000000000000
6680- 00000000000000000000000000000000000000000000008484000084840000FF
6681- FF00FFFFFF0000FFFF0000000000C6C6C600FFFFFF00FFFFFF00848484000000
6682- 0000848484000000000000000000000000000000000084848400C6C6C600C6C6
6683- C600C6C6C6000000000000000000FFFFFF00C6C6C600C6C6C600000000000000
6684- 0000C6C6C600C6C6C60084848400000000000000000000000000000000000000
6685- 0000000000000000000000000000000000000000000000000000000000000000
6686- 0000000000000000000000000000000000000000000000000000000000000000
6687- 0000000000000000000000000000000000000000000000000000000000000000
6688- 0000000000000000000000000000000000000000000000000000000000000084
6689- 840000FFFF00FFFFFF0000000000C6C6C600FFFFFF00FFFFFF00848484000000
6690- 000000000000848484000000000000000000000000000000000084848400C6C6
6691- C600C6C6C6000000000000000000FFFFFF00FFFFFF00FFFFFF00000000000000
6692- 0000C6C6C6008484840000000000000000000000000000000000000000000000
6693- 0000000000000000000000000000000000000000000000000000000000000000
6694- 0000000000000000000000000000000000000000000000000000000000000000
6695- 0000000000000000000000000000000000000000000000000000000000000000
6696- 0000000000000000000000000000000000000000000000000000000000000000
6697- 00000084840000FFFF008484840084848400C6C6C600FFFFFF00848484000000
6698- 0000000000000000000084848400000000000000000000000000000000008484
6699- 8400C6C6C600000000000000000000000000000000000000000000000000C6C6
6700- C600848484000000000000000000000000000000000000000000000000000000
6701- 0000000000000000000000000000000000000000000000000000000000000000
6702- 0000000000000000000000000000000000000000000000000000000000000000
6703- 0000000000000000000000000000000000000000000000000000000000000000
6704- 0000000000000000000000000000000000000000000000000000000000000000
6705- 0000000000000084840000FFFF0000000000C6C6C600C6C6C600000000000000
6706- 0000000000000000000000000000000000000000000000000000000000000000
6707- 000084848400C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C6008484
6708- 8400000000000000000000000000000000000000000000000000000000000000
6709- 0000000000000000000000000000000000000000000000000000000000000000
6710- 0000000000000000000000000000000000000000000000000000000000000000
6711- 0000000000000000000000000000000000000000000000000000000000000000
6712- 0000000000000000000000000000000000000000000000000000000000000000
6713- 0000000000000000000000848400848484000000000084848400000000000000
6714- 0000000000000000000000000000000000000000000000000000000000000000
6715- 0000000000008484840084848400848484008484840084848400848484000000
6716- 0000000000000000000000000000000000000000000000000000000000000000
6717- 0000000000000000000000000000000000000000000000000000000000000000
6718- 0000000000000000000000000000000000000000000000000000000000000000
6719- 0000000000000000000000000000000000000000000000000000000000000000
6720- 0000000000000000000000000000000000000000000000000000000000000000
6721- 0000000000000000000000000000000000000000000000000000000000000000
6722- 0000000000000000000000000000000000000000000000000000000000000000
6723- 0000000000000000000000000000000000000000000000000000000000000000
6724- 0000000000000000000000000000000000000000000000000000000000000000
6725- 0000000000000000000000000000000000000000000000000000000000000000
6726- 0000000000000000000000000000000000000000000000000000000000000000
6727- 0000000000000000000000000000000000000000000000000000000000000000
6728- 0000000000000000000000000000000000000000000000000000000000000000
6729- 0000000000000000000000000000000000000000000000000000000000000000
6730- 0000000000000000000000000000000000000000000000000000000000000000
6731- 0000000000000000000000000000000000000000000000000000000000000000
6732- 0000000000000000000000000000000000000000000000000000000000000000
6733- 0000000000000000000000000000000000000000000000000000000000000000
6734- 0000000000000000000000000000000000000000000000000000000000000000
6735- 0000000000000000000000000000000000000000000000000000000000000000
6736- 0000000000000000000000000000000000000000000000000000000000000000
6737- 0000000000000000000000000000000000000000000000000000000000000000
6738- 0000000000000000000000000000000000000000000000000000000000000000
6739- 0000000000000000000000000000000000000000000000000000000000000000
6740- 0000000000000000000000000000000000000000000000000000000000000000
6741- 0000000000000000000000000000000000000000000000000000000000000000
6742- 0000000000000000000000000000000000000000000000000000000000000000
6743- 0000000000000000000000000000000000000000000000000000000000000000
6744- 0000000000000000000000000000000000000000000000000000000000000000
6745- 0000000000000000000000000000000000000000000000000000000000000000
6746- 0000000000000000000000000000000000000000000000000000000000000000
6747- 0000000000000000000000000000000000000000000000000000000000000000
6748- 0000000000000000000000000000000000000000000000000000000000000000
6749- 0000000000000000000000000000000000000000000000000000000000000000
6750- 000000000000000000000000000000000000000000000000000000000000FFFF
6751- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6752- FF00FFFFFF000000000000000000000000000000000000000000000000000000
6753- 0000000000000000000000000000000000000000000000000000000000000000
6754- 0000000000000000000000000000000000000000000000000000000000000000
6755- 0000000000000000000000000000000000000000000000000000000000000000
6756- 0000000000000000000000000000000000000000000000000000000000000000
6757- 0000000000000000000000000000000000000000000000000000000000000000
6758- 000000000000000000000000000000000000000000000000000000000000FFFF
6759- FF00FFFFFF00000000000000000000000000000000000000000000000000FFFF
6760- FF00FFFFFF000000000000000000000000000000000000000000000000000000
6761- 0000000000000000000000000000C6C6C600C6C6C600C6C6C600C6C6C600C6C6
6762- C600C6C6C600C6C6C60000000000000000000000000000000000C6C6C600C6C6
6763- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C60000000000000000000000
6764- 0000000000000000000000000000000000000000000000000000000000000000
6765- 0000000000000000000000000000C6C6C600C6C6C600C6C6C600C6C6C600C6C6
6766- C600C6C6C600C6C6C6000000000000000000000000000000000000000000FFFF
6767- FF00000000008484840084848400848484008484840084848400848484000000
6768- 0000FFFFFF000000000000000000000000000000000000000000000000000000
6769- 0000000000000000000000000000000000000000000000000000C6C6C600C6C6
6770- C600C6C6C600C6C6C60000000000000000000000000000000000C6C6C600C6C6
6771- C600C6C6C600C6C6C60000000000000000000000000000000000000000000000
6772- 0000000000000000000000000000000000000000000000000000000000000000
6773- 0000000000000000000000000000000000000000000000000000C6C6C600C6C6
6774- C600C6C6C600C6C6C6000000000000000000000000000000000000000000FFFF
6775- FF00000000008484840084848400848484008484840084848400848484000000
6776- 0000FFFFFF000000000000000000000000000000000000000000000000000000
6777- 0000000000000000000000000000C6C6C600C6C6C600C6C6C600C6C6C600C6C6
6778- C600C6C6C600C6C6C60000000000000000000000000000000000C6C6C600C6C6
6779- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C60000000000000000000000
6780- 0000000000000000000000000000000000000000000000000000000000000000
6781- 0000000000000000000000000000C6C6C600C6C6C600C6C6C600C6C6C600C6C6
6782- C600C6C6C600C6C6C6000000000000000000000000000000000000000000FFFF
6783- FF00000000008484840084848400848484008484840084848400848484000000
6784- 0000FFFFFF000000000000000000000000000000000000000000000000000000
6785- 0000000000000000000000000000000000000000000000000000C6C6C600C6C6
6786- C600C6C6C600C6C6C60000000000000000000000000000000000C6C6C600C6C6
6787- C600C6C6C600C6C6C60000000000000000000000000000000000000000000000
6788- 0000000000000000000000000000000000000000000000000000000000000000
6789- 0000000000000000000000000000000000000000000000000000C6C6C600C6C6
6790- C600C6C6C600C6C6C6000000000000000000000000000000000000000000FFFF
6791- FF00000000008484840084848400848484008484840084848400848484000000
6792- 0000FFFFFF000000000000000000000000000000000000000000000000000000
6793- 0000000000000000000000000000C6C6C600C6C6C600C6C6C600C6C6C600C6C6
6794- C600C6C6C600C6C6C60000000000000000000000000000000000C6C6C600C6C6
6795- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C60000000000000000000000
6796- 0000000000000000000000000000000000000000000000000000000000000000
6797- 0000000000000000000000000000C6C6C600C6C6C600C6C6C600C6C6C600C6C6
6798- C600C6C6C600C6C6C6000000000000000000000000000000000000000000FFFF
6799- FF00000000008484840084848400848484008484840084848400848484000000
6800- 0000FFFFFF000000000000000000000000000000000000000000000000000000
6801- 000000000000000000000000000000000000000000000000000000000000C6C6
6802- C600C6C6C600C6C6C60000000000000000000000000000000000C6C6C600C6C6
6803- C600C6C6C6000000000000000000000000000000000000000000000000000000
6804- 0000000000000000000000000000000000000000000000000000000000000000
6805- 000000000000000000000000000000000000000000000000000000000000C6C6
6806- C600C6C6C600C6C6C6000000000000000000000000000000000000000000FFFF
6807- FF00000000008484840084848400848484008484840084848400848484000000
6808- 0000FFFFFF00000000000000000000000000000000000000000000000000FFFF
6809- FF00FFFFFF00FFFFFF00C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
6810- C600C6C6C600C6C6C60000000000000000000000000000000000C6C6C600C6C6
6811- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600FFFFFF00FFFF
6812- FF00FFFFFF00000000000000000000000000000000000000000000000000FFFF
6813- FF00FFFFFF00FFFFFF00C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
6814- C600C6C6C600C6C6C6000000000000000000000000000000000000000000FFFF
6815- FF00000000008484840084848400848484008484840084848400848484000000
6816- 0000FFFFFF00000000000000000000000000000000000000000000000000FFFF
6817- FF00FFFFFF00FFFFFF00C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
6818- C600C6C6C600C6C6C60000000000000000000000000000000000C6C6C600C6C6
6819- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600FFFFFF00FFFF
6820- FF00FFFFFF00000000000000000000000000000000000000000000000000FFFF
6821- FF00FFFFFF00FFFFFF00C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
6822- C600C6C6C600C6C6C6000000000000000000000000000000000000000000FFFF
6823- FF00000000008484840084848400848484008484840084848400848484000000
6824- 0000FFFFFF000000000000000000000000000000000000000000000000000000
6825- 0000000000000000000000000000000000000000000000000000000000000000
6826- 0000000000000000000000000000000000000000000000000000000000000000
6827- 0000000000000000000000000000000000000000000000000000000000000000
6828- 0000000000000000000000000000000000000000000000000000000000000000
6829- 0000000000000000000000000000000000000000000000000000000000000000
6830- 000000000000000000000000000000000000000000000000000000000000FFFF
6831- FF00FFFFFF00000000000000000000000000000000000000000000000000FFFF
6832- FF00FFFFFF000000000000000000000000000000000000000000000000000000
6833- 0000000000000000000000000000000000000000000000000000000000000000
6834- 0000000000000000000000000000000000000000000000000000000000000000
6835- 0000000000000000000000000000000000000000000000000000000000000000
6836- 0000000000000000000000000000000000000000000000000000000000000000
6837- 0000000000000000000000000000000000000000000000000000000000000000
6838- 000000000000000000000000000000000000000000000000000000000000FFFF
6839- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6840- FF00FFFFFF000000000000000000000000000000000000000000000000000000
6841- 0000000000000000000000000000000000000000000000000000000000000000
6842- 0000000000000000000000000000000000000000000000000000000000000000
6843- 0000000000000000000000000000000000000000000000000000000000000000
6844- 0000000000000000000000000000000000000000000000000000000000000000
6845- 0000000000000000000000000000000000000000000000000000000000000000
6846- 0000000000000000000000000000000000000000000000000000000000000000
6847- 0000000000000000000000000000000000000000000000000000000000000000
6848- 0000000000000000000000000000000000000000000000000000000000000000
6849- 0000000000000000000000000000000000000000000000000000000000000000
6850- 0000000000000000000000000000000000000000000000000000000000000000
6851- 0000000000000000000000000000000000000000000000000000000000000000
6852- 0000000000000000000000000000000000000000000000000000000000000000
6853- 0000000000000000000000000000000000000000000000000000000000000000
6854- 0000000000000000000000000000000000000000000000000000000000000000
6855- 0000000000000000000000000000000000000000000000000000000000000000
6856- 0000000000000000000000000000000000000000000000000000000000000000
6857- 0000000000000000000000000000000000000000000000000000000000000000
6858- 0000000000000000000000000000000000000000000000000000000000000000
6859- 0000000000000000000000000000000000000000000000000000000000000000
6860- 0000000000000000000000000000000000000000000000000000000000000000
6861- 0000000000000000000000000000000000000000000000000000000000000000
6862- 0000000000000000000000000000000000000000000000000000000000000000
6863- 0000000000000000000000000000000000000000000000000000000000000000
6864- 0000000000000000000000000000000000000000000000000000000000000000
6865- 0000000000000000000000000000000000000000000000000000000000000000
6866- 0000000000000000000000000000000000000000000000000000000000000000
6867- 0000000000000000000000000000000000000000000000000000000000000000
6868- 0000000000000000000000000000000000000000000000000000000000000000
6869- 0000000000000000000000000000000000000000000000000000000000000000
6870- 0000000000000000000000000000000000000000000000000000000000000000
6871- 0000000000000000000000000000000000000000000000000000000000000000
6872- 0000000000000000000000000000000000000000000000000000000000000000
6873- 0000000000000000000000000000000000000000000000000000000000000000
6874- 00000000000000000000000000000000000000000000FFFFFF00FFFFFF00FFFF
6875- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6876- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
6877- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6878- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000000000000000
6879- 0000000000000000000000000000000000000000000000000000000000000000
6880- 0000000000000000000000000000000000000000000000000000000000000000
6881- 0000848484008484840000000000000000000000000000000000C6C6C6000000
6882- 00008484840000000000000000000000000000000000FFFFFF00FFFFFF00FFFF
6883- FF00FFFFFF00FFFFFF0000000000FFFFFF0000000000FFFFFF00FFFFFF000000
6884- 0000FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
6885- FF00FFFFFF00FFFFFF00FFFFFF008484840084848400FFFFFF00FFFFFF00FFFF
6886- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000000000000000
6887- 0000000000000000000000000000000000000000000000000000000000000000
6888- 0000000000000000000000000000000000000000000000000000000000000000
6889- 0000848484008484840000000000000000000000000000000000C6C6C6000000
6890- 00008484840000000000000000000000000000000000FFFFFF00FFFFFF00FFFF
6891- FF0000000000FFFFFF0000000000FFFFFF00FFFFFF0000000000FFFFFF000000
6892- 0000FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF008484
6893- 84008484840084848400FFFFFF008484840084848400FFFFFF00848484008484
6894- 840084848400FFFFFF00FFFFFF00000000000000000000000000C6C6C600C6C6
6895- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C60000000000000000000000
6896- 0000000000000000000000000000000000000000000000000000000000000000
6897- 0000848484008484840000000000000000000000000000000000000000000000
6898- 00008484840000000000000000000000000000000000FFFFFF00FFFFFF00FFFF
6899- FF00FFFFFF00000000000000000000000000FFFFFF0000000000FFFFFF000000
6900- 0000FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
6901- FF00FFFFFF00848484008484840084848400848484008484840084848400FFFF
6902- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000C6C6C600C6C6
6903- C600C6C6C600C6C6C60000000000000000000000000000000000000000000000
6904- 0000000000000000000000000000000000000000000000000000000000000000
6905- 0000848484008484840084848400848484008484840084848400848484008484
6906- 84008484840000000000000000000000000000000000FFFFFF00FFFFFF00FFFF
6907- FF00000000000000000000000000000000000000000000000000FFFFFF000000
6908- 0000FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
6909- FF00FFFFFF00FFFFFF0084848400848484008484840084848400FFFFFF00FFFF
6910- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000C6C6C600C6C6
6911- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C60000000000000000000000
6912- 0000000000000000000000000000000000000000000000000000000000000000
6913- 0000848484008484840000000000000000000000000000000000000000008484
6914- 84008484840000000000000000000000000000000000FFFFFF00FFFFFF00FFFF
6915- FF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF0000000000FFFFFF000000
6916- 0000FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF008484
6917- 8400848484008484840084848400848484008484840084848400848484008484
6918- 840084848400FFFFFF00FFFFFF00000000000000000000000000C6C6C600C6C6
6919- C600C6C6C600C6C6C60000000000000000000000000000000000000000000000
6920- 0000000000000000000000000000000000000000000000000000000000000000
6921- 00008484840000000000C6C6C600C6C6C600C6C6C600C6C6C600C6C6C6000000
6922- 00008484840000000000000000000000000000000000FFFFFF00FFFFFF00FFFF
6923- FF00000000000000000000000000000000000000000000000000000000000000
6924- 000000000000FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
6925- FF00FFFFFF00FFFFFF00FFFFFF008484840084848400FFFFFF00FFFFFF00FFFF
6926- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000C6C6C600C6C6
6927- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C60000000000000000000000
6928- 0000000000000000000000000000000000000000000000000000000000000000
6929- 00008484840000000000C6C6C600C6C6C600C6C6C600C6C6C600C6C6C6000000
6930- 00008484840000000000000000000000000000000000FFFFFF00FFFFFF00FFFF
6931- FF00FFFFFF0000000000FFFFFF0000000000FFFFFF0000000000FFFFFF00FFFF
6932- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
6933- FF00FFFFFF00FFFFFF00FFFFFF008484840084848400FFFFFF00FFFFFF00FFFF
6934- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000C6C6C600C6C6
6935- C600C6C6C6000000000000000000000000000000000000000000000000000000
6936- 0000000000000000000000000000000000000000000000000000000000000000
6937- 00008484840000000000C6C6C600C6C6C600C6C6C600C6C6C600C6C6C6000000
6938- 00000000000000000000000000000000000000000000FFFFFF00FFFFFF00FFFF
6939- FF00000000000000000000000000000000000000000000000000000000000000
6940- 0000FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
6941- FF00848484008484840084848400848484008484840084848400848484008484
6942- 8400FFFFFF00FFFFFF00FFFFFF00000000000000000000000000C6C6C600C6C6
6943- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600FFFFFF00FFFF
6944- FF00FFFFFF000000000000000000000000000000000000000000000000000000
6945- 00008484840000000000C6C6C600C6C6C600C6C6C600C6C6C600C6C6C6000000
6946- 0000C6C6C60000000000000000000000000000000000FFFFFF00FFFFFF00FFFF
6947- FF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6948- FF0000000000FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
6949- FF00FFFFFF00FFFFFF00FFFFFF008484840084848400FFFFFF00FFFFFF00FFFF
6950- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000C6C6C600C6C6
6951- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600FFFFFF00FFFF
6952- FF00FFFFFF000000000000000000000000000000000000000000000000000000
6953- 0000000000000000000000000000000000000000000000000000000000000000
6954- 0000000000000000000000000000000000000000000000000000000000000000
6955- 0000000000000000000000000000000000000000000000000000000000000000
6956- 0000000000000000000000000000000000000000000000000000000000000000
6957- 0000000000000000000000000000000000000000000000000000000000000000
6958- 0000000000000000000000000000000000000000000000000000000000000000
6959- 0000000000000000000000000000000000000000000000000000000000000000
6960- 0000000000000000000000000000000000000000000000000000000000000000
6961- 0000000000000000000000000000000000000000000000000000000000000000
6962- 00000000000000000000000000000000000000000000FFFFFF00FFFFFF00FFFF
6963- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6964- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
6965- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
6966- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000000000000000
6967- 0000000000000000000000000000000000000000000000000000000000000000
6968- 0000000000000000000000000000000000000000000000000000000000000000
6969- 0000000000000000000000000000000000000000000000000000000000000000
6970- 0000000000000000000000000000000000000000000000000000000000000000
6971- 0000000000000000000000000000000000000000000000000000000000000000
6972- 0000000000000000000000000000000000000000000000000000000000000000
6973- 0000000000000000000000000000000000000000000000000000000000000000
6974- 0000000000000000000000000000000000000000000000000000000000000000
6975- 0000000000000000000000000000000000000000000000000000000000000000
6976- 0000000000000000000000000000000000000000000000000000000000000000
6977- 0000000000000000000000000000000000000000000000000000000000000000
6978- 0000000000000000000000000000000000000000000000000000000000000000
6979- 0000000000000000000000000000000000000000000000000000000000000000
6980- 0000000000000000000000000000000000000000000000000000000000000000
6981- 0000000000000000000000000000000000000000000000000000000000000000
6982- 0000000000000000000000000000000000000000000000000000000000000000
6983- 0000000000000000000000000000000000000000000000000000000000000000
6984- 0000000000000000000000000000000000000000000000000000000000000000
6985- 0000000000000000000000000000000000000000000000000000000000000000
6986- 0000000000000000000000000000000000000000000000000000000000000000
6987- 0000000000000000000000000000000000000000000000000000000000000000
6988- 0000000000000000000000000000000000000000000000000000000000000000
6989- 0000000000000000000000000000000000000000000000000000000000000000
6990- 0000000000000000000000000000000000000000000000000000000000000000
6991- 0000000000000000000000000000000000000000000000000000000000000000
6992- 0000000000000000000000000000000000000000000000000000000000000000
6993- 0000000000000000000000000000000000000000000000000000000000000000
6994- 0000000000000000000000000000000000000000000000000000000000000000
6995- 0000000000000000000000000000000000000000000000000000000000000000
6996- 000000000000000000000000000000000000C6C6C600C6C6C600C6C6C600C6C6
6997- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
6998- C600C6C6C600C6C6C600C6C6C600C6C6C600000000000000000084848400C6C6
6999- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7000- C600C6C6C600C6C6C600000000000000000000000000FFFFFF00FFFFFF00C6C6
7001- C600C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6C600C6C6C600FFFF
7002- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
7003- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7004- FF00FFFFFF00FFFFFF00FFFFFF0000000000C6C6C600C6C6C600C6C6C600C6C6
7005- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7006- C600C6C6C600C6C6C600C6C6C600C6C6C600000000000000000084848400FFFF
7007- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7008- FF00FFFFFF00C6C6C600000000000000000000000000FFFFFF00FFFFFF00FFFF
7009- FF00C6C6C600C6C6C600FFFFFF00FFFFFF00C6C6C600C6C6C600FFFFFF00FFFF
7010- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
7011- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7012- FF00FFFFFF00FFFFFF00FFFFFF0000000000C6C6C600C6C6C600C6C6C600C6C6
7013- C600C6C6C6000000000000000000000000000000000000000000C6C6C600C6C6
7014- C600C6C6C600C6C6C600C6C6C600C6C6C600000000000000000084848400FFFF
7015- FF00848484008484840084848400848484000000000084848400848484000000
7016- 0000FFFFFF00C6C6C600000000000000000000000000FFFFFF00FFFFFF00FFFF
7017- FF00FFFFFF00FFFFFF00C6C6C600C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFF
7018- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
7019- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7020- FF00FFFFFF00FFFFFF00FFFFFF0000000000C6C6C600C6C6C600000000000000
7021- 0000C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7022- C600C6C6C600C6C6C600C6C6C600C6C6C600000000000000000084848400FFFF
7023- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000000000FFFFFF00000000000000
7024- 0000FFFFFF00C6C6C600000000000000000000000000FFFFFF00FFFFFF00FFFF
7025- FF00FFFFFF00FFFFFF00C6C6C600C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFF
7026- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
7027- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7028- FF00FFFFFF00FFFFFF00FFFFFF0000000000C6C6C600C6C6C600C6C6C600C6C6
7029- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7030- C600C6C6C600C6C6C600C6C6C600C6C6C600000000000000000084848400FFFF
7031- FF00848484008484840084848400848484000000000000000000848484000000
7032- 0000FFFFFF00C6C6C600000000000000000000000000FFFFFF00FFFFFF00FFFF
7033- FF00C6C6C600C6C6C600FFFFFF00FFFFFF00C6C6C600C6C6C600FFFFFF00FFFF
7034- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
7035- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7036- FF00FFFFFF00FFFFFF00FFFFFF0000000000C6C6C600C6C6C600000000000000
7037- 0000000000000000000000000000C6C6C60000000000C6C6C600C6C6C600C6C6
7038- C600C6C6C600C6C6C600C6C6C600C6C6C600000000000000000084848400FFFF
7039- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000000084848400FFFFFF000000
7040- 0000FFFFFF00C6C6C600000000000000000000000000FFFFFF00FFFFFF00C6C6
7041- C600C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6C600C6C6C600FFFF
7042- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
7043- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7044- FF00FFFFFF00FFFFFF00FFFFFF0000000000C6C6C600C6C6C600C6C6C600C6C6
7045- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7046- C600C6C6C600C6C6C600C6C6C600C6C6C600000000000000000084848400FFFF
7047- FF00848484008484840084848400848484008484840084848400848484008484
7048- 8400FFFFFF00C6C6C600000000000000000000000000FFFFFF00FFFFFF00FFFF
7049- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7050- FF000000000000000000000000000000000000000000FFFFFF00FFFFFF00FFFF
7051- FF00C6C6C600C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7052- FF0000000000000000000000000000000000C6C6C600C6C6C600000000000000
7053- 000000000000C6C6C6000000000000000000000000000000000000000000C6C6
7054- C600C6C6C600C6C6C600C6C6C600C6C6C600000000000000000084848400FFFF
7055- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7056- FF00FFFFFF00C6C6C600000000000000000000000000FFFFFF00C6C6C600C6C6
7057- C600FFFFFF00C6C6C600C6C6C600FFFFFF00C6C6C600C6C6C600FFFFFF00FFFF
7058- FF000000000000000000000000000000000000000000FFFFFF00FFFFFF00C6C6
7059- C600C6C6C600C6C6C600C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7060- FF0000000000000000000000000000000000C6C6C600C6C6C600C6C6C600C6C6
7061- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7062- C600C6C6C600C6C6C600C6C6C600C6C6C600000000000000000084848400FFFF
7063- FF00848484008484840084848400848484008484840084848400848484008484
7064- 8400FFFFFF00C6C6C600000000000000000000000000FFFFFF00C6C6C600C6C6
7065- C600FFFFFF00C6C6C600C6C6C600FFFFFF00C6C6C600C6C6C600FFFFFF00FFFF
7066- FF000000000000000000000000000000000000000000FFFFFF00FFFFFF00C6C6
7067- C600C6C6C600FFFFFF00C6C6C600C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFF
7068- FF0000000000000000000000000000000000C6C6C600C6C6C60000000000C6C6
7069- C60000000000C6C6C60000000000C6C6C60000000000C6C6C60000000000C6C6
7070- C600C6C6C600C6C6C600C6C6C600C6C6C600000000000000000084848400FFFF
7071- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7072- FF00FFFFFF00C6C6C600000000000000000000000000FFFFFF00FFFFFF00FFFF
7073- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7074- FF000000000000000000000000000000000000000000FFFFFF00C6C6C600C6C6
7075- C600FFFFFF00FFFFFF00FFFFFF00C6C6C600C6C6C600FFFFFF00FFFFFF00FFFF
7076- FF0000000000000000000000000000000000C6C6C600C6C6C600C6C6C600C6C6
7077- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7078- C600C6C6C600C6C6C600C6C6C600C6C6C600000000000000000084848400FFFF
7079- FF00848484008484840084848400848484008484840084848400848484008484
7080- 8400FFFFFF00C6C6C60000000000000000000000000000000000FFFFFF00FFFF
7081- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
7082- 00000000000000000000000000000000000000000000C6C6C600C6C6C600FFFF
7083- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6C600C6C6C600C6C6C6000000
7084- 000000000000000000000000000000000000C6C6C600C6C6C600000000000000
7085- 000000000000000000000000000000000000C6C6C60000000000000000000000
7086- 0000C6C6C600C6C6C600C6C6C600C6C6C600000000000000000084848400FFFF
7087- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
7088- 0000000000000000000000000000000000000000000000000000000000000000
7089- 0000000000000000000000000000000000000000000000000000000000000000
7090- 00000000000000000000000000000000000000000000C6C6C600000000000000
7091- 0000000000000000000000000000000000000000000000000000C6C6C600C6C6
7092- C60000000000000000000000000000000000C6C6C600C6C6C600C6C6C600C6C6
7093- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7094- C600C6C6C600C6C6C600C6C6C600C6C6C600000000000000000084848400FFFF
7095- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6
7096- C600FFFFFF008484840000000000000000000000000000000000000000000000
7097- 0000000000000000000000000000000000000000000000000000000000000000
7098- 0000000000000000000000000000000000000000000000000000000000000000
7099- 000000000000000000000000000000000000000000000000000000000000C6C6
7100- C600C6C6C600000000000000000000000000C6C6C600C6C6C600C6C6C600C6C6
7101- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7102- C600C6C6C600C6C6C600C6C6C600C6C6C600000000000000000084848400FFFF
7103- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6
7104- C600848484000000000000000000000000000000000000000000000000000000
7105- 0000000000000000000000000000000000000000000000000000000000000000
7106- 0000000000000000000000000000000000000000000000000000000000000000
7107- 0000000000000000000000000000000000000000000000000000000000000000
7108- 000000000000000000000000000000000000C6C6C600C6C6C600C6C6C600C6C6
7109- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7110- C600C6C6C600C6C6C600C6C6C600C6C6C6000000000000000000848484008484
7111- 8400848484008484840084848400848484008484840084848400848484008484
7112- 8400000000000000000000000000000000000000000000000000000000000000
7113- 0000000000000000000000000000848484008484840084848400000000000000
7114- 0000000000000000000000000000000000008484840084848400848484008484
7115- 8400000000000000000000000000000000000000000000000000000000008484
7116- 8400848484008484840084848400000000000000000000000000000000000000
7117- 0000000000000000000000000000000000000000000000000000000000000000
7118- 0000000000000000000000000000000000000000000000000000000000000000
7119- 0000000000000000000000000000000000000000000000000000000000000000
7120- 0000000000000000000000000000000000000000000000000000000000000000
7121- 0000848484008484840084848400C6C6C600C6C6C600C6C6C600848484008484
7122- 84000000000000000000000000000000000084848400C6C6C600C6C6C6008484
7123- 8400848484000000000000000000000000000000000000000000848484008484
7124- 8400C6C6C600C6C6C60084848400000000000000000000000000000000000000
7125- 0000000000000000000000000000000000000000000000000000000000000000
7126- 0000000000000000000000000000000000000000000000000000000000000000
7127- 0000000000000000000000000000000000000000000000000000000000000000
7128- 0000000000000000000000000000000000000000000000000000000000008484
7129- 8400C6C6C600FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00C6C6C6008484
7130- 8400000000000000000000000000000000008484840084848400C6C6C600C6C6
7131- C60084848400848484008484840000000000848484008484840084848400C6C6
7132- C600C6C6C60084848400848484000000000000000000FFFFFF00FFFFFF00FFFF
7133- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7134- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
7135- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7136- FF00FFFFFF00FFFFFF00FFFFFF0000000000000000000000000000000000C6C6
7137- C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6
7138- C600848484008484840000000000000000000000000084848400C6C6C600C6C6
7139- C600C6C6C600C6C6C600848484008484840084848400C6C6C600C6C6C600C6C6
7140- C600C6C6C60084848400000000000000000000000000FFFFFF00FFFFFF00FFFF
7141- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7142- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
7143- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7144- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000C6C6C6008484
7145- 840000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000000000FFFF
7146- FF00C6C6C600848484000000000000000000000000008484840084848400C6C6
7147- C600C6C6C600C6C6C600C6C6C60084848400C6C6C600C6C6C600C6C6C600C6C6
7148- C6008484840084848400000000000000000000000000FFFFFF00000000000000
7149- 000000000000FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF000000
7150- 000000000000FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
7151- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7152- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000C6C6C6008484
7153- 8400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7154- FF00C6C6C600848484008484840000000000000000000000000084848400C6C6
7155- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7156- C6008484840000000000000000000000000000000000FFFFFF00FFFFFF000000
7157- 0000FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF000000000000000000FFFF
7158- FF00FFFFFF0000000000FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
7159- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7160- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000C6C6C60084848400FFFF
7161- FF00FFFFFF00FFFFFF00FFFFFF00C6C6C600C6C6C600FFFFFF00FFFFFF00FFFF
7162- FF00FFFFFF00C6C6C6008484840000000000000000000000000084848400C6C6
7163- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7164- C6008484840000000000000000000000000000000000FFFFFF00FFFFFF000000
7165- 0000FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF000000000000000000FFFF
7166- FF00FFFFFF0000000000FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
7167- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7168- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000C6C6C60000000000FFFF
7169- FF00FFFFFF00FFFFFF00C6C6C6008484840084848400C6C6C600C6C6C600FFFF
7170- FF0000000000C6C6C60084848400000000000000000000000000848484008484
7171- 8400C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C6008484
7172- 84008484840000000000000000000000000000000000FFFFFF00FFFFFF000000
7173- 0000FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF000000000000000000FFFF
7174- FF00FFFFFF0000000000FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
7175- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7176- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000C6C6C60084848400FFFF
7177- FF00FFFFFF00C6C6C60084848400FFFFFF00FFFFFF008484840084848400C6C6
7178- C600FFFFFF00C6C6C6008484840000000000000000008484840084848400C6C6
7179- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7180- C6008484840084848400000000000000000000000000FFFFFF00FFFFFF000000
7181- 0000FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF000000000000000000FFFF
7182- FF00FFFFFF0000000000FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
7183- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7184- FF00000000000000000000000000000000000000000000000000C6C6C6008484
7185- 8400FFFFFF0084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF008484
7186- 8400C6C6C6008484840000000000000000008484840084848400C6C6C600C6C6
7187- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7188- C600C6C6C60084848400848484000000000000000000FFFFFF00000000000000
7189- 0000FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF000000000000000000FFFF
7190- FF00FFFFFF0000000000FFFFFF000000000000000000FFFFFF00C6C6C600C6C6
7191- C600FFFFFF00C6C6C600C6C6C600FFFFFF00C6C6C600C6C6C600FFFFFF00FFFF
7192- FF00000000000000000000000000000000000000000000000000C6C6C6008484
7193- 840000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000000000FFFF
7194- FF00C6C6C60084848400000000000000000084848400C6C6C600C6C6C600C6C6
7195- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7196- C600C6C6C600C6C6C600848484000000000000000000FFFFFF00FFFFFF000000
7197- 0000FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF000000
7198- 000000000000FFFFFF00FFFFFF000000000000000000FFFFFF00C6C6C600C6C6
7199- C600FFFFFF00C6C6C600C6C6C600FFFFFF00C6C6C600C6C6C600FFFFFF00FFFF
7200- FF0000000000000000000000000000000000000000000000000000000000C6C6
7201- C60084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6
7202- C600848484000000000000000000000000008484840084848400848484008484
7203- 840084848400C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600848484008484
7204- 84008484840084848400848484000000000000000000FFFFFF00FFFFFF00FFFF
7205- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7206- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
7207- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7208- FF00000000000000000000000000000000000000000000000000000000000000
7209- 0000C6C6C600848484008484840000000000FFFFFF00FFFFFF00C6C6C6008484
7210- 8400000000000000000000000000000000000000000000000000000000000000
7211- 00008484840084848400C6C6C600C6C6C600C6C6C60084848400848484000000
7212- 0000000000000000000000000000000000000000000000000000000000000000
7213- 0000000000000000000000000000000000000000000000000000000000000000
7214- 0000000000000000000000000000000000000000000000000000FFFFFF00FFFF
7215- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
7216- 0000000000000000000000000000000000000000000000000000000000000000
7217- 000000000000C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600848484000000
7218- 0000000000000000000000000000000000000000000000000000000000000000
7219- 00000000000084848400C6C6C600C6C6C600C6C6C60084848400000000000000
7220- 00000000000000000000000000000000000000000000C6C6C600C6C6C600C6C6
7221- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7222- C600C6C6C600C6C6C600C6C6C600000000000000000000000000000000000000
7223- 0000000000000000000000000000000000000000000000000000000000000000
7224- 0000000000000000000000000000000000000000000000000000000000000000
7225- 00000000000000000000C6C6C600C6C6C600C6C6C60084848400848484000000
7226- 0000000000000000000000000000000000000000000000000000000000000000
7227- 0000000000008484840084848400C6C6C6008484840084848400000000000000
7228- 0000000000000000000000000000000000000000000000000000000000000000
7229- 0000000000000000000000000000000000000000000000000000000000000000
7230- 0000000000000000000000000000000000000000000000000000000000000000
7231- 0000000000000000000000000000000000000000000000000000000000000000
7232- 0000000000000000000000000000000000000000000000000000000000000000
7233- 000000000000C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600848484000000
7234- 0000000000000000000000000000000000000000000000000000000000000000
7235- 0000000000000000000084848400848484008484840000000000000000000000
7236- 0000000000000000000000000000000000000000000000000000000000000000
7237- 0000000000000000000000000000000000000000000000000000000000000000
7238- 0000000000000000000000000000000000000000000000000000000000000000
7239- 0000000000000000000000000000000000000000000000000000000000000000
7240- 0000000000000000000000000000000000000000000000000000848484008484
7241- 8400848484008484840084848400848484008484840084848400848484008484
7242- 8400848484008484840084848400000000000000000000000000000000000000
7243- 0000000000000000000000000000000000000000000000000000000000000000
7244- 0000000000000000000000000000000000000000000000000000848484008484
7245- 8400848484008484840084848400848484008484840084848400848484008484
7246- 8400848484008484840000000000000000000000000000000000000000000000
7247- 0000000000000000000000000000000000000000000000000000000000000000
7248- 0000000000000000000000000000000000000000000000000000C6C6C600FFFF
7249- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7250- FF00FFFFFF00FFFFFF0084848400000000000000000000000000000000000000
7251- 0000000000008484840000000000000000000000000000000000000000000000
7252- 0000000000000000000000000000000000000000000000000000C6C6C600FFFF
7253- FF00C6C6C600FFFFFF00C6C6C600FFFFFF00C6C6C600FFFFFF00000000000000
7254- 0000000000008484840000000000000000000000000000000000000000000000
7255- 0000000000000000000000000000000000000000000000000000000000000000
7256- 0000000000000000000000000000000000000000000000000000C6C6C600FFFF
7257- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7258- FF00FFFFFF00FFFFFF0084848400000000000000000000000000000000008484
7259- 8400848484000000000000000000000000000000000000000000000000000000
7260- 0000000000000000000000000000000000000000000000000000C6C6C600FFFF
7261- FF00FFFFFF00C6C6C600FFFFFF00C6C6C600FFFFFF0000000000848484008484
7262- 8400848484008484840000000000000000000000000000000000000000000000
7263- 0000000000000000000000000000000000000000000000000000000000000000
7264- 0000000000000000000000000000000000000000000000000000C6C6C600FFFF
7265- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7266- FF00FFFFFF00FFFFFF0084848400000000000000000000000000000000008484
7267- 8400C6C6C6000000000000000000000000000000000000000000000000000000
7268- 0000000000000000000000000000000000000000000000000000C6C6C600FFFF
7269- FF00FFFFFF00FFFFFF00C6C6C600FFFFFF000000000084848400848484008484
7270- 8400C6C6C6008484840000000000000000000000000000000000000000008484
7271- 8400848484008484840084848400848484008484840084848400848484008484
7272- 8400848484008484840000000000000000000000000000000000C6C6C600FFFF
7273- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7274- FF00FFFFFF00FFFFFF0084848400000000000000000000000000000000008484
7275- 8400C6C6C6000000000000000000000000000000000000000000000000000000
7276- 0000000000000000000000000000000000000000000000000000C6C6C6000000
7277- 000000000000000000000000000000000000848484008484840084848400C6C6
7278- C600FFFFFF008484840000000000000000000000000000000000000000000000
7279- 0000000000000000000084848400848484008484840084848400848484000000
7280- 0000000000000000000000000000000000000000000000000000C6C6C600FFFF
7281- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7282- FF00FFFFFF00FFFFFF0084848400000000000000000000000000000000008484
7283- 8400C6C6C6000000000000000000000000000000000000000000000000000000
7284- 0000000000000000000000000000000000000000000000000000000000008484
7285- 8400848484008484840084848400000000008484840084848400C6C6C600FFFF
7286- FF00C6C6C6008484840000000000000000000000000000000000000000000000
7287- 0000000000000000000000000000000000000000000000000000000000008484
7288- 8400000000000000000000000000000000000000000000000000C6C6C600FFFF
7289- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7290- FF00FFFFFF00FFFFFF0084848400000000000000000000000000000000008484
7291- 8400FFFFFF00C6C6C60000000000000000000000000000000000000000008484
7292- 8400000000000000000000000000000000000000000000000000848484008484
7293- 8400C6C6C600C6C6C600C6C6C600FFFFFF0000000000C6C6C600FFFFFF00C6C6
7294- C600FFFFFF008484840000000000000000000000000000000000000000000000
7295- 0000000000000000000000000000000000000000000000000000000000008484
7296- 8400848484000000000000000000000000000000000000000000C6C6C600FFFF
7297- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7298- FF00FFFFFF00FFFFFF0084848400000000000000000000000000000000000000
7299- 000084848400C6C6C600C6C6C60000000000000000000000000000000000C6C6
7300- C60084848400000000000000000000000000000000000000000084848400C6C6
7301- C600C6C6C600C6C6C600C6C6C600FFFFFF0000000000FFFFFF00C6C6C600FFFF
7302- FF00C6C6C6008484840000000000000000000000000000000000000000000000
7303- 0000000000000000000000000000000000000000000000000000000000000000
7304- 0000848484000000000000000000000000000000000000000000C6C6C600FFFF
7305- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7306- FF00FFFFFF00FFFFFF0084848400000000000000000000000000000000000000
7307- 000084848400FFFFFF00C6C6C600C6C6C6008484840084848400C6C6C600C6C6
7308- C600C6C6C600848484000000000000000000000000000000000084848400C6C6
7309- C600C6C6C600C6C6C600C6C6C600FFFFFF0000000000FFFFFF00FFFFFF00C6C6
7310- C600FFFFFF008484840000000000000000000000000000000000000000000000
7311- 0000000000000000000000000000000000000000000000000000000000000000
7312- 0000848484000000000000000000000000000000000000000000C6C6C600FFFF
7313- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7314- FF00FFFFFF00FFFFFF0084848400000000000000000000000000000000000000
7315- 00000000000084848400FFFFFF00FFFFFF00C6C6C600C6C6C600C6C6C600C6C6
7316- C600C6C6C600C6C6C6008484840000000000000000000000000084848400C6C6
7317- C600C6C6C600C6C6C600FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFF
7318- FF00C6C6C6008484840000000000000000000000000000000000000000000000
7319- 0000848484000000000000000000000000000000000000000000000000000000
7320- 0000848484000000000000000000000000000000000000000000C6C6C600FFFF
7321- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7322- FF00FFFFFF00FFFFFF0084848400000000000000000000000000000000000000
7323- 000000000000000000008484840084848400FFFFFF00FFFFFF00FFFFFF00C6C6
7324- C600C6C6C600C6C6C6000000000000000000000000000000000000000000FFFF
7325- FF00FFFFFF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF00FFFF
7326- FF00FFFFFF008484840000000000000000000000000000000000000000000000
7327- 0000848484000000000000000000000000000000000000000000000000000000
7328- 0000848484000000000000000000000000000000000000000000C6C6C600FFFF
7329- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7330- FF00FFFFFF00FFFFFF0084848400000000000000000000000000000000000000
7331- 000000000000000000000000000000000000848484008484840084848400FFFF
7332- FF00C6C6C6000000000000000000000000000000000000000000C6C6C6000000
7333- 0000000000000000000000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF008484
7334- 8400848484008484840000000000000000000000000000000000000000000000
7335- 0000848484008484840000000000000000000000000000000000000000008484
7336- 8400848484000000000000000000000000000000000000000000C6C6C600FFFF
7337- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF008484
7338- 8400848484008484840084848400000000000000000000000000000000000000
7339- 000000000000000000000000000000000000000000000000000084848400FFFF
7340- FF00000000000000000000000000000000000000000000000000C6C6C600FFFF
7341- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7342- FF00FFFFFF00C6C6C60000000000000000000000000000000000000000000000
7343- 0000000000008484840000000000000000000000000084848400848484000000
7344- 0000000000000000000000000000000000000000000000000000C6C6C600FFFF
7345- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7346- FF00FFFFFF00C6C6C60000000000000000000000000000000000000000000000
7347- 0000000000000000000000000000000000000000000000000000848484000000
7348- 0000000000000000000000000000000000000000000000000000C6C6C600FFFF
7349- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7350- FF00C6C6C6000000000000000000000000000000000000000000000000000000
7351- 0000000000000000000084848400848484008484840084848400000000000000
7352- 0000000000000000000000000000000000000000000000000000C6C6C600FFFF
7353- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7354- FF00C6C6C6000000000000000000000000000000000000000000000000000000
7355- 0000000000000000000000000000000000000000000000000000848484000000
7356- 0000000000000000000000000000000000000000000000000000C6C6C600C6C6
7357- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7358- C600000000000000000000000000000000000000000000000000000000000000
7359- 0000000000000000000000000000000000000000000000000000000000000000
7360- 0000000000000000000000000000000000000000000000000000C6C6C600C6C6
7361- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7362- C600000000000000000000000000000000000000000000000000000000000000
7363- 0000000000000000000000000000000000000000000000000000000000000000
7364- 0000000000000000000000000000000000000000000000000000000000000000
7365- 0000000000000000000000000000000000000000000000000000000000000000
7366- 0000000000000000000000000000000000000000000000000000000000000000
7367- 0000000000000000000000000000000000000000000000000000000000000000
7368- 0000000000000000000000000000000000000000000000000000000000000000
7369- 0000000000000000000000000000000000000000000000000000000000000000
7370- 0000000000000000000000000000000000000000000000000000000000000000
7371- 0000000000000000000000000000000000000000000000000000000000000000
7372- 0000000000000000000000000000000000000000000000000000000000000000
7373- 0000000000000000000000000000000000000000000000000000000000000000
7374- 0000000000000000000000000000000000000000000000000000000000000000
7375- 0000000000000000000000000000000000000000000000000000000000008484
7376- 840084848400848484008484840000000000000000000000000084848400C6C6
7377- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7378- C600C6C6C600C6C6C60000000000000000000000000000000000000000000000
7379- 0000000000000000000000000000000000000000000000000000000000000000
7380- 0000000000000000000000000000000000000000000000000000000000000000
7381- 0000000000000000000000000000000000000000000000000000000000000000
7382- 0000000000000000000000000000000000008484840084848400848484008484
7383- 840084848400848484008484840084848400848484008484840000000000FFFF
7384- FF00FFFFFF00FFFFFF008484840000000000000000000000000084848400FFFF
7385- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7386- FF00FFFFFF00C6C6C600000000000000000000000000C6C6C600000000000000
7387- 0000000000000000000000000000000000000000000000000000000000000000
7388- 0000000000008484840000000000000000000000000084848400848484008484
7389- 8400848484008484840084848400848484008484840084848400848484008484
7390- 84008484840084848400848484000000000084848400FFFFFF00FFFFFF00C6C6
7391- C600FFFFFF00C6C6C600FFFFFF00C6C6C600FFFFFF008484840000000000FFFF
7392- FF00FFFFFF00FFFFFF008484840000000000000000000000000084848400FFFF
7393- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0084848400FFFFFF00FFFFFF00FFFF
7394- FF00FFFFFF00C6C6C60000000000000000000000000084848400848484000000
7395- 0000000000000000000000000000000000000000000000000000000000000000
7396- 0000000000000000000000000000000000000000000084848400FFFFFF00FFFF
7397- FF00C6C6C600FFFFFF00C6C6C600FFFFFF00C6C6C600FFFFFF00C6C6C600FFFF
7398- FF00C6C6C600FFFFFF00848484000000000084848400FFFFFF00C6C6C600FFFF
7399- FF00C6C6C600FFFFFF00C6C6C600FFFFFF00C6C6C6008484840000000000FFFF
7400- FF00FFFFFF00FFFFFF008484840000000000000000000000000084848400FFFF
7401- FF00FFFFFF00FFFFFF00FFFFFF008484840084848400FFFFFF00FFFFFF00FFFF
7402- FF00FFFFFF00C6C6C60000000000000000000000000084848400C6C6C6008484
7403- 8400000000000000000000000000000000000000000000000000000000000000
7404- 0000848484000000000000000000000000000000000084848400FFFFFF00C6C6
7405- C600FFFFFF00C6C6C600FFFFFF00C6C6C600FFFFFF00C6C6C600FFFFFF00C6C6
7406- C600FFFFFF00C6C6C600848484000000000084848400FFFFFF00FFFFFF00C6C6
7407- C600FFFFFF00C6C6C600FFFFFF00C6C6C600FFFFFF008484840000000000FFFF
7408- FF00FFFFFF00FFFFFF008484840000000000000000000000000084848400FFFF
7409- FF00FFFFFF00FFFFFF008484840084848400848484008484840084848400FFFF
7410- FF00FFFFFF00C6C6C6000000000000000000000000000000000084848400C6C6
7411- C600000000000000000000000000000000000000000000000000000000008484
7412- 8400000000000000000000000000000000000000000084848400FFFFFF00FFFF
7413- FF00C6C6C600FFFFFF00C6C6C600FFFFFF00C6C6C600FFFFFF00C6C6C600FFFF
7414- FF00C6C6C600FFFFFF00848484000000000084848400FFFFFF00FFFFFF00FFFF
7415- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF008484840000000000FFFF
7416- FF00FFFFFF00FFFFFF008484840000000000000000000000000084848400FFFF
7417- FF00FFFFFF00FFFFFF00FFFFFF008484840084848400FFFFFF00848484008484
7418- 8400FFFFFF00C6C6C60000000000000000000000000000000000000000008484
7419- 8400C6C6C6000000000000000000000000000000000000000000848484000000
7420- 0000000000000000000000000000000000000000000084848400FFFFFF00C6C6
7421- C600FFFFFF00C6C6C600FFFFFF00C6C6C600FFFFFF00C6C6C600FFFFFF00C6C6
7422- C600FFFFFF00C6C6C600848484000000000084848400FFFFFF00C6C6C600FFFF
7423- FF00C6C6C600FFFFFF00C6C6C600848484008484840084848400FFFFFF00FFFF
7424- FF00FFFFFF00FFFFFF008484840000000000000000000000000084848400FFFF
7425- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0084848400FFFFFF00FFFFFF008484
7426- 8400FFFFFF00C6C6C60000000000000000000000000000000000000000000000
7427- 0000848484008484840000000000000000000000000084848400000000000000
7428- 0000000000000000000000000000000000000000000084848400FFFFFF00FFFF
7429- FF00C6C6C600FFFFFF00C6C6C600FFFFFF00C6C6C600FFFFFF00C6C6C600FFFF
7430- FF00C6C6C600FFFFFF0084848400000000000000000084848400FFFFFF00C6C6
7431- C600FFFFFF00C6C6C60084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7432- FF00FFFFFF00FFFFFF008484840000000000000000000000000084848400FFFF
7433- FF0084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF008484
7434- 8400FFFFFF00C6C6C60000000000000000000000000000000000000000000000
7435- 0000000000008484840084848400000000008484840000000000000000000000
7436- 0000000000000000000000000000000000000000000084848400FFFFFF00C6C6
7437- C600FFFFFF00C6C6C600FFFFFF00C6C6C600FFFFFF00C6C6C600FFFFFF00C6C6
7438- C600FFFFFF00C6C6C60084848400000000000000000000000000848484008484
7439- 84008484840084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7440- FF00FFFFFF00FFFFFF008484840000000000000000000000000084848400FFFF
7441- FF0084848400FFFFFF00FFFFFF0084848400FFFFFF00FFFFFF00FFFFFF00FFFF
7442- FF00FFFFFF00C6C6C60000000000000000000000000000000000000000000000
7443- 0000000000000000000084848400848484000000000000000000000000000000
7444- 0000000000000000000000000000000000000000000084848400FFFFFF00FFFF
7445- FF00C6C6C600FFFFFF00C6C6C600FFFFFF00C6C6C600FFFFFF00C6C6C600FFFF
7446- FF00C6C6C600FFFFFF0084848400000000000000000000000000C6C6C600FFFF
7447- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7448- FF00FFFFFF00FFFFFF008484840000000000000000000000000084848400FFFF
7449- FF008484840084848400FFFFFF008484840084848400FFFFFF00FFFFFF00FFFF
7450- FF00FFFFFF00C6C6C60000000000000000000000000000000000000000000000
7451- 0000000000008484840084848400000000008484840000000000000000000000
7452- 0000000000000000000000000000000000000000000084848400FFFFFF00FFFF
7453- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7454- FF00FFFFFF00FFFFFF0084848400000000000000000000000000C6C6C600FFFF
7455- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7456- FF00FFFFFF00FFFFFF008484840000000000000000000000000084848400FFFF
7457- FF00FFFFFF008484840084848400848484008484840084848400FFFFFF00FFFF
7458- FF00FFFFFF00C6C6C60000000000000000000000000000000000000000000000
7459- 000084848400C6C6C60000000000000000000000000084848400000000000000
7460- 0000000000000000000000000000000000000000000084848400FFFFFF00C6C6
7461- C600FFFFFF00C6C6C600FFFFFF00C6C6C600FFFFFF0084848400848484008484
7462- 8400848484008484840084848400000000000000000000000000C6C6C600FFFF
7463- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7464- FF00FFFFFF00FFFFFF008484840000000000000000000000000084848400FFFF
7465- FF00FFFFFF00FFFFFF00FFFFFF008484840084848400FFFFFF00FFFFFF000000
7466- 0000000000000000000000000000000000000000000000000000848484008484
7467- 8400C6C6C6000000000000000000000000000000000000000000848484000000
7468- 000000000000000000000000000000000000000000000000000084848400FFFF
7469- FF00C6C6C600FFFFFF00C6C6C600FFFFFF008484840000000000000000000000
7470- 0000000000000000000000000000000000000000000000000000C6C6C600FFFF
7471- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF008484
7472- 840084848400848484008484840000000000000000000000000084848400FFFF
7473- FF00FFFFFF00FFFFFF00FFFFFF0084848400FFFFFF00FFFFFF00FFFFFF00C6C6
7474- C600FFFFFF008484840000000000000000000000000084848400C6C6C600C6C6
7475- C600000000000000000000000000000000000000000000000000000000008484
7476- 8400000000000000000000000000000000000000000000000000000000008484
7477- 8400848484008484840084848400848484000000000000000000000000000000
7478- 0000000000000000000000000000000000000000000000000000C6C6C600FFFF
7479- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7480- FF00FFFFFF00C6C6C6000000000000000000000000000000000084848400FFFF
7481- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6
7482- C600848484000000000000000000000000000000000084848400848484008484
7483- 8400000000000000000000000000000000000000000000000000000000000000
7484- 0000000000008484840000000000000000000000000000000000000000000000
7485- 0000000000000000000000000000000000000000000000000000000000000000
7486- 0000000000000000000000000000000000000000000000000000C6C6C600FFFF
7487- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7488- FF00C6C6C6000000000000000000000000000000000000000000848484008484
7489- 8400848484008484840084848400848484008484840084848400848484008484
7490- 8400000000000000000000000000000000000000000000000000000000000000
7491- 0000000000000000000000000000000000000000000000000000000000000000
7492- 0000000000000000000000000000000000000000000000000000000000000000
7493- 0000000000000000000000000000000000000000000000000000000000000000
7494- 0000000000000000000000000000000000000000000000000000C6C6C600C6C6
7495- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7496- C600000000000000000000000000000000000000000000000000000000000000
7497- 0000000000000000000000000000000000000000000000000000000000000000
7498- 0000000000000000000000000000000000000000000000000000000000000000
7499- 0000000000000000000000000000000000000000000000000000000000000000
7500- 0000000000000000000000000000000000000000000000000000000000000000
7501- 0000000000000000000000000000000000000000000000000000000000000000
7502- 0000000000000000000000000000000000000000000000000000000000000000
7503- 0000000000000000000000000000000000000000000000000000000000000000
7504- 0000000000000000000000000000000000000000000000000000000000000000
7505- 0000000000000000000000000000000000000000000000000000000000000000
7506- 0000000000000000000000000000000000000000000000000000000000000000
7507- 0000000000000000000000000000000000000000000000000000000000000000
7508- 0000000000000000000000000000000000000000000000000000000000000000
7509- 0000000000000000000000000000000000000000000000000000000000000000
7510- 0000000000000000000084848400000000000000000000000000000000000000
7511- 0000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7512- FF00FFFFFF00FFFFFF0000000000000000000000000000000000000000000000
7513- 000000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7514- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000000000000000
7515- 000000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7516- FF00FFFFFF00FFFFFF00FFFFFF0000000000000000000000000000000000FFFF
7517- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7518- FF00000000008484840084848400848484000000000000000000848484000000
7519- 0000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7520- FF00FFFFFF00FFFFFF0000000000000000000000000000000000000000000000
7521- 000000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7522- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000848484008484
7523- 840084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7524- FF00FFFFFF00FFFFFF00FFFFFF0000000000000000000000000000000000FFFF
7525- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
7526- 000084848400C6C6C600C6C6C600000000000000000084848400000000008484
7527- 840084848400848484008484840084848400FFFFFF00FFFFFF00FFFFFF00FFFF
7528- FF00FFFFFF00FFFFFF0000000000000000000000000000000000000000000000
7529- 000000000000FFFFFF00C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7530- C600C6C6C600C6C6C600FFFFFF00000000000000000000000000000000008484
7531- 84008484840084848400C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7532- C600C6C6C600C6C6C600FFFFFF0000000000000000000000000000000000FFFF
7533- FF0084848400848484008484840084848400FFFFFF00FFFFFF00000000008484
7534- 8400C6C6C600C6C6C60000000000000000008484840084848400848484008484
7535- 84008484840084848400848484008484840084848400FFFFFF00FFFFFF00FFFF
7536- FF00FFFFFF00FFFFFF0000000000000000000000000000000000000000000000
7537- 000000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7538- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000000000000000
7539- 000084848400848484008484840084848400FFFFFF00FFFFFF00FFFFFF00FFFF
7540- FF00FFFFFF00FFFFFF00FFFFFF0000000000000000000000000000000000FFFF
7541- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000000084848400C6C6
7542- C600C6C6C6000000000000000000000000008484840084848400848484008484
7543- 840084848400FFFFFF00FFFFFF00848484008484840084848400FFFFFF00FFFF
7544- FF00FFFFFF00FFFFFF0000000000000000000000000000000000000000000000
7545- 000000000000FFFFFF00C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7546- C600C6C6C600C6C6C600FFFFFF00000000000000000000000000000000000000
7547- 00000000000084848400848484008484840084848400C6C6C600C6C6C600C6C6
7548- C600C6C6C600C6C6C600FFFFFF0000000000000000000000000000000000FFFF
7549- FF00848484008484840084848400FFFFFF000000000084848400C6C6C600C6C6
7550- C600000000000000000000000000000000008484840084848400848484008484
7551- 8400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7552- FF00FFFFFF00FFFFFF0000000000000000000000000000000000848484000000
7553- 00000000000084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7554- FF00FFFFFF00FFFFFF00FFFFFF00000000008484840084848400848484008484
7555- 8400848484008484840084848400848484008484840084848400FFFFFF00FFFF
7556- FF00FFFFFF00FFFFFF00FFFFFF0000000000000000000000000000000000FFFF
7557- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000000000000000C6C6C6000000
7558- 0000FFFFFF000000000000000000000000000000000084848400848484008484
7559- 8400848484008484840084848400848484008484840084848400FFFFFF00FFFF
7560- FF00FFFFFF00FFFFFF0000000000000000000000000000000000848484008484
7561- 84000000000084848400C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7562- C600C6C6C600C6C6C600FFFFFF00000000008484840084848400848484008484
7563- 8400848484008484840084848400848484008484840084848400848484008484
7564- 8400C6C6C600C6C6C600FFFFFF0000000000000000000000000000000000FFFF
7565- FF00848484008484840084848400FFFFFF00000000000000000000000000FFFF
7566- FF00FFFFFF000000000000000000000000000000000084848400848484008484
7567- 840084848400FFFFFF00FFFFFF00848484008484840084848400FFFFFF00FFFF
7568- FF00FFFFFF00FFFFFF0000000000000000000000000000000000000000008484
7569- 84008484840084848400FFFFFF008484840084848400FFFFFF00FFFFFF00FFFF
7570- FF00FFFFFF00FFFFFF00FFFFFF00000000008484840084848400848484008484
7571- 8400848484008484840084848400848484008484840084848400FFFFFF00FFFF
7572- FF00FFFFFF00FFFFFF00FFFFFF0000000000000000000000000000000000FFFF
7573- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7574- FF00FFFFFF000000000000000000000000000000000000000000848484008484
7575- 84008484840084848400848484008484840084848400FFFFFF00FFFFFF00FFFF
7576- FF00FFFFFF00FFFFFF0000000000000000008484840084848400848484008484
7577- 840084848400848484008484840084848400C6C6C600C6C6C600C6C6C600C6C6
7578- C600C6C6C600C6C6C600FFFFFF00000000000000000000000000000000000000
7579- 00000000000084848400848484008484840084848400C6C6C600C6C6C600C6C6
7580- C600C6C6C600C6C6C600FFFFFF0000000000000000000000000000000000FFFF
7581- FF00848484008484840084848400848484008484840084848400848484008484
7582- 8400FFFFFF000000000000000000000000000000000000000000000000008484
7583- 840084848400848484008484840084848400FFFFFF0084848400FFFFFF00FFFF
7584- FF00FFFFFF00FFFFFF0000000000000000000000000000000000848484008484
7585- 8400000000008484840084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7586- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000000000000000
7587- 000084848400848484008484840084848400FFFFFF00FFFFFF00FFFFFF00FFFF
7588- FF00FFFFFF00FFFFFF00FFFFFF0000000000000000000000000000000000FFFF
7589- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7590- FF00FFFFFF000000000000000000000000000000000000000000000000000000
7591- 0000FFFFFF00FFFFFF00FFFFFF008484840084848400FFFFFF00FFFFFF000000
7592- 0000000000000000000000000000000000000000000084848400848484008484
7593- 84008484840084848400848484008484840084848400C6C6C600C6C6C600C6C6
7594- C600C6C6C600C6C6C600FFFFFF00000000000000000000000000000000008484
7595- 84008484840084848400C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7596- C600C6C6C600C6C6C600FFFFFF0000000000000000000000000000000000FFFF
7597- FF00848484008484840084848400848484008484840084848400848484008484
7598- 8400FFFFFF000000000000000000000000000000000000000000000000000000
7599- 0000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
7600- 0000FFFFFF000000000000000000000000008484840084848400000000008484
7601- 84008484840084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7602- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000848484008484
7603- 840084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7604- FF00FFFFFF00FFFFFF00FFFFFF0000000000000000000000000000000000FFFF
7605- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7606- FF00FFFFFF000000000000000000000000000000000000000000000000000000
7607- 0000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
7608- 0000000000000000000000000000000000000000000000000000000000008484
7609- 8400000000008484840084848400000000000000000000000000000000000000
7610- 0000000000000000000000000000000000000000000000000000000000000000
7611- 0000000000000000000000000000000000000000000000000000000000000000
7612- 0000000000000000000000000000000000000000000000000000000000000000
7613- 0000000000000000000000000000000000000000000000000000000000000000
7614- 0000000000000000000000000000000000000000000000000000000000000000
7615- 0000000000000000000000000000000000000000000000000000000000000000
7616- 0000000000000000000000000000000000000000000000000000000000008484
7617- 8400000000000000000084848400000000000000000000000000000000000000
7618- 0000000000000000000000000000000000000000000000000000000000000000
7619- 0000000000000000000000000000000000000000000000000000000000000000
7620- 0000000000000000000000000000000000000000000000000000000000000000
7621- 0000000000000000000000000000000000000000000000000000000000000000
7622- 0000000000000000000000000000000000000000000000000000000000000000
7623- 0000000000000000000000000000000000000000000000000000000000000000
7624- 0000000000000000000000000000000000000000000000000000000000000000
7625- 0000000000000000000000000000000000000000000000000000000000000000
7626- 0000000000000000000000000000000000000000000000000000000000000000
7627- 0000000000000000000000000000000000000000000000000000000000000000
7628- 0000000000000000000000000000000000000000000000000000000000000000
7629- 0000000000000000000000000000000000000000000000000000000000000000
7630- 0000000000000000000000000000000000000000000000000000000000000000
7631- 0000000000000000000000000000000000000000000000000000000000000000
7632- 0000000000000000000000000000000000000000000000000000000000000000
7633- 0000000000000000000000000000000000000000000000000000000000000000
7634- 0000000000000000000000000000000000000000000000000000000000000000
7635- 0000000000000000000000000000000000000000000000000000000000000000
7636- 0000000000000000000000000000000000000000000000000000000000000000
7637- 0000000000000000000000000000000000000000000000000000000000000000
7638- 0000000000000000000000000000000000000000000000000000848484008484
7639- 8400848484008484840084848400848484008484840084848400848484008484
7640- 8400848484000000000000000000000000000000000000000000000000000000
7641- 0000000000000000000000000000000000000000000000000000000000000000
7642- 0000000000000000000000000000000000000000000000000000000000000000
7643- 0000000000000000000000000000000000000000000000000000000000000000
7644- 0000000000000000000000000000000000000000000000000000000000000000
7645- 0000000000000000000000000000848484008484840084848400000000000000
7646- 0000000000000000000000000000000000000000000000000000000000000000
7647- 0000000000000000000000000000000000000000000000000000000000000000
7648- 0000000000000000000000000000000000000000000000000000000000000000
7649- 0000000000000000000000000000000000000000000000000000000000000000
7650- 0000000000000000000000000000000000000000000000000000000000000000
7651- 0000000000000000000000000000000000008484840000000000000000000000
7652- 0000000000000000000000000000000000000000000000000000000000000000
7653- 000000000000000000000000000084848400FFFFFF0084848400000000000000
7654- 0000000000000000000000000000000000000000000000000000000000000000
7655- 0000000000000000000000000000000000008484840000000000000000000000
7656- 0000000000000000000000000000000000000000000000000000000000000000
7657- 0000848484000000000000000000000000000000000084848400000000000000
7658- 0000000000000000000000000000000000000000000000000000000000008484
7659- 8400000000000000000000000000000000008484840000000000000000000000
7660- 0000848484000000000000000000000000000000000000000000000000000000
7661- 000000000000000000000000000084848400FFFFFF0084848400000000000000
7662- 0000000000000000000000000000000000000000000000000000000000000000
7663- 000000000000000000000000000084848400FFFFFF0084848400000000000000
7664- 0000000000000000000000000000000000000000000000000000000000000000
7665- 0000FFFFFF0084848400000000000000000000000000FFFFFF00848484000000
7666- 000000000000000000000000000000000000000000000000000000000000FFFF
7667- FF00848484000000000000000000000000008484840000000000000000008484
7668- 8400FFFFFF000000000000000000000000000000000000000000000000000000
7669- 000000000000000000000000000084848400FFFFFF0084848400000000000000
7670- 0000000000000000000000000000000000000000000000000000000000000000
7671- 0000000000000000000084848400FFFFFF00FFFFFF00FFFFFF00848484000000
7672- 0000000000000000000000000000000000000000000000000000000000000000
7673- 0000FFFFFF00FFFFFF00848484000000000000000000FFFFFF00FFFFFF008484
7674- 840000000000000000000000000000000000000000000000000000000000FFFF
7675- FF00FFFFFF00848484000000000000000000848484000000000084848400FFFF
7676- FF00FFFFFF000000000000000000000000000000000000000000000000000000
7677- 000000000000000000000000000084848400FFFFFF0084848400000000000000
7678- 0000000000000000000000000000000000000000000000000000000000000000
7679- 000000000000848484008484840084848400FFFFFF00FFFFFF00FFFFFF008484
7680- 8400000000000000000000000000000000000000000000000000000000000000
7681- 0000FFFFFF00FFFFFF00FFFFFF008484840000000000FFFFFF00FFFFFF00FFFF
7682- FF0084848400000000000000000000000000000000000000000000000000FFFF
7683- FF00FFFFFF00FFFFFF0084848400000000008484840084848400FFFFFF00FFFF
7684- FF00FFFFFF000000000000000000000000000000000000000000000000000000
7685- 000000000000000000000000000084848400FFFFFF0084848400000000000000
7686- 0000000000000000000000000000000000000000000000000000000000000000
7687- 000000000000000000000000000084848400FFFFFF0000000000000000000000
7688- 0000000000000000000000000000000000000000000000000000000000000000
7689- 000084848400FFFFFF0084848400000000000000000084848400FFFFFF008484
7690- 8400000000000000000000000000000000000000000000000000000000008484
7691- 8400FFFFFF00848484000000000000000000848484000000000084848400FFFF
7692- FF00848484000000000000000000000000000000000000000000000000000000
7693- 000000000000000000000000000084848400FFFFFF0000000000000000000000
7694- 0000000000000000000000000000000000000000000000000000000000000000
7695- 000000000000000000000000000084848400FFFFFF0084848400000000000000
7696- 0000000000000000000000000000000000000000000000000000000000000000
7697- 0000848484008484840000000000000000000000000084848400848484000000
7698- 0000000000000000000000000000000000000000000000000000000000008484
7699- 8400848484000000000000000000000000008484840000000000000000008484
7700- 8400848484000000000000000000000000000000000000000000000000000000
7701- 000000000000848484008484840084848400FFFFFF00FFFFFF00FFFFFF008484
7702- 8400000000000000000000000000000000000000000000000000000000000000
7703- 000000000000000000000000000084848400FFFFFF0084848400000000000000
7704- 0000000000000000000000000000000000000000000000000000000000000000
7705- 0000848484000000000000000000000000000000000084848400000000000000
7706- 0000000000000000000000000000000000000000000000000000000000008484
7707- 8400000000000000000000000000000000008484840000000000000000000000
7708- 0000848484000000000000000000000000000000000000000000000000000000
7709- 0000000000000000000084848400FFFFFF00FFFFFF00FFFFFF00848484000000
7710- 0000000000000000000000000000000000000000000000000000000000000000
7711- 000000000000000000000000000084848400FFFFFF0084848400000000000000
7712- 0000000000000000000000000000000000000000000000000000000000000000
7713- 0000000000000000000000000000000000000000000000000000000000000000
7714- 0000000000000000000000000000000000000000000000000000000000000000
7715- 0000000000000000000000000000000000008484840000000000000000000000
7716- 0000000000000000000000000000000000000000000000000000000000000000
7717- 000000000000000000000000000084848400FFFFFF0084848400000000000000
7718- 0000000000000000000000000000000000000000000000000000000000000000
7719- 000000000000000000000000000084848400FFFFFF0084848400000000000000
7720- 0000000000000000000000000000000000000000000000000000000000000000
7721- 0000000000000000000000000000000000000000000000000000000000000000
7722- 0000000000000000000000000000000000000000000000000000000000000000
7723- 0000000000000000000000000000000000008484840000000000000000000000
7724- 0000000000000000000000000000000000000000000000000000000000000000
7725- 0000000000000000000000000000000000008484840000000000000000000000
7726- 0000000000000000000000000000000000000000000000000000000000000000
7727- 000000000000000000000000000084848400FFFFFF0084848400000000000000
7728- 0000000000000000000000000000000000000000000000000000000000000000
7729- 0000000000000000000000000000000000000000000000000000000000000000
7730- 0000000000000000000000000000000000000000000000000000000000000000
7731- 0000000000000000000000000000000000008484840000000000000000000000
7732- 0000000000000000000000000000000000000000000000000000000000000000
7733- 0000000000000000000000000000000000000000000000000000000000000000
7734- 0000000000000000000000000000000000000000000000000000000000000000
7735- 0000000000000000000000000000848484008484840084848400000000000000
7736- 0000000000000000000000000000000000000000000000000000000000000000
7737- 0000000000000000000000000000000000000000000000000000000000000000
7738- 0000000000000000000000000000000000000000000000000000000000000000
7739- 0000000000000000000000000000000000000000000000000000000000000000
7740- 0000000000000000000000000000000000000000000000000000848484008484
7741- 8400848484008484840084848400848484008484840084848400848484008484
7742- 8400848484000000000000000000000000000000000000000000000000000000
7743- 0000000000000000000000000000000000000000000000000000000000000000
7744- 0000000000000000000000000000000000000000000000000000000000000000
7745- 0000000000000000000000000000000000000000000000000000000000000000
7746- 0000000000000000000000000000000000000000000000000000000000000000
7747- 0000000000000000000000000000000000000000000000000000000000000000
7748- 0000000000000000000000000000000000000000000000000000000000000000
7749- 0000000000000000000000000000000000000000000000000000000000000000
7750- 0000000000000000000000000000000000000000000000000000000000000000
7751- 0000000000000000000000000000000000000000000000000000000000000000
7752- 0000000000000000000000000000000000000000000000000000000000000000
7753- 0000000000000000000000000000000000000000000000000000000000000000
7754- 0000000000000000000000000000000000000000000000000000000000000000
7755- 0000000000000000000000000000000000000000000000000000000000000000
7756- 0000000000000000000000000000000000000000000000000000000000000000
7757- 0000000000000000000000000000000000000000000000000000000000000000
7758- 0000000000000000000000000000000000000000000000000000000000000000
7759- 0000000000000000000000000000000000000000000000000000000000000000
7760- 0000000000000000000000000000000000000000000000000000000000000000
7761- 0000000000000000000000000000000000000000000000000000000000000000
7762- 0000000000000000000000000000000000000000000000000000000000000000
7763- 0000000000000000000000000000000000000000000000000000000000000000
7764- 0000000000000000000000000000000000000000000000000000000000000000
7765- 0000000000000000000000000000000000000000000000000000000000000000
7766- 0000000000000000000000000000000000000000000000000000000000000000
7767- 0000000000000000000000000000000000000000000000000000000000000000
7768- 0000000000000000000000000000000000000000000000000000000000000000
7769- 0000000000000000000000000000000000000000000000000000000000000000
7770- 0000000000000000000000000000000000000000000000000000000000000000
7771- 0000000000000000000000000000000000000000000000000000000000000000
7772- 0000000000000000000000000000000000000000000000000000000000000000
7773- 0000000000000000000000000000000000000000000000000000000000000000
7774- 0000000000000000000000000000000000000000000000000000000000000000
7775- 0000000000000000000000000000000000000000000000000000000000000000
7776- 0000000000000000000000000000000000000000000000000000000000000000
7777- 0000000000000000000000000000000000000000000000000000000000000000
7778- 0000000000000000000000000000000000000000000000000000000000000000
7779- 0000000000000000000000000000000000008484840000000000000000000000
7780- 0000000000000000000000000000000000000000000000000000000000000000
7781- 000000000000848484008484840084848400FFFFFF00FFFFFF00FFFFFF008484
7782- 8400000000000000000000000000000000000000000000000000000000000000
7783- 0000000000000000000000000000000000000000000000000000000000000000
7784- 0000000000000000000000000000000000000000000000000000000000000000
7785- 000000000000848484008484840084848400FFFFFF00FFFFFF00FFFFFF008484
7786- 8400000000000000000000000000000000000000000000000000000000000000
7787- 000000000000000000000000000084848400FFFFFF0084848400000000000000
7788- 0000000000000000000000000000000000000000000000000000000000000000
7789- 0000000000000000000084848400FFFFFF00FFFFFF00FFFFFF00848484000000
7790- 0000000000000000000000000000000000000000000000000000000000000000
7791- 0000000000000000000084848400000000000000000000000000000000008484
7792- 8400000000000000000000000000000000000000000000000000000000000000
7793- 0000000000000000000084848400FFFFFF00FFFFFF00FFFFFF00848484000000
7794- 0000000000000000000000000000000000000000000000000000000000000000
7795- 0000000000000000000084848400FFFFFF00FFFFFF00FFFFFF00848484000000
7796- 0000000000000000000000000000000000000000000000000000000000000000
7797- 000000000000000000000000000084848400FFFFFF0084848400000000000000
7798- 0000000000000000000000000000000000000000000000000000000000000000
7799- 00000000000084848400FFFFFF0000000000000000000000000084848400FFFF
7800- FF00000000000000000000000000000000000000000000000000000000000000
7801- 000000000000000000000000000084848400FFFFFF0084848400000000000000
7802- 0000000000000000000000000000000000000000000000000000000000000000
7803- 000000000000848484008484840084848400FFFFFF00FFFFFF00FFFFFF008484
7804- 8400000000000000000000000000000000000000000000000000000000000000
7805- 0000000000000000000000000000000000008484840000000000000000000000
7806- 0000000000000000000000000000000000000000000000000000000000000000
7807- 000084848400FFFFFF00FFFFFF00000000000000000084848400FFFFFF00FFFF
7808- FF00000000000000000000000000000000000000000000000000000000000000
7809- 0000000000000000000000000000000000008484840000000000000000000000
7810- 0000000000000000000000000000000000000000000000000000000000000000
7811- 0000000000000000000000000000000000000000000000000000000000000000
7812- 0000000000000000000000000000000000000000000000000000000000000000
7813- 0000000000000000000000000000000000000000000000000000000000000000
7814- 0000000000000000000000000000000000000000000000000000000000008484
7815- 8400FFFFFF00FFFFFF00FFFFFF000000000084848400FFFFFF00FFFFFF00FFFF
7816- FF00000000000000000000000000000000000000000000000000000000000000
7817- 0000000000000000000000000000000000000000000000000000000000000000
7818- 0000000000000000000000000000000000000000000000000000000000000000
7819- 0000000000000000000000000000000000008484840000000000000000000000
7820- 0000000000000000000000000000000000000000000000000000848484008484
7821- 8400848484008484840084848400848484008484840084848400848484008484
7822- 8400848484000000000000000000000000000000000000000000000000000000
7823- 000084848400FFFFFF0084848400000000000000000084848400FFFFFF008484
7824- 8400000000000000000000000000000000000000000000000000000000000000
7825- 000000000000848484008484840084848400FFFFFF00FFFFFF00FFFFFF008484
7826- 8400000000000000000000000000000000000000000000000000000000000000
7827- 000000000000000000000000000084848400FFFFFF0084848400000000000000
7828- 0000000000000000000000000000000000000000000000000000000000000000
7829- 0000000000000000000000000000000000008484840000000000000000000000
7830- 0000000000000000000000000000000000000000000000000000000000000000
7831- 0000000000008484840084848400000000000000000000000000848484008484
7832- 8400000000000000000000000000000000000000000000000000000000000000
7833- 0000000000000000000084848400FFFFFF00FFFFFF00FFFFFF00848484000000
7834- 0000000000000000000000000000000000000000000000000000000000000000
7835- 0000000000000000000084848400FFFFFF00FFFFFF00FFFFFF00848484000000
7836- 0000000000000000000000000000000000000000000000000000000000000000
7837- 000000000000000000000000000084848400FFFFFF0084848400000000000000
7838- 0000000000000000000000000000000000000000000000000000000000000000
7839- 0000000000000000000084848400000000000000000000000000000000008484
7840- 8400000000000000000000000000000000000000000000000000000000000000
7841- 000000000000000000000000000084848400FFFFFF0084848400000000000000
7842- 0000000000000000000000000000000000000000000000000000000000000000
7843- 000000000000848484008484840084848400FFFFFF00FFFFFF00FFFFFF008484
7844- 8400000000000000000000000000000000000000000000000000000000000000
7845- 0000000000000000000084848400FFFFFF00FFFFFF00FFFFFF00848484000000
7846- 0000000000000000000000000000000000000000000000000000000000000000
7847- 0000000000000000000000000000000000000000000000000000000000000000
7848- 0000000000000000000000000000000000000000000000000000000000000000
7849- 0000000000000000000000000000000000008484840000000000000000000000
7850- 0000000000000000000000000000000000000000000000000000000000000000
7851- 0000000000000000000000000000000000000000000000000000000000000000
7852- 0000000000000000000000000000000000000000000000000000000000000000
7853- 000000000000848484008484840084848400FFFFFF00FFFFFF00FFFFFF008484
7854- 8400000000000000000000000000000000000000000000000000000000000000
7855- 0000000000000000000000000000000000000000000000000000000000000000
7856- 0000000000000000000000000000000000000000000000000000000000000000
7857- 0000000000000000000000000000000000000000000000000000000000000000
7858- 0000000000000000000000000000000000000000000000000000000000000000
7859- 0000000000000000000000000000000000000000000000000000000000000000
7860- 0000000000000000000000000000000000000000000000000000000000000000
7861- 0000000000000000000000000000000000000000000000000000000000000000
7862- 0000000000000000000000000000000000000000000000000000000000000000
7863- 0000000000000000000000000000000000000000000000000000000000000000
7864- 0000000000000000000000000000000000000000000000000000000000000000
7865- 0000000000000000000000000000000000000000000000000000000000000000
7866- 0000000000000000000000000000000000000000000000000000000000000000
7867- 0000000000000000000000000000000000000000000000000000000000000000
7868- 0000000000000000000000000000000000000000000000000000000000000000
7869- 0000000000000000000000000000000000000000000000000000000000000000
7870- 0000000000000000000000000000000000000000000000000000000000000000
7871- 0000000000000000000000000000000000000000000000000000000000000000
7872- 0000000000000000000000000000000000000000000000000000000000000000
7873- 0000000000000000000000000000000000000000000000000000000000000000
7874- 0000000000000000000000000000000000000000000000000000000000000000
7875- 0000000000000000000000000000000000000000000000000000000000000000
7876- 0000000000000000000000000000000000000000000000000000000000000000
7877- 0000000000000000000000000000000000000000000000000000000000000000
7878- 0000000000000000000000000000000000000000000000000000000000000000
7879- 0000000000000000000000000000000000000000000000000000000000000000
7880- 0000000000000000000000000000000000000000000000000000000000000000
7881- 0000000000000000000000000000000000000000000000000000000000000000
7882- 0000000000000000000000000000000000000000000000000000000000000000
7883- 0000000000000000000000000000000000000000000000000000000000000000
7884- 0000000000000000000000000000000000000000000000000000000000000000
7885- 0000000000000000000000000000000000000000000000000000000000000000
7886- 0000000000000000000000000000000000000000000000000000000000000000
7887- 0000000000000000000000000000000000000000000000000000000000000000
7888- 000000000000000000000000000000000000000000000000000084848400C6C6
7889- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7890- C600C6C6C600C6C6C60000000000000000000000000000000000000000000000
7891- 0000000000000000000000000000000000000000000000000000000000000000
7892- 000000000000000000000000000000000000000000000000000084848400C6C6
7893- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
7894- C600C6C6C600C6C6C60000000000000000000000000000000000000000000000
7895- 0000000000000000000000000000000000000000000000000000000000000000
7896- 000000000000000000000000000000000000000000000000000084848400FFFF
7897- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7898- FF00FFFFFF00C6C6C600000000000000000000000000FFFFFF00FFFFFF00FFFF
7899- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7900- FF00FFFFFF00FFFFFF00FFFFFF0000000000000000000000000084848400FFFF
7901- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7902- FF00FFFFFF00C6C6C60000000000000000000000000000000000848484008484
7903- 8400000000000000000000000000000000000000000000000000000000000000
7904- 000000000000000000000000000000000000000000000000000084848400FFFF
7905- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7906- FF00FFFFFF00C6C6C600000000000000000000000000FFFFFF00FFFFFF00FFFF
7907- FF00FFFFFF00848484008484840084848400FFFFFF00FFFFFF00FFFFFF00FFFF
7908- FF00FFFFFF00FFFFFF00FFFFFF0000000000000000000000000084848400FFFF
7909- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0084848400FFFFFF00FFFFFF00FFFF
7910- FF00FFFFFF00C6C6C600000000000000000084848400C6C6C600000000000000
7911- 0000848484008484840000000000000000000000000000000000000000000000
7912- 000000000000000000000000000000000000000000000000000084848400FFFF
7913- FF00848484008484840084848400FFFFFF00FFFFFF0084848400848484008484
7914- 840084848400C6C6C600000000000000000000000000FFFFFF00FFFFFF00FFFF
7915- FF008484840084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF008484
7916- 8400FFFFFF00FFFFFF00FFFFFF0000000000000000000000000084848400FFFF
7917- FF00FFFFFF00FFFFFF00FFFFFF008484840084848400FFFFFF00FFFFFF00FFFF
7918- FF00FFFFFF00C6C6C600000000000000000084848400C6C6C600000000008484
7919- 8400848484008484840000000000000000000000000000000000000000000000
7920- 000000000000000000000000000000000000000000000000000084848400FFFF
7921- FF00FFFFFF0084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00848484008484
7922- 8400FFFFFF00C6C6C600000000000000000000000000FFFFFF00FFFFFF00FFFF
7923- FF0084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00848484008484
7924- 840084848400FFFFFF00FFFFFF0000000000000000000000000084848400FFFF
7925- FF00FFFFFF00FFFFFF008484840084848400848484008484840084848400FFFF
7926- FF00FFFFFF00C6C6C600000000000000000084848400C6C6C600C6C6C6000000
7927- 0000C6C6C6000000000000000000000000000000000084848400C6C6C600C6C6
7928- C600C6C6C600C6C6C6000000000000000000000000000000000084848400FFFF
7929- FF00FFFFFF0084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00848484008484
7930- 8400FFFFFF00C6C6C600000000000000000000000000FFFFFF00848484008484
7931- 8400848484008484840084848400FFFFFF00FFFFFF0084848400848484008484
7932- 84008484840084848400FFFFFF0000000000000000000000000084848400FFFF
7933- FF00FFFFFF00FFFFFF00FFFFFF008484840084848400FFFFFF00848484008484
7934- 8400FFFFFF00C6C6C600000000000000000084848400FFFFFF00C6C6C600C6C6
7935- C60000000000C6C6C60000000000000000000000000084848400FFFFFF00C6C6
7936- C600C6C6C600000000000000000000000000000000000000000084848400FFFF
7937- FF00FFFFFF00FFFFFF0084848400848484008484840084848400848484008484
7938- 8400FFFFFF00C6C6C600000000000000000000000000FFFFFF00FFFFFF008484
7939- 84008484840084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF008484
7940- 8400FFFFFF00FFFFFF00FFFFFF0000000000000000000000000084848400FFFF
7941- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0084848400FFFFFF00FFFFFF008484
7942- 8400FFFFFF00C6C6C60000000000000000000000000084848400FFFFFF00C6C6
7943- C600C6C6C600C6C6C60000000000848484000000000084848400C6C6C600FFFF
7944- FF00C6C6C600C6C6C6000000000000000000000000000000000084848400FFFF
7945- FF00FFFFFF00FFFFFF0084848400FFFFFF00FFFFFF008484840084848400FFFF
7946- FF00FFFFFF00C6C6C600000000000000000000000000FFFFFF00FFFFFF00FFFF
7947- FF0084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00848484008484
7948- 8400FFFFFF00FFFFFF00FFFFFF0000000000000000000000000084848400FFFF
7949- FF0084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF008484
7950- 8400FFFFFF00C6C6C6000000000000000000000000000000000000000000FFFF
7951- FF00C6C6C600C6C6C60000000000000000008484840084848400FFFFFF008484
7952- 8400FFFFFF00C6C6C600C6C6C60000000000000000000000000084848400FFFF
7953- FF00FFFFFF00FFFFFF0084848400FFFFFF00FFFFFF008484840084848400FFFF
7954- FF00FFFFFF00C6C6C600000000000000000000000000FFFFFF00FFFFFF00FFFF
7955- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00848484008484840084848400FFFF
7956- FF00FFFFFF00FFFFFF00FFFFFF0000000000000000000000000084848400FFFF
7957- FF0084848400FFFFFF00FFFFFF0084848400FFFFFF00FFFFFF00FFFFFF00FFFF
7958- FF00FFFFFF00C6C6C60000000000000000000000000000000000FFFFFF00C6C6
7959- C600FFFFFF00C6C6C60000000000848484000000000084848400848484000000
7960- 000084848400FFFFFF00C6C6C60000000000000000000000000084848400FFFF
7961- FF00FFFFFF00FFFFFF00FFFFFF00848484008484840084848400FFFFFF00FFFF
7962- FF00FFFFFF00C6C6C600000000000000000000000000FFFFFF00FFFFFF00FFFF
7963- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
7964- FF00FFFFFF00FFFFFF00FFFFFF0000000000000000000000000084848400FFFF
7965- FF008484840084848400FFFFFF008484840084848400FFFFFF00FFFFFF00FFFF
7966- FF00FFFFFF00C6C6C60000000000000000008484840084848400848484008484
7967- 8400848484008484840000000000000000000000000084848400000000000000
7968- 00008484840084848400FFFFFF0000000000000000000000000084848400FFFF
7969- FF00FFFFFF00FFFFFF00FFFFFF00848484008484840084848400FFFFFF00FFFF
7970- FF00FFFFFF00C6C6C60000000000000000000000000000000000000000000000
7971- 0000000000000000000000000000000000000000000000000000000000000000
7972- 000000000000000000000000000000000000000000000000000084848400FFFF
7973- FF00FFFFFF008484840084848400848484008484840084848400FFFFFF00FFFF
7974- FF00FFFFFF00C6C6C60000000000000000000000000000000000000000000000
7975- 000084848400C6C6C60084848400848484008484840084848400848484008484
7976- 84000000000084848400C6C6C60000000000000000000000000084848400FFFF
7977- FF00FFFFFF00FFFFFF00FFFFFF00848484008484840084848400FFFFFF000000
7978- 0000000000000000000000000000000000000000000000000000FFFFFF00FFFF
7979- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000000000000000000000
7980- 000000000000000000000000000000000000000000000000000084848400FFFF
7981- FF00FFFFFF00FFFFFF00FFFFFF008484840084848400FFFFFF00FFFFFF000000
7982- 0000000000000000000000000000000000000000000000000000000000000000
7983- 00000000000084848400FFFFFF00FFFFFF00C6C6C60084848400848484000000
7984- 0000C6C6C600C6C6C6000000000000000000000000000000000084848400FFFF
7985- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6
7986- C600FFFFFF00848484000000000000000000000000000000000000000000FFFF
7987- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000000000000000000000000000
7988- 000000000000000000000000000000000000000000000000000084848400FFFF
7989- FF00FFFFFF00FFFFFF00FFFFFF0084848400FFFFFF00FFFFFF00FFFFFF00C6C6
7990- C600FFFFFF008484840000000000000000000000000000000000000000000000
7991- 0000000000000000000084848400848484008484840084848400848484000000
7992- 000084848400848484000000000000000000000000000000000084848400FFFF
7993- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6
7994- C600848484000000000000000000000000000000000000000000000000000000
7995- 0000000000000000000000000000000000000000000000000000000000000000
7996- 000000000000000000000000000000000000000000000000000084848400FFFF
7997- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6
7998- C600848484000000000000000000000000000000000000000000000000000000
7999- 0000000000000000000000000000000000000000000000000000000000000000
8000- 0000000000000000000000000000000000000000000000000000848484008484
8001- 8400848484008484840084848400848484008484840084848400848484008484
8002- 8400000000000000000000000000000000000000000000000000000000000000
8003- 0000000000000000000000000000000000000000000000000000000000000000
8004- 0000000000000000000000000000000000000000000000000000848484008484
8005- 8400848484008484840084848400848484008484840084848400848484008484
8006- 8400000000000000000000000000000000000000000000000000000000000000
8007- 0000000000000000000000000000000000000000000000000000000000000000
8008- 0000000000000000000000000000000000000000000000000000000000000000
8009- 0000000000000000000000000000000000000000000000000000000000000000
8010- 0000000000000000000000000000000000000000000084848400848484008484
8011- 8400848484008484840084848400848484000000000000000000000000000000
8012- 0000000000000000000000000000000000000000000000000000000000000000
8013- 0000000000000000000000000000000000000000000000000000000000000000
8014- 0000000000000000000000000000000000000000000000000000000000000000
8015- 0000000000000000000000000000000000000000000000000000000000000000
8016- 0000000000000000000000000000000000000000000000000000000000000000
8017- 0000000000000000000000000000000000000000000000000000000000000000
8018- 00000000000000000000000000000000000000000000C6C6C600FFFFFF00FFFF
8019- FF00FFFFFF00FFFFFF00FFFFFF00848484000000000084848400C6C6C600C6C6
8020- C600C6C6C600C6C6C600C6C6C600000000000000000000000000000000000000
8021- 0000000000000000000084848400C6C6C600C6C6C600C6C6C600C6C6C600C6C6
8022- C600C6C6C600C6C6C6000000000000000000000000000000000084848400C6C6
8023- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
8024- C600C6C6C600C6C6C600000000000000000000000000FFFFFF00FFFFFF00FFFF
8025- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8026- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000C6C6C600FFFFFF00FFFF
8027- FF00FFFFFF00FFFFFF00FFFFFF00848484000000000084848400FFFFFF00FFFF
8028- FF00FFFFFF00FFFFFF00C6C6C600000000000000000000000000000000000000
8029- 0000000000000000000000000000000000000000000000000000000000000000
8030- 000000000000C6C6C6000000000000000000000000000000000084848400FFFF
8031- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8032- FF00FFFFFF00C6C6C600000000000000000000000000FFFFFF00FFFFFF00FFFF
8033- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8034- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000C6C6C600FFFFFF00FFFF
8035- FF00FFFFFF00FFFFFF00FFFFFF00848484000000000084848400FFFFFF008484
8036- 840084848400FFFFFF00C6C6C600000000000000000000000000000000000000
8037- 000084848400C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
8038- C60000000000C6C6C6000000000000000000000000000000000084848400FFFF
8039- FF00848484008484840084848400848484008484840084848400848484008484
8040- 8400FFFFFF00C6C6C600000000000000000000000000FFFFFF00FFFFFF00FFFF
8041- FF00FFFFFF008484840084848400848484008484840084848400848484008484
8042- 8400FFFFFF00FFFFFF00FFFFFF000000000000000000C6C6C600FFFFFF00FFFF
8043- FF00FFFFFF00FFFFFF00FFFFFF00848484000000000084848400FFFFFF00FFFF
8044- FF00FFFFFF00FFFFFF00C6C6C600000000000000000000000000000000000000
8045- 000000000000000000000000000000000000000000000000000000000000C6C6
8046- C60000000000C6C6C6000000000000000000000000000000000084848400FFFF
8047- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8048- FF00FFFFFF00C6C6C600000000000000000000000000FFFFFF00FFFFFF00FFFF
8049- FF00FFFFFF0084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8050- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000C6C6C600FFFFFF00FFFF
8051- FF00FFFFFF00FFFFFF00FFFFFF00848484000000000084848400FFFFFF008484
8052- 840084848400FFFFFF00C6C6C60000000000000000000000000084848400C6C6
8053- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C60000000000C6C6
8054- C60000000000C6C6C6000000000000000000000000000000000084848400FFFF
8055- FF00848484008484840084848400848484008484840084848400848484008484
8056- 8400FFFFFF00C6C6C600000000000000000000000000FFFFFF00FFFFFF00FFFF
8057- FF00FFFFFF0084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8058- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000C6C6C600FFFFFF00FFFF
8059- FF00FFFFFF00FFFFFF00FFFFFF00848484000000000084848400FFFFFF00FFFF
8060- FF00FFFFFF00FFFFFF00C6C6C60000000000000000000000000084848400FFFF
8061- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6C60000000000C6C6
8062- C60000000000C6C6C6000000000000000000000000000000000084848400FFFF
8063- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8064- FF00FFFFFF00C6C6C600000000000000000000000000FFFFFF00FFFFFF008484
8065- 840084848400848484008484840084848400FFFFFF00FFFFFF00FFFFFF00FFFF
8066- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000C6C6C600C6C6C600C6C6
8067- C600C6C6C600C6C6C600C6C6C600848484000000000084848400848484008484
8068- 840084848400848484008484840000000000000000000000000084848400FFFF
8069- FF0084848400848484008484840084848400FFFFFF00C6C6C60000000000C6C6
8070- C60000000000C6C6C60000000000000000000000000000000000C6C6C600FFFF
8071- FF0084848400C6C6C60084848400848484008484840084848400848484008484
8072- 8400FFFFFF00C6C6C600000000000000000000000000FFFFFF00FFFFFF00FFFF
8073- FF00848484008484840084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8074- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000000000000000
8075- 0000000000000000000000000000000000000000000084848400848484008484
8076- 840084848400848484008484840084848400000000000000000084848400FFFF
8077- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6C60000000000C6C6
8078- C600000000000000000000000000000000000000000000000000C6C6C600C6C6
8079- C600FFFFFF00C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8080- FF00FFFFFF00C6C6C600000000000000000000000000FFFFFF00FFFFFF00FFFF
8081- FF00FFFFFF0084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8082- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000084848400C6C6C600C6C6
8083- C600C6C6C600C6C6C600C6C6C6000000000000000000C6C6C600FFFFFF00FFFF
8084- FF00FFFFFF00FFFFFF00FFFFFF0084848400000000000000000084848400FFFF
8085- FF0084848400848484008484840084848400FFFFFF00C6C6C60000000000C6C6
8086- C60000000000848484000000000000000000000000000000000084848400C6C6
8087- C600C6C6C600C6C6C60084848400C6C6C600C6C6C60084848400848484008484
8088- 8400FFFFFF00C6C6C600000000000000000000000000FFFFFF00FFFFFF00FFFF
8089- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8090- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000084848400FFFFFF00FFFF
8091- FF00FFFFFF00FFFFFF00C6C6C6000000000000000000C6C6C600FFFFFF00FFFF
8092- FF00FFFFFF00FFFFFF00FFFFFF0084848400000000000000000084848400FFFF
8093- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6C600000000000000
8094- 000000000000000000000000000000000000C6C6C600C6C6C600C6C6C600C6C6
8095- C600C6C6C600C6C6C600C6C6C600C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFF
8096- FF00FFFFFF00C6C6C60000000000000000000000000000000000000000000000
8097- 0000000000000000000000000000000000000000000000000000000000000000
8098- 0000000000000000000000000000000000000000000084848400FFFFFF008484
8099- 840084848400FFFFFF00C6C6C6000000000000000000C6C6C600FFFFFF00FFFF
8100- FF00FFFFFF00FFFFFF00FFFFFF0084848400000000000000000084848400FFFF
8101- FF0084848400848484008484840084848400FFFFFF00C6C6C600000000008484
8102- 8400000000000000000000000000000000000000000000000000C6C6C600C6C6
8103- C60084848400C6C6C600C6C6C600848484008484840084848400848484008484
8104- 8400FFFFFF00C6C6C60000000000000000000000000000000000FFFFFF00FFFF
8105- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000000000000000000000
8106- 0000000000000000000000000000000000000000000084848400FFFFFF00FFFF
8107- FF00FFFFFF00FFFFFF00C6C6C6000000000000000000C6C6C600FFFFFF00FFFF
8108- FF00FFFFFF00FFFFFF00FFFFFF0084848400000000000000000084848400FFFF
8109- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000000000000000
8110- 00000000000000000000000000000000000000000000C6C6C600C6C6C600C6C6
8111- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600FFFFFF00FFFFFF000000
8112- 000000000000000000000000000000000000000000000000000000000000FFFF
8113- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000000000000000000000000000
8114- 0000000000000000000000000000000000000000000084848400FFFFFF008484
8115- 840084848400FFFFFF00C6C6C6000000000000000000C6C6C600FFFFFF00FFFF
8116- FF00FFFFFF00FFFFFF00FFFFFF0084848400000000000000000084848400FFFF
8117- FF00FFFFFF00FFFFFF00FFFFFF00C6C6C600FFFFFF0084848400000000000000
8118- 000000000000000000000000000000000000C6C6C600C6C6C60084848400C6C6
8119- C600C6C6C600C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6
8120- C600FFFFFF008484840000000000000000000000000000000000000000000000
8121- 0000000000000000000000000000000000000000000000000000000000000000
8122- 0000000000000000000000000000000000000000000084848400FFFFFF00FFFF
8123- FF00FFFFFF00FFFFFF00C6C6C6000000000000000000C6C6C600FFFFFF00FFFF
8124- FF00FFFFFF00FFFFFF00FFFFFF0084848400000000000000000084848400FFFF
8125- FF00FFFFFF00FFFFFF00FFFFFF00C6C6C6008484840000000000000000000000
8126- 000000000000000000000000000000000000000000000000000084848400C6C6
8127- C600FFFFFF00C6C6C600C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6
8128- C600848484000000000000000000000000000000000000000000000000000000
8129- 0000000000000000000000000000000000000000000000000000000000000000
8130- 0000000000000000000000000000000000000000000084848400848484008484
8131- 84008484840084848400848484000000000000000000C6C6C600C6C6C600C6C6
8132- C600C6C6C600C6C6C600C6C6C600848484000000000000000000848484008484
8133- 8400848484008484840084848400848484000000000000000000000000000000
8134- 000000000000000000000000000000000000000000000000000084848400C6C6
8135- C6008484840084848400C6C6C600848484008484840084848400848484008484
8136- 8400000000000000000000000000000000000000000000000000000000000000
8137- 0000000000000000000000000000000000000000000000000000000000000000
8138- 0000000000000000000000000000000000000000000000000000000000000000
8139- 0000000000000000000000000000000000000000000000000000000000000000
8140- 0000000000000000000000000000000000000000000000000000000000000000
8141- 0000000000000000000000000000000000000000000000000000000000000000
8142- 0000000000000000000000000000000000000000000000000000000000000000
8143- 0000000000000000000000000000000000000000000000000000000000000000
8144- 0000000000000000000000000000000000000000000000000000000000000000
8145- 0000000000000000000000000000000000000000000000000000000000000000
8146- 0000000000000000000000000000000000000000000000000000000000000000
8147- 0000000000000000000000000000000000000000000000000000000000000000
8148- 0000000000000000000000000000000000000000000000000000000000000000
8149- 0000000000000000000000000000000000000000000000000000000000000000
8150- 0000000000000000000000000000000000000000000000000000000000000000
8151- 0000000000000000000000000000000000000000000000000000000000000000
8152- 00000000000000000000000000000000000000000000FFFFFF00FFFFFF00FFFF
8153- FF00FFFFFF00C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8154- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8155- FF00C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6C600FFFFFF00FFFF
8156- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8157- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8158- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8159- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8160- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8161- FF00FFFFFF00C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8162- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8163- FF00C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6C600FFFFFF00FFFF
8164- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8165- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8166- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8167- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8168- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8169- FF00FFFFFF00C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8170- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8171- FF00C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6C600FFFFFF00FFFF
8172- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00848484008484
8173- 840084848400848484008484840084848400FFFFFF0084848400848484008484
8174- 840084848400FFFFFF00FFFFFF000000000000000000FFFFFF00848484008484
8175- 840084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF0084848400848484008484
8176- 8400FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8177- FF00FFFFFF00C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8178- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8179- FF00C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6C600FFFFFF00FFFF
8180- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8181- FF008484840084848400FFFFFF00FFFFFF008484840084848400FFFFFF00FFFF
8182- FF008484840084848400FFFFFF000000000000000000FFFFFF0084848400FFFF
8183- FF0084848400FFFFFF008484840084848400FFFFFF0084848400FFFFFF008484
8184- 8400FFFFFF0084848400FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8185- FF00FFFFFF00C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8186- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8187- FF00C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6C600FFFFFF00FFFF
8188- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8189- FF008484840084848400FFFFFF00FFFFFF008484840084848400FFFFFF00FFFF
8190- FF008484840084848400FFFFFF000000000000000000FFFFFF00848484008484
8191- 8400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF008484840084848400FFFF
8192- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8193- FF00FFFFFF00C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
8194- C600C6C6C600C6C6C600C6C6C6000000000000000000FFFFFF00FFFFFF00FFFF
8195- FF00C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6C600FFFFFF00FFFF
8196- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8197- FF008484840084848400FFFFFF00FFFFFF008484840084848400FFFFFF00FFFF
8198- FF008484840084848400FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8199- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8200- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8201- FF00FFFFFF00C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8202- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8203- FF00C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6C600FFFFFF00FFFF
8204- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00848484008484
8205- 84008484840084848400FFFFFF00FFFFFF008484840084848400FFFFFF00FFFF
8206- FF008484840084848400FFFFFF000000000000000000FFFFFF00848484008484
8207- 840084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF0084848400848484008484
8208- 8400FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8209- FF00FFFFFF00C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8210- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8211- FF00C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6C600FFFFFF00FFFF
8212- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8213- FF008484840084848400FFFFFF00FFFFFF00FFFFFF0084848400848484008484
8214- 840084848400FFFFFF00FFFFFF000000000000000000FFFFFF0084848400FFFF
8215- FF0084848400FFFFFF008484840084848400FFFFFF0084848400FFFFFF008484
8216- 8400FFFFFF0084848400FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8217- FF00FFFFFF00C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8218- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8219- FF00C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6C600FFFFFF00FFFF
8220- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8221- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8222- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00848484008484
8223- 8400FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF008484840084848400FFFF
8224- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8225- FF00FFFFFF00C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8226- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8227- FF00C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6C600FFFFFF00FFFF
8228- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8229- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8230- FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FFFFFF00FFFFFF00FFFF
8231- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8232- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000000000000000
8233- 0000000000000000000000000000000000000000000000000000000000000000
8234- 0000000000000000000000000000000000000000000000000000000000000000
8235- 0000000000000000000000000000000000000000000000000000000000000000
8236- 0000000000000000000000000000000000000000000000000000000000000000
8237- 0000000000000000000000000000000000000000000000000000000000000000
8238- 0000000000000000000000000000000000000000000000000000000000000000
8239- 0000000000000000000000000000000000000000000000000000000000000000
8240- 00000000000000000000000000000000000000000000C6C6C600C6C6C600C6C6
8241- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
8242- C600C6C6C600C6C6C600C6C6C6000000000000000000C6C6C600C6C6C600C6C6
8243- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
8244- C600C6C6C600C6C6C600C6C6C6000000000000000000C6C6C600C6C6C600C6C6
8245- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
8246- C600C6C6C600C6C6C600C6C6C6000000000000000000C6C6C600C6C6C600C6C6
8247- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
8248- C600C6C6C600C6C6C600C6C6C600000000000000000000000000000000000000
8249- 0000000000000000000000000000000000000000000000000000000000000000
8250- 0000000000000000000000000000000000000000000000000000000000000000
8251- 0000000000000000000000000000000000000000000000000000000000000000
8252- 0000000000000000000000000000000000000000000000000000000000000000
8253- 0000000000000000000000000000000000000000000000000000000000000000
8254- 0000000000000000000000000000000000000000000000000000000000000000
8255- 0000000000000000000000000000000000000000000000000000000000000000
8256- 0000000000000000000000000000000000000000000000000000000000000000
8257- 0000000000000000000000000000000000000000000000000000000000000000
8258- 0000000000000000000000000000000000000000000000000000000000000000
8259- 0000000000000000000000000000000000000000000000000000000000000000
8260- 0000000000000000000000000000000000000000000000000000000000000000
8261- 0000000000000000000000000000000000000000000000000000000000000000
8262- 0000000000000000000000000000000000000000000000000000000000000000
8263- 0000000000000000000000000000000000000000000000000000000000000000
8264- 0000000000000000000000000000000000000000000000000000000000000000
8265- 0000000000000000000000000000000000000000000000000000000000000000
8266- 0000000000000000000000000000000000000000000000000000000000000000
8267- 0000000000000000000000000000000000000000000000000000000000000000
8268- 0000000000000000000000000000000000000000000000000000000000000000
8269- 0000000000000000000000000000000000000000000000000000000000000000
8270- 0000000000000000000000000000000000000000000000000000000000000000
8271- 0000000000000000000000000000000000000000000000000000000000000000
8272- 0000000000000000000000000000000000008484840084848400848484008484
8273- 8400848484008484840084848400848484008484840084848400848484008484
8274- 8400848484008484840000000000000000000000000000000000000000000000
8275- 0000000000000000000000000000000000000000000000000000000000000000
8276- 0000000000000000000000000000000000000000000000000000000000000000
8277- 0000000000008484840084848400848484008484840084848400848484000000
8278- 0000000000000000000000000000000000000000000000000000000000000000
8279- 0000000000000000000000000000000000000000000000000000000000000000
8280- 00000000000000000000000000000000000084848400C6C6C600FFFFFF00FFFF
8281- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8282- FF00C6C6C60084848400848484000000000000000000FFFFFF00FFFFFF00FFFF
8283- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8284- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000000000008484
8285- 8400848484008484840084848400848484008484840084848400848484008484
8286- 8400848484000000000000000000000000000000000000000000000000000000
8287- 0000000000000000000000000000000000000000000000000000000000000000
8288- 00000000000000000000000000000000000084848400C6C6C600848484008484
8289- 8400848484008484840084848400848484008484840084848400848484008484
8290- 8400C6C6C60084848400848484000000000000000000FFFFFF00FFFFFF00FFFF
8291- FF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF0000000000FFFFFF00FFFF
8292- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000848484008484
8293- 8400848484008484840084848400848484008484840084848400848484008484
8294- 8400848484008484840000000000000000000000000000000000000000000000
8295- 0000000000000000000000000000000000000000000000000000000000000000
8296- 00000000000000000000000000000000000084848400C6C6C600C6C6C600C6C6
8297- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600848484008484
8298- 8400C6C6C60084848400848484000000000000000000FFFFFF00FFFFFF00FFFF
8299- FF00FFFFFF000000000000000000FFFFFF00FFFFFF000000000000000000FFFF
8300- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000848484008484
8301- 8400848484008484840084848400848484008484840084848400848484008484
8302- 840084848400848484000000000000000000C6C6C60000000000000000000000
8303- 0000000000000000000000000000000000000000000000000000000000000000
8304- 00000000000000000000000000000000000084848400C6C6C600C6C6C600C6C6
8305- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600848484008484
8306- 8400C6C6C60084848400848484000000000000000000FFFFFF00FFFFFF00FFFF
8307- FF0000000000C6C6C60000000000FFFFFF00FFFFFF0000000000C6C6C6000000
8308- 0000FFFFFF00FFFFFF00FFFFFF00000000000000000084848400848484008484
8309- 8400848484008484840084848400848484008484840084848400848484008484
8310- 84008484840084848400848484000000000000000000C6C6C600000000000000
8311- 000000000000000000000000000000000000C6C6C60000000000000000000000
8312- 00000000000000000000000000000000000084848400FFFFFF00FFFFFF00FFFF
8313- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8314- FF00FFFFFF0084848400848484000000000000000000FFFFFF00FFFFFF000000
8315- 0000C6C6C600C6C6C60000000000FFFFFF00FFFFFF0000000000C6C6C600C6C6
8316- C60000000000FFFFFF00FFFFFF00000000000000000084848400848484008484
8317- 840084848400FFFFFF00FFFFFF008484840084848400FFFFFF00FFFFFF008484
8318- 8400848484008484840084848400000000000000000000000000C6C6C600C6C6
8319- C60000000000000000000000000000000000C6C6C600C6C6C600000000000000
8320- 0000000000000000000000000000000000000000000084848400C6C6C600C6C6
8321- C600C6C6C600C6C6C600C6C6C60000000000C6C6C600C6C6C600C6C6C600C6C6
8322- C600C6C6C600C6C6C600848484000000000000000000FFFFFF00FFFFFF00FFFF
8323- FF0000000000C6C6C60000000000FFFFFF00FFFFFF0000000000C6C6C6000000
8324- 0000FFFFFF00FFFFFF00FFFFFF00000000000000000084848400848484008484
8325- 84008484840084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00848484008484
8326- 840084848400848484008484840000000000000000000000000000000000C6C6
8327- C600C6C6C600000000000000000000000000C6C6C600C6C6C600C6C6C6000000
8328- 0000000000000000000000000000000000000000000000000000848484008484
8329- 8400848484008484840000000000FFFFFF000000000084848400848484008484
8330- 84008484840084848400848484000000000000000000FFFFFF00FFFFFF00FFFF
8331- FF00FFFFFF000000000000000000FFFFFF00FFFFFF000000000000000000FFFF
8332- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000084848400848484008484
8333- 8400848484008484840084848400FFFFFF00FFFFFF0084848400848484008484
8334- 8400848484008484840084848400000000000000000000000000000000000000
8335- 0000C6C6C600C6C6C60000000000C6C6C600C6C6C60000000000C6C6C600C6C6
8336- C600000000000000000000000000000000000000000000000000000000000000
8337- 00000000000000000000FFFFFF00FFFFFF00FFFFFF0000000000848484000000
8338- 00000000000000000000000000000000000000000000FFFFFF00FFFFFF00FFFF
8339- FF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF0000000000FFFFFF00FFFF
8340- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000084848400848484008484
8341- 84008484840084848400FFFFFF00FFFFFF00FFFFFF00FFFFFF00848484008484
8342- 8400848484008484840084848400000000000000000000000000000000000000
8343- 000000000000C6C6C600C6C6C600C6C6C600000000000000000000000000C6C6
8344- C600C6C6C6000000000000000000000000000000000000000000000000000000
8345- 000000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000008484
8346- 84000000000000000000000000000000000000000000FFFFFF00FFFFFF00FFFF
8347- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8348- FF00FFFFFF00FFFFFF00FFFFFF00000000000000000084848400848484008484
8349- 840084848400FFFFFF00FFFFFF008484840084848400FFFFFF00FFFFFF008484
8350- 8400848484008484840084848400000000000000000000000000000000000000
8351- 00000000000000000000C6C6C600C6C6C6000000000000000000000000000000
8352- 0000C6C6C600C6C6C60000000000000000000000000000000000000000000000
8353- 0000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
8354- 0000848484000000000000000000000000000000000000000000000000000000
8355- 0000000000000000000000000000000000000000000000000000000000000000
8356- 0000000000000000000000000000000000000000000000000000848484008484
8357- 8400848484008484840084848400848484008484840084848400848484008484
8358- 8400848484008484840000000000000000000000000000000000000000000000
8359- 0000000000000000000000000000C6C6C6000000000000000000000000000000
8360- 00000000000000000000C6C6C600000000000000000000000000000000000000
8361- 00000000000000000000FFFFFF00FFFFFF00FFFFFF0000000000000000000000
8362- 0000000000008484840000000000000000000000000000000000FFFFFF00FFFF
8363- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000000000000000000000
8364- 0000000000000000000000000000000000000000000000000000848484008484
8365- 8400848484008484840084848400848484008484840084848400848484008484
8366- 8400848484008484840000000000000000000000000000000000000000000000
8367- 0000000000000000000000000000000000000000000000000000000000000000
8368- 0000000000000000000000000000C6C6C6000000000000000000000000000000
8369- 00000000000000000000FFFFFF00FFFFFF00FFFFFF0000000000848484000000
8370- 000000000000000000000000000000000000000000000000000000000000FFFF
8371- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000000000000000000000000000
8372- 0000000000000000000000000000000000000000000000000000000000008484
8373- 8400848484008484840084848400848484008484840084848400848484008484
8374- 8400848484000000000000000000000000000000000000000000000000000000
8375- 0000000000000000000000000000000000000000000000000000000000000000
8376- 0000000000000000000000000000000000000000000000000000000000000000
8377- 00000000000000000000FFFFFF00FFFFFF00FFFFFF0000000000848484000000
8378- 0000000000000000000000000000000000000000000000000000000000000000
8379- 0000000000000000000000000000000000000000000000000000000000000000
8380- 0000000000000000000000000000000000000000000000000000000000000000
8381- 0000000000008484840084848400848484008484840084848400848484000000
8382- 0000000000000000000000000000000000000000000000000000000000000000
8383- 0000000000000000000000000000000000000000000000000000000000000000
8384- 0000000000000000000000000000000000000000000000000000000000000000
8385- 0000000000000000000000000000000000000000000000000000000000000000
8386- 0000000000000000000000000000000000000000000000000000000000000000
8387- 0000000000000000000000000000000000000000000000000000000000000000
8388- 0000000000000000000000000000000000000000000000000000000000000000
8389- 0000000000000000000000000000000000000000000000000000000000000000
8390- 0000000000000000000000000000000000000000000000000000000000000000
8391- 0000000000000000000000000000000000000000000000000000000000000000
8392- 000000000000000000000000000000000000424D3E000000000000003E000000
8393- 2800000040000000F00000000100010000000000800700000000000000000000
8394- 000000000000000000000000FFFFFF0000000000000000000000000000000000
8395- 0000000000000000000000000000000000000000000000000000000000000000
8396- 0000000000000000000000000000000000000000000000000000000000000000
8397- 0000000000000000000000000000000000000000000000000000000000000000
8398- 00000000000000000000000000000000FE7FFFFF00000000FC3FF81F00000000
8399- F81DF00F00000000F01BE00700000000E017C00300000000801F800100000000
8400- 001F8001000000000010800100000000001F800100000000001F800100000000
8401- 8017800100000000E01BC00300000000F01DE00700000000F83FF00F00000000
8402- FC3FF81F00000000FE7FFFFF00000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFC003
8403- FFFFFFFFFFFFC003FC01803FFC01C003FC01803C3C01C003FC01803C3C01C003
8404- FC01803C3C01C003FC01803C3C01C003FC01803C3C01C003C00180000001C003
8405- C00180000001C003C00180000001C003C00180000001C003FFFFFFFC3FFFC003
8406- FFFFFFFC3FFFC003FFFFFFFFFFFFFFFFFF7EFFFFFFFFFFFFBFFF00000000FFFF
8407- F00300000000FFFFE00300000000803FE00300000000803FE00300000000803F
8408- E00300000000803F200300000000803FE00200000000803FE003000000008003
8409- E003000000008003E003000000008003E003000000008003FFFF00000000FFFF
8410- BF7D00000000FFFF7F7EFFFFFFFFFFFFFFFFFFFFFFFFC001000000000000C001
8411- 000000000000C001000000000000C001000000000000C001000000000000C001
8412- 000000000000C001000000000000C001000000000000C001000700070000C001
8413- 000700070000C001000700070000C001000700070000C001800F000F0000C003
8414- FFFFFFE70000C007FFFFFFFF0000C00FFE3F0FE1FFFFFFFFF00F07C100000000
8415- E00F010100000000E003800300000000C003800300000000C001C00700000000
8416- 8001C007000000008001C007000000008001800300000000C003000100000007
8417- C003000100000007E007000100000007F00FF01F00000007F81FF83F0000800F
8418- FC1FF83F0000FFFFF81FFC7FFFFFFFFFC001F8FFC003FFFFC001F1FFC003FFFF
8419- C001E3FFC003FFFFC001E3FFC003E003C001E3DFC003FC1FC001E3CFC003FFEF
8420- C001E1C78003FFE7C001F0038003FFF7C001F0018003FFF7C001F8008003F7F7
8421- C001FC01C003F7F7C001FF03C003F3E7C001FFC7C003FB9FC003FFCFC007FC3F
8422- C007FFDFC00FFFFFC00FFFFFFFFFFFFFC001FFFFFFFF8001C001FFFFC0000001
8423- C0019FFB80000001C0018FFF80000001C00187F780000001C001C7EF80000001
8424- C001E3CF80000001C001F19F80008001C001F83F8000C001C001FC7F8000C001
8425- C001F83F8000C001C001F19F8001C001C001C3CFC07FC001C00387E7E0FFC003
8426- C0078FFBFFFFC007C00FFFFFFFFFC00FFFFFFFFFFFFFE001F000F000C001E001
8427- F000F000C000C001F000C000C000A001F000E000C0010001F000F000C0030001
8428- F000F000C0030001D0000000C0038001C0000000C0038001E0000000C003C001
8429- 0000F000C003E001C000F000C003E0018000E000C003E0032000C000C003E007
8430- E000F000C003E00FEDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC3FC003
8431- FFFFFE7FFC3FC003EF7FDE7BFC3FFE7FE73FCE73FC3FFC3FE31FC663FC3FF81F
8432- E10FC243FC3FF00FE007C003FC3FE007E007C003E007FC3FE10FC243F00FFC3F
8433- E31FC663F81FFC3FE73FCE73FC3FFC3FEF7FDE7BFE7FFC3FFFFFFE7FC003FC3F
8434- FFFFFFFFC003FC3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
8435- FFFFFFFFE007FFFFE007FE7FF00FFEF7F00FFC3FF81FFCE7F81FF81FFC3FF8C7
8436- FC3FF00FFE7FF087FE7FE007C003E007E007FE7FC003E007F00FFC3FFE7FF087
8437- F81FF81FFC3FF8C7FC3FF00FF81FFCE7FE7FE007F00FFEF7FFFFFFFFE007FFFF
8438- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC001FFFFC001FFFFC0010000C001CC1F
8439- C0010000C001800FC0010000C0010007C0010000C0010000C0010000C0010001
8440- C0010000C0010001C0010000C0018001C0010000C001C000C0010000C0018000
8441- C0010000C0010000C0010000C001F000C001803FC001F801C003C07FC003FC13
8442- C007E0FFC007FFFFC00FFFFFC00FFFFFFFFF8080FC01C00100008080FC01C001
8443- 00008080F001C00100008080F001C00100008080C001C00100008080C001C001
8444- 00008080C001C00100008080C001C00100008080C001C00100008080C003C001
8445- 00008080C007000100008080C00FC001803F8080C01F8001C07F8080C03F0003
8446- E0FF8080C07FC007FFFF8080C0FFC00FFFFFFFFFFFFFFFFF0000000000000000
8447- 0000000000000000000000000000000000000000000000000000000000000000
8448- 0000000000000000000000000000000000000000000000000000000000000000
8449- 0000000000000000000000000000000000000000000000000000000000000000
8450- 0000000000000000FFFFFFFFFFFFFFFF8003FFFFF81FFFFF00010000E007FFFF
8451- 00000000C003FFFF0000000080017FFF0000000080013F7F0000000000000E3F
8452- 000000000000861F800000000000C20FC00100000000E007F81F00000000F043
8453- F00F00000000F861E00700008001FC70C003803F8001FEFCF81FC07FC003FFFE
8454- F81FE0FFE007FFFFF83FFFFFF81FFFFF00000000000000000000000000000000
8455- 000000000000}
8456- end
8457- object ItemImageList: TImageList
8458- Left = 4
8459- Top = 276
8460- Bitmap = {
8461- 494C010103000400040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
8462- 0000000000003600000028000000400000001000000001002000000000000010
8463- 0000000000000000000000000000000000008400840084008400000000000000
8464- 0000000000000000000000000000000000000000000000000000000000000000
8465- 0000000000000000000000000000840084008400840084008400848484008484
8466- 8400848484008484840084848400848484008484840084848400848484008484
8467- 8400848484008484840084848400840084008400840084008400000000000000
8468- 0000000000000000000000000000000000000000000000000000000000000000
8469- 0000000000000000000000000000840084000000000000000000000000000000
8470- 0000000000000000000000000000000000000000000000000000000000000000
8471- 000000000000000000000000000000000000840084008400840084848400C6C6
8472- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
8473- C600C6C6C600C6C6C60000000000840084008400840084008400C6C6C600FFFF
8474- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8475- FF00FFFFFF00FFFFFF008484840084008400840084008400840084848400C6C6
8476- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
8477- C600C6C6C600C6C6C60000000000840084000000000000000000000000000000
8478- 0000000000000000000000000000000000000000000000000000000000000000
8479- 000000000000000000000000000000000000840084008400840084848400FFFF
8480- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8481- FF00FFFFFF00C6C6C60000000000840084008400840084008400C6C6C600FFFF
8482- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8483- FF00FFFFFF00FFFFFF008484840084008400840084008400840084848400FFFF
8484- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8485- FF00FFFFFF00C6C6C60000000000840084000000000000000000000000000000
8486- 0000000000000000000000000000000000000000000000000000000000000000
8487- 000000000000000000000000000000000000840084008400840084848400FFFF
8488- FF00848484008484840084848400848484008484840084848400848484008484
8489- 8400FFFFFF00C6C6C60000000000840084008400840084008400C6C6C600FFFF
8490- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8491- FF00FFFFFF00FFFFFF008484840084008400840084008400840084848400FFFF
8492- FF00848484008484840084848400848484008484840084848400848484008484
8493- 8400FFFFFF00C6C6C60000000000840084000000000000000000000000000000
8494- 0000000000000000000000000000000000000000000000000000000000000000
8495- 000000000000000000000000000000000000840084008400840084848400FFFF
8496- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8497- FF00FFFFFF00C6C6C60000000000840084008400840084008400C6C6C600FFFF
8498- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8499- FF00FFFFFF00FFFFFF008484840084008400840084008400840084848400FFFF
8500- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8501- FF00FFFFFF00C6C6C60000000000840084000000000000000000000000000000
8502- 0000000000000000000000000000000000000000000000000000000000000000
8503- 000000000000000000000000000000000000840084008400840084848400FFFF
8504- FF00848484008484840084848400848484008484840084848400848484008484
8505- 8400FFFFFF00C6C6C60000000000840084008400840084008400C6C6C600FFFF
8506- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8507- FF00FFFFFF00FFFFFF008484840084008400840084008400840084848400FFFF
8508- FF00848484008484840084848400848484008484840084848400848484008484
8509- 8400FFFFFF00C6C6C60000000000840084000000000000000000000000000000
8510- 0000000000000000000000000000000000000000000000000000000000000000
8511- 000000000000000000000000000000000000840084008400840084848400FFFF
8512- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8513- FF00FFFFFF00C6C6C60000000000840084008400840084008400C6C6C600FFFF
8514- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8515- FF00FFFFFF00FFFFFF008484840084008400840084008400840084848400FFFF
8516- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8517- FF00FFFFFF00C6C6C60000000000840084000000000000000000000000000000
8518- 0000000000000000000000000000000000000000000000000000000000000000
8519- 000000000000000000000000000000000000840084008400840084848400FFFF
8520- FF00848484008484840084848400848484008484840084848400848484008484
8521- 8400FFFFFF00C6C6C60000000000840084008400840084008400C6C6C600FFFF
8522- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8523- FF00FFFFFF00FFFFFF00848484008400840084008400840084000000FF00FFFF
8524- FF00848484000000FF0084848400848484008484840084848400848484008484
8525- 8400FFFFFF00C6C6C60000000000840084000000000000000000000000000000
8526- 0000000000000000000000000000000000000000000000000000000000000000
8527- 000000000000000000000000000000000000840084008400840084848400FFFF
8528- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8529- FF00FFFFFF00C6C6C60000000000840084008400840084008400C6C6C600FFFF
8530- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8531- FF00FFFFFF00FFFFFF00848484008400840084008400840084000000FF000000
8532- FF00FFFFFF000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8533- FF00FFFFFF00C6C6C60000000000840084000000000000000000000000000000
8534- 0000000000000000000000000000000000000000000000000000000000000000
8535- 000000000000000000000000000000000000840084008400840084848400FFFF
8536- FF00848484008484840084848400848484008484840084848400848484008484
8537- 8400FFFFFF00C6C6C60000000000840084008400840084008400C6C6C600FFFF
8538- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8539- FF00FFFFFF00FFFFFF0084848400840084008400840084008400848484000000
8540- FF000000FF000000FF00848484000000FF000000FF0084848400848484008484
8541- 8400FFFFFF00C6C6C60000000000840084000000000000000000000000000000
8542- 0000000000000000000000000000000000000000000000000000000000000000
8543- 000000000000000000000000000000000000840084008400840084848400FFFF
8544- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8545- FF00FFFFFF00C6C6C60000000000840084008400840084008400C6C6C600FFFF
8546- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8547- FF00FFFFFF00FFFFFF0084848400840084000000FF000000FF000000FF000000
8548- FF000000FF000000FF000000FF000000FF00FFFFFF00FFFFFF00FFFFFF00FFFF
8549- FF00FFFFFF00C6C6C60000000000840084000000000000000000000000000000
8550- 0000000000000000000000000000000000000000000000000000000000000000
8551- 000000000000000000000000000000000000840084008400840084848400FFFF
8552- FF00848484008484840084848400848484008484840084848400848484008484
8553- 8400FFFFFF00C6C6C60000000000840084008400840084008400C6C6C600FFFF
8554- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8555- FF00FFFFFF00FFFFFF00848484008400840084008400840084000000FF000000
8556- FF00848484000000FF000000FF00848484008484840084848400848484008484
8557- 8400FFFFFF00C6C6C60000000000840084000000000000000000000000000000
8558- 0000000000000000000000000000000000000000000000000000000000000000
8559- 000000000000000000000000000000000000840084008400840084848400FFFF
8560- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
8561- 0000000000000000000000000000840084008400840084008400C6C6C600FFFF
8562- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF008484
8563- 840084848400848484008484840084008400840084000000FF000000FF000000
8564- FF000000FF000000FF000000FF000000FF000000FF00FFFFFF00FFFFFF000000
8565- 0000000000000000000000000000840084000000000000000000000000000000
8566- 0000000000000000000000000000000000000000000000000000000000000000
8567- 000000000000000000000000000000000000840084008400840084848400FFFF
8568- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6
8569- C600FFFFFF008484840084008400840084008400840084008400C6C6C600FFFF
8570- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8571- FF00FFFFFF00C6C6C60084008400840084000000FF000000FF00848484000000
8572- FF000000FF000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6
8573- C600FFFFFF008484840084008400840084000000000000000000000000000000
8574- 0000000000000000000000000000000000000000000000000000000000000000
8575- 000000000000000000000000000000000000840084008400840084848400FFFF
8576- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6
8577- C600848484008400840084008400840084008400840084008400C6C6C600FFFF
8578- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
8579- FF00C6C6C6008400840084008400840084008400840084008400848484000000
8580- FF00FFFFFF000000FF000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00C6C6
8581- C600848484008400840084008400840084000000000000000000000000000000
8582- 0000000000000000000000000000000000000000000000000000000000000000
8583- 0000000000000000000000000000000000008400840084008400848484008484
8584- 8400848484008484840084848400848484008484840084848400848484008484
8585- 8400840084008400840084008400840084008400840084008400C6C6C600C6C6
8586- C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6C600C6C6
8587- C600840084008400840084008400840084008400840084008400848484000000
8588- FF0084848400848484000000FF00848484008484840084848400848484008484
8589- 8400840084008400840084008400840084000000000000000000000000000000
8590- 0000000000000000000000000000000000000000000000000000000000000000
8591- 000000000000000000000000000000000000424D3E000000000000003E000000
8592- 2800000040000000100000000100010000000000800000000000000000000000
8593- 000000000000000000000000FFFFFF0000000000000000000000000000000000
8594- 0000000000000000000000000000000000000000000000000000000000000000
8595- 0000000000000000000000000000000000000000000000000000000000000000
8596- 0000000000000000000000000000000000000000000000000000000000000000
8597- 0000000000000000000000000000000000000000000000000000000000000000
8598- 000000000000}
8599- end
8600- object MessageImageList: TImageList
8601- Height = 12
8602- Width = 32
8603- Left = 36
8604- Top = 276
8605- Bitmap = {
8606- 494C010104000900040020000C00FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
8607- 0000000000003600000028000000800000002400000001002000000000000048
6603+ 000000000000}
6604+ end
6605+ object MessageImageList: TImageList
6606+ Height = 12
6607+ Width = 32
6608+ Left = 36
6609+ Top = 276
6610+ Bitmap = {
6611+ 494C010104000900040020000C00FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
6612+ 0000000000003600000028000000800000002400000001002000000000000048
86086613 0000000000000000000000000000000000000000000000000000000000000000
86096614 0000000000000000000000000000000000000000000000000000000000000000
86106615 0000000000000000000000000000000000000000000000000000000000000000
@@ -9458,60 +7463,56 @@ object GikoForm: TGikoForm
94587463 object FileMenu: TMenuItem
94597464 Caption = #12501#12449#12452#12523'(&F)'
94607465 object L4: TMenuItem
9461- Action = LoginAction
7466+ Action = GikoDM.LoginAction
94627467 AutoCheck = True
94637468 end
94647469 object B4: TMenuItem
9465- Action = NewBoardAction
7470+ Action = GikoDM.NewBoardAction
94667471 end
94677472 object N7: TMenuItem
94687473 Caption = '-'
94697474 end
94707475 object DeleteMenu: TMenuItem
9471- Action = LogDeleteAction
7476+ Action = GikoDM.LogDeleteAction
94727477 end
94737478 object N28: TMenuItem
94747479 Caption = '-'
94757480 end
94767481 object S4: TMenuItem
9477- Action = SelectTextClearAction
7482+ Action = GikoDM.SelectTextClearAction
94787483 end
94797484 object N29: TMenuItem
9480- Action = NameTextClearAction
9481- Caption = #12524#12473#12456#12487#12451#12479#21517#21069#23653#27508#20840#28040#21435'(&N)'
7485+ Action = GikoDM.NameTextClearAction
94827486 end
94837487 object N30: TMenuItem
9484- Action = MailTextClearAction
9485- Caption = #12524#12473#12456#12487#12451#12479#12513#12540#12523#23653#27508#20840#28040#21435'(&N)'
7488+ Action = GikoDM.MailTextClearAction
94867489 end
94877490 object N15: TMenuItem
94887491 Caption = '-'
94897492 end
94907493 object TabSave: TMenuItem
9491- Action = TabsSaveAction
7494+ Action = GikoDM.TabsSaveAction
94927495 end
94937496 object TabOpen: TMenuItem
9494- Action = TabsOpenAction
7497+ Action = GikoDM.TabsOpenAction
94957498 end
94967499 object N66: TMenuItem
94977500 Caption = #36984#25246#12473#12524#12483#12489#12434#20445#23384
94987501 object SelectThreadSave: TMenuItem
9499- Action = SelectItemSaveForHTML
9500- Caption = 'HTML'#21270#12377#12427
7502+ Action = GikoDM.SelectItemSaveForHTML
95017503 end
95027504 object dat1: TMenuItem
9503- Action = SelectItemSaveForDat
9504- Caption = 'DAT'#12398#12414#12414
7505+ Action = GikoDM.SelectItemSaveForDat
95057506 end
95067507 end
95077508 object ExportFavoriteFileAction1: TMenuItem
9508- Action = ExportFavoriteFile
7509+ Action = GikoDM.ExportFavoriteFile
95097510 end
95107511 object N61: TMenuItem
95117512 Caption = '-'
95127513 end
95137514 object ExitMenu: TMenuItem
9514- Action = ExitAction
7515+ Action = GikoDM.ExitAction
95157516 end
95167517 end
95177518 object ViewMenu: TMenuItem
@@ -9519,78 +7520,78 @@ object GikoForm: TGikoForm
95197520 object T2: TMenuItem
95207521 Caption = #12484#12540#12523#12496#12540'(&T)'
95217522 object StdToolBarMenu: TMenuItem
9522- Action = StdToolBarVisibleAction
7523+ Action = GikoDM.StdToolBarVisibleAction
95237524 AutoCheck = True
95247525 end
95257526 object AddressToolBarMenu: TMenuItem
9526- Action = AddressBarVisibleAction
7527+ Action = GikoDM.AddressBarVisibleAction
95277528 AutoCheck = True
95287529 end
95297530 object L7: TMenuItem
9530- Action = LinkBarVisibleAction
7531+ Action = GikoDM.LinkBarVisibleAction
95317532 AutoCheck = True
95327533 end
95337534 object N25: TMenuItem
95347535 Caption = '-'
95357536 end
95367537 object L3: TMenuItem
9537- Action = ListToolBarVisibleAction
7538+ Action = GikoDM.ListToolBarVisibleAction
95387539 AutoCheck = True
95397540 end
95407541 object S3: TMenuItem
9541- Action = ListNameBarVisibleAction
7542+ Action = GikoDM.ListNameBarVisibleAction
95427543 AutoCheck = True
95437544 end
95447545 object N26: TMenuItem
95457546 Caption = '-'
95467547 end
95477548 object B3: TMenuItem
9548- Action = BrowserToolBarVisibleAction
7549+ Action = GikoDM.BrowserToolBarVisibleAction
95497550 AutoCheck = True
95507551 end
95517552 object R2: TMenuItem
9552- Action = BrowserNameBarVisibleAction
7553+ Action = GikoDM.BrowserNameBarVisibleAction
95537554 AutoCheck = True
95547555 end
95557556 object T4: TMenuItem
95567557 Caption = #12502#12521#12454#12470#12479#12502'(&T)'
95577558 object Show1: TMenuItem
9558- Action = BrowserTabVisibleAction
7559+ Action = GikoDM.BrowserTabVisibleAction
95597560 AutoCheck = True
95607561 end
95617562 object N34: TMenuItem
95627563 Caption = '-'
95637564 end
95647565 object T5: TMenuItem
9565- Action = BrowserTabTopAction
7566+ Action = GikoDM.BrowserTabTopAction
95667567 AutoCheck = True
95677568 GroupIndex = 1
95687569 RadioItem = True
95697570 end
95707571 object B5: TMenuItem
9571- Action = BrowserTabBottomAction
7572+ Action = GikoDM.BrowserTabBottomAction
95727573 AutoCheck = True
95737574 GroupIndex = 1
95747575 RadioItem = True
95757576 end
95767577 object N35: TMenuItem
95777578 Caption = '-'
9578- GroupIndex = 1
7579+ GroupIndex = 2
95797580 end
95807581 object A8: TMenuItem
9581- Action = BrowserTabTabStyleAction
7582+ Action = GikoDM.BrowserTabTabStyleAction
95827583 AutoCheck = True
95837584 GroupIndex = 2
95847585 RadioItem = True
95857586 end
95867587 object U2: TMenuItem
9587- Action = BrowserTabButtonStyleAction
7588+ Action = GikoDM.BrowserTabButtonStyleAction
95887589 AutoCheck = True
95897590 GroupIndex = 2
95907591 RadioItem = True
95917592 end
95927593 object F1: TMenuItem
9593- Action = BrowserTabFlatStyleAction
7594+ Action = GikoDM.BrowserTabFlatStyleAction
95947595 AutoCheck = True
95957596 GroupIndex = 2
95967597 RadioItem = True
@@ -9600,53 +7601,53 @@ object GikoForm: TGikoForm
96007601 object CabinetMenu: TMenuItem
96017602 Caption = #12461#12515#12499#12493#12483#12488'(&C)'
96027603 object H1: TMenuItem
9603- Action = CabinetHistoryAction
7604+ Action = GikoDM.CabinetHistoryAction
96047605 AutoCheck = True
96057606 RadioItem = True
96067607 end
96077608 object N54: TMenuItem
9608- Action = CabinetFavoriteAction
7609+ Action = GikoDM.CabinetFavoriteAction
96097610 AutoCheck = True
96107611 end
96117612 object N4: TMenuItem
96127613 Caption = '-'
96137614 end
96147615 object CabinetVisibleMenu: TMenuItem
9615- Action = CabinetVisibleAction
7616+ Action = GikoDM.CabinetVisibleAction
96167617 AutoCheck = True
96177618 end
96187619 end
96197620 object MessageMenu: TMenuItem
9620- Action = MsgBarVisibleAction
7621+ Action = GikoDM.MsgBarVisibleAction
96217622 AutoCheck = True
96227623 end
96237624 object StatusBarMenu: TMenuItem
9624- Action = StatusBarVisibleAction
7625+ Action = GikoDM.StatusBarVisibleAction
96257626 AutoCheck = True
96267627 end
96277628 object MMSep03: TMenuItem
96287629 Caption = '-'
96297630 end
96307631 object LargeIconMenu: TMenuItem
9631- Action = LargeIconAction
7632+ Action = GikoDM.LargeIconAction
96327633 GroupIndex = 2
96337634 RadioItem = True
96347635 end
96357636 object SmallIconMenu: TMenuItem
96367637 Tag = 1
9637- Action = SmallIconAction
7638+ Action = GikoDM.SmallIconAction
96387639 GroupIndex = 2
96397640 RadioItem = True
96407641 end
96417642 object ListMenu: TMenuItem
96427643 Tag = 2
9643- Action = ListIconAction
7644+ Action = GikoDM.ListIconAction
96447645 GroupIndex = 2
96457646 RadioItem = True
96467647 end
96477648 object DetailMenu: TMenuItem
96487649 Tag = 3
9649- Action = DetailIconAction
7650+ Action = GikoDM.DetailIconAction
96507651 GroupIndex = 2
96517652 RadioItem = True
96527653 end
@@ -9655,12 +7656,12 @@ object GikoForm: TGikoForm
96557656 GroupIndex = 2
96567657 end
96577658 object H3: TMenuItem
9658- Action = ArrangeAction
7659+ Action = GikoDM.ArrangeAction
96597660 AutoCheck = True
96607661 GroupIndex = 2
96617662 end
96627663 object I1: TMenuItem
9663- Action = PaneInitAction
7664+ Action = GikoDM.PaneInitAction
96647665 GroupIndex = 2
96657666 end
96667667 object N27: TMenuItem
@@ -9668,56 +7669,52 @@ object GikoForm: TGikoForm
96687669 GroupIndex = 2
96697670 end
96707671 object N10: TMenuItem
9671- Action = StopAction
7672+ Action = GikoDM.StopAction
96727673 GroupIndex = 2
96737674 end
96747675 end
96757676 object B1: TMenuItem
96767677 Caption = #26495'(&B)'
96777678 object N3: TMenuItem
9678- Action = ListNumberVisibleAction
7679+ Action = GikoDM.ListNumberVisibleAction
96797680 AutoCheck = True
96807681 end
96817682 object U1: TMenuItem
9682- Action = UpFolderAction
7683+ Action = GikoDM.UpFolderAction
96837684 end
96847685 object N2: TMenuItem
96857686 Caption = '-'
96867687 end
96877688 object A1: TMenuItem
9688- Action = AllItemAction
7689+ Action = GikoDM.AllItemAction
96897690 AutoCheck = True
96907691 GroupIndex = 1
96917692 RadioItem = True
9692- ShortCut = 16433
96937693 end
96947694 object L1: TMenuItem
9695- Action = LogItemAction
7695+ Action = GikoDM.LogItemAction
96967696 AutoCheck = True
96977697 GroupIndex = 1
96987698 RadioItem = True
9699- ShortCut = 16434
97007699 end
97017700 object N5: TMenuItem
9702- Action = NewItemAction
7701+ Action = GikoDM.NewItemAction
97037702 AutoCheck = True
97047703 GroupIndex = 1
97057704 RadioItem = True
9706- ShortCut = 16435
97077705 end
97087706 object S2: TMenuItem
9709- Action = SelectItemAction
7707+ Action = GikoDM.SelectItemAction
97107708 AutoCheck = True
97117709 GroupIndex = 1
97127710 RadioItem = True
9713- ShortCut = 16436
97147711 end
97157712 object N39: TMenuItem
97167713 Caption = '-'
97177714 GroupIndex = 1
97187715 end
97197716 object T6: TMenuItem
9720- Action = ThreadEditorAction
7717+ Action = GikoDM.ThreadEditorAction
97217718 GroupIndex = 1
97227719 end
97237720 object N19: TMenuItem
@@ -9725,11 +7722,11 @@ object GikoForm: TGikoForm
97257722 GroupIndex = 1
97267723 end
97277724 object KidokuMenu: TMenuItem
9728- Action = KidokuAction
7725+ Action = GikoDM.KidokuAction
97297726 GroupIndex = 1
97307727 end
97317728 object MidokuMenu: TMenuItem
9732- Action = MidokuAction
7729+ Action = GikoDM.MidokuAction
97337730 GroupIndex = 1
97347731 end
97357732 object N23: TMenuItem
@@ -9737,31 +7734,31 @@ object GikoForm: TGikoForm
97377734 GroupIndex = 1
97387735 end
97397736 object OpenLogFolder: TMenuItem
9740- Action = LogFolderOpenAction
7737+ Action = GikoDM.LogFolderOpenAction
97417738 GroupIndex = 1
97427739 end
97437740 object B6: TMenuItem
9744- Action = BoardIEAction
7741+ Action = GikoDM.BoardIEAction
97457742 GroupIndex = 1
97467743 end
97477744 object BrowsBoradHeadAction1: TMenuItem
9748- Action = BrowsBoradHeadAction
7745+ Action = GikoDM.BrowsBoradHeadAction
97497746 GroupIndex = 1
97507747 end
97517748 object URLC3: TMenuItem
9752- Action = SelectItemURLCopyAction
7749+ Action = GikoDM.SelectItemURLCopyAction
97537750 GroupIndex = 1
97547751 end
97557752 object SelectItemNameCopyAction1: TMenuItem
9756- Action = SelectItemNameCopyAction
7753+ Action = GikoDM.SelectItemNameCopyAction
97577754 GroupIndex = 1
97587755 end
97597756 object URLN2: TMenuItem
9760- Action = SelectItemNameURLCopyAction
7757+ Action = GikoDM.SelectItemNameURLCopyAction
97617758 GroupIndex = 1
97627759 end
97637760 object AllSelectMenu: TMenuItem
9764- Action = AllSelectAction
7761+ Action = GikoDM.AllSelectAction
97657762 GroupIndex = 1
97667763 end
97677764 object N21: TMenuItem
@@ -9769,39 +7766,39 @@ object GikoForm: TGikoForm
97697766 GroupIndex = 1
97707767 end
97717768 object D1: TMenuItem
9772- Action = SelectListReloadAction
7769+ Action = GikoDM.SelectListReloadAction
97737770 GroupIndex = 1
97747771 end
97757772 object D2: TMenuItem
9776- Action = SelectThreadReloadAction
7773+ Action = GikoDM.SelectThreadReloadAction
97777774 GroupIndex = 1
97787775 end
97797776 end
97807777 object S1: TMenuItem
97817778 Caption = #12473#12524'(&R)'
97827779 object G2: TMenuItem
9783- Action = BrowserMaxAction
7780+ Action = GikoDM.BrowserMaxAction
97847781 end
97857782 object About1: TMenuItem
9786- Action = BrowserMinAction
7783+ Action = GikoDM.BrowserMinAction
97877784 end
97887785 object N11: TMenuItem
97897786 Caption = '-'
97907787 end
97917788 object T3: TMenuItem
9792- Action = ScrollTopAction
7789+ Action = GikoDM.ScrollTopAction
97937790 end
97947791 object L2: TMenuItem
9795- Action = ScrollLastAction
7792+ Action = GikoDM.ScrollLastAction
97967793 end
97977794 object N12: TMenuItem
9798- Action = ScrollNewAction
7795+ Action = GikoDM.ScrollNewAction
97997796 end
98007797 object K1: TMenuItem
9801- Action = ScrollKokoAction
7798+ Action = GikoDM.ScrollKokoAction
98027799 end
98037800 object N74: TMenuItem
9804- Action = JumpToNumOfResAction
7801+ Action = GikoDM.JumpToNumOfResAction
98057802 GroupIndex = 1
98067803 end
98077804 object N13: TMenuItem
@@ -9809,12 +7806,12 @@ object GikoForm: TGikoForm
98097806 GroupIndex = 1
98107807 end
98117808 object A11: TMenuItem
9812- Action = AllResAction
7809+ Action = GikoDM.AllResAction
98137810 AutoCheck = True
98147811 GroupIndex = 1
98157812 end
98167813 object S5: TMenuItem
9817- Action = SelectResAction
7814+ Action = GikoDM.SelectResAction
98187815 AutoCheck = True
98197816 GroupIndex = 1
98207817 end
@@ -9823,7 +7820,7 @@ object GikoForm: TGikoForm
98237820 GroupIndex = 1
98247821 end
98257822 object R1: TMenuItem
9826- Action = EditorAction
7823+ Action = GikoDM.EditorAction
98277824 GroupIndex = 1
98287825 end
98297826 object N14: TMenuItem
@@ -9834,11 +7831,11 @@ object GikoForm: TGikoForm
98347831 Caption = #12479#12502'(&T)'
98357832 GroupIndex = 1
98367833 object C1: TMenuItem
9837- Action = BrowserTabCloseAction
7834+ Action = GikoDM.BrowserTabCloseAction
98387835 GroupIndex = 1
98397836 end
98407837 object V1: TMenuItem
9841- Action = NotSelectTabCloseAction
7838+ Action = GikoDM.NotSelectTabCloseAction
98427839 GroupIndex = 1
98437840 end
98447841 object N24: TMenuItem
@@ -9846,7 +7843,7 @@ object GikoForm: TGikoForm
98467843 GroupIndex = 1
98477844 end
98487845 object D4: TMenuItem
9849- Action = ActiveLogDeleteAction
7846+ Action = GikoDM.ActiveLogDeleteAction
98507847 GroupIndex = 1
98517848 end
98527849 object N62: TMenuItem
@@ -9854,7 +7851,7 @@ object GikoForm: TGikoForm
98547851 GroupIndex = 1
98557852 end
98567853 object A6: TMenuItem
9857- Action = AllTabCloseAction
7854+ Action = GikoDM.AllTabCloseAction
98587855 GroupIndex = 1
98597856 end
98607857 object N17: TMenuItem
@@ -9862,19 +7859,19 @@ object GikoForm: TGikoForm
98627859 GroupIndex = 1
98637860 end
98647861 object L5: TMenuItem
9865- Action = LeftmostTabSelectAction
7862+ Action = GikoDM.LeftmostTabSelectAction
98667863 GroupIndex = 1
98677864 end
98687865 object L6: TMenuItem
9869- Action = LeftTabSelectAction
7866+ Action = GikoDM.LeftTabSelectAction
98707867 GroupIndex = 1
98717868 end
98727869 object A7: TMenuItem
9873- Action = RightTabSelectAction
7870+ Action = GikoDM.RightTabSelectAction
98747871 GroupIndex = 1
98757872 end
98767873 object R3: TMenuItem
9877- Action = RightmostTabSelectAction
7874+ Action = GikoDM.RightmostTabSelectAction
98787875 GroupIndex = 1
98797876 end
98807877 end
@@ -9883,23 +7880,23 @@ object GikoForm: TGikoForm
98837880 GroupIndex = 1
98847881 end
98857882 object T1: TMenuItem
9886- Action = ShowThreadAction
7883+ Action = GikoDM.ShowThreadAction
98877884 GroupIndex = 1
98887885 end
98897886 object B2: TMenuItem
9890- Action = ShowBoardAction
7887+ Action = GikoDM.ShowBoardAction
98917888 GroupIndex = 1
98927889 end
98937890 object URLC2: TMenuItem
9894- Action = URLCopyAction
7891+ Action = GikoDM.URLCopyAction
98957892 GroupIndex = 1
98967893 end
98977894 object T9: TMenuItem
9898- Action = NameCopyAction
7895+ Action = GikoDM.NameCopyAction
98997896 GroupIndex = 1
99007897 end
99017898 object URLN1: TMenuItem
9902- Action = NameURLCopyAction
7899+ Action = GikoDM.NameURLCopyAction
99037900 GroupIndex = 1
99047901 end
99057902 object N49: TMenuItem
@@ -9907,7 +7904,7 @@ object GikoForm: TGikoForm
99077904 GroupIndex = 1
99087905 end
99097906 object A2: TMenuItem
9910- Action = ItemReloadAction
7907+ Action = GikoDM.ItemReloadAction
99117908 GroupIndex = 1
99127909 end
99137910 object N8: TMenuItem
@@ -9915,7 +7912,7 @@ object GikoForm: TGikoForm
99157912 GroupIndex = 1
99167913 end
99177914 object N42: TMenuItem
9918- Action = AntiIndividualAbonDlgAction
7915+ Action = GikoDM.AntiIndividualAbonDlgAction
99197916 Caption = #20491#21029#12354#12412#65374#12435#35299#38500
99207917 GroupIndex = 1
99217918 Hint = #20491#21029#12354#12412#65374#12435#35299#38500
@@ -9929,42 +7926,42 @@ object GikoForm: TGikoForm
99297926 object ToolMenu: TMenuItem
99307927 Caption = #12484#12540#12523'(&T)'
99317928 object Find1: TMenuItem
9932- Action = SearchAction
7929+ Action = GikoDM.SearchAction
99337930 end
99347931 object RoundMenu: TMenuItem
9935- Action = RoundAction
7932+ Action = GikoDM.RoundAction
99367933 end
99377934 object MMSep04: TMenuItem
99387935 Caption = '-'
99397936 end
99407937 object K3: TMenuItem
9941- Action = KotehanAction
7938+ Action = GikoDM.KotehanAction
99427939 end
99437940 object K2: TMenuItem
9944- Action = KeySettingAction
7941+ Action = GikoDM.KeySettingAction
99457942 end
99467943 object T7: TMenuItem
9947- Action = ToolBarSettingAction
7944+ Action = GikoDM.ToolBarSettingAction
99487945 end
99497946 object N40: TMenuItem
99507947 Caption = '-'
99517948 end
99527949 object NG1: TMenuItem
9953- Action = EditNGAction
7950+ Action = GikoDM.EditNGAction
99547951 end
99557952 object NG2: TMenuItem
99567953 Caption = 'NG'#12527#12540#12489#35501#12415#36796#12415
99577954 object GoBack: TMenuItem
9958- Caption = #19968#12388#21069
9959- OnClick = GoBackClick
7955+ Action = GikoDM.GoBackAction
7956+ Caption = #19968#12388#21069#12408
99607957 end
99617958 object Reload: TMenuItem
7959+ Action = GikoDM.ReloadAction
99627960 Caption = #20877#35501#12415#36796#12415
9963- OnClick = ReloadClick
99647961 end
99657962 object GoFoward: TMenuItem
7963+ Action = GikoDM.GoFowardAction
99667964 Caption = #19968#12388#24460#12429
9967- OnClick = GoFowardClick
99687965 end
99697966 end
99707967 object N43: TMenuItem
@@ -9974,41 +7971,41 @@ object GikoForm: TGikoForm
99747971 Caption = #12503#12521#12464#12452#12531'(&P)'
99757972 end
99767973 object OptionMenu: TMenuItem
9977- Action = OptionAction
7974+ Action = GikoDM.OptionAction
99787975 end
99797976 end
99807977 object HelpMenu: TMenuItem
99817978 Caption = #12504#12523#12503'(&H)'
99827979 object H4: TMenuItem
9983- Action = GikoHelpAction
7980+ Action = GikoDM.GikoHelpAction
99847981 end
99857982 object WikiFAQ: TMenuItem
9986- Action = WikiFAQWebPageAction
9987- Caption = #12462#12467#12490#12499'Wiki FAQ'
7983+ Action = GikoDM.WikiFAQWebPageAction
7984+ Caption = #12462#12467#12490#12499'Wili FAQ'
99887985 end
99897986 object N36: TMenuItem
99907987 Caption = '-'
99917988 end
99927989 object G1: TMenuItem
9993- Action = GikoNaviWebPageAction
7990+ Action = GikoDM.GikoNaviWebPageAction
99947991 end
99957992 object MonazillaWebPageAction1: TMenuItem
9996- Action = MonazillaWebPageAction
7993+ Action = GikoDM.MonazillaWebPageAction
99977994 end
99987995 object N2N1: TMenuItem
9999- Action = BBS2chWebPageAction
7996+ Action = GikoDM.BBS2chWebPageAction
100007997 end
100017998 object N1: TMenuItem
100027999 Caption = '-'
100038000 end
100048001 object F2: TMenuItem
10005- Action = GikoFolderOpenAction
8002+ Action = GikoDM.GikoFolderOpenAction
100068003 end
100078004 object N38: TMenuItem
100088005 Caption = '-'
100098006 end
100108007 object AboutMenu: TMenuItem
10011- Action = AboutAction
8008+ Action = GikoDM.AboutAction
100128009 end
100138010 end
100148011 end
@@ -10025,1238 +8022,48 @@ object GikoForm: TGikoForm
100258022 Left = 100
100268023 Top = 308
100278024 end
10028- object ActionList: TActionList
10029- Images = ToobarImageList
10030- Left = 5
10031- Top = 372
10032- object OnlyAHundredResAction: TAction
10033- Category = #12473#12524#12483#12489
10034- AutoCheck = True
10035- Caption = #26368#26032'100'#12524#12473#12398#12415#34920#31034'(&H)'
10036- GroupIndex = 2
10037- Hint = #26368#26032'100'#12524#12473#12398#12415#34920#31034
10038- ImageIndex = 38
10039- OnExecute = OnlyAHundredResActionExecute
10040- end
10041- object OnlyKokoResAction: TAction
10042- Category = #12473#12524#12483#12489
10043- AutoCheck = True
10044- Caption = #26410#35501#12524#12473#12398#12415#34920#31034'(&K)'
10045- GroupIndex = 2
10046- Hint = #26410#35501#12524#12473#12398#12415#34920#31034
10047- ImageIndex = 46
10048- OnExecute = OnlyKokoResActionExecute
10049- end
10050- object LoginAction: TAction
10051- Category = #12501#12449#12452#12523
10052- AutoCheck = True
10053- Caption = #12525#12464#12452#12531'(&L)'
10054- Hint = #12525#12464#12452#12531#65295#12525#12464#12450#12454#12488#12434#12377#12427
10055- ImageIndex = 3
10056- OnExecute = LoginActionExecute
10057- end
10058- object NewBoardAction: TAction
10059- Category = #12501#12449#12452#12523
10060- Caption = #26495#26356#26032'(&B)...'
10061- Hint = #12508#12540#12489#26356#26032#12480#12452#12450#12525#12464#12434#34920#31034#12377#12427
10062- OnExecute = NewBoardActionExecute
10063- end
10064- object LogDeleteAction: TAction
10065- Category = #12501#12449#12452#12523
10066- Caption = #12525#12464#21066#38500'(&D)'
10067- Hint = #36984#25246#12373#12428#12390#12356#12427#12473#12524#12483#12489#12434#21066#38500#12377#12427
10068- ShortCut = 46
10069- OnExecute = LogDeleteActionExecute
10070- OnUpdate = SelectThreadReloadActionUpdate
10071- end
10072- object KidokuAction: TAction
10073- Category = #32232#38598
10074- Caption = #26082#35501#12395#12377#12427'(&K)'
10075- Hint = #36984#25246#12373#12428#12390#12356#12427#12473#12524#12483#12489#12434#26082#35501#12395#12377#12427
10076- OnExecute = KidokuActionExecute
10077- end
10078- object StdToolBarVisibleAction: TAction
10079- Category = #34920#31034
10080- AutoCheck = True
10081- Caption = #27161#28310#12484#12540#12523#12496#12540'(&S)'
10082- Checked = True
10083- Hint = #27161#28310#12484#12540#12523#12496#12540#12398#34920#31034#29366#24907#12434#22793#26356#12377#12427
10084- OnExecute = StdToolBarVisibleActionExecute
10085- end
10086- object AddressBarVisibleAction: TAction
10087- Category = #34920#31034
10088- AutoCheck = True
10089- Caption = #12450#12489#12524#12473#12496#12540'(&A)'
10090- Checked = True
10091- Hint = #12450#12489#12524#12473#12496#12540#12398#34920#31034#29366#24907#12434#22793#26356#12377#12427
10092- OnExecute = AddressBarVisibleActionExecute
10093- end
10094- object LinkBarVisibleAction: TAction
10095- Category = #34920#31034
10096- AutoCheck = True
10097- Caption = #12522#12531#12463#12496#12540'(&K)'
10098- Checked = True
10099- Hint = #12522#12531#12463#12496#12540#12398#34920#31034#29366#24907#12434#22793#26356#12377#12427
10100- OnExecute = LinkBarVisibleActionExecute
10101- end
10102- object ListToolBarVisibleAction: TAction
10103- Category = #34920#31034
10104- AutoCheck = True
10105- Caption = #12522#12473#12488#12484#12540#12523#12496#12540'(&L)'
10106- Checked = True
10107- Hint = #12522#12473#12488#12484#12540#12523#12496#12540#12398#34920#31034#29366#24907#12434#22793#26356#12377#12427
10108- OnExecute = ListToolBarVisibleActionExecute
10109- end
10110- object SearchAction: TAction
10111- Category = #12484#12540#12523
10112- Caption = #12525#12464#26908#32034'(&S)'
10113- Hint = #12525#12464#26908#32034#12480#12452#12450#12525#12464#12434#34920#31034#12377#12427
10114- ImageIndex = 34
10115- ShortCut = 16454
10116- OnExecute = SearchActionExecute
10117- end
10118- object GikoNaviWebPageAction: TAction
10119- Category = #12504#12523#12503
10120- Caption = #12462#12467#12490#12499#12398#12454#12455#12502#12469#12452#12488'(&G)'
10121- Hint = #12462#12467#12490#12499#12398#12454#12455#12502#12469#12452#12488#12434#34920#31034#12377#12427
10122- OnExecute = GikoNaviWebPageActionExecute
10123- end
10124- object MonazillaWebPageAction: TAction
10125- Category = #12504#12523#12503
10126- Caption = #12514#12490#12472#12521#12398#12454#12455#12502#12469#12452#12488'(&M)'
10127- Hint = #12514#12490#12472#12521#12398#12454#12455#12502#12469#12452#12488#12434#34920#31034#12377#12427
10128- OnExecute = MonazillaWebPageActionExecute
10129- end
10130- object BBS2chWebPageAction: TAction
10131- Category = #12504#12523#12503
10132- Caption = '2'#12385#12419#12435#12397#12427#12488#12483#12503#12506#12540#12472'(&N)'
10133- Hint = '2'#12385#12419#12435#12397#12427#12488#12483#12503#12506#12540#12472#12434#34920#31034#12377#12427
10134- OnExecute = BBS2chWebPageActionExecute
10135- end
10136- object GikoFolderOpenAction: TAction
10137- Category = #12504#12523#12503
10138- Caption = #12462#12467#12490#12499#12501#12457#12523#12480#12434#38283#12367'(&F)'
10139- Hint = #12462#12467#12490#12499#12398#12501#12457#12523#12480#12434#38283#12367
10140- OnExecute = GikoFolderOpenActionExecute
10141- end
10142- object AboutAction: TAction
10143- Category = #12504#12523#12503
10144- Caption = #12496#12540#12472#12519#12531#24773#22577'(&A)...'
10145- Hint = #12496#12540#12472#12519#12531#24773#22577#12434#34920#31034#12377#12427
10146- OnExecute = AboutActionExecute
10147- end
10148- object SelectTextClearAction: TAction
10149- Category = #12501#12449#12452#12523
10150- Caption = #32094#36796#12415#23653#27508#28040#21435'(&S)'
10151- Hint = #32094#36796#12415#23653#27508#12434#28040#21435#12377#12427
10152- OnExecute = SelectTextClearActionExecute
10153- end
10154- object NameTextClearAction: TAction
10155- Category = #12501#12449#12452#12523
10156- Caption = #12524#12473#12456#12487#12451#12479#21517#21069#23653#27508#28040#21435'(&N)'
10157- Hint = #12524#12473#12456#12487#12451#12479#12398#21517#21069#23653#27508#12434#28040#21435#12377#12427
10158- OnExecute = NameTextClearActionExecute
10159- end
10160- object MailTextClearAction: TAction
10161- Category = #12501#12449#12452#12523
10162- Caption = #12524#12473#12456#12487#12451#12479#12513#12540#12523#23653#27508#28040#21435'(&N)'
10163- Hint = #12524#12473#12456#12487#12451#12479#12398#12513#12540#12523#23653#27508#12434#28040#21435#12377#12427
10164- OnExecute = MailTextClearActionExecute
10165- end
10166- object ExitAction: TAction
10167- Category = #12501#12449#12452#12523
10168- Caption = #32066#20102'(&X)'
10169- Hint = #12462#12467#12490#12499#12434#32066#20102#12377#12427
10170- OnExecute = ExitActionExecute
10171- end
10172- object ListNameBarVisibleAction: TAction
10173- Category = #34920#31034
10174- AutoCheck = True
10175- Caption = #12522#12473#12488#21517#31216'(&I)'
10176- Checked = True
10177- Hint = #12522#12473#12488#21517#31216#12398#34920#31034#29366#24907#12434#22793#26356#12377#12427
10178- OnExecute = ListNameBarVisibleActionExecute
10179- end
10180- object BrowserToolBarVisibleAction: TAction
10181- Category = #34920#31034
10182- AutoCheck = True
10183- Caption = #12502#12521#12454#12470#12484#12540#12523#12496#12540'(&B)'
10184- Checked = True
10185- Hint = #12502#12521#12454#12470#12484#12540#12523#12496#12540#12398#34920#31034#29366#24907#12434#22793#26356#12377#12427
10186- OnExecute = BrowserToolBarVisibleActionExecute
10187- end
10188- object BrowserNameBarVisibleAction: TAction
10189- Category = #34920#31034
10190- AutoCheck = True
10191- Caption = #12502#12521#12454#12470#21517#31216'(&R)'
10192- Checked = True
10193- Hint = #12502#12521#12454#12470#21517#31216#12398#34920#31034#29366#24907#12434#22793#26356#12377#12427
10194- OnExecute = BrowserNameBarVisibleActionExecute
10195- end
10196- object MsgBarVisibleAction: TAction
10197- Category = #34920#31034
10198- AutoCheck = True
10199- Caption = #12513#12483#12475#12540#12472#12496#12540'(&E)'
10200- Hint = #12513#12483#12475#12540#12472#12496#12540#12398#34920#31034#29366#24907#12434#22793#26356#12377#12427
10201- OnExecute = MsgBarVisibleActionExecute
10202- end
10203- object MsgBarCloseAction: TAction
10204- Category = #34920#31034
10205- Caption = #38281#12376#12427'(&C)'
10206- Hint = #12513#12483#12475#12540#12472#12496#12540#12434#38281#12376#12427
10207- OnExecute = MsgBarCloseActionExecute
10208- end
10209- object StatusBarVisibleAction: TAction
10210- Category = #34920#31034
10211- AutoCheck = True
10212- Caption = #12473#12486#12540#12479#12473#12496#12540'(&U)'
10213- Hint = #12473#12486#12540#12479#12473#12496#12540#12398#34920#31034#29366#24907#12434#22793#26356#12377#12427
10214- OnExecute = StatusBarVisibleActionExecute
10215- end
10216- object CabinetBBSAction: TAction
10217- Category = #34920#31034
10218- AutoCheck = True
10219- Caption = #25522#31034#26495'(&N)'
10220- Hint = #12461#12515#12499#12493#12483#12488#12398#34920#31034#12434#25522#31034#26495#12395#12377#12427
10221- ImageIndex = 35
10222- OnExecute = CabinetBBSActionExecute
10223- end
10224- object CabinetHistoryAction: TAction
10225- Category = #34920#31034
10226- AutoCheck = True
10227- Caption = #23653#27508#12522#12473#12488'(&H)'
10228- Hint = #12461#12515#12499#12493#12483#12488#12398#34920#31034#12434#23653#27508#12522#12473#12488#12395#12377#12427
10229- ImageIndex = 36
10230- OnExecute = CabinetHistoryActionExecute
10231- end
10232- object OnlyNewResAction: TAction
10233- Category = #12473#12524#12483#12489
10234- AutoCheck = True
10235- Caption = #26032#30528#12524#12473#12398#12415#34920#31034'(&N)'
10236- GroupIndex = 2
10237- Hint = #26032#30528#12524#12473#12398#12415#34920#31034
10238- ImageIndex = 45
10239- OnExecute = OnlyNewResActionExecute
10240- end
10241- object CabinetFavoriteAction: TAction
10242- Category = #34920#31034
10243- AutoCheck = True
10244- Caption = #12362#27671#12395#20837#12426'(&A)'
10245- Hint = #12461#12515#12499#12493#12483#12488#12398#34920#31034#12434#12362#27671#12395#20837#12426#12522#12473#12488#12395#12377#12427
10246- ImageIndex = 37
10247- OnExecute = CabinetFavoriteActionExecute
10248- end
10249- object CabinetVisibleAction: TAction
10250- Category = #34920#31034
10251- AutoCheck = True
10252- Caption = #12461#12515#12499#12493#12483#12488#34920#31034'(&O)'
10253- Hint = #12461#12515#12499#12493#12483#12488#12398#34920#31034#29366#24907#12434#22793#26356#12377#12427
10254- ImageIndex = 1
10255- OnExecute = CabinetVisibleActionExecute
10256- end
10257- object ListNumberVisibleAction: TAction
10258- Category = #26495
10259- AutoCheck = True
10260- Caption = #12522#12473#12488#30058#21495#34920#31034'(&N)'
10261- Hint = #12522#12473#12488#30058#21495#34920#31034#12434#22793#26356#12377#12427
10262- ImageIndex = 6
10263- OnExecute = ListNumberVisibleActionExecute
10264- end
10265- object UpFolderAction: TAction
10266- Category = #26495
10267- Caption = #19978#12408'(&U)'
10268- Hint = #19978#20301#12501#12457#12523#12480#12395#31227#21205#12377#12427
10269- ImageIndex = 8
10270- ShortCut = 8
10271- OnExecute = UpFolderActionExecute
10272- OnUpdate = UpFolderActionUpdate
10273- end
10274- object CabinetCloseAction: TAction
10275- Category = #34920#31034
10276- Caption = #38281#12376#12427'(&C)'
10277- Hint = #12461#12515#12499#12493#12483#12488#12434#38281#12376#12427
10278- end
10279- object IconStyle: TAction
10280- Category = #26495
10281- Caption = #34920#31034'(&V)'
10282- Hint = #34920#31034
10283- ImageIndex = 7
10284- OnExecute = IconStyleExecute
10285- end
10286- object LargeIconAction: TAction
10287- Category = #34920#31034
10288- Caption = #22823#12365#12356#12450#12452#12467#12531'(&G)'
10289- GroupIndex = 2
10290- Hint = #12522#12473#12488#12434#22823#12365#12356#12450#12452#12467#12531#34920#31034#12395#12377#12427
10291- OnExecute = LargeIconActionExecute
10292- end
10293- object SmallIconAction: TAction
10294- Category = #34920#31034
10295- Caption = #23567#12373#12356#12450#12452#12467#12531'(&M)'
10296- GroupIndex = 2
10297- Hint = #12522#12473#12488#12434#23567#12373#12356#12450#12452#12467#12531#34920#31034#12395#12377#12427
10298- OnExecute = SmallIconActionExecute
10299- end
10300- object ListIconAction: TAction
10301- Category = #34920#31034
10302- Caption = #19968#35239'(&L)'
10303- GroupIndex = 2
10304- Hint = #12522#12473#12488#12434#19968#35239#34920#31034#12395#12377#12427
10305- OnExecute = ListIconActionExecute
10306- end
10307- object DetailIconAction: TAction
10308- Category = #34920#31034
10309- Caption = #35443#32048'(&D)'
10310- GroupIndex = 2
10311- Hint = #12522#12473#12488#12434#35443#32048#34920#31034#12395#12377#12427
10312- OnExecute = DetailIconActionExecute
10313- end
10314- object MidokuAction: TAction
10315- Category = #32232#38598
10316- Caption = #26410#35501#12395#12377#12427'(&M)'
10317- Hint = #36984#25246#12373#12428#12390#12356#12427#12473#12524#12483#12489#12434#26410#35501#12395#12377#12427
10318- OnExecute = MidokuActionExecute
10319- end
10320- object AllSelectAction: TAction
10321- Category = #32232#38598
10322- Caption = #12377#12409#12390#36984#25246'(&A)'
10323- Hint = #12522#12473#12488#12434#12377#12409#12390#36984#25246#12377#12427
10324- ShortCut = 16449
10325- OnExecute = AllSelectActionExecute
10326- OnUpdate = AllSelectActionUpdate
10327- end
10328- object AllItemAction: TAction
10329- Category = #26495
10330- AutoCheck = True
10331- Caption = #12377#12409#12390#12398#12473#12524#12483#12489#12434#34920#31034'(&A)'
10332- GroupIndex = 1
10333- Hint = #12473#12524#12483#12489#12434#12377#12409#12390#34920#31034#12377#12427
10334- ImageIndex = 9
10335- OnExecute = AllItemActionExecute
10336- OnUpdate = DependActiveListTBoardActionUpdate
10337- end
10338- object LogItemAction: TAction
10339- Category = #26495
10340- AutoCheck = True
10341- Caption = #12525#12464#26377#12426#12473#12524#12483#12489#34920#31034'(&L)'
10342- GroupIndex = 1
10343- Hint = #12525#12464#26377#12426#12473#12524#12483#12489#12398#12415#34920#31034#12377#12427
10344- ImageIndex = 10
10345- OnExecute = LogItemActionExecute
10346- OnUpdate = DependActiveListTBoardActionUpdate
10347- end
10348- object NewItemAction: TAction
10349- Category = #26495
10350- AutoCheck = True
10351- Caption = #26032#30528#12473#12524#12483#12489#34920#31034'(&N)'
10352- GroupIndex = 1
10353- Hint = #26032#30528#12473#12524#12483#12489#12398#12415#34920#31034#12377#12427
10354- ImageIndex = 11
10355- OnExecute = NewItemActionExecute
10356- OnUpdate = DependActiveListTBoardActionUpdate
10357- end
10358- object ThreadRangeAction: TAction
10359- Category = #26495
10360- AutoCheck = True
10361- Caption = #12473#12524#12483#12489#12398#34920#31034#31684#22258#12434#35373#23450'(&H)'
10362- GroupIndex = 1
10363- Hint = #12473#12524#12483#12489#12398#34920#31034#31684#22258#12434#35373#23450
10364- ImageIndex = 10
10365- OnExecute = ThreadRangeActionExecute
10366- OnUpdate = DependActiveCntentActionUpdate
10367- end
10368- object SelectItemAction: TAction
10369- Category = #26495
10370- AutoCheck = True
10371- Caption = #12473#12524#12483#12489#32094#36796#12415#34920#31034'(&S)...'
10372- GroupIndex = 1
10373- Hint = #12473#12524#12483#12489#32094#36796#12415#12480#12452#12450#12525#12464#12434#34920#31034#12377#12427
10374- ImageIndex = 12
10375- OnExecute = SelectItemActionExecute
10376- OnUpdate = DependActiveListTBoardActionUpdate
10377- end
10378- object StopAction: TAction
10379- Category = #34920#31034
10380- Caption = #20013#27490'(&S)'
10381- Hint = #12480#12454#12531#12525#12540#12489#12434#20013#27490#12377#12427
10382- ImageIndex = 2
10383- ShortCut = 27
10384- OnExecute = StopActionExecute
10385- end
10386- object OptionAction: TAction
10387- Category = #12484#12540#12523
10388- Caption = #12458#12503#12471#12519#12531'(&O)...'
10389- Hint = #12458#12503#12471#12519#12531#12480#12452#12450#12525#12464#12434#34920#31034#12377#12427
10390- OnExecute = OptionActionExecute
10391- end
10392- object RoundAction: TAction
10393- Category = #12484#12540#12523
10394- Caption = #24033#22238#12434#23455#34892'(&R)...'
10395- Hint = #24033#22238#12480#12452#12450#12525#12464#12434#34920#31034#12377#12427
10396- ImageIndex = 0
10397- OnExecute = RoundActionExecute
10398- end
10399- object BrowserMaxAction: TAction
10400- Category = #12473#12524#12483#12489
10401- Caption = #12473#12524#12434#22823#12365#12367#34920#31034'(&E)'
10402- Hint = #12473#12524#12483#12489#34920#31034#12456#12522#12450#12434#22823#12365#12367#34920#31034#12377#12427
10403- ImageIndex = 16
10404- OnExecute = BrowserMaxActionExecute
10405- end
10406- object BrowserMinAction: TAction
10407- Category = #12473#12524#12483#12489
10408- Caption = #12473#12524#12434#23567#12373#12367#34920#31034'(&W)'
10409- Hint = #12473#12524#12483#12489#34920#31034#12456#12522#12450#12434#23567#12373#12367#34920#31034#12377#12427
10410- ImageIndex = 17
10411- OnExecute = BrowserMinActionExecute
10412- end
10413- object ScrollTopAction: TAction
10414- Category = #12473#12524#12483#12489
10415- Caption = #20808#38957#12408#31227#21205'(&T)'
10416- Hint = #29694#22312#34920#31034#12375#12390#12356#12427#12473#12524#12483#12489#12398#20808#38957#12408#31227#21205#12377#12427
10417- ImageIndex = 22
10418- OnExecute = ScrollTopActionExecute
10419- OnUpdate = DependActiveCntentLogActionUpdate
10420- end
10421- object ScrollLastAction: TAction
10422- Category = #12473#12524#12483#12489
10423- Caption = #26368#24460#12408#31227#21205'(&L)'
10424- Hint = #29694#22312#34920#31034#12375#12390#12356#12427#12473#12524#12483#12489#26368#24460#12408#31227#21205#12377#12427
10425- ImageIndex = 23
10426- OnExecute = ScrollLastActionExecute
10427- OnUpdate = DependActiveCntentLogActionUpdate
10428- end
10429- object ScrollNewAction: TAction
10430- Category = #12473#12524#12483#12489
10431- Caption = #26032#30528#12408#31227#21205'(&N)'
10432- Hint = #29694#22312#34920#31034#12375#12390#12356#12427#12473#12524#12483#12489#12398#26032#30528#12408#31227#21205#12377#12427
10433- ImageIndex = 24
10434- OnExecute = ScrollNewActionExecute
10435- OnUpdate = DependActiveCntentLogActionUpdate
10436- end
10437- object ScrollKokoAction: TAction
10438- Category = #12473#12524#12483#12489
10439- Caption = #12467#12467#12414#12391#35501#12435#12384#12408#31227#21205'(&K)'
10440- Hint = #29694#22312#34920#31034#12375#12390#12356#12427#12473#12524#12483#12489#12398#12467#12467#12414#12391#35501#12435#12384#12408#31227#21205#12377#12427
10441- ImageIndex = 25
10442- OnExecute = ScrollKokoActionExecute
10443- OnUpdate = ScrollKokoActionUpdate
10444- end
10445- object EditorAction: TAction
10446- Category = #12473#12524#12483#12489
10447- Caption = #12524#12473#26360#12365#36796#12415'(&R)'
10448- Hint = #12524#12473#26360#12365#36796#12415#12454#12451#12531#12489#12454#12434#34920#31034#12377#12427
10449- ImageIndex = 26
10450- ShortCut = 16466
10451- OnExecute = EditorActionExecute
10452- OnUpdate = DependActiveCntentActionUpdate
10453- end
10454- object IEAction: TAction
10455- Category = #12473#12524#12483#12489
10456- Caption = #12502#12521#12454#12470#12391#34920#31034'(&B)'
10457- Hint = #12473#12524#12434#12502#12521#12454#12470#12391#34920#31034#12377#12427
10458- ImageIndex = 27
10459- OnExecute = IEActionExecute
10460- OnUpdate = DependActiveCntentActionUpdate
10461- end
10462- object ShowThreadAction: TAction
10463- Category = #12473#12524#12483#12489
10464- Caption = #12473#12524#12483#12489#12434#12502#12521#12454#12470#12391#34920#31034'(&S)'
10465- Hint = #29694#22312#34920#31034#12375#12390#12356#12427#12473#12524#12483#12489#12434#12502#12521#12454#12470#12391#34920#31034#12377#12427
10466- ImageIndex = 27
10467- OnExecute = ShowThreadActionExecute
10468- OnUpdate = DependActiveCntentActionUpdate
10469- end
10470- object ShowBoardAction: TAction
10471- Category = #12473#12524#12483#12489
10472- Caption = #26495#12434#12502#12521#12454#12470#12391#34920#31034'(&B)'
10473- Hint = #29694#22312#34920#31034#12375#12390#12356#12427#12473#12524#12483#12489#12398#26495#12434#12502#12521#12454#12470#12391#34920#31034#12377#12427
10474- ImageIndex = 27
10475- OnExecute = ShowBoardActionExecute
10476- OnUpdate = DependActiveCntentActionUpdate
10477- end
10478- object URLCopyAction: TAction
10479- Category = #12473#12524#12483#12489
10480- Caption = 'URL'#12434#12467#12500#12540'(&C)'
10481- Hint = #29694#22312#34920#31034#12375#12390#12356#12427#12473#12524#12483#12489#12398'URL'#12434#12467#12500#12540#12377#12427
10482- OnExecute = URLCopyActionExecute
10483- OnUpdate = DependActiveCntentActionUpdate
10484- end
10485- object NameCopyAction: TAction
10486- Category = #12473#12524#12483#12489
10487- Caption = #12473#12524#12483#12489#21517#12434#12467#12500#12540'(&T)'
10488- Hint = #29694#22312#34920#31034#12375#12390#12356#12427#12473#12524#12483#12489#21517#12434#12467#12500#12540#12377#12427
10489- OnExecute = NameCopyActionExecute
10490- OnUpdate = DependActiveCntentActionUpdate
10491- end
10492- object NameURLCopyAction: TAction
10493- Category = #12473#12524#12483#12489
10494- Caption = #12473#12524#12483#12489#21517#12392'URL'#12434#12467#12500#12540'(&M)'
10495- Hint = #29694#22312#34920#31034#12375#12390#12356#12427#12473#12524#12483#12489#21517#12392'URL'#12434#12467#12500#12540#12377#12427
10496- OnExecute = NameURLCopyActionExecute
10497- OnUpdate = DependActiveCntentActionUpdate
10498- end
10499- object ItemReloadAction: TAction
10500- Category = #12473#12524#12483#12489
10501- Caption = #12473#12524#12483#12489#12480#12454#12531#12525#12540#12489'(&A)'
10502- Hint = #34920#31034#12373#12428#12390#12356#12427#12473#12524#12483#12489#12434#12480#12454#12531#12525#12540#12489#12377#12427
10503- ImageIndex = 28
10504- OnExecute = ItemReloadActionExecute
10505- OnUpdate = DependActiveCntentActionUpdate
10506- end
10507- object ThreadEditorAction: TAction
10508- Category = #26495
10509- Caption = #26032#12473#12524#20316#25104'(&T)'
10510- Hint = #26032#12473#12524#26360#12365#36796#12415#12454#12451#12531#12489#12454#12434#34920#31034#12377#12427
10511- ImageIndex = 26
10512- OnExecute = ThreadEditorActionExecute
10513- OnUpdate = DependActiveListTBoardActionUpdate
10514- end
10515- object BoardIEAction: TAction
10516- Category = #26495
10517- Caption = #12502#12521#12454#12470#12391#34920#31034'(&B)'
10518- Hint = #29694#22312#34920#31034#12375#12390#12356#12427#26495#12434#12502#12521#12454#12470#12391#34920#31034#12377#12427
10519- ImageIndex = 27
10520- OnExecute = BoardIEActionExecute
10521- OnUpdate = DependActiveListTBoardActionUpdate
10522- end
10523- object SelectItemURLCopyAction: TAction
10524- Category = #26495
10525- Caption = 'URL'#12434#12467#12500#12540'(&C)'
10526- Hint = #36984#25246#12373#12428#12390#12356#12427#12473#12524#12483#12489#12398'URL'#12434#12467#12500#12540#12377#12427
10527- OnExecute = SelectItemURLCopyActionExecute
10528- OnUpdate = SelectItemNameCopyActionUpdate
10529- end
10530- object SelectItemNameCopyAction: TAction
10531- Category = #26495
10532- Caption = #21517#21069#12434#12467#12500#12540'(&C)'
10533- Hint = #36984#25246#12373#12428#12390#12356#12427#26495#12398#21517#21069#12434#12467#12500#12540#12377#12427
10534- OnExecute = SelectItemNameCopyActionExecute
10535- OnUpdate = SelectItemNameCopyActionUpdate
10536- end
10537- object SelectItemNameURLCopyAction: TAction
10538- Category = #26495
10539- Caption = #21517#21069#12392'URL'#12434#12467#12500#12540'(&N)'
10540- Hint = #36984#25246#12373#12428#12390#12356#12427#12473#12524#12483#12489#12398#21517#21069#12392'URL'#12434#12467#12500#12540#12377#12427
10541- OnExecute = SelectItemNameURLCopyActionExecute
10542- OnUpdate = SelectItemNameCopyActionUpdate
10543- end
10544- object SelectListReloadAction: TAction
10545- Category = #26495
10546- Caption = #36984#25246#12473#12524#12483#12489#19968#35239#12480#12454#12531#12525#12540#12489'(&D)'
10547- Hint = #36984#25246#12373#12428#12390#12356#12427#12473#12524#12483#12489#19968#35239#12434#12480#12454#12531#12525#12540#12489#12377#12427
10548- ImageIndex = 13
10549- OnExecute = SelectListReloadActionExecute
10550- OnUpdate = SelectListReloadActionUpdate
10551- end
10552- object SelectThreadReloadAction: TAction
10553- Category = #26495
10554- Caption = #36984#25246#12473#12524#12483#12489#12480#12454#12531#12525#12540#12489'(&E)'
10555- Hint = #36984#25246#12373#12428#12390#12356#12427#12473#12524#12483#12489#12434#12480#12454#12531#12525#12540#12489#12377#12427
10556- ImageIndex = 14
10557- OnExecute = SelectThreadReloadActionExecute
10558- OnUpdate = SelectThreadReloadActionUpdate
10559- end
10560- object BrowserTabCloseAction: TAction
10561- Category = #12473#12524#12483#12489
10562- Caption = #12450#12463#12486#12451#12502#12479#12502#12434#38281#12376#12427'(&X)'
10563- Hint = #29694#22312#38283#12356#12390#12356#12427#12479#12502#12434#38281#12376#12427
10564- ImageIndex = 41
10565- OnExecute = BrowserTabCloseActionExecute
10566- OnUpdate = AllTabCloseActionUpdate
10567- end
10568- object NotSelectTabCloseAction: TAction
10569- Category = #12473#12524#12483#12489
10570- Caption = #12450#12463#12486#12451#12502#12479#12502#20197#22806#12434#38281#12376#12427'(&V)'
10571- Hint = #29694#22312#38283#12356#12390#12356#12427#12479#12502#20197#22806#12434#20840#12390#38281#12376#12427
10572- ImageIndex = 39
10573- OnExecute = NotSelectTabCloseActionExecute
10574- OnUpdate = RightTabCloseActionUpdate
10575- end
10576- object AllTabCloseAction: TAction
10577- Category = #12473#12524#12483#12489
10578- Caption = #12377#12409#12390#12398#12479#12502#12434#38281#12376#12427'(&Z)'
10579- Hint = #12377#12409#12390#12398#12479#12502#12434#38281#12376#12427
10580- ImageIndex = 40
10581- OnExecute = AllTabCloseActionExecute
10582- OnUpdate = AllTabCloseActionUpdate
10583- end
10584- object KokomadeAction: TAction
10585- Tag = -1
10586- Category = #12502#12521#12454#12470#12509#12483#12503#12450#12483#12503
10587- Caption = #12467#12467#12414#12391#35501#12435#12384'(&K)'
10588- OnExecute = KokomadeActionExecute
10589- end
10590- object ZenbuAction: TAction
10591- Tag = -1
10592- Category = #12502#12521#12454#12470#12509#12483#12503#12450#12483#12503
10593- Caption = #20840#37096#35501#12435#12384'(&A)'
10594- OnExecute = ZenbuActionExecute
10595- end
10596- object KokoResAction: TAction
10597- Tag = -1
10598- Category = #12502#12521#12454#12470#12509#12483#12503#12450#12483#12503
10599- Caption = #12467#12467#12395#12524#12473'(&R)'
10600- OnExecute = KokoResActionExecute
10601- end
10602- object TreeSelectBoradReload: TAction
10603- Tag = -1
10604- Category = #12484#12522#12540#12509#12483#12503#12450#12483#12503
10605- Caption = #12473#12524#12483#12489#19968#35239#12480#12454#12531#12525#12540#12489'(&D)'
10606- Hint = #12473#12524#12483#12489#19968#35239#12434#12480#12454#12531#12525#12540#12489#12377#12427
10607- OnExecute = TreeSelectBoradReloadExecute
10608- end
10609- object TreeSelectThreadReload: TAction
10610- Tag = -1
10611- Category = #12484#12522#12540#12509#12483#12503#12450#12483#12503
10612- Caption = #36984#25246#12473#12524#12483#12489#12480#12454#12531#12525#12540#12489'(&E)'
10613- Hint = #36984#25246#12373#12428#12383#12473#12524#12483#12489#12434#12480#12454#12531#12525#12540#12489#12377#12427
10614- OnExecute = TreeSelectThreadReloadExecute
10615- end
10616- object TreeSelectURLCopy: TAction
10617- Tag = -1
10618- Category = #12484#12522#12540#12509#12483#12503#12450#12483#12503
10619- Caption = 'URL'#12434#12467#12500#12540'(&C)'
10620- Hint = #36984#25246#12373#12428#12383#26495#12398'URL'#12434#12467#12500#12540#12377#12427
10621- OnExecute = TreeSelectURLCopyExecute
10622- end
10623- object SelectReservAction: TAction
10624- Category = #26495
10625- Caption = #12473#12524#12483#12489#24033#22238#20104#32004'(&R)'
10626- Hint = #12473#12524#12483#12489#24033#22238#20104#32004
10627- ImageIndex = 15
10628- OnExecute = SelectReservActionExecute
10629- OnUpdate = SelectReservActionUpdate
10630- end
10631- object SelectNewRoundName: TAction
10632- Category = #26495
10633- Caption = #26032#12375#12356#21517#21069#12391#24033#22238#20104#32004
10634- Hint = #36984#25246#12373#12428#12390#12356#12427#12473#12524#12483#12489#12395#26032#12375#12356#21517#21069#12391#24033#22238#12434#25351#23450#12377#12427
10635- OnExecute = SelectNewRoundNameExecute
10636- end
10637- object SelectDeleteRound: TAction
10638- Category = #26495
10639- Caption = #24033#22238#20104#32004#21066#38500
10640- Hint = #36984#25246#12373#12428#12390#12356#12427#12473#12524#12483#12489#12398#24033#22238#12434#21066#38500#12377#12427
10641- OnExecute = SelectDeleteRoundExecute
10642- end
10643- object KeySettingAction: TAction
10644- Category = #12484#12540#12523
10645- Caption = #12461#12540#35373#23450'(&K)...'
10646- Hint = #12461#12540#35373#23450#12480#12452#12450#12525#12464#12434#38283#12367
10647- OnExecute = KeySettingActionExecute
10648- end
10649- object ArrangeAction: TAction
10650- Category = #34920#31034
10651- AutoCheck = True
10652- Caption = #32294#27178#37197#32622#12434#22793#26356#12377#12427'(&H)'
10653- Hint = #12522#12473#12488#12392#12502#12521#12454#12470#12398#32294#27178#37197#32622#12434#22793#26356#12377#12427
10654- ImageIndex = 4
10655- OnExecute = ArrangeActionExecute
10656- end
10657- object ActiveLogDeleteAction: TAction
10658- Category = #12473#12524#12483#12489
10659- Caption = #12450#12463#12486#12451#12502#12479#12502#12398#12525#12464#12434#21066#38500'(&D)'
10660- Hint = #29694#22312#38283#12356#12390#12356#12427#12479#12502#12398#12473#12524#12483#12489#12434#21066#38500#12377#12427
10661- ImageIndex = 29
10662- OnExecute = ActiveLogDeleteActionExecute
10663- OnUpdate = DependActiveCntentActionUpdate
10664- end
10665- object TreeSelectNameURLCopy: TAction
10666- Tag = -1
10667- Category = #12484#12522#12540#12509#12483#12503#12450#12483#12503
10668- Caption = #21517#21069#12392'URL'#12434#12467#12500#12540'(&N)'
10669- Hint = #36984#25246#12373#12428#12383#26495#12398#21517#21069#12392'URL'#12434#12467#12500#12540#12377#12427
10670- OnExecute = TreeSelectNameURLCopyExecute
10671- end
10672- object PaneInitAction: TAction
10673- Category = #34920#31034
10674- Caption = #12506#12452#12531#12398#12469#12452#12474#12434#21021#26399#21270#12377#12427'(&I)'
10675- Hint = #12506#12452#12531#12398#12469#12452#12474#12434#21021#26399#21270#12377#12427
10676- OnExecute = PaneInitActionExecute
10677- end
10678- object LeftmostTabSelectAction: TAction
10679- Category = #12473#12524#12483#12489
10680- Caption = #19968#30058#24038#12398#12479#12502#36984#25246'(&F)'
10681- Hint = #19968#30058#24038#12398#12479#12502#12434#36984#25246#12377#12427
10682- ImageIndex = 50
10683- OnExecute = LeftmostTabSelectActionExecute
10684- OnUpdate = LeftTabSelectActionUpdate
10685- end
10686- object LeftTabSelectAction: TAction
10687- Category = #12473#12524#12483#12489
10688- Caption = #24038#12398#12479#12502#36984#25246'(&G)'
10689- Hint = #24038#12398#12479#12502#12434#36984#25246#12377#12427
10690- ImageIndex = 48
10691- OnExecute = LeftTabSelectActionExecute
10692- OnUpdate = LeftTabSelectActionUpdate
10693- end
10694- object RightTabSelectAction: TAction
10695- Category = #12473#12524#12483#12489
10696- Caption = #21491#12398#12479#12502#36984#25246'(&H)'
10697- Hint = #21491#12398#12479#12502#12434#36984#25246#12377#12427
10698- ImageIndex = 47
10699- OnExecute = RightTabSelectActionExecute
10700- OnUpdate = RightTabSelectActionUpdate
10701- end
10702- object RightmostTabSelectAction: TAction
10703- Category = #12473#12524#12483#12489
10704- Caption = #19968#30058#21491#12398#12479#12502#36984#25246'(&J)'
10705- Hint = #19968#30058#21491#12398#12479#12502#12434#36984#25246#12377#12427
10706- ImageIndex = 49
10707- OnExecute = RightmostTabSelectActionExecute
10708- OnUpdate = RightTabSelectActionUpdate
10709- end
10710- object FavoriteAddAction: TAction
10711- Category = #12362#27671#12395#20837#12426
10712- Caption = #12362#27671#12395#20837#12426#12398#36861#21152'(&A)...'
10713- Hint = #12362#27671#12395#20837#12426#36861#21152#12480#12452#12450#12525#12464#12434#38283#12367
10714- OnExecute = FavoriteAddActionExecute
10715- OnUpdate = DependActiveCntentActionUpdate
10716- end
10717- object BoardFavoriteAddAction: TAction
10718- Category = #26495
10719- Caption = #12362#27671#12395#20837#12426#12395#36861#21152'(&F)...'
10720- Hint = #36984#25246#12373#12428#12390#12356#12427#26495#12434#12362#27671#12395#20837#12426#12395#36861#21152#12377#12427
10721- OnExecute = BoardFavoriteAddActionExecute
10722- OnUpdate = BoardFavoriteAddActionUpdate
10723- end
10724- object ThreadFavoriteAddAction: TAction
10725- Category = #12473#12524#12483#12489
10726- Caption = #12362#27671#12395#20837#12426#12395#36861#21152'(&F)...'
10727- Hint = #36984#25246#12373#12428#12390#12356#12427#12473#12524#12483#12489#12434#12362#27671#12395#20837#12426#12395#36861#21152#12377#12427
10728- OnExecute = ThreadFavoriteAddActionExecute
10729- OnUpdate = SelectThreadReloadActionUpdate
10730- end
10731- object TreeSelectFavoriteAddAction: TAction
10732- Tag = -1
10733- Category = #12484#12522#12540#12509#12483#12503#12450#12483#12503
10734- Caption = #12362#27671#12395#20837#12426#12395#36861#21152'(&F)...'
10735- Hint = #12362#27671#12395#20837#12426#12395#36861#21152#12377#12427
10736- OnExecute = TreeSelectFavoriteAddActionExecute
10737- end
10738- object FavoriteArrangeAction: TAction
10739- Category = #12362#27671#12395#20837#12426
10740- Caption = #12362#27671#12395#20837#12426#12398#25972#29702'(&O)...'
10741- Hint = #12362#27671#12395#20837#12426#25972#29702#12480#12452#12450#12525#12464#12434#38283#12367
10742- OnExecute = FavoriteArrangeActionExecute
10743- end
10744- object MoveToAction: TAction
10745- Category = #12450#12489#12524#12473#12496#12540
10746- Caption = #31227#21205
10747- Hint = #12450#12489#12524#12473#12496#12540#12395#34920#31034#12375#12390#12356#12427#12450#12489#12524#12473#12408#31227#21205#12377#12427
10748- ImageIndex = 33
10749- OnExecute = MoveToActionExecute
10750- end
10751- object BrowserTabVisibleAction: TAction
10752- Category = #34920#31034
10753- AutoCheck = True
10754- Caption = #34920#31034'(&V)'
10755- Hint = #12502#12521#12454#12470#12479#12502#12398#12398#34920#31034#29366#24907#12434#22793#26356#12377#12427
10756- OnExecute = BrowserTabVisibleActionExecute
10757- end
10758- object BrowserTabTopAction: TAction
10759- Category = #34920#31034
10760- AutoCheck = True
10761- Caption = #19978#12395#34920#31034'(&T)'
10762- Hint = #12502#12521#12454#12470#12479#12502#12434#19978#12395#34920#31034#12377#12427
10763- OnExecute = BrowserTabTopActionExecute
10764- end
10765- object BrowserTabBottomAction: TAction
10766- Category = #34920#31034
10767- AutoCheck = True
10768- Caption = #19979#12395#34920#31034'(&B)'
10769- Hint = #12502#12521#12454#12470#12479#12502#12434#19979#12395#34920#31034#12377#12427
10770- OnExecute = BrowserTabBottomActionExecute
10771- end
10772- object BrowserTabTabStyleAction: TAction
10773- Category = #34920#31034
10774- AutoCheck = True
10775- Caption = #12479#12502' '#12473#12479#12452#12523'(&A)'
10776- Hint = #12502#12521#12454#12470#12479#12502#12398#12473#12479#12452#12523#12434#12479#12502#12473#12479#12452#12523#12395#12377#12427
10777- OnExecute = BrowserTabTabStyleActionExecute
10778- end
10779- object BrowserTabButtonStyleAction: TAction
10780- Category = #34920#31034
10781- AutoCheck = True
10782- Caption = #12508#12479#12531' '#12473#12479#12452#12523'(&U)'
10783- Hint = #12502#12521#12454#12470#12479#12502#12398#12473#12479#12452#12523#12434#12508#12479#12531#12473#12479#12452#12523#12395#12377#12427
10784- OnExecute = BrowserTabButtonStyleActionExecute
10785- end
10786- object BrowserTabFlatStyleAction: TAction
10787- Category = #34920#31034
10788- AutoCheck = True
10789- Caption = #12501#12521#12483#12488#12508#12479#12531' '#12473#12479#12452#12523'(&F)'
10790- Hint = #12502#12521#12454#12470#12479#12502#12398#12473#12479#12452#12523#12434#12501#12521#12483#12488#12508#12479#12531#12473#12479#12452#12523#12395#12377#12427
10791- OnExecute = BrowserTabFlatStyleActionExecute
10792- end
10793- object GikoHelpAction: TAction
10794- Category = #12504#12523#12503
10795- Caption = #12462#12467#12490#12499' '#12504#12523#12503'(&H)'
10796- Hint = #12462#12467#12490#12499#12398#12504#12523#12503#12434#34920#31034#12377#12427
10797- OnExecute = GikoHelpActionExecute
10798- end
10799- object KotehanAction: TAction
10800- Category = #12484#12540#12523
10801- Caption = #12467#12486#12495#12531#35373#23450'(&H)...'
10802- Hint = #12467#12486#12495#12531#35373#23450#12480#12452#12450#12525#12464#12434#38283#12367
10803- OnExecute = KotehanActionExecute
10804- end
10805- object ToolBarSettingAction: TAction
10806- Category = #12484#12540#12523
10807- Caption = #12484#12540#12523#12496#12540#35373#23450'(&T)...'
10808- Hint = #12484#12540#12523#12496#12540#35373#23450#12480#12452#12450#12525#12464#12434#38283#12367
10809- OnExecute = ToolBarSettingActionExecute
10810- end
10811- object SelectResAction: TAction
10812- Category = #12473#12524#12483#12489
10813- AutoCheck = True
10814- Caption = #12524#12473#32094#36796#12415#34920#31034'(&S)...'
10815- GroupIndex = 2
10816- Hint = #12524#12473#12398#20869#23481#12434#32094#36796#12416
10817- ImageIndex = 12
10818- OnExecute = SelectResActionExecute
10819- OnUpdate = DependActiveCntentLogActionUpdate
10820- end
10821- object AllResAction: TAction
10822- Category = #12473#12524#12483#12489
10823- AutoCheck = True
10824- Caption = #12377#12409#12390#12398#12524#12473#12434#34920#31034'(&A)'
10825- GroupIndex = 2
10826- Hint = #12377#12409#12390#12398#12524#12473#12434#34920#31034#12377#12427
10827- ImageIndex = 9
10828- OnExecute = AllResActionExecute
10829- end
10830- object EditNGAction: TAction
10831- Category = 'NGword'
10832- Caption = 'NG'#12527#12540#12489#12501#12449#12452#12523#32232#38598
10833- Hint = 'NG'#12527#12540#12489#12501#12449#12452#12523#32232#38598
10834- ImageIndex = 43
10835- OnExecute = EditNGActionExecute
10836- end
10837- object ReloadAction: TAction
10838- Category = 'NGword'
10839- Caption = 'NG'#12527#12540#12489#35501#12415#36796#12415#65288#20877#35501#12415#36796#12415#65289
10840- Hint = 'NG'#12527#12540#12489#35501#12415#36796#12415#65288#20877#35501#12415#36796#12415#65289
10841- OnExecute = ReloadClick
10842- end
10843- object GoFowardAction: TAction
10844- Category = 'NGword'
10845- Caption = 'NG'#12527#12540#12489#35501#12415#36796#12415#65288#19968#12388#24460#12429#65289
10846- Hint = 'NG'#12527#12540#12489#35501#12415#36796#12415#65288#19968#12388#24460#12429#65289
10847- OnExecute = GoFowardClick
10848- end
10849- object GoBackAction: TAction
10850- Category = 'NGword'
10851- Caption = 'NG'#12527#12540#12489#35501#12415#36796#12415#65288#19968#12388#21069#65289
10852- Hint = 'NG'#12527#12540#12489#35501#12415#36796#12415#65288#19968#12388#21069#65289
10853- OnExecute = GoBackClick
10854- end
10855- object CancellIndividualAbon: TAction
10856- Category = 'NGword'
10857- Caption = #20491#21029#12354#12412#12540#12435#35299#38500
10858- Hint = #20491#21029#12354#12412#12540#12435#35299#38500
10859- end
10860- object TreeSelectSearchBoardName: TAction
10861- Tag = -1
10862- Category = #12484#12522#12540#12509#12483#12503#12450#12483#12503
10863- Caption = #26495#21517#26908#32034
10864- Hint = #26495#21517#26908#32034
10865- OnExecute = TreeSelectSearchBoardNameExecute
10866- end
10867- object FavoriteTreeViewRenameAction: TAction
10868- Tag = -1
10869- Category = #12362#27671#12395#20837#12426#12484#12522#12540#12509#12483#12503#12450#12483#12503
10870- Caption = #21517#21069#12398#22793#26356'(&M)'
10871- Hint = #12362#27671#12395#20837#12426#12398#21517#21069#12434#32232#38598#12377#12427
10872- ImageIndex = 26
10873- OnExecute = FavoriteTreeViewRenameActionExecute
10874- end
10875- object FavoriteTreeViewNewFolderAction: TAction
10876- Tag = -1
10877- Category = #12362#27671#12395#20837#12426#12484#12522#12540#12509#12483#12503#12450#12483#12503
10878- Caption = #26032#12375#12356#12501#12457#12523#12480#12398#20316#25104'(&W)'
10879- Hint = #26032#12375#12367#12362#27671#12395#20837#12426#12395#12501#12457#12523#12480#12434#20316#25104#12377#12427
10880- ImageIndex = 31
10881- OnExecute = FavoriteTreeViewNewFolderActionExecute
10882- end
10883- object FavoriteTreeViewDeleteAction: TAction
10884- Tag = -1
10885- Category = #12362#27671#12395#20837#12426#12484#12522#12540#12509#12483#12503#12450#12483#12503
10886- Caption = #21066#38500'(&D)'
10887- Hint = #12371#12398#12362#27671#12395#20837#12426#12434#21066#38500#12377#12427
10888- ImageIndex = 29
10889- OnExecute = FavoriteTreeViewDeleteActionExecute
10890- end
10891- object FavoriteTreeViewBrowseFolderAction: TAction
10892- Tag = -1
10893- Category = #12362#27671#12395#20837#12426#12484#12522#12540#12509#12483#12503#12450#12483#12503
10894- Caption = #12371#12428#12425#12434#12377#12409#12390#38283#12367'(&A)'
10895- Hint = #12371#12398#12501#12457#12523#12480#12395#20837#12387#12390#12356#12427#12362#27671#12395#20837#12426#12434#20840#12390#38283#12367
10896- OnExecute = FavoriteTreeViewBrowseFolderActionExecute
10897- end
10898- object FavoriteTreeViewReloadAction: TAction
10899- Tag = -1
10900- Category = #12362#27671#12395#20837#12426#12484#12522#12540#12509#12483#12503#12450#12483#12503
10901- Caption = #12480#12454#12531#12525#12540#12489'(&R)'
10902- Hint = #36984#25246#12373#12428#12390#12356#12427#12362#27671#12395#20837#12426#12434#12480#12454#12531#12525#12540#12489#12377#12427
10903- ImageIndex = 14
10904- OnExecute = FavoriteTreeViewReloadActionExecute
10905- end
10906- object FavoriteTreeViewURLCopyAction: TAction
10907- Tag = -1
10908- Category = #12362#27671#12395#20837#12426#12484#12522#12540#12509#12483#12503#12450#12483#12503
10909- Caption = 'URL'#12434#12467#12500#12540'(&C)'
10910- Hint = #36984#25246#12373#12428#12390#12356#12427#12473#12524#12483#12489#12398'URL'#12434#12467#12500#12540#12377#12427
10911- OnExecute = FavoriteTreeViewURLCopyActionExecute
10912- end
10913- object FavoriteTreeViewNameCopyAction: TAction
10914- Tag = -1
10915- Category = #12362#27671#12395#20837#12426#12484#12522#12540#12509#12483#12503#12450#12483#12503
10916- Caption = #21517#21069#12434#12467#12500#12540'(&C)'
10917- Hint = #36984#25246#12373#12428#12390#12356#12427#26495#12398#21517#21069#12434#12467#12500#12540#12377#12427
10918- OnExecute = FavoriteTreeViewNameCopyActionExecute
10919- end
10920- object FavoriteTreeViewNameURLCopyAction: TAction
10921- Tag = -1
10922- Category = #12362#27671#12395#20837#12426#12484#12522#12540#12509#12483#12503#12450#12483#12503
10923- Caption = #21517#21069#12392'URL'#12434#12467#12500#12540'(&N)'
10924- Hint = #36984#25246#12373#12428#12390#12356#12427#12473#12524#12483#12489#12398#21517#21069#12392'URL'#12434#12467#12500#12540#12377#12427
10925- OnExecute = FavoriteTreeViewNameURLCopyActionExecute
10926- end
10927- object FavoriteTreeViewLogDeleteAction: TAction
10928- Tag = -1
10929- Category = #12362#27671#12395#20837#12426#12484#12522#12540#12509#12483#12503#12450#12483#12503
10930- Caption = #12525#12464#21066#38500'(&D)'
10931- Hint = #36984#25246#12373#12428#12390#12356#12427#12473#12524#12483#12489#12434#21066#38500#12377#12427
10932- OnExecute = FavoriteTreeViewLogDeleteActionExecute
10933- end
10934- object ResRangeAction: TAction
10935- Category = #12473#12524#12483#12489
10936- AutoCheck = True
10937- Caption = #34920#31034#31684#22258
10938- GroupIndex = 2
10939- Hint = #12524#12473#12398#34920#31034#31684#22258#12434#35373#23450
10940- ImageIndex = 38
10941- OnExecute = ResRangeActionExecute
10942- end
10943- object ExportFavoriteFile: TFileSaveAs
10944- Category = #12501#12449#12452#12523
10945- Caption = #12362#27671#12395#20837#12426#12398#12456#12463#12473#12509#12540#12488
10946- Dialog.Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
10947- Hint = #12362#27671#12395#20837#12426#12398#12456#12463#12473#12509#12540#12488
10948- BeforeExecute = ExportFavoriteFileBeforeExecute
10949- OnAccept = ExportFavoriteFileAccept
10950- end
10951- object FavoriteTreeViewBrowseBoardAction: TAction
10952- Tag = -1
10953- Category = #12362#27671#12395#20837#12426#12484#12522#12540#12509#12483#12503#12450#12483#12503
10954- Caption = #26495#12434#12502#12521#12454#12470#12391#34920#31034'(&B)'
10955- Hint = #29694#22312#34920#31034#12375#12390#12356#12427#12473#12524#12483#12489#12398#26495#12434#12502#12521#12454#12470#12391#34920#31034#12377#12427
10956- ImageIndex = 27
10957- end
10958- object FavoriteTreeViewBrowseThreadAction: TAction
10959- Tag = -1
10960- Category = #12362#27671#12395#20837#12426#12484#12522#12540#12509#12483#12503#12450#12483#12503
10961- Caption = #12473#12524#12483#12489#12434#12502#12521#12454#12470#12391#34920#31034'(&S)'
10962- Hint = #29694#22312#34920#31034#12375#12390#12356#12427#12473#12524#12483#12489#12434#12502#12521#12454#12470#12391#34920#31034#12377#12427
10963- ImageIndex = 27
10964- OnExecute = FavoriteTreeViewBrowseThreadActionExecute
10965- end
10966- object UpBoardAction: TAction
10967- Category = #12473#12524#12483#12489
10968- Caption = #26495#12434#34920#31034
10969- Hint = #12371#12398#12473#12524#12483#12489#12434#21547#12416#12473#12524#12483#12489#19968#35239#12434#34920#31034
10970- ImageIndex = 8
10971- OnExecute = UpBoardActionExecute
10972- OnUpdate = DependActiveCntentActionUpdate
10973- end
10974- object KoreCopy: TAction
10975- Tag = -1
10976- Category = #12502#12521#12454#12470#12509#12483#12503#12450#12483#12503
10977- Caption = #12371#12398#12524#12473#12467#12500#12540
10978- Hint = #36984#25246#12375#12383#12524#12473#12434#12467#12500#12540#12377#12427
10979- OnExecute = KoreCopyExecute
10980- end
10981- object TreeSelectNameCopy: TAction
10982- Tag = -1
10983- Category = #12484#12522#12540#12509#12483#12503#12450#12483#12503
10984- Caption = #21517#21069#12434#12467#12500#12540'(&Y)'
10985- Hint = #36984#25246#12373#12428#12383#26495#12398#21517#21069#12434#12467#12500#12540#12377#12427
10986- OnExecute = TreeSelectNameCopyExecute
10987- end
10988- object SetFocusForBrowserAction: TAction
10989- Category = #34920#31034
10990- Caption = #12502#12521#12454#12470#12395#12501#12457#12540#12459#12473#12434#24403#12390#12427
10991- Hint = #12502#12521#12454#12470#12395#12501#12457#12540#12459#12473#12434#24403#12390#12427
10992- OnExecute = SetFocusForBrowserActionExecute
10993- OnUpdate = SetFocusForBrowserActionUpdate
10994- end
10995- object SetFocusForThreadListAction: TAction
10996- Category = #34920#31034
10997- Caption = #12473#12524#12483#12489#19968#35239#12395#12501#12457#12540#12459#12473#12434#24403#12390#12427
10998- Hint = #12473#12524#12483#12489#19968#35239#12395#12501#12457#12540#12459#12473#12434#24403#12390#12427
10999- OnExecute = SetFocusForThreadListActionExecute
11000- end
11001- object SetFocusForCabinetAction: TAction
11002- Category = #34920#31034
11003- Caption = #12461#12515#12499#12493#12483#12488#12395#12501#12457#12540#12459#12473#12434#24403#12390#12427
11004- Hint = #12461#12515#12499#12493#12483#12488#12395#12501#12457#12540#12459#12473#12434#24403#12390#12427
11005- OnExecute = SetFocusForCabinetActionExecute
11006- OnUpdate = SetFocusForCabinetActionUpdate
11007- end
11008- object FileRun1: TFileRun
11009- Tag = -1
11010- Category = #12501#12449#12452#12523
11011- Browse = False
11012- BrowseDlg.Title = #23455#34892
11013- Caption = #23455#34892'(&R)...'
11014- FileName = 'notepad'
11015- Hint = #23455#34892'|'#12450#12503#12522#12465#12540#12471#12519#12531#12398#23455#34892
11016- Operation = 'open'
11017- ShowCmd = scShowNormal
11018- end
11019- object ThreadlistMaxAndFocusAction: TAction
11020- Category = #34920#31034
11021- Caption = #12473#12524#12483#12489#19968#35239#12434#26368#22823#21270#12375#12390#12501#12457#12540#12459#12473#12434#24403#12390#12427
11022- Hint = #12473#12524#12483#12489#19968#35239#12434#26368#22823#21270#12375#12390#12501#12457#12540#12459#12473#12434#24403#12390#12427
11023- OnExecute = ThreadlistMaxAndFocusActionExecute
11024- end
11025- object BrowserMaxAndFocusAction: TAction
11026- Category = #34920#31034
11027- Caption = #12473#12524#34920#31034#12434#26368#22823#21270#12375#12390#12501#12457#12540#12459#12473#12434#24403#12390#12427
11028- Hint = #12473#12524#34920#31034#12434#26368#22823#21270#12375#12390#12501#12457#12540#12459#12473#12434#24403#12390#12427
11029- OnExecute = BrowserMaxAndFocusActionExecute
11030- OnUpdate = SetFocusForBrowserActionUpdate
11031- end
11032- object SelectItemSaveForHTML: TAction
11033- Category = #12501#12449#12452#12523
11034- Caption = 'SelectItemSaveForHTML'
11035- Hint = #36984#25246#12473#12524#12483#12489#12434'HTML'#21270#12375#12390#20445#23384
11036- ImageIndex = 44
11037- OnExecute = SelectItemSaveForHTMLExecute
11038- end
11039- object SelectItemSaveForDat: TAction
11040- Category = #12501#12449#12452#12523
11041- Caption = 'SelectItemSaveForHTML'
11042- Hint = #36984#25246#12473#12524#12483#12489#12434'DAT'#24418#24335#12398#12414#12414#20445#23384
11043- ImageIndex = 44
11044- OnExecute = SelectItemSaveForDatExecute
11045- end
11046- object FileSaveAs1: TFileSaveAs
11047- Tag = -1
11048- Category = #12501#12449#12452#12523
11049- Caption = #21517#21069#12434#20184#12369#12390#20445#23384'(&A)...'
11050- Hint = #21029#21517#12391#20445#23384'|'#29694#22312#12398#12501#12449#12452#12523#12395#26032#12375#12356#21517#21069#12434#12388#12369#12390#20445#23384
11051- ImageIndex = 44
11052- end
11053- object LogFolderOpenAction: TAction
11054- Category = #26495
11055- Caption = 'Explorer'#12391'Log'#12501#12457#12523#12480#12434#38283#12367
11056- Hint = 'Explorer'#12391'Log'#12501#12457#12523#12480#12434#38283#12367
11057- OnExecute = LogFolderOpenActionExecute
11058- OnUpdate = SelectListReloadActionUpdate
11059- end
11060- object TabsSaveAction: TAction
11061- Category = #12501#12449#12452#12523
11062- Caption = #12479#12502#12398#38918#30058#12434#20445#23384
11063- Hint = #12479#12502#12398#38918#30058#12434#20445#23384
11064- OnExecute = TabsSaveActionExecute
11065- end
11066- object TabsOpenAction: TAction
11067- Category = #12501#12449#12452#12523
11068- Caption = #12479#12502#12398#38918#30058#12434#24489#20803
11069- Hint = #12479#12502#12398#38918#30058#12434#24489#20803
11070- OnExecute = TabsOpenActionExecute
11071- end
11072- object BrowsBoradHeadAction: TAction
11073- Tag = -1
11074- Category = #26495
11075- Caption = 'Head.txt'#12434#12502#12521#12454#12470#12391#34920#31034#12377#12427
11076- Hint = 'Head.txt'#12434#12502#12521#12454#12470#12391#34920#31034#12377#12427
11077- ImageIndex = 42
11078- Visible = False
11079- OnExecute = BrowsBoradHeadActionExecute
11080- OnUpdate = SelectListReloadActionUpdate
11081- end
11082- object TabAutoSaveAction: TAction
11083- Category = #12501#12449#12452#12523
11084- Caption = #12479#12502#12398#38918#30058#12434#33258#21205#20445#23384
11085- Hint = #12479#12502#12398#38918#30058#12434#33258#21205#20445#23384
11086- OnExecute = TabAutoSaveActionExecute
11087- end
11088- object TabAutoLoadAction: TAction
11089- Category = #12501#12449#12452#12523
11090- Caption = #12479#12502#12398#38918#30058#12434#33258#21205#24489#20803
11091- Hint = #12479#12502#12398#38918#30058#12434#33258#21205#24489#20803
11092- OnExecute = TabAutoLoadActionExecute
11093- end
11094- object JumpToNumOfResAction: TAction
11095- Category = #12473#12524#12483#12489
11096- Caption = #25351#23450#12375#12383#30058#21495#12398#12524#12473#12395#39131#12406
11097- Hint = #25351#23450#12375#12383#30058#21495#12398#12524#12473#12395#39131#12406
11098- ShortCut = 16455
11099- OnExecute = JumpToNumOfResActionExecute
11100- OnUpdate = DependActiveCntentLogActionUpdate
11101- end
11102- object FavoriteTreeViewCollapseAction: TAction
11103- Category = #12362#27671#12395#20837#12426
11104- Caption = #12362#27671#12395#20837#12426#12484#12522#12540#12434#12377#12409#12390#38281#12376#12427
11105- Hint = #12362#27671#12395#20837#12426#12484#12522#12540#12434#12377#12409#12390#38281#12376#12427
11106- OnExecute = FavoriteTreeViewCollapseActionExecute
11107- end
11108- object RightTabCloseAction: TAction
11109- Category = #12473#12524#12483#12489
11110- Caption = #12450#12463#12486#12451#12502#12394#12479#12502#12424#12426#21491#12434#38281#12376#12427
11111- Hint = #12450#12463#12486#12451#12502#12394#12479#12502#12424#12426#21491#12434#38281#12376#12427
11112- OnExecute = RightTabCloseActionExecute
11113- OnUpdate = RightTabCloseActionUpdate
11114- end
11115- object LeftTabCloseAction: TAction
11116- Category = #12473#12524#12483#12489
11117- Caption = #12450#12463#12486#12451#12502#12394#12479#12502#12424#12426#24038#12434#38281#12376#12427
11118- Hint = #12450#12463#12486#12451#12502#12394#12479#12502#12424#12426#24038#12434#38281#12376#12427
11119- OnExecute = LeftTabCloseActionExecute
11120- OnUpdate = RightTabCloseActionUpdate
11121- end
11122- object SameIDResAnchorAction: TAction
11123- Tag = -1
11124- Category = #12502#12521#12454#12470#12509#12483#12503#12450#12483#12503
11125- Caption = #21516'ID'#12408#12398#12524#12473#12450#12531#12459#12540#34920#31034
11126- Hint = #21516'ID'#12408#12398#12524#12473#12450#12531#12459#12540#34920#31034
11127- OnExecute = SameIDResAnchorActionExecute
11128- end
11129- object IndividualAbon1Action: TAction
11130- Tag = -1
11131- Category = #12502#12521#12454#12470#12509#12483#12503#12450#12483#12503
11132- Caption = #12354#12412#65374#12435
11133- Hint = #12354#12412#65374#12435
11134- OnExecute = IndividualAbon1ActionExecute
11135- end
11136- object IndividualAbon0Action: TAction
11137- Tag = -1
11138- Category = #12502#12521#12454#12470#12509#12483#12503#12450#12483#12503
11139- Caption = #36879#26126#12354#12412#65374#12435
11140- Hint = #36879#26126#12354#12412#65374#12435
11141- OnExecute = IndividualAbon0ActionExecute
11142- end
11143- object AntiIndividualAbonAction: TAction
11144- Tag = -1
11145- Category = #12502#12521#12454#12470#12509#12483#12503#12450#12483#12503
11146- Caption = #12371#12398#12524#12473
11147- Hint = #12371#12398#12524#12473
11148- OnExecute = AntiIndividualAbonActionExecute
11149- end
11150- object AntiIndividualAbonDlgAction: TAction
11151- Tag = -1
11152- Category = #12502#12521#12454#12470#12509#12483#12503#12450#12483#12503
11153- Caption = #12524#12473#30058#21495#25351#23450
11154- Hint = #12524#12473#30058#21495#25351#23450
11155- OnExecute = AntiIndividualAbonDlgActionExecute
11156- OnUpdate = DependActiveCntentLogActionUpdate
11157- end
11158- object IndividualAbonID1Action: TAction
11159- Tag = -1
11160- Category = #12502#12521#12454#12470#12509#12483#12503#12450#12483#12503
11161- Caption = #12354#12412#65374#12435
11162- Hint = #12354#12412#65374#12435
11163- OnExecute = IndividualAbonID1ActionExecute
11164- end
11165- object IndividualAbonID0Action: TAction
11166- Tag = -1
11167- Category = #12502#12521#12454#12470#12509#12483#12503#12450#12483#12503
11168- Caption = #36879#26126#12354#12412#65374#12435
11169- Hint = #36879#26126#12354#12412#65374#12435
11170- OnExecute = IndividualAbonID0ActionExecute
11171- end
11172- object MuteAction: TAction
11173- Category = #12484#12540#12523
11174- AutoCheck = True
11175- Caption = #12511#12517#12540#12488
11176- Hint = #12511#12517#12540#12488
11177- ImageIndex = 52
11178- OnExecute = MuteActionExecute
11179- end
11180- object SortActiveColumnAction: TAction
11181- Category = #26495
11182- Caption = #29694#22312#12398#12459#12521#12512#12434#12477#12540#12488#12377#12427
11183- Hint = #29694#22312#12398#12459#12521#12512#12434#12477#12540#12488#12377#12427
11184- OnExecute = SortActiveColumnActionExecute
11185- end
11186- object SortNextColumnAction: TAction
11187- Category = #26495
11188- Caption = #21491#38563#12398#12459#12521#12512#12434#12477#12540#12488
11189- Hint = #21491#38563#12398#12459#12521#12512#12434#12477#12540#12488
11190- OnExecute = SortNextColumnActionExecute
11191- end
11192- object SortPrevColumnAction: TAction
11193- Category = #26495
11194- Caption = #24038#38563#12398#12459#12521#12512#12434#12477#12540#12488
11195- Hint = #24038#38563#12398#12459#12521#12512#12434#12477#12540#12488
11196- OnExecute = SortPrevColumnActionExecute
11197- end
11198- object BeLogInOutAction: TAction
11199- Category = #12501#12449#12452#12523
11200- Caption = 'Be2ch'#12395#12525#12464#12452#12531'/'#12525#12464#12450#12454#12488#12377#12427
11201- Hint = 'Be2ch'#12395#12525#12464#12452#12531'/'#12525#12464#12450#12454#12488#12377#12427
11202- ImageIndex = 53
11203- OnExecute = BeLogInOutActionExecute
11204- OnUpdate = BeLogInOutActionUpdate
11205- end
11206- object UnSelectedListViewAction: TAction
11207- Category = #34920#31034
11208- Caption = #12473#12524#12483#12489#19968#35239#12398#36984#25246#12434#35299#38500#12377#12427
11209- Hint = #12473#12524#12483#12489#19968#35239#12398#36984#25246#12434#35299#38500#12377#12427
11210- OnExecute = UnSelectedListViewActionExecute
11211- end
11212- object WikiFAQWebPageAction: TAction
11213- Category = #12504#12523#12503
11214- Caption = 'WikiFAQWebPageAction'
11215- OnExecute = WikiFAQWebPageActionExecute
11216- end
11217- end
112188025 object BrowserPopupMenu: TPopupMenu
112198026 Left = 68
112208027 Top = 276
112218028 object ShowThreadMenu: TMenuItem
11222- Action = ShowThreadAction
8029+ Action = GikoDM.ShowThreadAction
112238030 end
112248031 object ShowBoardMenu: TMenuItem
11225- Action = ShowBoardAction
8032+ Action = GikoDM.ShowBoardAction
112268033 end
112278034 object URLC1: TMenuItem
11228- Action = URLCopyAction
8035+ Action = GikoDM.URLCopyAction
112298036 end
112308037 object T8: TMenuItem
11231- Action = NameCopyAction
8038+ Action = GikoDM.NameCopyAction
112328039 end
112338040 object URL1: TMenuItem
11234- Action = NameURLCopyAction
8041+ Action = GikoDM.NameURLCopyAction
112358042 end
112368043 end
112378044 object ListIconPopupMenu: TPopupMenu
112388045 Left = 68
112398046 Top = 308
112408047 object LargeIconPMenu: TMenuItem
11241- Action = LargeIconAction
8048+ Action = GikoDM.LargeIconAction
112428049 GroupIndex = 2
112438050 RadioItem = True
112448051 end
112458052 object SmallIconPMenu: TMenuItem
112468053 Tag = 1
11247- Action = SmallIconAction
8054+ Action = GikoDM.SmallIconAction
112488055 GroupIndex = 2
112498056 RadioItem = True
112508057 end
112518058 object ListPMenu: TMenuItem
112528059 Tag = 2
11253- Action = ListIconAction
8060+ Action = GikoDM.ListIconAction
112548061 GroupIndex = 2
112558062 RadioItem = True
112568063 end
112578064 object DetailPMenu: TMenuItem
112588065 Tag = 3
11259- Action = DetailIconAction
8066+ Action = GikoDM.DetailIconAction
112608067 GroupIndex = 2
112618068 RadioItem = True
112628069 end
@@ -11273,16 +8080,16 @@ object GikoForm: TGikoForm
112738080 Left = 68
112748081 Top = 244
112758082 object ItemRoundPMenu: TMenuItem
11276- Action = SelectThreadReloadAction
8083+ Action = GikoDM.SelectThreadReloadAction
112778084 end
112788085 object ItemReservPMenu: TMenuItem
11279- Action = SelectReservAction
8086+ Action = GikoDM.SelectReservAction
112808087 end
112818088 object LPMSep01: TMenuItem
112828089 Caption = '-'
112838090 end
112848091 object ListRoundPMenu: TMenuItem
11285- Action = SelectListReloadAction
8092+ Action = GikoDM.SelectListReloadAction
112868093 end
112878094 object ListReservPMenu: TMenuItem
112888095 Caption = #12473#12524#12483#12489#19968#35239#24033#22238#20104#32004'(&R)'
@@ -11292,40 +8099,40 @@ object GikoForm: TGikoForm
112928099 Caption = '-'
112938100 end
112948101 object BoardFavoriteAddMenu: TMenuItem
11295- Action = BoardFavoriteAddAction
8102+ Action = GikoDM.BoardFavoriteAddAction
112968103 end
112978104 object ThreadFavoriteAddMenu: TMenuItem
11298- Action = ThreadFavoriteAddAction
8105+ Action = GikoDM.ThreadFavoriteAddAction
112998106 end
113008107 object N32: TMenuItem
113018108 Caption = '-'
113028109 end
113038110 object KidokuPMenu: TMenuItem
11304- Action = KidokuAction
8111+ Action = GikoDM.KidokuAction
113058112 end
113068113 object MidokuPMenu: TMenuItem
11307- Action = MidokuAction
8114+ Action = GikoDM.MidokuAction
113088115 end
113098116 object N55: TMenuItem
113108117 Caption = '-'
113118118 end
113128119 object UrlCopyPMenu: TMenuItem
11313- Action = SelectItemURLCopyAction
8120+ Action = GikoDM.SelectItemURLCopyAction
113148121 end
113158122 object C2: TMenuItem
11316- Action = SelectItemNameCopyAction
8123+ Action = GikoDM.SelectItemNameCopyAction
113178124 end
113188125 object NameUrlCopyPMenu: TMenuItem
11319- Action = SelectItemNameURLCopyAction
8126+ Action = GikoDM.SelectItemNameURLCopyAction
113208127 end
113218128 object AllSelectPMenu: TMenuItem
11322- Action = AllSelectAction
8129+ Action = GikoDM.AllSelectAction
113238130 end
113248131 object LPMSep05: TMenuItem
113258132 Caption = '-'
113268133 end
113278134 object DeletePMenu: TMenuItem
11328- Action = LogDeleteAction
8135+ Action = GikoDM.LogDeleteAction
113298136 end
113308137 object LPMSep06: TMenuItem
113318138 Caption = '-'
@@ -11333,25 +8140,25 @@ object GikoForm: TGikoForm
113338140 object ViewPMenu: TMenuItem
113348141 Caption = #34920#31034'(&V)'
113358142 object LargeIconLPMenu: TMenuItem
11336- Action = LargeIconAction
8143+ Action = GikoDM.LargeIconAction
113378144 GroupIndex = 2
113388145 RadioItem = True
113398146 end
113408147 object SmallIconLPMenu: TMenuItem
113418148 Tag = 1
11342- Action = SmallIconAction
8149+ Action = GikoDM.SmallIconAction
113438150 GroupIndex = 2
113448151 RadioItem = True
113458152 end
113468153 object ListLPMenu: TMenuItem
113478154 Tag = 2
11348- Action = ListIconAction
8155+ Action = GikoDM.ListIconAction
113498156 GroupIndex = 2
113508157 RadioItem = True
113518158 end
113528159 object DetailLPMenu: TMenuItem
113538160 Tag = 3
11354- Action = DetailIconAction
8161+ Action = GikoDM.DetailIconAction
113558162 GroupIndex = 2
113568163 RadioItem = True
113578164 end
@@ -11362,22 +8169,22 @@ object GikoForm: TGikoForm
113628169 Left = 68
113638170 Top = 372
113648171 object KokomadePMenu: TMenuItem
11365- Action = KokomadeAction
8172+ Action = GikoDM.KokomadeAction
113668173 end
113678174 object AllPMenu: TMenuItem
11368- Action = ZenbuAction
8175+ Action = GikoDM.ZenbuAction
113698176 end
113708177 object MenuItem1: TMenuItem
113718178 Caption = '-'
113728179 end
113738180 object MenuItem2: TMenuItem
11374- Action = KokoResAction
8181+ Action = GikoDM.KokoResAction
113758182 end
113768183 object N64: TMenuItem
113778184 Caption = '-'
113788185 end
113798186 object N63: TMenuItem
11380- Action = KoreCopy
8187+ Action = GikoDM.KoreCopy
113818188 end
113828189 object N41: TMenuItem
113838190 Caption = '-'
@@ -11386,35 +8193,35 @@ object GikoForm: TGikoForm
113868193 Caption = #12371#12398#12524#12473
113878194 object IndividualAbon1: TMenuItem
113888195 Tag = 1
11389- Action = IndividualAbon1Action
8196+ Action = GikoDM.IndividualAbon1Action
113908197 end
113918198 object IndividualAbon2: TMenuItem
11392- Action = IndividualAbon0Action
8199+ Action = GikoDM.IndividualAbon0Action
113938200 end
113948201 end
113958202 object ID3: TMenuItem
113968203 Caption = #12371#12398#12524#12473#12398'ID'
113978204 object ID2: TMenuItem
11398- Action = IndividualAbonID1Action
8205+ Action = GikoDM.IndividualAbonID1Action
113998206 end
114008207 object N71: TMenuItem
11401- Action = IndividualAbonID0Action
8208+ Action = GikoDM.IndividualAbonID0Action
114028209 end
114038210 end
114048211 object N52: TMenuItem
114058212 Caption = #20491#21029#12354#12412#65374#12435#35299#38500
114068213 object AntiIndividualAbon: TMenuItem
11407- Action = AntiIndividualAbonAction
8214+ Action = GikoDM.AntiIndividualAbonAction
114088215 end
114098216 object N51: TMenuItem
11410- Action = AntiIndividualAbonDlgAction
8217+ Action = GikoDM.AntiIndividualAbonDlgAction
114118218 end
114128219 end
114138220 object N70: TMenuItem
114148221 Caption = '-'
114158222 end
114168223 object ID1: TMenuItem
11417- Action = SameIDResAnchorAction
8224+ Action = GikoDM.SameIDResAnchorAction
114188225 end
114198226 end
114208227 object BrowserTabPopupMenu: TPopupMenu
@@ -11423,14 +8230,13 @@ object GikoForm: TGikoForm
114238230 Left = 68
114248231 Top = 404
114258232 object A4: TMenuItem
11426- Action = ItemReloadAction
8233+ Action = GikoDM.ItemReloadAction
114278234 end
114288235 object N16: TMenuItem
114298236 Caption = '-'
114308237 end
114318238 object A9: TMenuItem
11432- Action = FavoriteAddAction
11433- Caption = #12362#27671#12395#20837#12426#12395#36861#21152'(&A)...'
8239+ Action = GikoDM.FavoriteAddAction
114348240 end
114358241 object dummy1: TMenuItem
114368242 Caption = 'dummy1'
@@ -11439,28 +8245,28 @@ object GikoForm: TGikoForm
114398245 Caption = '-'
114408246 end
114418247 object Close1: TMenuItem
11442- Action = BrowserTabCloseAction
8248+ Action = GikoDM.BrowserTabCloseAction
114438249 end
114448250 object A3: TMenuItem
11445- Action = NotSelectTabCloseAction
8251+ Action = GikoDM.NotSelectTabCloseAction
114468252 end
114478253 object N72: TMenuItem
11448- Action = LeftTabCloseAction
8254+ Action = GikoDM.LeftTabCloseAction
114498255 end
114508256 object N73: TMenuItem
11451- Action = RightTabCloseAction
8257+ Action = GikoDM.RightTabCloseAction
114528258 end
114538259 object N18: TMenuItem
114548260 Caption = '-'
114558261 end
114568262 object D3: TMenuItem
11457- Action = ActiveLogDeleteAction
8263+ Action = GikoDM.ActiveLogDeleteAction
114588264 end
114598265 object N20: TMenuItem
114608266 Caption = '-'
114618267 end
114628268 object A5: TMenuItem
11463- Action = AllTabCloseAction
8269+ Action = GikoDM.AllTabCloseAction
114648270 end
114658271 end
114668272 object TreePopupMenu: TPopupMenu
@@ -11468,51 +8274,51 @@ object GikoForm: TGikoForm
114688274 Left = 68
114698275 Top = 436
114708276 object TreeSelectThreadPupupMenu: TMenuItem
11471- Action = TreeSelectThreadReload
8277+ Action = GikoDM.TreeSelectThreadReload
114728278 end
114738279 object TreeSelectBoardPupupMenu: TMenuItem
11474- Action = TreeSelectBoradReload
8280+ Action = GikoDM.TreeSelectBoradReload
114758281 end
114768282 object TPMSep01: TMenuItem
114778283 Caption = '-'
114788284 end
114798285 object TreeSelectFavoriteAddPupupMenu: TMenuItem
11480- Action = TreeSelectFavoriteAddAction
8286+ Action = GikoDM.TreeSelectFavoriteAddAction
114818287 end
114828288 object N33: TMenuItem
114838289 Caption = '-'
114848290 end
114858291 object TreeSelectURLPupupMenu: TMenuItem
11486- Action = TreeSelectURLCopy
8292+ Action = GikoDM.TreeSelectURLCopy
114878293 end
114888294 object TreeSelectNamePupupMenu: TMenuItem
11489- Action = TreeSelectNameCopy
8295+ Action = GikoDM.TreeSelectNameCopy
114908296 end
114918297 object TreeSelectNameURLPupupMenu: TMenuItem
11492- Action = TreeSelectNameURLCopy
8298+ Action = GikoDM.TreeSelectNameURLCopy
114938299 end
114948300 object TreeSelectLogDeleteSeparator: TMenuItem
114958301 Caption = '-'
114968302 end
114978303 object TreeSelectLogDeletePopupMenu: TMenuItem
11498- Action = FavoriteTreeViewLogDeleteAction
8304+ Action = GikoDM.FavoriteTreeViewLogDeleteAction
114998305 end
115008306 object N65: TMenuItem
115018307 Caption = '-'
115028308 end
115038309 object SearchBoardName: TMenuItem
11504- Action = TreeSelectSearchBoardName
8310+ Action = GikoDM.TreeSelectSearchBoardName
115058311 end
115068312 end
115078313 object CabinetSelectPopupMenu: TPopupMenu
115088314 Left = 68
115098315 Top = 468
115108316 object H2: TMenuItem
11511- Action = CabinetHistoryAction
8317+ Action = GikoDM.CabinetHistoryAction
115128318 AutoCheck = True
115138319 end
115148320 object A13: TMenuItem
11515- Action = CabinetFavoriteAction
8321+ Action = GikoDM.CabinetFavoriteAction
115168322 AutoCheck = True
115178323 end
115188324 end
@@ -11541,82 +8347,82 @@ object GikoForm: TGikoForm
115418347 Hint = #29694#22312#34920#31034#12375#12390#12356#12427#26495#12434#12502#12521#12454#12470#12391#34920#31034#12377#12427
115428348 end
115438349 object MenuItem5: TMenuItem
11544- Action = SelectItemURLCopyAction
8350+ Action = GikoDM.SelectItemURLCopyAction
115458351 end
115468352 object MenuItem6: TMenuItem
11547- Action = SelectItemNameURLCopyAction
8353+ Action = GikoDM.SelectItemNameURLCopyAction
115488354 end
115498355 object URLN3: TMenuItem
11550- Action = SelectItemNameCopyAction
8356+ Action = GikoDM.SelectItemNameCopyAction
115518357 end
115528358 end
115538359 object MainCoolBarPopupMenu: TPopupMenu
115548360 Left = 100
115558361 Top = 404
115568362 object StdToolBarVisiblePMenu: TMenuItem
11557- Action = StdToolBarVisibleAction
8363+ Action = GikoDM.StdToolBarVisibleAction
115588364 AutoCheck = True
115598365 end
115608366 object AddressToolBarVisiblePMenu: TMenuItem
11561- Action = AddressBarVisibleAction
8367+ Action = GikoDM.AddressBarVisibleAction
115628368 AutoCheck = True
115638369 end
115648370 object LinkToolBarVisiblePMenu: TMenuItem
11565- Action = LinkBarVisibleAction
8371+ Action = GikoDM.LinkBarVisibleAction
115668372 AutoCheck = True
115678373 end
115688374 object N44: TMenuItem
115698375 Caption = '-'
115708376 end
115718377 object L9: TMenuItem
11572- Action = ListToolBarVisibleAction
8378+ Action = GikoDM.ListToolBarVisibleAction
115738379 AutoCheck = True
115748380 end
115758381 object I3: TMenuItem
11576- Action = ListNameBarVisibleAction
8382+ Action = GikoDM.ListNameBarVisibleAction
115778383 AutoCheck = True
115788384 end
115798385 object N45: TMenuItem
115808386 Caption = '-'
115818387 end
115828388 object B9: TMenuItem
11583- Action = BrowserToolBarVisibleAction
8389+ Action = GikoDM.BrowserToolBarVisibleAction
115848390 AutoCheck = True
115858391 end
115868392 object R5: TMenuItem
11587- Action = BrowserNameBarVisibleAction
8393+ Action = GikoDM.BrowserNameBarVisibleAction
115888394 AutoCheck = True
115898395 end
115908396 object T12: TMenuItem
115918397 Caption = #12502#12521#12454#12470#12479#12502'(&T)'
115928398 object Show3: TMenuItem
11593- Action = BrowserTabVisibleAction
8399+ Action = GikoDM.BrowserTabVisibleAction
115948400 AutoCheck = True
115958401 end
115968402 object N46: TMenuItem
115978403 Caption = '-'
115988404 end
115998405 object T13: TMenuItem
11600- Action = BrowserTabTopAction
8406+ Action = GikoDM.BrowserTabTopAction
116018407 AutoCheck = True
116028408 end
116038409 object B10: TMenuItem
11604- Action = BrowserTabBottomAction
8410+ Action = GikoDM.BrowserTabBottomAction
116058411 AutoCheck = True
116068412 end
116078413 object N47: TMenuItem
116088414 Caption = '-'
116098415 end
116108416 object A12: TMenuItem
11611- Action = BrowserTabTabStyleAction
8417+ Action = GikoDM.BrowserTabTabStyleAction
116128418 AutoCheck = True
116138419 end
116148420 object U4: TMenuItem
11615- Action = BrowserTabButtonStyleAction
8421+ Action = GikoDM.BrowserTabButtonStyleAction
116168422 AutoCheck = True
116178423 end
116188424 object F4: TMenuItem
11619- Action = BrowserTabFlatStyleAction
8425+ Action = GikoDM.BrowserTabFlatStyleAction
116208426 AutoCheck = True
116218427 end
116228428 end
@@ -11624,7 +8430,7 @@ object GikoForm: TGikoForm
116248430 Caption = '-'
116258431 end
116268432 object T14: TMenuItem
11627- Action = ToolBarSettingAction
8433+ Action = GikoDM.ToolBarSettingAction
116288434 end
116298435 end
116308436 object FavoriteTreePopupMenu: TPopupMenu
@@ -11632,46 +8438,46 @@ object GikoForm: TGikoForm
116328438 Left = 99
116338439 Top = 436
116348440 object FavoriteTreeBrowseFolderPopupMenu: TMenuItem
11635- Action = FavoriteTreeViewBrowseFolderAction
8441+ Action = GikoDM.FavoriteTreeViewBrowseFolderAction
116368442 end
116378443 object N57: TMenuItem
116388444 Caption = '-'
116398445 end
116408446 object FavoriteTreeDeletePopupMenu: TMenuItem
11641- Action = FavoriteTreeViewDeleteAction
8447+ Action = GikoDM.FavoriteTreeViewDeleteAction
116428448 end
116438449 object FavoriteTreeRenamePopupMenu: TMenuItem
11644- Action = FavoriteTreeViewRenameAction
8450+ Action = GikoDM.FavoriteTreeViewRenameAction
116458451 end
116468452 object N56: TMenuItem
116478453 Caption = '-'
116488454 end
116498455 object FavoriteTreeNewFolderPopupMenu: TMenuItem
11650- Action = FavoriteTreeViewNewFolderAction
8456+ Action = GikoDM.FavoriteTreeViewNewFolderAction
116518457 end
116528458 object N58: TMenuItem
116538459 Caption = '-'
116548460 end
116558461 object FavoriteTreeURLCopyPopupMenu: TMenuItem
11656- Action = FavoriteTreeViewURLCopyAction
8462+ Action = GikoDM.FavoriteTreeViewURLCopyAction
116578463 end
116588464 object FavoriteTreeNameCopyPopupMenu: TMenuItem
11659- Action = FavoriteTreeViewNameCopyAction
8465+ Action = GikoDM.FavoriteTreeViewNameCopyAction
116608466 end
116618467 object FavoriteTreeNameURLCopyPopupMenu: TMenuItem
11662- Action = FavoriteTreeViewNameURLCopyAction
8468+ Action = GikoDM.FavoriteTreeViewNameURLCopyAction
116638469 end
116648470 object N60: TMenuItem
116658471 Caption = '-'
116668472 end
116678473 object FavoriteTreeReloadPopupMenu: TMenuItem
11668- Action = FavoriteTreeViewReloadAction
8474+ Action = GikoDM.FavoriteTreeViewReloadAction
116698475 end
116708476 object N59: TMenuItem
116718477 Caption = '-'
116728478 end
116738479 object FavoriteTreeLogDeletePopupMenu: TMenuItem
11674- Action = FavoriteTreeViewLogDeleteAction
8480+ Action = GikoDM.FavoriteTreeViewLogDeleteAction
116758481 end
116768482 end
116778483 object BBSSelectPopupMenu: TPopupMenu
@@ -11682,26 +8488,26 @@ object GikoForm: TGikoForm
116828488 Left = 37
116838489 Top = 472
116848490 object A14: TMenuItem
11685- Action = AllResAction
8491+ Action = GikoDM.AllResAction
116868492 AutoCheck = True
116878493 end
116888494 object N1001: TMenuItem
11689- Action = OnlyAHundredResAction
8495+ Action = GikoDM.OnlyAHundredResAction
116908496 AutoCheck = True
116918497 end
116928498 object N501: TMenuItem
11693- Action = OnlyKokoResAction
8499+ Action = GikoDM.OnlyKokoResAction
116948500 AutoCheck = True
116958501 end
116968502 object N22: TMenuItem
11697- Action = OnlyNewResAction
8503+ Action = GikoDM.OnlyNewResAction
116988504 AutoCheck = True
116998505 end
117008506 object N69: TMenuItem
117018507 Caption = '-'
117028508 end
117038509 object S7: TMenuItem
11704- Action = SelectResAction
8510+ Action = GikoDM.SelectResAction
117058511 AutoCheck = True
117068512 end
117078513 end
@@ -11709,22 +8515,22 @@ object GikoForm: TGikoForm
117098515 Left = 37
117108516 Top = 436
117118517 object A15: TMenuItem
11712- Action = AllItemAction
8518+ Action = GikoDM.AllItemAction
117138519 AutoCheck = True
117148520 end
117158521 object L8: TMenuItem
11716- Action = LogItemAction
8522+ Action = GikoDM.LogItemAction
117178523 AutoCheck = True
117188524 end
117198525 object N67: TMenuItem
11720- Action = NewItemAction
8526+ Action = GikoDM.NewItemAction
117218527 AutoCheck = True
117228528 end
117238529 object N68: TMenuItem
117248530 Caption = '-'
117258531 end
117268532 object S6: TMenuItem
11727- Action = SelectItemAction
8533+ Action = GikoDM.SelectItemAction
117288534 AutoCheck = True
117298535 end
117308536 end
--- a/Giko.pas
+++ b/Giko.pas
@@ -4,7 +4,7 @@ interface
44
55 uses
66 Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms,
7- OleCtrls, ComCtrls, ExtCtrls, Menus, StdCtrls, MMSystem, DateUtils, Math,
7+ OleCtrls, ComCtrls, ExtCtrls, Menus, StdCtrls, MMSystem, DateUtils,
88 {$IF Defined(DELPRO) }
99 SHDocVw,
1010 MSHTML,
@@ -13,16 +13,12 @@ uses
1313 MSHTML_TLB,
1414 {$IFEND}
1515 IdHTTP, ActiveX, ActnList, ImgList,
16- ToolWin, Buttons, {Clipbrd,} {HTTPApp,} YofUtils, IdComponent,
17- ShellAPI, UrlMon, Tabs, IdGlobal, StrUtils,
18- CommCtrl, IniFiles, Dialogs,
19- GikoSystem, GikoUtil, Setting, BoardGroup, ThreadControl, ItemDownload,
20- Editor, RoundData, RoundName, KeySetting, GikoPanel, Favorite, FavoriteAdd,
21- FavoriteArrange, AddressHistory, Preview, HTMLDocumentEvent, Kotehan,
22- HintWindow, GikoCoolBar, GikoListView, ToolBarSetting, ToolBarUtil,
23- IndividualAbon, Search, ExternalBoardManager, ExternalBoardPlugInMain,
24- StdActns, GikoXMLDoc, Variants, ExtActns,IdTCPConnection, IdBaseComponent,
25- IdTCPClient, Gesture;
16+ ToolWin, Buttons, IdComponent, UrlMon, Tabs, IdGlobal, StrUtils,
17+ CommCtrl, Dialogs, GikoSystem, Setting, BoardGroup, ThreadControl, ItemDownload,
18+ Editor, RoundData, GikoPanel, Favorite, HTMLDocumentEvent,
19+ HintWindow, GikoCoolBar, GikoListView, Search, ExternalBoardManager,
20+ ExternalBoardPlugInMain, StdActns, Variants, ExtActns,IdTCPConnection,
21+ IdBaseComponent, IdTCPClient;
2622
2723 type
2824 TGikoTreeType = (gttNone, gtt2ch, gttHistory, gttFavorite);
@@ -50,44 +46,16 @@ type
5046 MessageListView: TListView;
5147 MessageSplitter: TSplitter;
5248 Panel3: TPanel;
53- SpeedButton1: TSpeedButton;
49+ CabinetCloseSpeedButton: TSpeedButton;
5450 ToolBar1: TToolBar;
5551 CabinetSelectToolButton: TToolButton;
5652 HistoryToolBar: TToolBar;
57- ToolButton15: TToolButton;
58- ToolButton18: TToolButton;
53+ HistoryShowToolButton: TToolButton;
54+ HistoryAllClearToolButton: TToolButton;
5955 ItemIcon16: TImageList;
6056 ItemIcon32: TImageList;
6157 HotToobarImageList: TImageList;
62- ToobarImageList: TImageList;
6358 ItemImageList: TImageList;
64- ActionList: TActionList;
65- LogDeleteAction: TAction;
66- KidokuAction: TAction;
67- StdToolBarVisibleAction: TAction;
68- SearchAction: TAction;
69- GikoNaviWebPageAction: TAction;
70- AboutAction: TAction;
71- ExitAction: TAction;
72- MsgBarVisibleAction: TAction;
73- StatusBarVisibleAction: TAction;
74- LargeIconAction: TAction;
75- SmallIconAction: TAction;
76- ListIconAction: TAction;
77- DetailIconAction: TAction;
78- CabinetBBSAction: TAction;
79- CabinetHistoryAction: TAction;
80- CabinetVisibleAction: TAction;
81- MidokuAction: TAction;
82- AllSelectAction: TAction;
83- UpFolderAction: TAction;
84- ListNumberVisibleAction: TAction;
85- AllItemAction: TAction;
86- LogItemAction: TAction;
87- NewItemAction: TAction;
88- SelectItemAction: TAction;
89- ShowThreadAction: TAction;
90- StopAction: TAction;
9159 MainMenu: TMainMenu;
9260 FileMenu: TMenuItem;
9361 DeleteMenu: TMenuItem;
@@ -117,20 +85,16 @@ type
11785 G1: TMenuItem;
11886 N1: TMenuItem;
11987 AboutMenu: TMenuItem;
120- IconStyle: TAction;
12188 BrowserPopupMenu: TPopupMenu;
12289 ShowThreadMenu: TMenuItem;
12390 ShowBoardMenu: TMenuItem;
124- ShowBoardAction: TAction;
12591 ListIconPopupMenu: TPopupMenu;
12692 LargeIconPMenu: TMenuItem;
12793 SmallIconPMenu: TMenuItem;
12894 ListPMenu: TMenuItem;
12995 DetailPMenu: TMenuItem;
130- CabinetCloseAction: TAction;
13196 ClosePopupMenu: TPopupMenu;
13297 CloseMenu: TMenuItem;
133- OptionAction: TAction;
13498 U1: TMenuItem;
13599 N3: TMenuItem;
136100 B1: TMenuItem;
@@ -140,7 +104,6 @@ type
140104 L1: TMenuItem;
141105 N5: TMenuItem;
142106 S2: TMenuItem;
143- RoundAction: TAction;
144107 ListPopupMenu: TPopupMenu;
145108 ListRoundPMenu: TMenuItem;
146109 ListReservPMenu: TMenuItem;
@@ -162,19 +125,9 @@ type
162125 T1: TMenuItem;
163126 B2: TMenuItem;
164127 N8: TMenuItem;
165- URLCopyAction: TAction;
166128 URLC1: TMenuItem;
167129 N9: TMenuItem;
168130 N10: TMenuItem;
169- MsgBarCloseAction: TAction;
170- ScrollTopAction: TAction;
171- ScrollLastAction: TAction;
172- ScrollNewAction: TAction;
173- ScrollKokoAction: TAction;
174- EditorAction: TAction;
175- IEAction: TAction;
176- ItemReloadAction: TAction;
177- BrowserMaxAction: TAction;
178131 G2: TMenuItem;
179132 N11: TMenuItem;
180133 T3: TMenuItem;
@@ -186,22 +139,13 @@ type
186139 R1: TMenuItem;
187140 A2: TMenuItem;
188141 N15: TMenuItem;
189- SelectListReloadAction: TAction;
190- SelectThreadReloadAction: TAction;
191142 KokoPopupMenu: TPopupMenu;
192143 KokomadePMenu: TMenuItem;
193144 AllPMenu: TMenuItem;
194145 MenuItem1: TMenuItem;
195146 MenuItem2: TMenuItem;
196- BrowserTabCloseAction: TAction;
197147 BrowserTabPopupMenu: TPopupMenu;
198148 Close1: TMenuItem;
199- KokomadeAction: TAction;
200- ZenbuAction: TAction;
201- KokoResAction: TAction;
202- SelectItemURLCopyAction: TAction;
203- SelectReservAction: TAction;
204- NotSelectTabCloseAction: TAction;
205149 A3: TMenuItem;
206150 N16: TMenuItem;
207151 A4: TMenuItem;
@@ -210,11 +154,6 @@ type
210154 TreeSelectBoardPupupMenu: TMenuItem;
211155 TPMSep01: TMenuItem;
212156 TreeSelectURLPupupMenu: TMenuItem;
213- TreeSelectBoradReload: TAction;
214- TreeSelectThreadReload: TAction;
215- TreeSelectURLCopy: TAction;
216- ListToolBarVisibleAction: TAction;
217- BrowserToolBarVisibleAction: TAction;
218157 T2: TMenuItem;
219158 L3: TMenuItem;
220159 B3: TMenuItem;
@@ -223,16 +162,10 @@ type
223162 H2: TMenuItem;
224163 ItemReservPMenu: TMenuItem;
225164 RoundNamePopupMenu: TPopupMenu;
226- SelectNewRoundName: TAction;
227- SelectDeleteRound: TAction;
228- NewBoardAction: TAction;
229165 N7: TMenuItem;
230166 B4: TMenuItem;
231- LoginAction: TAction;
232167 L4: TMenuItem;
233- KeySettingAction: TAction;
234168 K2: TMenuItem;
235- AllTabCloseAction: TAction;
236169 A5: TMenuItem;
237170 A6: TMenuItem;
238171 C1: TMenuItem;
@@ -242,10 +175,7 @@ type
242175 D2: TMenuItem;
243176 MessageImageList: TImageList;
244177 ProgressBar: TProgressBar;
245- ArrangeAction: TAction;
246178 URL1: TMenuItem;
247- NameURLCopyAction: TAction;
248- SelectItemNameURLCopyAction: TAction;
249179 NameUrlCopyPMenu: TMenuItem;
250180 URLC2: TMenuItem;
251181 URLN1: TMenuItem;
@@ -269,52 +199,34 @@ type
269199 BrowserBoardNameLabel: TLabel;
270200 ItemImage: TImage;
271201 BrowserNameLabel: TLabel;
272- ActiveLogDeleteAction: TAction;
273202 D3: TMenuItem;
274203 N25: TMenuItem;
275204 N26: TMenuItem;
276- ListNameBarVisibleAction: TAction;
277205 D4: TMenuItem;
278- BrowserNameBarVisibleAction: TAction;
279206 S3: TMenuItem;
280207 R2: TMenuItem;
281- TreeSelectNameURLCopy: TAction;
282208 TreeSelectNameURLPupupMenu: TMenuItem;
283209 N27: TMenuItem;
284210 H3: TMenuItem;
285- PaneInitAction: TAction;
286211 I1: TMenuItem;
287212 BrowserTabToolBar: TToolBar;
288213 BrowserTab: TTabControl;
289- BrowserMinAction: TAction;
290214 About1: TMenuItem;
291215 N28: TMenuItem;
292- SelectTextClearAction: TAction;
293- MailTextClearAction: TAction;
294- NameTextClearAction: TAction;
295216 S4: TMenuItem;
296217 N29: TMenuItem;
297218 N30: TMenuItem;
298- LeftmostTabSelectAction: TAction;
299- LeftTabSelectAction: TAction;
300- RightTabSelectAction: TAction;
301- RightmostTabSelectAction: TAction;
302219 N31: TMenuItem;
303220 L5: TMenuItem;
304221 L6: TMenuItem;
305222 A7: TMenuItem;
306223 R3: TMenuItem;
307224 FavoriteMenu: TMenuItem;
308- FavoriteAddAction: TAction;
309225 N32: TMenuItem;
310226 BoardFavoriteAddMenu: TMenuItem;
311- BoardFavoriteAddAction: TAction;
312- ThreadFavoriteAddAction: TAction;
313227 ThreadFavoriteAddMenu: TMenuItem;
314- TreeSelectFavoriteAddAction: TAction;
315228 N33: TMenuItem;
316229 TreeSelectFavoriteAddPupupMenu: TMenuItem;
317- FavoriteArrangeAction: TAction;
318230 FavoriteTreeView: TTreeView;
319231 StateIconImageList: TImageList;
320232 TopPanel: TPanel;
@@ -328,61 +240,42 @@ type
328240 AddressToolBar: TToolBar;
329241 AddressComboBox: TComboBox;
330242 MoveToToolButton: TToolButton;
331- MoveToAction: TAction;
332243 AddressImageList: TImageList;
333- AddressBarVisibleAction: TAction;
334244 AddressToolBarMenu: TMenuItem;
335245 T4: TMenuItem;
336- BrowserTabVisibleAction: TAction;
337246 Show1: TMenuItem;
338247 N34: TMenuItem;
339- BrowserTabTopAction: TAction;
340- BrowserTabBottomAction: TAction;
341248 T5: TMenuItem;
342249 B5: TMenuItem;
343250 N35: TMenuItem;
344- BrowserTabTabStyleAction: TAction;
345- BrowserTabButtonStyleAction: TAction;
346- BrowserTabFlatStyleAction: TAction;
347251 A8: TMenuItem;
348252 U2: TMenuItem;
349253 F1: TMenuItem;
350254 PreviewTimer: TTimer;
351- MonazillaWebPageAction: TAction;
352255 MonazillaWebPageAction1: TMenuItem;
353- GikoHelpAction: TAction;
354256 N36: TMenuItem;
355257 H4: TMenuItem;
356- KotehanAction: TAction;
357258 K3: TMenuItem;
358- LinkBarVisibleAction: TAction;
359259 L7: TMenuItem;
360260 N37: TMenuItem;
361261 A9: TMenuItem;
362262 ChevronPopupMenu: TPopupMenu;
363- BBS2chWebPageAction: TAction;
364263 N2N1: TMenuItem;
365264 N38: TMenuItem;
366- GikoFolderOpenAction: TAction;
367265 F2: TMenuItem;
368266 LinkToolBar: TToolBar;
369267 a10: TMenuItem;
370- ThreadEditorAction: TAction;
371268 N39: TMenuItem;
372269 T6: TMenuItem;
373270 N40: TMenuItem;
374271 LinkBarPopupMenu: TPopupMenu;
375- ToolBarSettingAction: TAction;
376272 T7: TMenuItem;
377273 ThreadPopupMenu: TPopupMenu;
378274 MenuItem4: TMenuItem;
379275 MenuItem5: TMenuItem;
380276 MenuItem6: TMenuItem;
381277 T8: TMenuItem;
382- NameCopyAction: TAction;
383- BoardIEAction: TAction;
384278 URLN3: TMenuItem;
385- SelectItemNameCopyAction: TAction;
386279 SelectItemNameCopyAction1: TMenuItem;
387280 B6: TMenuItem;
388281 T9: TMenuItem;
@@ -412,46 +305,33 @@ type
412305 F4: TMenuItem;
413306 N48: TMenuItem;
414307 T14: TMenuItem;
415- SelectResAction: TAction;
416308 ToolButton16: TToolButton;
417- AllResAction: TAction;
418309 N50: TMenuItem;
419310 A11: TMenuItem;
420311 S5: TMenuItem;
421312 Reload: TMenuItem;
422313 GoBack: TMenuItem;
423314 GoFoward: TMenuItem;
424- EditNGAction: TAction;
425- ReloadAction: TAction;
426- GoFowardAction: TAction;
427- GoBackAction: TAction;
428315 IndividualAbon1: TMenuItem;
429316 N41: TMenuItem;
430317 IndividualAbon2: TMenuItem;
431318 N42: TMenuItem;
432- CancellIndividualAbon: TAction;
433319 AntiIndividualAbon: TMenuItem;
434320 N49: TMenuItem;
435321 N51: TMenuItem;
436322 N52: TMenuItem;
437323 SearchBoardName: TMenuItem;
438324 TreeSelectLogDeleteSeparator: TMenuItem;
439- TreeSelectSearchBoardName: TAction;
440- CabinetFavoriteAction: TAction;
441325 N54: TMenuItem;
442326 A13: TMenuItem;
443327 FavoriteTreePopupMenu: TPopupMenu;
444- FavoriteTreeViewRenameAction: TAction;
445328 FavoriteTreeRenamePopupMenu: TMenuItem;
446- FavoriteTreeViewNewFolderAction: TAction;
447329 FavoriteTreeNewFolderPopupMenu: TMenuItem;
448330 N56: TMenuItem;
449- FavoriteTreeViewDeleteAction: TAction;
450331 FavoriteTreeDeletePopupMenu: TMenuItem;
451332 FavoriteToolBar: TToolBar;
452- ToolButton17: TToolButton;
453- ToolButton19: TToolButton;
454- FavoriteTreeViewBrowseFolderAction: TAction;
333+ FavoriteAddToolButton: TToolButton;
334+ FavoriteArrangeToolButton: TToolButton;
455335 FavoriteTreeBrowseFolderPopupMenu: TMenuItem;
456336 N57: TMenuItem;
457337 FavoriteTreeReloadPopupMenu: TMenuItem;
@@ -461,69 +341,40 @@ type
461341 FavoriteTreeLogDeletePopupMenu: TMenuItem;
462342 N59: TMenuItem;
463343 FavoriteTreeNameURLCopyPopupMenu: TMenuItem;
464- FavoriteTreeViewReloadAction: TAction;
465- FavoriteTreeViewURLCopyAction: TAction;
466- FavoriteTreeViewNameCopyAction: TAction;
467- FavoriteTreeViewNameURLCopyAction: TAction;
468- FavoriteTreeViewLogDeleteAction: TAction;
469- ResRangeAction: TAction;
470344 ToolButton20: TToolButton;
471345 N60: TMenuItem;
472346 ExportFavoriteFileAction1: TMenuItem;
473- ExportFavoriteFile: TFileSaveAs;
474347 N6: TMenuItem;
475348 N17: TMenuItem;
476- FavoriteTreeViewBrowseBoardAction: TAction;
477- FavoriteTreeViewBrowseThreadAction: TAction;
478- UpBoardAction: TAction;
479349 N18: TMenuItem;
480350 N20: TMenuItem;
481- N24: TMenuItem;
351+ N24: TMenuItem;
482352 N62: TMenuItem;
483353 N61: TMenuItem;
484354 N63: TMenuItem;
485- KoreCopy: TAction;
486355 N64: TMenuItem;
487356 dummy1: TMenuItem;
488357 TreeSelectLogDeletePopupMenu: TMenuItem;
489358 N65: TMenuItem;
490359 BBSSelectPopupMenu: TPopupMenu;
491360 PlugInMenu: TMenuItem;
492- TreeSelectNameCopy: TAction;
493361 TreeSelectNamePupupMenu: TMenuItem;
494362 BrowserPanel: TPanel;
495- SetFocusForBrowserAction: TAction;
496- SetFocusForThreadListAction: TAction;
497- SetFocusForCabinetAction: TAction;
498- FileRun1: TFileRun;
499- ThreadlistMaxAndFocusAction: TAction;
500- BrowserMaxAndFocusAction: TAction;
501363 SelectTimer: TTimer;
502364 SelectThreadSave: TMenuItem;
503- SelectItemSaveForHTML: TAction;
504- FileSaveAs1: TFileSaveAs;
505365 N55: TMenuItem;
506366 N66: TMenuItem;
507367 dat1: TMenuItem;
508- SelectItemSaveForDat: TAction;
509- LogFolderOpenAction: TAction;
510368 OpenLogFolder: TMenuItem;
511369 Browser: TWebBrowser;
512370 TabSave: TMenuItem;
513371 TabOpen: TMenuItem;
514- TabsSaveAction: TAction;
515- TabsOpenAction: TAction;
516372 ResRangePopupMenu: TPopupMenu;
517373 N1001: TMenuItem;
518374 N501: TMenuItem;
519375 N22: TMenuItem;
520- OnlyAHundredResAction: TAction;
521- OnlyNewResAction: TAction;
522- OnlyKokoResAction: TAction;
523376 A14: TMenuItem;
524- BrowsBoradHeadAction: TAction;
525377 BrowsBoradHeadAction1: TMenuItem;
526- ThreadRangeAction: TAction;
527378 ThreadRangePopupMenu: TPopupMenu;
528379 A15: TMenuItem;
529380 L8: TMenuItem;
@@ -532,52 +383,22 @@ type
532383 S6: TMenuItem;
533384 N69: TMenuItem;
534385 S7: TMenuItem;
535- TabAutoSaveAction: TAction;
536- TabAutoLoadAction: TAction;
537386 ListColumnPopupMenu: TPopupMenu;
538- JumpToNumOfResAction: TAction;
539- FavoriteTreeViewCollapseAction: TAction;
540- RightTabCloseAction: TAction;
541- LeftTabCloseAction: TAction;
542387 N70: TMenuItem;
543- SameIDResAnchorAction: TAction;
544388 ID1: TMenuItem;
545- IndividualAbon1Action: TAction;
546- IndividualAbon0Action: TAction;
547- AntiIndividualAbonAction: TAction;
548- AntiIndividualAbonDlgAction: TAction;
549- IndividualAbonID1Action: TAction;
550389 ID2: TMenuItem;
551390 N53: TMenuItem;
552391 ID3: TMenuItem;
553- IndividualAbonID0Action: TAction;
554392 N71: TMenuItem;
555- MuteAction: TAction;
556393 N72: TMenuItem;
557394 N73: TMenuItem;
558- SortActiveColumnAction: TAction;
559- SortNextColumnAction: TAction;
560- SortPrevColumnAction: TAction;
561- BeLogInOutAction: TAction;
562- UnSelectedListViewAction: TAction;
563395 SelectComboBoxPanel: TPanel;
564396 SelectComboBoxSplitter: TImage;
565397 ToolButton1: TToolButton;
566398 N74: TMenuItem;
567399 WikiFAQ: TMenuItem;
568- WikiFAQWebPageAction: TAction;
569400 procedure FormCreate(Sender: TObject);
570401 procedure FormDestroy(Sender: TObject);
571- procedure CabinetPanelHide(Sender: TObject);
572- procedure ListViewData(Sender: TObject; Item: TListItem);
573- procedure ListViewDataFind(Sender: TObject; Find: TItemFind;
574- const FindString: String; const FindPosition: TPoint;
575- FindData: Pointer; StartIndex: Integer; Direction: TSearchDirection;
576- Wrap: Boolean; var Index: Integer);
577- procedure ListViewDataHint(Sender: TObject; StartIndex,
578- EndIndex: Integer);
579- procedure ListViewDataStateChange(Sender: TObject; StartIndex,
580- EndIndex: Integer; OldState, NewState: TItemStates);
581402 procedure BrowserStatusTextChange(Sender: TObject;
582403 const Text: WideString);
583404 procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);
@@ -586,7 +407,6 @@ type
586407 procedure ListViewKeyDown(Sender: TObject; var Key: Word;
587408 Shift: TShiftState);
588409 procedure ListViewColumnClick(Sender: TObject; Column: TListColumn);
589- procedure ListViewSort(Sender: TObject; Column: TListColumn);
590410 procedure MenuToolBarCustomDrawButton(Sender: TToolBar;
591411 Button: TToolButton; State: TCustomDrawState;
592412 var DefaultDraw: Boolean);
@@ -605,65 +425,10 @@ type
605425 Shift: TShiftState; X, Y: Integer);
606426 procedure TreeViewCollapsed(Sender: TObject; Node: TTreeNode);
607427 procedure MessageListViewResize(Sender: TObject);
608- procedure ExitActionExecute(Sender: TObject);
609- procedure AllSelectActionExecute(Sender: TObject);
610- procedure StdToolBarVisibleActionExecute(Sender: TObject);
611- procedure MsgBarVisibleActionExecute(Sender: TObject);
612- procedure StatusBarVisibleActionExecute(Sender: TObject);
613- procedure LargeIconActionExecute(Sender: TObject);
614- procedure SmallIconActionExecute(Sender: TObject);
615- procedure ListIconActionExecute(Sender: TObject);
616- procedure DetailIconActionExecute(Sender: TObject);
617- procedure SearchActionExecute(Sender: TObject);
618- procedure OptionActionExecute(Sender: TObject);
619- procedure GikoNaviWebPageActionExecute(Sender: TObject);
620- procedure AboutActionExecute(Sender: TObject);
621- procedure CabinetHistoryActionExecute(Sender: TObject);
622428 procedure CabinetVisible( isVisible : Boolean );
623- procedure CabinetVisibleActionExecute(Sender: TObject);
624- procedure AllItemActionExecute(Sender: TObject);
625- procedure LogItemActionExecute(Sender: TObject);
626- procedure NewItemActionExecute(Sender: TObject);
627- procedure SelectItemActionExecute(Sender: TObject);
628- procedure ListNumberVisibleActionExecute(Sender: TObject);
629- procedure UpFolderActionExecute(Sender: TObject);
630- procedure IconStyleExecute(Sender: TObject);
631- procedure RoundActionExecute(Sender: TObject);
632- procedure StopActionExecute(Sender: TObject);
633- procedure MsgBarCloseActionExecute(Sender: TObject);
634- procedure BrowserMaxActionExecute(Sender: TObject);
635- procedure ScrollTopActionExecute(Sender: TObject);
636- procedure ScrollLastActionExecute(Sender: TObject);
637- procedure ScrollNewActionExecute(Sender: TObject);
638- procedure ScrollKokoActionExecute(Sender: TObject);
639- procedure EditorActionExecute(Sender: TObject);
640- procedure IEActionExecute(Sender: TObject);
641- procedure ShowThreadActionExecute(Sender: TObject);
642- procedure ShowBoardActionExecute(Sender: TObject);
643- procedure URLCopyActionExecute(Sender: TObject);
644- procedure ItemReloadActionExecute(Sender: TObject);
645- procedure SelectListReloadActionExecute(Sender: TObject);
646- procedure SelectThreadReloadActionExecute(Sender: TObject);
647- procedure SelectListReloadActionUpdate(Sender: TObject);
648- procedure UpFolderActionUpdate(Sender: TObject);
649429 procedure FormResize(Sender: TObject);
650- procedure ScrollKokoActionUpdate(Sender: TObject);
651- procedure SelectThreadReloadActionUpdate(Sender: TObject);
652- procedure LogDeleteActionExecute(Sender: TObject);
653- procedure KokomadeActionExecute(Sender: TObject);
654- procedure ZenbuActionExecute(Sender: TObject);
655- procedure KokoResActionExecute(Sender: TObject);
656430 procedure ListPopupMenuPopup(Sender: TObject);
657- procedure SelectItemURLCopyActionExecute(Sender: TObject);
658- procedure AllSelectActionUpdate(Sender: TObject);
659- procedure BrowserTabCloseActionExecute(Sender: TObject);
660- procedure NotSelectTabCloseActionExecute(Sender: TObject);
661- procedure TreeSelectBoradReloadExecute(Sender: TObject);
662- procedure TreeSelectThreadReloadExecute(Sender: TObject);
663- procedure TreeSelectURLCopyExecute(Sender: TObject);
664431 procedure TreePopupMenuPopup(Sender: TObject);
665- procedure ListToolBarVisibleActionExecute(Sender: TObject);
666- procedure BrowserToolBarVisibleActionExecute(Sender: TObject);
667432 procedure BrowserNewWindow2(Sender: TObject; var ppDisp: IDispatch;
668433 var Cancel: WordBool);
669434 procedure ListSplitterMoved(Sender: TObject);
@@ -677,66 +442,19 @@ type
677442 Y: Integer);
678443 procedure BrowserDocumentComplete(Sender: TObject;
679444 const pDisp: IDispatch; var URL: OleVariant);
680- procedure SelectReservActionUpdate(Sender: TObject);
681445 procedure RoundNamePopupMenuPopup(Sender: TObject);
682- procedure SelectNewRoundNameExecute(Sender: TObject);
683- procedure SelectDeleteRoundExecute(Sender: TObject);
684- procedure SelectReservActionExecute(Sender: TObject);
685- procedure NewBoardActionExecute(Sender: TObject);
686- procedure LoginActionExecute(Sender: TObject);
687- procedure KeySettingActionExecute(Sender: TObject);
688- procedure AllTabCloseActionExecute(Sender: TObject);
689- procedure ArrangeActionExecute(Sender: TObject);
690- procedure NameURLCopyActionExecute(Sender: TObject);
691- procedure SelectItemNameURLCopyActionExecute(Sender: TObject);
692- procedure AllTabCloseActionUpdate(Sender: TObject);
693- procedure ActiveLogDeleteActionExecute(Sender: TObject);
694- procedure ListNameBarVisibleActionExecute(Sender: TObject);
695- procedure BrowserNameBarVisibleActionExecute(Sender: TObject);
696- procedure TreeSelectNameURLCopyExecute(Sender: TObject);
697- procedure PaneInitActionExecute(Sender: TObject);
698446 procedure FormShow(Sender: TObject);
699447 procedure BrowserTabToolBarResize(Sender: TObject);
700- procedure BrowserMinActionExecute(Sender: TObject);
701- procedure SelectTextClearActionExecute(Sender: TObject);
702- procedure NameTextClearActionExecute(Sender: TObject);
703- procedure MailTextClearActionExecute(Sender: TObject);
704- procedure LeftmostTabSelectActionExecute(Sender: TObject);
705- procedure LeftTabSelectActionExecute(Sender: TObject);
706- procedure RightTabSelectActionExecute(Sender: TObject);
707- procedure RightmostTabSelectActionExecute(Sender: TObject);
708- procedure LeftTabSelectActionUpdate(Sender: TObject);
709- procedure RightTabSelectActionUpdate(Sender: TObject);
710448 procedure FavoriteMenuClick(Sender: TObject);
711- procedure FavoriteAddActionExecute(Sender: TObject);
712- procedure BoardFavoriteAddActionExecute(Sender: TObject);
713- procedure BoardFavoriteAddActionUpdate(Sender: TObject);
714- procedure ThreadFavoriteAddActionExecute(Sender: TObject);
715- procedure TreeSelectFavoriteAddActionExecute(Sender: TObject);
716- procedure FavoriteArrangeActionExecute(Sender: TObject);
717449 procedure MainCoolBarResize(Sender: TObject);
718- procedure MoveToActionExecute(Sender: TObject);
719450 procedure AddressToolBarResize(Sender: TObject);
720451 procedure AddressComboBoxKeyDown(Sender: TObject; var Key: Word;
721452 Shift: TShiftState);
722- procedure AddressBarVisibleActionExecute(Sender: TObject);
723453 procedure BrowserEnter(Sender: TObject);
724454 procedure FormShortCut(var Msg: TWMKey; var Handled: Boolean);
725- procedure BrowserTabVisibleActionExecute(Sender: TObject);
726- procedure BrowserTabTopActionExecute(Sender: TObject);
727- procedure BrowserTabBottomActionExecute(Sender: TObject);
728- procedure BrowserTabTabStyleActionExecute(Sender: TObject);
729- procedure BrowserTabButtonStyleActionExecute(Sender: TObject);
730- procedure BrowserTabFlatStyleActionExecute(Sender: TObject);
731455 procedure PreviewTimerTimer(Sender: TObject);
732456 procedure MessageHideButtonClick(Sender: TObject);
733- procedure MonazillaWebPageActionExecute(Sender: TObject);
734- procedure GikoHelpActionExecute(Sender: TObject);
735- procedure ToolButton18Click(Sender: TObject);
736- procedure KotehanActionExecute(Sender: TObject);
737- procedure LinkBarVisibleActionExecute(Sender: TObject);
738- procedure BBS2chWebPageActionExecute(Sender: TObject);
739- procedure GikoFolderOpenActionExecute(Sender: TObject);
457+ procedure HistoryAllClearToolButtonClick(Sender: TObject);
740458 procedure MainCoolBarBandInfo(Sender: TObject;
741459 var BandInfo: PReBarBandInfoA);
742460 procedure MainCoolBarChevronClick(Sender: TObject;
@@ -750,23 +468,12 @@ type
750468 procedure BrowserCoolBarChevronClick(Sender: TObject;
751469 RebarChevron: PNMRebarChevron);
752470 procedure ListViewColumnInfo(Sender: TObject; var Column: PLVColumnA);
753- procedure ThreadEditorActionExecute(Sender: TObject);
754- procedure ToolBarSettingActionExecute(Sender: TObject);
755- procedure NameCopyActionExecute(Sender: TObject);
756- procedure BoardIEActionExecute(Sender: TObject);
757- procedure SelectItemNameCopyActionExecute(Sender: TObject);
758- procedure SelectItemNameCopyActionUpdate(Sender: TObject);
759471 procedure FormMouseWheel(Sender: TObject; Shift: TShiftState;
760472 WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean);
761473 procedure SelectComboBoxChange(Sender: TObject);
762474 procedure SelectComboBoxKeyDown(Sender: TObject; var Key: Word;
763475 Shift: TShiftState);
764476 procedure SelectComboBoxExit(Sender: TObject);
765- procedure SelectResActionExecute(Sender: TObject);
766- procedure AllResActionExecute(Sender: TObject);
767- procedure ReloadClick(Sender: TObject);
768- procedure GoBackClick(Sender: TObject);
769- procedure GoFowardClick(Sender: TObject);
770477 procedure SelectComboBoxSplitterMouseMove(Sender: TObject;
771478 Shift: TShiftState; X, Y: Integer);
772479 procedure SelectComboBoxSplitterMouseDown(Sender: TObject;
@@ -775,8 +482,6 @@ type
775482 Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
776483 procedure StatusBarResize(Sender: TObject);
777484 procedure SelectComboBoxEnter(Sender: TObject);
778- procedure TreeSelectSearchBoardNameExecute(Sender: TObject);
779- procedure CabinetFavoriteActionExecute(Sender: TObject);
780485 procedure FavoriteTreeViewDragDrop(Sender, Source: TObject; X,
781486 Y: Integer);
782487 procedure FavoriteTreeViewDragOver(Sender, Source: TObject; X, Y: Integer; State: TDragState; var Accept: Boolean);
@@ -785,23 +490,12 @@ type
785490 procedure FavoriteTreeViewKeyDown(Sender: TObject; var Key: Word;
786491 Shift: TShiftState);
787492 procedure FavoriteTreePopupMenuPopup(Sender: TObject);
788- procedure FavoriteTreeViewDeleteActionExecute(Sender: TObject);
789- procedure FavoriteTreeViewRenameActionExecute(Sender: TObject);
790- procedure FavoriteTreeViewNewFolderActionExecute(Sender: TObject);
791- procedure ToolButton19Click(Sender: TObject);
792- procedure FavoriteTreeViewBrowseFolderActionExecute(Sender: TObject);
793493 procedure FavoriteTreeViewDblClick(Sender: TObject);
794- procedure FavoriteTreeViewLogDeleteActionExecute(Sender: TObject);
795- procedure FavoriteTreeViewReloadActionExecute(Sender: TObject);
796- procedure FavoriteTreeViewURLCopyActionExecute(Sender: TObject);
797- procedure FavoriteTreeViewNameCopyActionExecute(Sender: TObject);
798- procedure FavoriteTreeViewNameURLCopyActionExecute(Sender: TObject);
799494 procedure LinkToolBarDragDrop(Sender, Source: TObject; X, Y: Integer);
800495 procedure BrowserTabMouseUp(Sender: TObject; Button: TMouseButton;
801496 Shift: TShiftState; X, Y: Integer);
802497 procedure LinkToolBarDragOver(Sender, Source: TObject; X, Y: Integer;
803498 State: TDragState; var Accept: Boolean);
804- procedure ResRangeActionExecute(Sender: TObject);
805499 procedure FavoriteTreeViewEndDrag(Sender, Target: TObject; X,
806500 Y: Integer);
807501 procedure ListCoolBarContextPopup(Sender: TObject; MousePos: TPoint;
@@ -810,15 +504,9 @@ type
810504 var Handled: Boolean);
811505 procedure BrowserCoolBarContextPopup(Sender: TObject; MousePos: TPoint;
812506 var Handled: Boolean);
813- procedure ExportFavoriteFileAccept(Sender: TObject);
814- procedure ExportFavoriteFileBeforeExecute(Sender: TObject);
815- procedure CabinetBBSActionExecute(Sender: TObject);
816- procedure FavoriteTreeViewBrowseThreadActionExecute(Sender: TObject);
817507 procedure FavoriteTreeBrowseBoardPopupMenuClick(Sender: TObject);
818- procedure UpBoardActionExecute(Sender: TObject);
819508 procedure BrowserTabContextPopup(Sender: TObject; MousePos: TPoint;
820509 var Handled: Boolean);
821- procedure KoreCopyExecute(Sender: TObject);
822510 procedure BrowserTabPopupMenuPopup(Sender: TObject);
823511 procedure BrowserTabResize(Sender: TObject);
824512 procedure TreeViewClick(Sender: TObject);
@@ -828,36 +516,11 @@ type
828516 Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
829517 procedure MessagePanelResize(Sender: TObject);
830518 procedure OnResized;
831- procedure TreeSelectNameCopyExecute(Sender: TObject);
832519 procedure FavoriteTreeViewMouseUp(Sender: TObject;
833- Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
834- procedure SetFocusForBrowserActionExecute(Sender: TObject);
835- procedure SetFocusForBrowserActionUpdate(Sender: TObject);
836- procedure SetFocusForThreadListActionExecute(Sender: TObject);
837- procedure SetFocusForCabinetActionExecute(Sender: TObject);
838- procedure BrowserMaxAndFocusActionExecute(Sender: TObject);
839- procedure ThreadlistMaxAndFocusActionExecute(Sender: TObject);
840- procedure SetFocusForCabinetActionUpdate(Sender: TObject);
841- procedure SelectTimerTimer(Sender: TObject);
842- procedure SelectItemSaveForHTMLExecute(Sender: TObject);
843- procedure KidokuActionExecute(Sender: TObject);
844- procedure MidokuActionExecute(Sender: TObject);
845- procedure SelectItemSaveForDatExecute(Sender: TObject);
846- procedure LogFolderOpenActionExecute(Sender: TObject);
847- procedure TabsSaveActionExecute(Sender: TObject);
848- procedure TabsOpenActionExecute(Sender: TObject);
849- procedure OnlyAHundredResActionExecute(Sender: TObject);
850- procedure OnlyKokoResActionExecute(Sender: TObject);
851- procedure OnlyNewResActionExecute(Sender: TObject);
852- procedure BrowsBoradHeadActionExecute(Sender: TObject);
853- procedure EditNGActionExecute(Sender: TObject);
854- procedure ThreadRangeActionExecute(Sender: TObject);
855- procedure TabAutoSaveActionExecute(Sender: TObject);
856- procedure TabAutoLoadActionExecute(Sender: TObject);
520+ Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
521+ procedure SelectTimerTimer(Sender: TObject);
857522 procedure ListViewColumnRightClick(Sender: TObject;
858523 Column: TListColumn; Point: TPoint);
859- procedure JumpToNumOfResActionExecute(Sender: TObject);
860- procedure FavoriteTreeViewCollapseActionExecute(Sender: TObject);
861524 procedure ListViewCustomDrawItem(Sender: TCustomListView;
862525 Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean);
863526 procedure FormActivate(Sender: TObject);
@@ -865,50 +528,26 @@ type
865528 procedure MenuToolBarResize(Sender: TObject);
866529 procedure ListToolBarResize(Sender: TObject);
867530 procedure BrowserToolBarResize(Sender: TObject);
868- procedure RightTabCloseActionExecute(Sender: TObject);
869- procedure RightTabCloseActionUpdate(Sender: TObject);
870- procedure LeftTabCloseActionExecute(Sender: TObject);
871- procedure SameIDResAnchorActionExecute(Sender: TObject);
872- procedure IndividualAbon1ActionExecute(Sender: TObject);
873- procedure IndividualAbon0ActionExecute(Sender: TObject);
874- procedure AntiIndividualAbonActionExecute(Sender: TObject);
875- procedure AntiIndividualAbonDlgActionExecute(Sender: TObject);
876- procedure IndividualAbonID1ActionExecute(Sender: TObject);
877- procedure IndividualAbonID0ActionExecute(Sender: TObject);
878- procedure KokoPopupMenuPopup(Sender: TObject);
879- procedure MuteActionExecute(Sender: TObject);
880- procedure SortActiveColumnActionExecute(Sender: TObject);
881- procedure SortNextColumnActionExecute(Sender: TObject);
882- procedure SortPrevColumnActionExecute(Sender: TObject);
883- procedure MessageListViewAdvancedCustomDrawItem(
884- Sender: TCustomListView; Item: TListItem; State: TCustomDrawState;
885- Stage: TCustomDrawStage; var DefaultDraw: Boolean);
886- procedure BeLogInOutActionExecute(Sender: TObject);
531+ procedure KokoPopupMenuPopup(Sender: TObject);
887532 procedure BeLogInOutActionUpdate(Sender: TObject);
888- procedure UnSelectedListViewActionExecute(Sender: TObject);
889533 procedure ListViewKeyUp(Sender: TObject; var Key: Word;
890534 Shift: TShiftState);
891535 procedure FavoriteTreeViewEditing(Sender: TObject; Node: TTreeNode;
892536 var AllowEdit: Boolean);
893- procedure WikiFAQWebPageActionExecute(Sender: TObject);
537+ procedure CabinetCloseSpeedButtonClick(Sender: TObject);
538+ procedure FavoriteArrangeToolButtonClick(Sender: TObject);
894539 private
895540 { Private éŒ¾ }
896541 FSortIndex: Integer;
897542 FSortOrder: Boolean;
898-
899543 FEnabledCloseButton: Boolean;
900-// ThreadCreate: TThreadCreate;
901-
902544 FClickNode: TTreeNode;
903545 FHttpState: Boolean;
904546 FHint: TResPopup;
905547 FPreviewBrowser: TWebBrowser;
906548 FPreviewURL: string;
907-
908549 FBrowserSizeHeight: Integer;
909550 FBrowserSizeWidth: Integer;
910-
911-// FFavorite: TFavorite;
912551 FTabHintIndex: Integer;
913552 FListStyle: TViewStyle; //ƒŠƒXƒgƒAƒCƒRƒ“ƒXƒ^ƒCƒ‹
914553 FItemNoVisible: Boolean; //ƒŠƒXƒg”ԍ†•\Ž¦ƒtƒ‰ƒO
@@ -921,30 +560,19 @@ type
921560 FWorkCount: Integer;
922561 FNameCookie: string;
923562 FMailCookie: string;
924-// FLastRoundTime: TDateTime;
925- BrowserNullTab: TBrowserRecord;
926-// DoubleClickOccurred: array [TMouseButton] of Boolean;
927563 FDownloadTitle: string; //ƒ_ƒEƒ“ƒ[ƒh’†‚̃^ƒCƒgƒ‹–¼
928564 FDownloadMax: Integer; //ƒ_ƒEƒ“ƒ[ƒh’†‚̍őåƒTƒCƒY
929565 FEvent: THTMLDocumentEventSink;//ƒuƒ‰ƒEƒUƒhƒLƒ…ƒƒ“ƒgƒCƒxƒ“ƒg
930-
931- // Fkeynum : Integer; //ƒL[ƒ{[ƒhƒŒƒXƒ|ƒbƒvƒAƒbƒv—p
932-
933566 IsDraggingSelectComboBox : Boolean;
934567 DraggingSelectComboBoxPosition : TPoint;
935-
936568 FSearchDialog: TSearchDialog;
937-
938569 FDropSpaceNode: TTreeNode;
939-
940570 FDragTime : Cardinal; ///< ƒŠƒ“ƒN‚ÌD&D—p
941571 FDragButton : TToolButton; ///< ƒŠƒ“ƒN‚ÌD&D—p‚ÉDrag‚µ‚Ä‚éButton•Û‘¶
942572 FDragWFirst : Boolean; ///< WebTab‚ÌD&D—p
943-
944573 FListViewBackGroundColor : TColor; ///< ListView‚ÌBackGroundColor
945574 FUseOddResOddColor : Boolean; ///< Žæ“¾ƒŒƒX”‚ƃXƒŒƒbƒh‚̃ŒƒX”‚ªˆá‚Á‚½‚Æ‚«‚É‘¼‚̐F‚Å•\Ž¦
946575 FOddColor : TColor; ///< ‚»‚̐F
947-
948576 FSelectResWord : string; ///< ƒŒƒXižƒ[ƒh
949577 FIsIgnoreResize : TResizeType; ///< ƒŠƒTƒCƒYƒCƒxƒ“ƒg‚𖳎‹‚·‚é‚©‚Ç‚¤‚©
950578 FIsMinimize : TMinimizeType; ///< Å¬‰»‚µ‚Ä‚¢‚éÅ’†‚©
@@ -957,49 +585,26 @@ type
957585 FIsHandledWheel : Boolean; ///< Šù‚Ɏ󂯎æ‚Á‚½ WM_MOUSEWHEEL ‚©‚Ç‚¤‚©
958586 DiffComp: Boolean; //Add by Genyakun ƒXƒŒ‚ªXV‚³‚ꂽ‚Æ‚«‚ÉTrue‚É‚È‚é
959587 FOrigenCaption: String; //‚¨‹C‚É“ü‚èƒcƒŠ[‚̃AƒCƒeƒ€•ÒWŽž‚̕ҏW‘O‚Ì•¶Žš—ñ
960- procedure SetBoardTreeNode( inBBS : TBBS );
961- function SetCategoryListItem(ABBS2ch: TBBS): Integer;
962- function SetBoardListItem(Category: TCategory): Integer;
963- function SetThreadListItem(Board: TBoard): Integer;
964-// function GetRoundName(index: integer): string;
965-
966588 procedure DownloadEnd(Sender: TObject; Item: TDownloadItem);
967589 procedure DownloadMsg(Sender: TObject; Item: TDownloadItem; Msg: string; Icon: TGikoMessageIcon);
968590 procedure WorkBegin(Sender: TObject; AWorkMode: TWorkMode; const AWorkCountMax: Integer; Number: Integer; const AWorkTitle: string);
969591 procedure WorkEnd(Sender: TObject; AWorkMode: TWorkMode; Number: Integer);
970592 procedure Work(Sender: TObject; AWorkMode: TWorkMode; const AWorkCount: Integer; Number: Integer);
971-
972-
973593 procedure ListClick;
974594 procedure ListDoubleClick(Shift: TShiftState);
975- procedure BrowserMovement(const AName: string); overload;
976- procedure BrowserMovement(const AName: string; BrowserRecord: TBrowserRecord); overload;
977- procedure SelectListItem(List: TList);
978- procedure DeleteTab(ThreadItem: TThreadItem); overload;
979- procedure DeleteTab(BrowserRecord: TBrowserRecord); overload;
980595 function Hook(var Message: TMessage): Boolean;
981596 procedure AddRoundNameMenu(MenuItem: TMenuItem);
982- procedure SetSelectItemRound(RoundFlag: Boolean; RoundName: string); overload;
983- procedure SetSelectItemRound(RoundFlag: Boolean; RoundName: string; ParentName: string); overload;
984- procedure SetSelectRoundName(Sender: TObject);
985- function GetCoolBand(CoolBar: TCoolBar; Control: TWinControl): TCoolBand;
986-
987597 procedure SetMenuFont;
988598 procedure CreateFavMenu(Node: TTreeNode; MenuItem: TMenuItem);
989599 procedure FavoriteClick(Sender: TObject; ActiveTab: Boolean); overload;
990600 procedure FavoriteClick(Sender: TObject); overload;
991601 procedure FavoriteDragOver(Sender, Source: TObject; X, Y: Integer; State: TDragState; var Accept: Boolean);
992- procedure SelectTreeNode(Item: TObject; CallEvent: Boolean);
993602 function OnDocumentContextMenu(Sender: TObject): WordBool;
994- procedure SetResPopupText(ThreadItem : TThreadItem; StNum, ToNum: Integer; Title, First: Boolean);
995603 procedure ShowTextPopup;
996- procedure SetLinkBar;
997604 function GetWidthAllToolButton(ToolBar: TToolBar): Integer;
998605 procedure MenuBarChevronMenu;
999606 procedure LinkBarChevronMenu;
1000607 procedure ToolBarChevronMenu(ToolBar: TToolBar);
1001- procedure ModifySelectList;
1002- procedure FavoriteBrowseFolder( node: TTreeNode );
1003608 procedure LinkToolButtonDragDrop(Sender, Source: TObject; X, Y: Integer);
1004609 procedure LinkToolButtonOnMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
1005610 procedure LinkToolButtonOnMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
@@ -1012,8 +617,6 @@ type
1012617 //
1013618 procedure SetListViewBackGroundColor(value: TColor);
1014619 procedure BBSMenuItemOnClick( Sender : TObject );
1015- //
1016- procedure KonoresCopy(Number: Integer; ReplaceTag : Boolean);
1017620 /// CoolBar ‚̐ݒè‚ð•Ï”‚É•Û‘¶
1018621 procedure SaveCoolBarSettings;
1019622 procedure SaveMainCoolBarSettings;
@@ -1036,34 +639,18 @@ type
1036639 // function BrowserKeydown(var Msg: TMsg; Key: Word; State:TShiftState) : Boolean;
1037640 /// ŠeŠ‚É‚ ‚éƒLƒƒƒrƒlƒbƒgE BBS ƒƒjƒ…[‚ðƒZƒbƒg^XV
1038641 procedure SetBBSMenu;
1039- function WebBrowserClick(Sender: TObject): WordBool;
1040- procedure SkinorCSSFilesCopy(path: string);
1041642 /// ƒ^ƒuŽæ“¾
1042643 function GetTabURLs(AStringList: TStringList) : Boolean;
1043- /// ƒ^ƒu•Û‘¶
1044- function SaveTabURLs : Boolean;
1045- /// ƒ^ƒu“ǂݏo‚µ
1046- function LoadTabURLs : Boolean;
1047- /// ƒoƒ“ƒh•‚ðÄŒvŽZEÄÝ’è‚·‚é
1048- procedure ResetBandInfo( bar : TGikoCoolBar; band : TToolBar );
1049- /// ListView ‚Ì Column ‚ð^‚̃Jƒ‰ƒ€‚É•ÏŠ·
1050- function ActiveListTrueColumn( column : TListColumn ) : TListColumn;
1051644 /// ListColumnPopupMenu ƒAƒCƒeƒ€‚̃NƒŠƒbƒNƒCƒxƒ“ƒg
1052645 procedure ListColumnPopupMenuOnClick( Sender : TObject );
1053646 // BrowserRecord‚ɂ‚¢‚Ä‚¢‚éFBrowser‚ðŠO‚·
1054647 procedure ReleaseBrowser( BRecord: TBrowserRecord);
1055- //! ƒ}ƒEƒXƒWƒFƒXƒ`ƒƒ[ŠJŽn
1056- procedure OnGestureStart(Sender: TObject);
1057- //! ƒ}ƒEƒXƒWƒFƒXƒ`ƒƒ[’†
1058- procedure OnGestureMove(Sender: TObject);
1059- //! ƒ}ƒEƒXƒWƒFƒXƒ`ƒƒ[I—¹
1060- procedure OnGestureEnd(Sender: TObject);
1061648 //! i‚荞‚Ý•¶Žš—ñÝ’è
1062649 procedure SetSelectWord( const text : string );
1063- //ƒuƒ‰ƒEƒU‚̍ĕ`‰æ true:‘S‚Ẵ^ƒu false:ƒAƒNƒeƒBƒu‚ȃ^ƒu‚Ì‚Ý
1064- procedure RepaintAllTabsBrowser();
1065- //ƒŠƒ“ƒN‚Ì•¶Žš—ñ‚©‚烌ƒXƒ|ƒbƒvƒAƒbƒv—p‚ÌURL‚É•ÏŠ·‚·‚é
1066- function GetRespopupURL(AText, AThreadURL : string): string;
650+ //Œ»Ý‚̃J[ƒ\ƒ‹‚ðŽæ“¾‚·‚é
651+ function GetScreenCursor(): TCursor;
652+ //ƒJ[ƒ\ƒ‹‚ðÝ’è‚·‚é
653+ procedure SetScreenCursor(Cursor : TCursor);
1067654 protected
1068655 procedure CreateParams(var Params: TCreateParams); override;
1069656 procedure WndProc(var Message: TMessage); override;
@@ -1073,13 +660,11 @@ type
1073660
1074661 public
1075662 { Public éŒ¾ }
1076- LastRoundTime: TDateTime;
663+ LastRoundTime: TDateTime;
664+ BrowserNullTab: TBrowserRecord;
1077665 FControlThread: TThreadControl;
1078666 procedure MoveToURL(const inURL: string);
1079- function InsertBrowserTab(
1080- ThreadItem : TThreadItem;
1081- ActiveTab : Boolean = True
1082- ) : TBrowserRecord;
667+ function InsertBrowserTab(ThreadItem: TThreadItem; ActiveTab: Boolean = True) : TBrowserRecord;
1083668 procedure ReloadBBS;
1084669 function GetHttpState: Boolean;
1085670 procedure SetEnabledCloseButton(Enabled: Boolean);
@@ -1091,16 +676,29 @@ type
1091676 property ViewType: TGikoViewType read FViewType write FViewType;
1092677 property NameCookie: string read FNameCookie write FNameCookie;
1093678 property MailCookie: string read FMailCookie write FMailCookie;
679+ property ClickNode: TTreeNode read FClickNode write FClickNode;
680+ property TreeType: TGikoTreeType read FTreeType write FTreeType;
681+ property ActiveContent: TBrowserRecord read FActiveContent write FActiveContent;
682+ property ResRangeMenuSelect: Longint read FResRangeMenuSelect write FResRangeMenuSelect;
683+ property SelectResWord : string read FSelectResWord write FSelectResWord;
684+ property BrowserSizeWidth: Integer read FBrowserSizeWidth write FBrowserSizeWidth;
685+ property BrowserSizeHeight: Integer read FBrowserSizeHeight write FBrowserSizeHeight;
686+ property SearchDialog: TSearchDialog read FSearchDialog write FSearchDialog;
687+ property ToolBarSettingSender : TToolBarSettingSenderType
688+ read FToolBarSettingSender write FToolBarSettingSender;
689+ property ScreenCursor : TCursor read GetScreenCursor write SetScreenCursor;
690+ property SortIndex: Integer read FSortIndex write FSortIndex;
691+ property SortOrder: Boolean read FSortOrder write FSortOrder;
692+ property ActiveBBS : TBBS read FActiveBBS write FActiveBBS;
693+ property WorkCount: Integer read FWorkCount write FWorkCount;
1094694 procedure SetContent(inThread: TBrowserRecord);
1095695 function GetActiveContent: TThreadItem;
1096696 function GetActiveList: TObject;
697+
1097698 procedure SetListViewType(AViewType: TGikoViewType); overload;
1098699 procedure SetListViewType(AViewType: TGikoViewType; SelectText: string; KubetsuChk: Boolean); overload;
1099- procedure DownloadContent(ThreadItem: TThreadItem; ForceDownload: Boolean = False);
1100- procedure DownloadList(Board: TBoard; ForceDownload: Boolean = False);
1101700 procedure PlaySound(SoundEventName: string);
1102701 function AddHistory( FavItem: TFavoriteThreadItem ): Boolean;
1103- procedure DeleteHistory( threadItem: TThreadItem );
1104702 procedure ClearHistory;
1105703 procedure SaveHistory;
1106704 procedure LoadHistory;
@@ -1132,14 +730,63 @@ type
1132730 procedure IndividualAbon(Atag, Atype : Integer);
1133731 //IDƒAƒ“ƒJ[’ljÁ
1134732 procedure IDAnchorPopup(Abody :string);
733+ //ƒuƒ‰ƒEƒU‚̍ĕ`‰æ true:‘S‚Ẵ^ƒu false:ƒAƒNƒeƒBƒu‚ȃ^ƒu‚Ì‚Ý
734+ procedure RepaintAllTabsBrowser();
735+ //ƒŠƒ“ƒNƒo[Ý’è
736+ procedure SetLinkBar;
737+ procedure FavoriteBrowseFolder( node: TTreeNode );
738+ //ƒXƒŒƒbƒh‚̃_ƒEƒ“ƒ[ƒh
739+ procedure DownloadContent(ThreadItem: TThreadItem; ForceDownload: Boolean = False);
740+ //”‚̃_ƒEƒ“ƒ[ƒh
741+ procedure DownloadList(Board: TBoard; ForceDownload: Boolean = False);
742+ //—š—ð‚©‚çíœ
743+ procedure DeleteHistory( threadItem: TThreadItem );
744+ //ƒ^ƒu‚ðíœ
745+ procedure DeleteTab(ThreadItem: TThreadItem); overload;
746+ procedure DeleteTab(BrowserRecord: TBrowserRecord); overload;
747+ //Œ»Ý•\Ž¦‚µ‚Ä‚¢‚éƒXƒŒƒbƒh‚ðƒXƒNƒ[ƒ‹
748+ procedure BrowserMovement(const AName: string); overload;
749+ //Žw’肵‚½ƒuƒ‰ƒEƒU‚ðƒXƒNƒ[ƒ‹
750+ procedure BrowserMovement(const AName: string; BrowserRecord: TBrowserRecord); overload;
751+ //Application‚ÌMainForm‚ðŽæ“¾‚·‚é
752+ function GetMainForm(): TComponent;
753+ procedure SelectTreeNode(Item: TObject; CallEvent: Boolean);
754+ //! ƒ}ƒEƒXƒWƒFƒXƒ`ƒƒ[ŠJŽn
755+ procedure OnGestureStart(Sender: TObject);
756+ //! ƒ}ƒEƒXƒWƒFƒXƒ`ƒƒ[’†
757+ procedure OnGestureMove(Sender: TObject);
758+ //! ƒ}ƒEƒXƒWƒFƒXƒ`ƒƒ[I—¹
759+ procedure OnGestureEnd(Sender: TObject);
760+ /// ƒoƒ“ƒh•‚ðÄŒvŽZEÄÝ’è‚·‚é
761+ procedure ResetBandInfo( bar : TGikoCoolBar; band : TToolBar );
762+ //ƒXƒNƒŠ[ƒ“ã‚ÉEditorForm‚ª‚¢‚é‚©
763+ function EditorFormExists(): boolean;
764+ //ƒXƒNƒŠ[ƒ“ã‚É‚¢‚é‚·‚ׂĂÌEditorForm‚©‚ç–¼‘O—š—ð‚ðíœ‚·‚é
765+ procedure AllEditroFormNameTextClearClear();
766+ //ƒXƒNƒŠ[ƒ“ã‚É‚¢‚é‚·‚ׂĂÌEditorForm‚©‚烁[ƒ‹—š—ð‚ðíœ‚·‚é
767+ procedure AllEditroFormMailTextClearClear();
768+ //ListView‚Å‘I‘ð‚³‚ê‚Ä‚¢‚éƒAƒCƒeƒ€‚ðŽæ“¾‚·‚é
769+ procedure SelectListItem(List: TList);
770+ /// ƒ^ƒu•Û‘¶
771+ function SaveTabURLs : Boolean;
772+ /// ƒ^ƒu“ǂݏo‚µ
773+ function LoadTabURLs : Boolean;
774+ //Žw’肵‚½ƒŒƒX‚ðƒRƒs[‚·‚é
775+ procedure KonoresCopy(Number: Integer; ReplaceTag : Boolean);
776+ //
777+ procedure ModifySelectList;
778+ //
779+ procedure SetSelectItemRound(RoundFlag: Boolean; RoundName: string); overload;
780+ //
781+ procedure SetSelectItemRound(RoundFlag: Boolean; RoundName: string; ParentName: string); overload;
782+ //
783+ procedure SetSelectRoundName(Sender: TObject);
784+ //
785+ function GetCoolBand(CoolBar: TCoolBar; Control: TWinControl): TCoolBand;
786+ //
787+ function WebBrowserClick(Sender: TObject): WordBool;
1135788 published
1136789 property EnabledCloseButton: Boolean read FEnabledCloseButton write SetEnabledCloseButton;
1137- //TAction‚ÅGetActiveContent‚ªnilˆÈŠO‚Å—LŒø‚É‚È‚é
1138- procedure DependActiveCntentActionUpdate(Sender: TObject);
1139- //TAction‚ÅGetActiveContent‚ªnilˆÈŠO‚©‚ƒƒO‚ðŽ‚Á‚Ä‚¢‚é‚Æ—LŒø‚É‚È‚é
1140- procedure DependActiveCntentLogActionUpdate(Sender: TObject);
1141- //TAction‚ÅActiveList‚ªTBoard‚Å—LŒø‚É‚È‚é
1142- procedure DependActiveListTBoardActionUpdate(Sender: TObject);
1143790 //—áŠOˆ—‚³‚ê‚È‚©‚Á‚½—áŠO‚ðˆ—‚·‚é
1144791 procedure AppException(Sender: TObject; E: Exception);
1145792 end;
@@ -1188,9 +835,13 @@ var
1188835 implementation
1189836
1190837 uses
838+ GikoUtil, IndividualAbon, Math, Kotehan, KeySetting,
839+ YofUtils, ShellAPI, ToolBarUtil, ToolBarSetting,
840+ GikoXMLDoc, RoundName, IniFiles, FavoriteAdd,
841+ FavoriteArrange, AddressHistory, Preview, Gesture,
1191842 About, Option, Round, Splash, Sort, ListSelect, Imm,
1192843 NewBoard, MojuUtils, Clipbrd, GikoBayesian,Y_TextConverter,
1193- HTMLCreate;
844+ HTMLCreate, ListViewUtils, GikoDataModule;
1194845
1195846 const
1196847 CAPTION_NAME: string = 'ƒMƒRƒiƒr';
@@ -1200,23 +851,21 @@ const
1200851 //D&D臒l
1201852 DandD_THRESHOLD = 5; //D&D‚Ì臒lipixcel)
1202853 //ƒcƒŠ[EƒŠƒXƒgƒAƒCƒRƒ“
1203- ITEM_ICON_2CH1 = 0; //2chƒAƒCƒRƒ“
1204- ITEM_ICON_2CH2 = 1; //2chƒAƒCƒRƒ“
1205- ITEM_ICON_CATEGORY1 = 2; //ƒJƒeƒSƒŠƒAƒCƒRƒ“
1206- ITEM_ICON_CATEGORY2 = 3; //ƒJƒeƒSƒŠƒAƒCƒRƒ“
1207- ITEM_ICON_BOARD_NOSUBJECT = 3; //“ǂݍž‚Ü‚ê‚Ä‚¢‚È‚¢”ƒAƒCƒRƒ“
1208- ITEM_ICON_BOARD1 = 4; //”ƒAƒCƒRƒ“
1209- ITEM_ICON_BOARD2 = 5; //”ƒAƒCƒRƒ“
854+ //ITEM_ICON_CATEGORY1 = 2; //ƒJƒeƒSƒŠƒAƒCƒRƒ“
855+ //ITEM_ICON_CATEGORY2 = 3; //ƒJƒeƒSƒŠƒAƒCƒRƒ“
856+ //ITEM_ICON_BOARD_NOSUBJECT = 3; //“ǂݍž‚Ü‚ê‚Ä‚¢‚È‚¢”ƒAƒCƒRƒ“
857+ //ITEM_ICON_BOARD1 = 4; //”ƒAƒCƒRƒ“
858+ //ITEM_ICON_BOARD2 = 5; //”ƒAƒCƒRƒ“
1210859 ITEM_ICON_THREADLOG1 = 6; //ƒXƒŒƒAƒCƒRƒ“iƒƒO‚ ‚èj
1211860 ITEM_ICON_THREADLOG2 = 7; //ƒXƒŒƒAƒCƒRƒ“iƒƒO‚ ‚èj
1212- ITEM_ICON_THREAD1 = 8; //ƒXƒŒƒAƒCƒRƒ“iƒƒO‚È‚µj
1213- ITEM_ICON_THREAD2 = 9; //ƒXƒŒƒAƒCƒRƒ“iƒƒO‚È‚µj
1214- ITEM_ICON_THREADNEW1 = 10; //ƒXƒŒƒAƒCƒRƒ“iV’…j
1215- ITEM_ICON_THREADNEW2 = 11; //ƒXƒŒƒAƒCƒRƒ“iV’…j
861+ //ITEM_ICON_THREAD1 = 8; //ƒXƒŒƒAƒCƒRƒ“iƒƒO‚È‚µj
862+ //ITEM_ICON_THREAD2 = 9; //ƒXƒŒƒAƒCƒRƒ“iƒƒO‚È‚µj
863+ //ITEM_ICON_THREADNEW1 = 10; //ƒXƒŒƒAƒCƒRƒ“iV’…j
864+ //ITEM_ICON_THREADNEW2 = 11; //ƒXƒŒƒAƒCƒRƒ“iV’…j
1216865 ITEM_ICON_SORT1 = 12; //ƒ\[ƒgƒAƒCƒRƒ“
1217866 ITEM_ICON_SORT2 = 13; //ƒ\[ƒgƒAƒCƒRƒ“
1218- ITEM_ICON_BOARD_LOG = 17; //ƒXƒŒƒƒO‚ ‚蔃AƒCƒRƒ“
1219- ITEM_ICON_BOARD_NEW = 18; //ƒXƒŒV’…”ƒAƒCƒRƒ“
867+ //ITEM_ICON_BOARD_LOG = 17; //ƒXƒŒƒƒO‚ ‚蔃AƒCƒRƒ“
868+ //ITEM_ICON_BOARD_NEW = 18; //ƒXƒŒV’…”ƒAƒCƒRƒ“
1220869
1221870 //ƒc[ƒ‹ƒo[ƒAƒCƒRƒ“
1222871 TOOL_ICON_HEIGHT_MAX = 16; //‚‚³Å‘åƒAƒCƒRƒ“
@@ -1245,6 +894,12 @@ const
1245894 SELECTTIME_INTERBAL = 110;
1246895
1247896 BROWSER_COUNT = 5; //ƒuƒ‰ƒEƒU‚̐”
897+
898+ URL_GIKONAVI: string = 'http://gikonavi.sourceforge.jp/';
899+ URL_MONAZILLA: string = 'http://www.monazilla.org/';
900+ URL_2ch: string = 'http://www.2ch.net/';
901+ URL_Wiki: string = 'http://gikowiki.dyndns.info/index.php?FAQ';
902+
1248903 {$R *.DFM}
1249904
1250905 procedure TGikoForm.CreateParams(var Params: TCreateParams);
@@ -1339,13 +994,13 @@ begin
1339994 CabinetPanel.Width := GikoSys.Setting.CabinetWidth;
1340995
1341996 //ƒƒbƒZ[ƒWƒo[
1342- MsgBarVisibleAction.Checked := GikoSys.Setting.MessageBarVisible;
1343- MsgBarVisibleActionExecute(nil);
997+ GikoDM.MsgBarVisibleAction.Checked := GikoSys.Setting.MessageBarVisible;
998+ GikoDM.MsgBarVisibleActionExecute(nil);
1344999 MessagePanel.Height := GikoSys.Setting.MessegeBarHeight;
13451000
13461001 //ƒXƒe[ƒ^ƒXƒo[
1347- StatusBarVisibleAction.Checked := GikoSys.Setting.StatusBarVisible;
1348- StatusBarVisibleActionExecute(nil);
1002+ GikoDM.StatusBarVisibleAction.Checked := GikoSys.Setting.StatusBarVisible;
1003+ GikoDM.StatusBarVisibleActionExecute(nil);
13491004
13501005 //ƒtƒHƒ“ƒgEFÝ’è
13511006 TreeView.Items.BeginUpdate;
@@ -1379,7 +1034,7 @@ begin
13791034 ListView.Items.EndUpdate;
13801035 end;
13811036 //ViewNoButton.Down := GikoSys.Setting.ListViewNo;
1382- ListNumberVisibleAction.Checked := GikoSys.Setting.ListViewNo;
1037+ GikoDM.ListNumberVisibleAction.Checked := GikoSys.Setting.ListViewNo;
13831038
13841039 //ƒuƒ‰ƒEƒUƒ^ƒuƒtƒHƒ“ƒg
13851040 BrowserTab.Font.Name := GikoSys.Setting.BrowserTabFontName;
@@ -1463,8 +1118,8 @@ begin
14631118 FMailCookie := '';
14641119
14651120 //ƒXƒŒ‘S•”•\Ž¦ƒ{ƒ^ƒ“‚ð‰Ÿ‚³‚ꂽó‘Ô‚É‚·‚é
1466- AllItemAction.Checked := True;
1467- AllResAction.Checked := True;
1121+ GikoDM.AllItemAction.Checked := True;
1122+ GikoDM.AllResAction.Checked := True;
14681123
14691124 //ƒuƒ‰ƒEƒUƒTƒCƒY•ÏX‚̏‰Šú‰»
14701125 FBrowserSizeHeight := GikoSys.Setting.ListHeight;
@@ -1481,43 +1136,43 @@ begin
14811136 FavoriteDM.SetFavTreeView(FavoriteTreeView);
14821137 FavoriteDM.ReadFavorite;
14831138
1484- ArrangeAction.Checked := not (GikoSys.Setting.ListOrientation = gloVertical);
1485- ArrangeAction.Execute;
1139+ GikoDM.ArrangeAction.Checked := not (GikoSys.Setting.ListOrientation = gloVertical);
1140+ GikoDM.ArrangeAction.Execute;
14861141
14871142 if GikoSys.Setting.ListOrientation = gloHorizontal then begin
14881143 case GikoSys.Setting.ListWidthState of
14891144 glsMax: begin
14901145 ViewPanel.Width := 1;
1491- BrowserMaxAction.ImageIndex := TOOL_ICON_WIDTH_NORMAL;
1492- BrowserMinAction.ImageIndex := TOOL_ICON_WIDTH_MIN;
1146+ GikoDM.BrowserMaxAction.ImageIndex := TOOL_ICON_WIDTH_NORMAL;
1147+ GikoDM.BrowserMinAction.ImageIndex := TOOL_ICON_WIDTH_MIN;
14931148 end;
14941149 glsMin: begin
14951150 ViewPanel.Width := GikoSys.Setting.ListWidth;
1496- BrowserMaxAction.ImageIndex := TOOL_ICON_WIDTH_MAX;
1497- BrowserMinAction.ImageIndex := TOOL_ICON_WIDTH_NORMAL;
1151+ GikoDM.BrowserMaxAction.ImageIndex := TOOL_ICON_WIDTH_MAX;
1152+ GikoDM.BrowserMinAction.ImageIndex := TOOL_ICON_WIDTH_NORMAL;
14981153 end;
14991154 else begin
15001155 ViewPanel.Width := GikoSys.Setting.ListWidth;
1501- BrowserMaxAction.ImageIndex := TOOL_ICON_WIDTH_MAX;
1502- BrowserMinAction.ImageIndex := TOOL_ICON_WIDTH_MIN;
1156+ GikoDM.BrowserMaxAction.ImageIndex := TOOL_ICON_WIDTH_MAX;
1157+ GikoDM.BrowserMinAction.ImageIndex := TOOL_ICON_WIDTH_MIN;
15031158 end;
15041159 end;
15051160 end else begin
15061161 case GikoSys.Setting.ListHeightState of
15071162 glsMax: begin
15081163 ViewPanel.Height := 1;
1509- BrowserMaxAction.ImageIndex := TOOL_ICON_HEIGHT_NORMAL;
1510- BrowserMinAction.ImageIndex := TOOL_ICON_HEIGHT_MIN;
1164+ GikoDM.BrowserMaxAction.ImageIndex := TOOL_ICON_HEIGHT_NORMAL;
1165+ GikoDM.BrowserMinAction.ImageIndex := TOOL_ICON_HEIGHT_MIN;
15111166 end;
15121167 glsMin: begin
15131168 ViewPanel.Height := GikoSys.Setting.ListHeight;
1514- BrowserMaxAction.ImageIndex := TOOL_ICON_HEIGHT_MAX;
1515- BrowserMinAction.ImageIndex := TOOL_ICON_HEIGHT_NORMAL;
1169+ GikoDM.BrowserMaxAction.ImageIndex := TOOL_ICON_HEIGHT_MAX;
1170+ GikoDM.BrowserMinAction.ImageIndex := TOOL_ICON_HEIGHT_NORMAL;
15161171 end;
15171172 else begin
15181173 ViewPanel.Height := GikoSys.Setting.ListHeight;
1519- BrowserMaxAction.ImageIndex := TOOL_ICON_HEIGHT_MAX;
1520- BrowserMinAction.ImageIndex := TOOL_ICON_HEIGHT_MIN;
1174+ GikoDM.BrowserMaxAction.ImageIndex := TOOL_ICON_HEIGHT_MAX;
1175+ GikoDM.BrowserMinAction.ImageIndex := TOOL_ICON_HEIGHT_MIN;
15211176 end;
15221177 end;
15231178 end;
@@ -1551,9 +1206,9 @@ begin
15511206
15521207 MakeDefaultINIFile();
15531208 //ƒc[ƒ‹ƒ{ƒ^ƒ““ǂݍž‚Ý
1554- ReadToolBarSetting(ActionList, StdToolBar);
1555- ReadToolBarSetting(ActionList, ListToolBar);
1556- ReadToolBarSetting(ActionList, BrowserToolBar);
1209+ ReadToolBarSetting(GikoDM.GikoFormActionList, StdToolBar);
1210+ ReadToolBarSetting(GikoDM.GikoFormActionList, ListToolBar);
1211+ ReadToolBarSetting(GikoDM.GikoFormActionList, BrowserToolBar);
15571212 SetToolBarPopup;
15581213
15591214 //ListToolBar‚É‚¢‚é‚©‚à‚µ‚ê‚È‚¢iž‚ÝComboBox‚ð”z’u
@@ -1561,7 +1216,7 @@ begin
15611216 try
15621217 for i := ListToolBar.ControlCount - 1 downto 0 do
15631218 begin
1564- if ListToolBar.Controls[ i ].Action = SelectItemAction then
1219+ if ListToolBar.Controls[ i ].Action = GikoDM.SelectItemAction then
15651220 begin
15661221 SelectComboBoxPanel.Left := ListToolBar.Controls[ i ].Left;
15671222 SelectComboBoxPanel.Width := GikoSys.Setting.SelectComboBoxWidth;
@@ -1611,19 +1266,19 @@ begin
16111266 case GikoSys.ResRange of
16121267 Ord( grrAll ):
16131268 begin
1614- AllResAction.Execute;
1269+ GikoDM.AllResAction.Execute;
16151270 end;
16161271 Ord( grrSelect ):
16171272 begin
16181273 SelectComboBox.Text := SelectComboBox.Items[ 1 ];
1619- SelectResAction.Checked := True;
1274+ GikoDM.SelectResAction.Checked := True;
16201275 end;
16211276 else
16221277 // ResRangeAction.Execute;
16231278 case FResRangeMenuSelect of
1624- Ord( grrKoko ): OnlyKokoResAction.Checked := True;
1625- Ord( grrNew ): OnlyNewResAction.Checked := True;
1626- 100: OnlyAHundredResAction.Checked := True;
1279+ Ord( grrKoko ): GikoDM.OnlyKokoResAction.Checked := True;
1280+ Ord( grrNew ): GikoDM.OnlyNewResAction.Checked := True;
1281+ 100: GikoDM.OnlyAHundredResAction.Checked := True;
16271282 end;
16281283 end;
16291284
@@ -1632,17 +1287,17 @@ begin
16321287 case GikoSys.Setting.ThreadRange of
16331288 gtrAll:
16341289 begin
1635- AllItemAction.Checked := True;
1290+ GikoDM.AllItemAction.Checked := True;
16361291 ViewType := gvtAll;
16371292 end;
16381293 gtrLog:
16391294 begin
1640- LogItemAction.Checked := True;
1295+ GikoDM.LogItemAction.Checked := True;
16411296 ViewType := gvtLog;
16421297 end;
16431298 gtrNew:
16441299 begin
1645- NewItemAction.Checked := True;
1300+ GikoDM.NewItemAction.Checked := True;
16461301 ViewType := gvtNew;
16471302 end;
16481303 end;
@@ -1656,11 +1311,11 @@ begin
16561311 + '‚±‚ê‚©‚çAu‚Q‚¿‚á‚ñ‚Ë‚év‚̃AƒhƒŒƒXˆê——‚ðƒ_ƒEƒ“ƒ[ƒh‚µ‚Ü‚·' + #13#10
16571312 + 'ŽŸ‚ɏo‚Ä‚­‚é‰æ–ʂŁAuXVvƒ{ƒ^ƒ“‚ð‰Ÿ‚µ‚Ä‚­‚¾‚³‚¢B';
16581313 MsgBox(SplashWindow.Handle, msg, 'ƒMƒRƒiƒr', MB_OK or MB_ICONINFORMATION);
1659- NewBoardAction.Execute;
1314+ GikoDM.NewBoardAction.Execute;
16601315 end;
16611316
16621317 //ƒL[Ý’è“ǂݍž‚Ý
1663- GikoSys.LoadKeySetting(ActionList);
1318+ GikoSys.LoadKeySetting(GikoDM.GikoFormActionList);
16641319
16651320 //ÅI„‰ñŽžŠÔ
16661321 // FLastRoundTime := 0;
@@ -1668,27 +1323,28 @@ begin
16681323 //ResHint
16691324 FHint := TResPopup.Create(Self);
16701325
1326+ ListView.OnData := TListViewUtils.ListViewData;
1327+
16711328 // ÅŒã‚É‘I‘ð‚³‚ê‚½ƒLƒƒƒrƒlƒbƒg‚Ì•œŒ³
16721329 CabinetVisible( False );
16731330 if GikoSys.Setting.CabinetVisible then begin
16741331 i := CabinetSelectPopupMenu.Items.Count - 1;
16751332 if GikoSys.Setting.CabinetIndex = i - 1 then
1676- CabinetHistoryAction.Execute
1333+ GikoDM.CabinetHistoryAction.Execute
16771334 else if GikoSys.Setting.CabinetIndex = i then
1678- CabinetFavoriteAction.Execute
1335+ GikoDM.CabinetFavoriteAction.Execute
16791336 else begin
16801337 if GikoSys.Setting.CabinetIndex < Length( BBSs ) then
16811338 ShowBBSTree( BBSs[ GikoSys.Setting.CabinetIndex ] );
16821339 // ‹N“®Žž‚É•Û‘¶‚³‚ê‚Ä‚µ‚Ü‚¤‘΍ô 2
16831340 FIsIgnoreResize := rtResizing;
1684- CabinetBBSAction.Execute;
1341+ GikoDM.CabinetBBSAction.Execute;
16851342 end;
16861343 end else begin
16871344 ShowBBSTreeOld( BBSs[ 0 ] );
16881345 PostMessage( Handle, USER_TREECLICK, 0, 0 );
16891346 end;
16901347
1691-
16921348 //ˆø”‚ª‚ ‚Á‚½‚çƒXƒŒ‚ðŠJ‚­i–¢Žæ“¾‚È‚çƒ_ƒEƒ“ƒ[ƒhj
16931349 for i := 1 to ParamCount do begin
16941350 MoveToURL(ParamStr(i));
@@ -1713,7 +1369,7 @@ begin
17131369 // ƒ}ƒEƒXƒWƒFƒXƒ`ƒƒ[
17141370 MouseGesture := TMouseGesture.Create;
17151371 GikoSys.Setting.Gestures.LoadGesture(
1716- GikoSys.Setting.GetGestureFileName, ActionList );
1372+ GikoSys.Setting.GetGestureFileName, GikoDM.GikoFormActionList );
17171373 MouseGesture.Margin := GikoSys.Setting.Gestures.Margin;
17181374 MouseGesture.OnGestureStart := OnGestureStart;
17191375 MouseGesture.OnGestureMove := OnGestureMove;
@@ -1726,12 +1382,16 @@ begin
17261382
17271383 //ƒI[ƒgƒƒOƒCƒ“
17281384 if GikoSys.Setting.AutoLogin then
1729- LoginAction.Execute;
1385+ GikoDM.LoginAction.Execute;
17301386
1731- MuteAction.Checked := GikoSys.Setting.Mute;
1387+ GikoDM.MuteAction.Checked := GikoSys.Setting.Mute;
17321388
17331389 GikoSys.Setting.BeLogin := GikoSys.Setting.BeAutoLogin;
1734-// LockWindowUpdate(0);
1390+
1391+ //ƒLƒƒƒvƒVƒ‡ƒ“‚ªã‘‚«‚³‚ê‚Ä‚µ‚Ü‚¤‚̂ŁA‚±‚±‚ōĐݒè
1392+ FavoriteAddToolButton.Caption := '’ljÁ...';
1393+
1394+
17351395 end;
17361396
17371397 // CoolBar ‚̐ݒè‚ð•Ï”‚É•Û‘¶
@@ -1849,9 +1509,6 @@ begin
18491509 end;
18501510
18511511 end;
1852-
1853-//
1854-//
18551512 //
18561513 procedure TGikoForm.FormShow(Sender: TObject);
18571514 begin
@@ -1860,42 +1517,42 @@ begin
18601517
18611518 //FormCreate‚Å‚â‚é‚ƉŽ‹Ý’肪”½‰f‚³‚ê‚È‚¢ê‡‚ª‚ ‚é‚Ì‚ÅFormShow‚Å‚â‚邱‚Æ‚É‚µ‚½
18621519 //ƒc[ƒ‹ƒo[•\Ž¦
1863- StdToolBarVisibleAction.Checked := GikoSys.Setting.StdToolBarVisible;
1864- StdToolBarVisibleActionExecute( nil );
1865- AddressBarVisibleAction.Checked := GikoSys.Setting.AddressBarVisible;
1866- AddressBarVisibleActionExecute( nil );
1867- LinkBarVisibleAction.Checked := GikoSys.Setting.LinkBarVisible;
1868- LinkBarVisibleActionExecute( nil );
1869- ListToolBarVisibleAction.Checked := GikoSys.Setting.ListToolBarVisible;
1870- ListToolBarVisibleActionExecute( nil );
1871- ListNameBarVisibleAction.Checked := GikoSys.Setting.ListNameBarVisible;
1872- ListNameBarVisibleActionExecute( nil );
1873- BrowserToolBarVisibleAction.Checked := GikoSys.Setting.BrowserToolBarVisible;
1874- BrowserToolBarVisibleActionExecute( nil );
1875- BrowserNameBarVisibleAction.Checked := GikoSys.Setting.BrowserNameBarVisible;
1876- BrowserNameBarVisibleActionExecute( nil );
1520+ GikoDM.StdToolBarVisibleAction.Checked := GikoSys.Setting.StdToolBarVisible;
1521+ GikoDM.StdToolBarVisibleActionExecute( nil );
1522+ GikoDM.AddressBarVisibleAction.Checked := GikoSys.Setting.AddressBarVisible;
1523+ GikoDM.AddressBarVisibleActionExecute( nil );
1524+ GikoDM.LinkBarVisibleAction.Checked := GikoSys.Setting.LinkBarVisible;
1525+ GikoDM.LinkBarVisibleActionExecute( nil );
1526+ GikoDM.ListToolBarVisibleAction.Checked := GikoSys.Setting.ListToolBarVisible;
1527+ GikoDM.ListToolBarVisibleActionExecute( nil );
1528+ GikoDM.ListNameBarVisibleAction.Checked := GikoSys.Setting.ListNameBarVisible;
1529+ GikoDM.ListNameBarVisibleActionExecute( nil );
1530+ GikoDM.BrowserToolBarVisibleAction.Checked := GikoSys.Setting.BrowserToolBarVisible;
1531+ GikoDM.BrowserToolBarVisibleActionExecute( nil );
1532+ GikoDM.BrowserNameBarVisibleAction.Checked := GikoSys.Setting.BrowserNameBarVisible;
1533+ GikoDM.BrowserNameBarVisibleActionExecute( nil );
18771534
18781535 //ƒuƒ‰ƒEƒUƒ^ƒu
1879- BrowserTabVisibleAction.Checked := GikoSys.Setting.BrowserTabVisible;
1880- BrowserTabVisibleActionExecute(nil);
1536+ GikoDM.BrowserTabVisibleAction.Checked := GikoSys.Setting.BrowserTabVisible;
1537+ GikoDM.BrowserTabVisibleActionExecute(nil);
18811538
18821539 if GikoSys.Setting.BrowserTabPosition = gtpTop then begin
1883- BrowserTabTopAction.Checked := True;
1884- BrowserTabTopActionExecute(nil);
1540+ GikoDM.BrowserTabTopAction.Checked := True;
1541+ GikoDM.BrowserTabTopActionExecute(nil);
18851542 end else begin
1886- BrowserTabBottomAction.Checked := True;
1887- BrowserTabBottomActionExecute(nil);
1543+ GikoDM.BrowserTabBottomAction.Checked := True;
1544+ GikoDM.BrowserTabBottomActionExecute(nil);
18881545 end;
18891546
18901547 if GikoSys.Setting.BrowserTabStyle = gtsTab then begin
1891- BrowserTabTabStyleAction.Checked := True;
1892- BrowserTabTabStyleActionExecute(nil);
1548+ GikoDM.BrowserTabTabStyleAction.Checked := True;
1549+ GikoDM.BrowserTabTabStyleActionExecute(nil);
18931550 end else if GikoSys.Setting.BrowserTabStyle = gtsButton then begin
1894- BrowserTabButtonStyleAction.Checked := True;
1895- BrowserTabButtonStyleActionExecute(nil);
1551+ GikoDM.BrowserTabButtonStyleAction.Checked := True;
1552+ GikoDM.BrowserTabButtonStyleActionExecute(nil);
18961553 end else begin
1897- BrowserTabFlatStyleAction.Checked := True;
1898- BrowserTabFlatStyleActionExecute(nil);
1554+ GikoDM.BrowserTabFlatStyleAction.Checked := True;
1555+ GikoDM.BrowserTabFlatStyleActionExecute(nil);
18991556 end;
19001557
19011558 // ListView ‚̃wƒbƒ_ƒhƒ‰ƒbƒO
@@ -1911,7 +1568,7 @@ begin
19111568 //TabAutoLoad
19121569 //FormCrete‚©‚çˆÚ“®B
19131570 if GikoSys.Setting.TabAutoLoadSave then begin
1914- TabAutoLoadAction.Execute;
1571+ GikoDM.TabAutoLoadAction.Execute;
19151572 end;
19161573 //‚É‚¿‚á‚ñŒêˆÄ“àƒTƒ|[ƒg‹@”\
19171574 if GikoSys.Setting.GengoSupport then begin
@@ -1933,7 +1590,7 @@ begin
19331590 end else begin
19341591 CanClose := True;
19351592 if GikoSys.Setting.TabAutoLoadSave then begin
1936- TabAutoSaveAction.Execute;
1593+ GikoDM.TabAutoSaveAction.Execute;
19371594 end;
19381595 end;
19391596 { //2chŒ¾Œȩ̂²ÙFree
@@ -1941,7 +1598,6 @@ begin
19411598 GikoSys.Setting.Gengo.Free;
19421599 end;
19431600 }
1944- //Application.HookMainWindow(Hook);
19451601 Application.UnhookMainWindow(Hook);
19461602 Application.Terminate;
19471603 end;
@@ -1953,8 +1609,6 @@ var
19531609 wp : TWindowPlacement;
19541610 tmpBool : Boolean;
19551611 begin
1956-// Application.OnDeactivate := nil;
1957-// Self.OnDeactivate := nil;
19581612 // ƒ}ƒEƒXƒWƒFƒXƒ`ƒƒ[ŠJ•ú
19591613 try
19601614 MouseGesture.UnHook;
@@ -1975,11 +1629,11 @@ begin
19751629 GikoSys.Setting.WindowMax := WindowState = wsMaximized;
19761630
19771631 GikoSys.Setting.ListStyle := ListView.ViewStyle;
1978- GikoSys.Setting.CabinetVisible := CabinetVisibleAction.Checked;
1632+ GikoSys.Setting.CabinetVisible := GikoDM.CabinetVisibleAction.Checked;
19791633 GikoSys.Setting.CabinetWidth := CabinetPanel.Width;
19801634 GikoSys.Setting.ListHeight := FBrowserSizeHeight;
19811635 GikoSys.Setting.ListWidth := FBrowserSizeWidth;
1982- if ArrangeAction.Checked then
1636+ if GikoDM.ArrangeAction.Checked then
19831637 GikoSys.Setting.ListOrientation := gloVertical
19841638 else
19851639 GikoSys.Setting.ListOrientation := gloHorizontal;
@@ -2021,7 +1675,7 @@ begin
20211675 //ƒ^ƒuƒNƒ[ƒY
20221676 tmpBool := GikoSys.Setting.ShowDialogForAllTabClose;
20231677 GikoSys.Setting.ShowDialogForAllTabClose := false;
2024- AllTabCloseAction.Execute;
1678+ GikoDM.AllTabCloseAction.Execute;
20251679 GikoSys.Setting.ShowDialogForAllTabClose := tmpBool;
20261680 except
20271681 end;
@@ -2115,16 +1769,6 @@ begin
21151769 except
21161770 end;
21171771
2118- {
2119- try
2120- for i := Length( BoardPlugIns ) - 1 downto 0 do begin
2121- if BoardPlugIns[ i ] <> nil then
2122- BoardPlugIns[ i ].Free;
2123- BoardPlugIns[ i ] := nil;
2124- end;
2125- except
2126- end;
2127- }
21281772 try
21291773 if FEvent <> nil then
21301774 FEvent.Free;
@@ -2145,13 +1789,6 @@ begin
21451789 LockWindowUpdate(0);
21461790 end;
21471791
2148-//ƒLƒƒƒrƒlƒbƒg~ƒ{ƒ^ƒ“ƒNƒŠƒbƒN
2149-procedure TGikoForm.CabinetPanelHide(Sender: TObject);
2150-begin
2151- CabinetVisibleAction.Execute;
2152-// CabinetPanelVisible(false);
2153-end;
2154-
21551792 // ŠeŠ‚É‚ ‚éƒLƒƒƒrƒlƒbƒgE BBS ƒƒjƒ…[‚ðƒZƒbƒg^XV
21561793 procedure TGikoForm.SetBBSMenu;
21571794 var
@@ -2205,7 +1842,7 @@ begin
22051842 //ƒ^ƒuƒNƒ[ƒY
22061843 tmpBool := GikoSys.Setting.ShowDialogForAllTabClose;
22071844 GikoSys.Setting.ShowDialogForAllTabClose := false;
2208- AllTabCloseAction.Execute;
1845+ GikoDM.AllTabCloseAction.Execute;
22091846 GikoSys.Setting.ShowDialogForAllTabClose := tmpBool;
22101847
22111848 SetContent(BrowserNullTab);
@@ -2290,736 +1927,124 @@ begin
22901927
22911928 LockWindowUpdate(0);
22921929 //
2293- TabsOpenAction.Execute;
1930+ GikoDM.TabsOpenAction.Execute;
22941931 end;
22951932
2296-//ƒ{[ƒhƒcƒŠ[Ý’è
2297-procedure TGikoForm.SetBoardTreeNode(
2298- inBBS : TBBS
2299-);
1933+
1934+procedure TGikoForm.BrowserStatusTextChange(Sender: TObject; const Text: WideString);
23001935 var
2301- i, j, k: integer;
2302- Root: TTreeNode;
2303- CategoryNode: TTreeNode;
2304- BoardNode: TTreeNode;
2305- Category: TCategory;
2306- Board: TBoard;
1936+ p: TPoint;
1937+ s: string;
1938+ tmp2: string;
1939+ URL: string;
1940+ ATitle: Boolean;
1941+
1942+ threadItem : TThreadItem;
1943+ board : TBoard;
1944+ Protocol, Host, Path, Document, Port, Bookmark: string;
1945+
1946+ wkInt: Integer;
1947+ wkIntSt: Integer;
1948+ wkIntTo: Integer;
1949+ ActiveFileName: string;
1950+ e: IHTMLElement;
1951+ Ext: string;
1952+ PathRec: TPathRec;
23071953 begin
2308- // ”ƒŠƒXƒg‚̐ݒè
2309- FActiveBBS := inBBS;
2310- TreeView.Items.BeginUpdate;
2311- TreeView.Items.Clear;
1954+ if not( TObject(Sender) is TWebBrowser )then
1955+ Exit;
23121956 try
2313- if not inBBS.IsBoardFileRead then
2314- GikoSys.ReadBoardFile( inBBS );
23151957 try
2316- //if SplashWindow <> nil then
2317- //SplashWindow.ProgressBar.Max := inBBS.Count;
2318- // SplashWindow.ProgressBar.Max := inBBS.Count + Length(BBSs) * 20;
2319- except
2320- end;
2321-
2322- // ƒLƒƒƒrƒlƒbƒg•\Ž¦‘O‚ɍă\[ƒg
2323- if ( GikoSys.Setting.BBSSortIndex <> 0 ) or ( GikoSys.Setting.BBSSortOrder <> true ) then begin
2324- Sort.SortOrder := true;
2325- Sort.SortIndex := 0;
2326- Sort.SortNoFlag := true;
2327- inBBS.Sort(CategorySortProc);
2328- end;
2329-
2330- Root := TreeView.Items.Add( nil, inBBS.Title );
2331- Root.ImageIndex := ITEM_ICON_2CH1;
2332- Root.SelectedIndex := ITEM_ICON_2CH2;
2333- Root.Data := inBBS;
2334- for i := inBBS.Count - 1 downto 0 do begin
2335- Category := TCategory(inBBS.Items[i]);
2336- CategoryNode := TreeView.Items.AddChildFirst(Root, Category.Title);
2337- CategoryNode.Data := Category;
2338- CategoryNode.ImageIndex := ITEM_ICON_CATEGORY1;
2339- CategoryNode.SelectedIndex := ITEM_ICON_CATEGORY2;
2340-
2341- // ƒLƒƒƒrƒlƒbƒg•\Ž¦‘O‚ɍă\[ƒg
2342- if ( GikoSys.Setting.CategorySortIndex <> 0 ) or ( GikoSys.Setting.CategorySortOrder <> true ) then begin
2343- Sort.SortOrder := true;
2344- Sort.SortIndex := 0;
2345- Sort.SortNoFlag := true;
2346- Category.CustomSort(BoardSortProc);
2347- end;
2348-
2349- for j := Category.Count - 1 downto 0 do begin
2350- Board := TBoard(Category.Items[j]);
2351- Board.BeginUpdate;
2352- BoardNode := TreeView.Items.AddChildFirst(CategoryNode, Board.Title);
2353- BoardNode.Data := Board;
2354- //if (Board.LastGetTime = 0) or (Board.LastGetTime = ZERO_DATE) then begin
2355- if not Board.IsLogFile then begin
2356- BoardNode.ImageIndex := ITEM_ICON_BOARD_NOSUBJECT;
2357- BoardNode.SelectedIndex := ITEM_ICON_BOARD_NOSUBJECT;
2358- end else begin
2359- BoardNode.ImageIndex := ITEM_ICON_BOARD1;
2360- BoardNode.SelectedIndex := ITEM_ICON_BOARD2;
2361- for k := 0 to Board.Count - 1 do begin
2362- if Board.Items[ k ].IsLogFile then begin
2363- BoardNode.ImageIndex := ITEM_ICON_BOARD_LOG;
2364- BoardNode.SelectedIndex := ITEM_ICON_BOARD_LOG;
2365-
2366- Break;
2367- end;
2368- end;
1958+ if (TWebBrowser(Sender) <> nil) and (not TWebBrowser(Sender).Busy) and (Assigned(TWebBrowser(Sender).Document)) then begin
1959+ if LowerCase(OleVariant(IHTMLDocument2(TWebBrowser(Sender).Document)).charset) <> 'shift_jis' then begin
1960+ OleVariant(IHTMLDocument2(TWebBrowser(Sender).Document)).charset := 'shift_jis';
23691961 end;
2370- Board.EndUpdate;
23711962 end;
2372-
2373- CategoryNode.Expanded := Category.NodeExpand;
2374-
2375- //if SplashWindow <> nil then begin
2376- // SplashWindow.ProgressBar.StepIt;
2377- //Application.ProcessMessages;
2378- // SplashWindow.Update;
2379- //end;
1963+ except
23801964 end;
23811965 finally
2382- TreeView.Items.EndUpdate;
23831966 end;
2384-end;
2385-
2386-function TGikoForm.SetCategoryListItem(ABBS2ch: TBBS): Integer;
2387-var
2388- TitleColumn : TListColumn;
2389- ListColumn : TListColumn;
2390- i, id, idx : Integer;
2391-begin
2392- ListView.Items.BeginUpdate;
1967+ if PreviewTimer.Enabled then
1968+ PreviewTimer.Enabled := False;
1969+ Application.CancelHint;
23931970 try
2394- Screen.Cursor := crHourGlass;
1971+ if GetActiveContent <> nil then
1972+ ActiveFileName := ChangeFileExt(ExtractFileName(GetActiveContent.FileName), '')
1973+ else
1974+ ActiveFileName := '';
1975+ except
1976+ FActiveContent := nil;
1977+ Exit;
1978+ end;
23951979
2396- ListView.Columns.Clear;
2397- TitleColumn := ListView.Columns.Add;
2398- TitleColumn.Caption := GikoBBSColumnCaption[ Ord( gbbscTitle ) ];
2399- TitleColumn.Width := GikoSys.Setting.BBSColumnWidth[ Ord( gbbscTitle ) ];
2400- idx := 0;
2401- for i := 0 to GikoSys.Setting.BBSColumnOrder.Count - 1 do begin
2402- if GikoSys.Setting.BBSColumnOrder[ i ] = gbbscTitle then begin
2403- TitleColumn.Tag := i;
2404- idx := i;
2405- end else begin
2406- id := Ord( GikoSys.Setting.BBSColumnOrder[ i ] );
2407- if (Integer( Low( TGikoBBSColumnID ) ) <= id) and
2408- (id <= Integer( High( TGikoBBSColumnID ) )) then begin
2409- ListColumn := ListView.Columns.Add;
2410- // ListColumn.Tag := id;
2411- ListColumn.Tag := i;
2412- ListColumn.Caption := GikoBBSColumnCaption[ id ];
2413- ListColumn.Width := GikoSys.Setting.BBSColumnWidth[ id ];
2414- end;
2415- end;
2416- end;
2417- TitleColumn.Index := idx;
1980+ StatusBar.Panels[1].Text := Text;
24181981
2419- ListView.Items.Count := 0;
2420- ListView.Items.Clear;
2421- ListView.Items.Count := ABBS2ch.Count;
2422-
2423-// UpFolderAction.Enabled := False;
2424-// AllItemAction.Enabled := False;
2425-// LogItemAction.Enabled := False;
2426-// NewItemAction.Enabled := False;
2427-// SelectItemAction.Enabled := False;
2428-// ListDownloadToolButton.Enabled := False;
2429-// BoardReservToolButton.Enabled := False;
2430-// ListThreadDownloadToolButton.Enabled := False;
2431-
2432- ListNameLabel.Caption := ABBS2ch.Title;
2433- FolderImage.Picture := nil;
2434- ItemIcon16.GetBitmap(1, FolderImage.Picture.Bitmap);
2435-
2436- FSortIndex := GikoSys.Setting.BBSSortIndex;
2437- FSortOrder := GikoSys.Setting.BBSSortOrder;
2438- for i := ListView.Columns.Count - 1 downto 0 do begin
2439- idx := ListView.Column[ i ].Tag;
2440- if FSortIndex = Ord( GikoSys.Setting.BBSColumnOrder[ idx ] ) then
2441- ListViewSort( nil, ListView.Column[ i ] );
2442- end;
2443-
2444- Result := ABBS2ch.Count;
2445- finally
2446- Screen.Cursor := crDefault;
2447- ListView.Items.EndUpdate;
1982+ if FHint <> nil then begin
1983+ FHint.ReleaseHandle;
1984+ FHint.ClearAllRes;
24481985 end;
2449-end;
1986+ if FPreviewBrowser <> nil then
1987+ ShowWindow(FPreviewBrowser.Handle, SW_HIDE);
24501988
2451-function TGikoForm.SetBoardListItem(Category: TCategory): Integer;
2452-var
2453- TitleColumn : TListColumn;
2454- ListColumn : TListColumn;
2455- i, id, idx : Integer;
2456-begin
2457- ListView.Items.BeginUpdate;
2458- try
2459- Screen.Cursor := crHourGlass;
1989+ if not GikoSys.Setting.UnActivePopup then
1990+ if not GikoForm.Active then
1991+ Exit;
24601992
2461- ListView.Columns.Clear;
2462- TitleColumn := ListView.Columns.Add;
2463- TitleColumn.Caption := GikoCategoryColumnCaption[ Ord( gccTitle ) ];
2464- TitleColumn.Width := GikoSys.Setting.CategoryColumnWidth[ Ord( gccTitle ) ];
2465- idx := 0;
2466- for i := 0 to GikoSys.Setting.CategoryColumnOrder.Count - 1 do begin
2467- if GikoSys.Setting.CategoryColumnOrder[ i ] = gccTitle then begin
2468- TitleColumn.Tag := i;
2469- idx := i;
2470- end else begin
2471- id := Ord( GikoSys.Setting.CategoryColumnOrder[ i ] );
2472- if (Integer( Low( TGikoCategoryColumnID ) ) <= id) and
2473- (id <= Integer( High( TGikoCategoryColumnID ) )) then begin
2474- ListColumn := ListView.Columns.Add;
2475-// ListColumn.Tag := id;
2476- ListColumn.Tag := i;
2477- ListColumn.Caption := GikoCategoryColumnCaption[ id ];
2478- ListColumn.Width := GikoSys.Setting.CategoryColumnWidth[ id ];
1993+//file:///C:/Borland/Projects/gikoNavi/test/read.cgi/qa/990576336/10
1994+//file:///C:/Borland/Projects/gikoNavi/test/read.cgi/qa/990576336/10-15
1995+
1996+ s := '';
1997+ Ext := AnsiLowerCase(ExtractFileExt(Text));
1998+ if (Pos('http://', Text) = 1) and (GikoSys.Setting.PreviewVisible) and
1999+ ((Ext = '.jpg') or (Ext = '.jpeg') or (Ext = '.gif') or (Ext = '.png')) then begin
2000+ if FPreviewBrowser = nil then begin
2001+ FPreviewBrowser := TPreviewBrowser.Create(Self);
2002+ ShowWindow(FPreviewBrowser.Handle, SW_HIDE);
2003+ TOleControl(FPreviewBrowser).Parent := nil;
2004+ end;
2005+ FPreviewBrowser.Navigate(BLANK_HTML);//‘O‰ñ‚̃vƒŒƒrƒ…[‰æ‘œÁ‹Ž—p
2006+ FPreviewURL := Text;
2007+ PreviewTimer.Interval := GikoSys.Setting.PreviewWait;
2008+ PreviewTimer.Enabled := True;
2009+ end else if (Pos('about:blank', Text) = 1) or (Pos('http://', Text) = 1) or (Pos('mailto:', Text) = 1) then begin
2010+ if Pos('mailto:', Text) = 1 then begin
2011+ s := StringReplace(Text, 'mailto:', '', [rfIgnoreCase]);
2012+ //ƒMƒRƒiƒrƒXƒŒ ƒp[ƒg3‚Ì466Ž‚ÉŠ´ŽÓ
2013+ GetCursorPos(p);
2014+ p.x := p.x - TWebBrowser(Sender).ClientOrigin.x;
2015+ p.y := p.y - TWebBrowser(Sender).ClientOrigin.y;
2016+ e := IHTMLDocument2(TWebBrowser(Sender).Document).elementFromPoint(p.x, p.y);
2017+ if (Assigned(e)) then begin
2018+ tmp2 := ZenToHan(e.Get_outerText);
2019+ if (GikoSys.IsNumeric(tmp2)) then begin
2020+ //‚“‚̓ŒƒX”ԍ†‚Á‚Û‚¢‚Á‚·B
2021+ wkIntSt := StrToInt(tmp2);
2022+ wkIntTo := StrToInt(tmp2);
2023+ //s := GetThreadText(wkBBS, wkKey, wkIntSt, wkIntTo, False, False);
2024+ FHint.PopupType := gptThread;
2025+ HTMLCreater.SetResPopupText(FHint, GetActiveContent, wkIntSt, wkIntTo, False, False);
2026+ end else begin
2027+ FHint.PopupType := gptRaw;
2028+ FHint.Caption := s;
24792029 end;
24802030 end;
2481- end;
2482- TitleColumn.Index := idx;
2483-
2484- ListView.Items.Count := 0;
2485- ListView.Items.Clear;
2486- ListView.Items.Count := Category.Count;
2487-
2488- for i := Category.Count - 1 downto 0 do begin
2489- if( Category.Items[i].ParentCategory <> Category ) then begin
2490- Category.Items[i].ParentCategory := Category;
2491- Category.Items[i].No := i + 1;
2031+ end else begin
2032+ threadItem := GetActiveContent;
2033+ URL := THTMLCreate.GetRespopupURL(Text, threadItem.URL);
2034+ PathRec := Gikosys.Parse2chURL2(URL);
2035+ if (PathRec.FNoParam) then begin
2036+ PathRec.FSt := 1;
2037+ PathRec.FTo := 1;
2038+ end else begin
2039+ Gikosys.GetPopupResNumber(URL,PathRec.FSt,PathRec.FTo);
24922040 end;
2493- end;
2494-// UpFolderAction.Enabled := True;
2495-// AllItemAction.Enabled := False;
2496-// LogItemAction.Enabled := False;
2497-// NewItemAction.Enabled := False;
2498-// SelectItemAction.Enabled := False;
2499-// ListDownloadToolButton.Enabled := False;
2500-// BoardReservToolButton.Enabled := False;
2501-// ListThreadDownloadToolButton.Enabled := False;
2502-
2503- ListNameLabel.Caption := Category.Title;
2504- FolderImage.Picture := nil;
2505- ItemIcon16.GetBitmap(3, FolderImage.Picture.Bitmap);
2041+ GikoSys.ParseURI( URL, Protocol, Host, Path, Document, Port, Bookmark );
25062042
2507- FSortIndex := GikoSys.Setting.CategorySortIndex;
2508- FSortOrder := GikoSys.Setting.CategorySortOrder;
2509- for i := ListView.Columns.Count - 1 downto 0 do begin
2510- idx := ListView.Column[ i ].Tag;
2511- if FSortIndex = Ord( GikoSys.Setting.CategoryColumnOrder[ idx ] ) then
2512- ListViewSort( nil, ListView.Column[ i ] );
2513- end;
2043+ if PathRec.FDone or (not GikoSys.Is2chHost( Host )) then begin
25142044
2515- Result := Category.Count;
2516- finally
2517- Screen.Cursor := crDefault;
2518- ListView.Items.EndUpdate;
2519- end;
2520-end;
2521-
2522-function TGikoForm.SetThreadListItem(Board: TBoard): Integer;
2523-var
2524- TitleColumn : TListColumn;
2525- ListColumn : TListColumn;
2526- i, id, idx : Integer;
2527-begin
2528- ListView.Items.BeginUpdate;
2529- try
2530- Screen.Cursor := crHourGlass;
2531-
2532-{*
2533- // ƒ`ƒ‰‚‚«–hŽ~‚Ì‚½‚߁A•ÏX‚³‚ê‚Ä‚¢‚éê‡‚Ì‚Ý
2534- // ¦–¼Ì‚͈Ⴄ‚ªƒJƒ‰ƒ€”‚ª“¯‚¶A‚Æ‚¢‚Á‚½ê‡‚ɑΏˆ‚Å‚«‚È‚¢‚Ì‚Å’ˆÓ
2535- if ListView.Columns.Count <> GikoSys.Setting.BoardColumnOrder.Count then
2536-*}
2537- begin
2538- ListView.Columns.Clear;
2539- TitleColumn := ListView.Columns.Add;
2540- TitleColumn.Caption := GikoBoardColumnCaption[ Ord( gbcTitle ) ];
2541- TitleColumn.Width := GikoSys.Setting.BoardColumnWidth[ Ord( gbcTitle ) ];
2542- idx := 0;
2543- for i := 0 to GikoSys.Setting.BoardColumnOrder.Count - 1 do begin
2544- if GikoSys.Setting.BoardColumnOrder[ i ] = gbcTitle then begin
2545- TitleColumn.Tag := i;
2546- idx := i;
2547- end else begin
2548- id := Ord( GikoSys.Setting.BoardColumnOrder[ i ] );
2549- if (Integer( Low( TGikoBoardColumnID ) ) <= id) and
2550- (id <= Integer( High( TGikoBoardColumnID ) )) then begin
2551- ListColumn := ListView.Columns.Add;
2552- ListColumn.Caption := GikoBoardColumnCaption[ id ];
2553- // ListColumn.Tag := id;
2554- ListColumn.Tag := i;
2555- ListColumn.Width := GikoSys.Setting.BoardColumnWidth[ id ];
2556- ListColumn.Alignment := GikoBoardColumnAlignment[ id ];
2557- end;
2558- end;
2559- end;
2560- TitleColumn.Index := idx;
2561- end;
2562-
2563- ListView.Items.Count := 0;
2564- ListView.Items.Clear;
2565-
2566- {case GikoForm.ViewType of
2567- gvtAll: ListView.Items.Count := Board.Count;
2568- gvtLog: ListView.Items.Count := Board.GetLogThreadCount;
2569- gvtNew: ListView.Items.Count := Board.GetNewThreadCount;
2570- gvtUser: ListView.Items.Count := Board.GetUserThreadCount;
2571- end;
2572- }
2573- case GikoForm.ViewType of
2574- gvtAll: ListView.Items.Count := Board.Count;
2575- gvtLog:
2576- begin
2577- Board.LogThreadCount := Board.GetLogThreadCount;
2578- ListView.Items.Count := Board.LogThreadCount;
2579- end;
2580- gvtNew:
2581- begin
2582- Board.NewThreadCount := Board.GetNewThreadCount;
2583- ListView.Items.Count := Board.NewThreadCount;
2584- end;
2585- gvtUser:
2586- begin
2587- Board.UserThreadCount:= Board.GetUserThreadCount;
2588- ListView.Items.Count := Board.UserThreadCount;
2589- end;
2590- end;
2591-
2592- ListNameLabel.Caption := Board.Title;
2593- FolderImage.Picture := nil;
2594- ItemIcon16.GetBitmap(5, FolderImage.Picture.Bitmap);
2595-
2596- FSortIndex := GikoSys.Setting.BoardSortIndex;
2597- FSortOrder := GikoSys.Setting.BoardSortOrder;
2598- for i := ListView.Columns.Count - 1 downto 0 do begin
2599- idx := ListView.Column[ i ].Tag;
2600- if FSortIndex = Ord( GikoSys.Setting.BoardColumnOrder[ idx ] ) then
2601- ListViewSort( nil, ListView.Column[ i ] );
2602- end;
2603-
2604- Result := Board.Count;
2605- finally
2606- Screen.Cursor := crDefault;
2607- ListView.Items.EndUpdate;
2608- end;
2609-end;
2610-
2611-procedure TGikoForm.ListViewData(Sender: TObject; Item: TListItem);
2612-var
2613-// FileName: string;
2614-// DateTime: TDateTime;
2615- BoardCnt: Integer;
2616- BBS: TBBS;
2617- Category: TCategory;
2618- Board: TBoard;
2619- ThreadItem: TThreadItem;
2620- RepStr: string;
2621- ActivListObj : TObject;
2622- i, idx : Integer;
2623-begin
2624- ActivListObj := ActiveList;
2625- if ActivListObj is TBBS then begin
2626- //===== ƒJƒeƒSƒŠƒŠƒXƒg =====
2627- BBS := TBBS(ActivListObj);
2628-
2629- ListView.StateImages := nil;
2630-
2631- if (BBS = nil) or (BBS.Count <= 0) or (Item = nil)
2632- or (Item.Index >= BBS.Count) or (ListView.Items.Count = 0)
2633- or (not (BBS.Items[Item.index] is TCategory)) then Exit;
2634- //if BBS.Count <= 0 then Exit;
2635- //if Item = nil then Exit;
2636- //if Item.Index >= BBS.Count then Exit;
2637- //if ListView.Items.Count = 0 then Exit;
2638-
2639- //if not (BBS.Items[Item.index] is TCategory) then Exit;
2640- Category := TCategory(BBS.Items[Item.index]);
2641-
2642- if Category = nil then Exit;
2643-
2644- if ListNumberVisibleAction.Checked then
2645- Item.Caption := IntToStr(Category.No) + ': ' + Category.Title
2646- else
2647- Item.Caption := Category.Title;
2648-
2649- Item.ImageIndex := ITEM_ICON_CATEGORY1;
2650- Item.Data := Category;
2651-
2652- end else if ActivListObj is TCategory then begin
2653-
2654- //===== ”ƒŠƒXƒg =====
2655- Category := TCategory(ActivListObj);
2656-
2657- ListView.StateImages := nil;
2658-
2659- if (Category = nil) or (Category.Count <= 0) or (Item = nil)
2660- or (Item.Index >= Category.Count) or (ListView.Items.Count = 0)
2661- or (not (Category.Items[Item.Index] is TBoard)) then Exit;
2662- //if Category.Count <= 0 then Exit;
2663- //if Item = nil then Exit;
2664- //if Item.Index >= Category.Count then Exit;
2665- //if ListView.Items.Count = 0 then Exit;
2666-
2667- //if not (Category.Items[Item.Index] is TBoard) then Exit;
2668- Board := TBoard(Category.Items[Item.Index]);
2669-
2670- if Board = nil then Exit;
2671-
2672- if ListNumberVisibleAction.Checked then
2673- Item.Caption := IntToStr(Board.No) + ': ' + Board.Title
2674- //Item.Caption := IntToStr(Item.Index + 1) + ': ' + Board.Title
2675- else
2676- Item.Caption := Board.Title;
2677-
2678- if Item.SubItems.Count <> ListView.Columns.Count then begin
2679- Item.SubItems.Clear;
2680- Item.SubItems.Capacity := GikoSys.Setting.CategoryColumnOrder.Count;
2681- for i := GikoSys.Setting.CategoryColumnOrder.Count - 1 downto 1 do
2682- Item.SubItems.Add('');
2683- end;
2684-
2685- Item.ImageIndex := ITEM_ICON_BOARD1;
2686- idx := 0;
2687- for i := 0 to ListView.Columns.Count - 1 do begin
2688- if GikoSys.Setting.CategoryColumnOrder.Count <= i then
2689- Break;
2690-// case TGikoCategoryColumnID( ListView.Column[ i ].Tag ) of
2691- case GikoSys.Setting.CategoryColumnOrder[ i ] of
2692- gccTitle:
2693- // Item.Caption ‚Í SubItems ‚ÉŠÜ‚Ü‚ê–³‚¢‚Ì‚Å
2694- Dec( idx );
2695-
2696- gccRoundName:
2697- if Board.Round then
2698- Item.SubItems[ idx ] := Board.RoundName // '—\–ñ'
2699- else
2700- Item.SubItems[ idx ] := '';
2701-
2702- gccLastModified:
2703- if Board.RoundDate = ZERO_DATE then begin
2704- Item.SubItems[ idx ] := '';
2705- end else
2706- Item.SubItems[ idx ] := FormatDateTime('yyyy/mm/dd hh:mm:ss', Board.RoundDate);
2707- end;
2708- Inc( idx );
2709- end;
2710-
2711- Item.Data := Board;
2712-
2713- end else if ActivListObj is TBoard then begin
2714-
2715- //===== ƒXƒŒƒŠƒXƒg =====
2716- Board := TBoard(ActivListObj);
2717-
2718- if GikoSys.Setting.ListIconVisible then
2719- ListView.StateImages := StateIconImageList
2720- else
2721- ListView.StateImages := nil;
2722-
2723-
2724- case GikoForm.ViewType of
2725- gvtAll: BoardCnt := Board.Count;
2726- gvtLog: BoardCnt := Board.LogThreadCount;
2727- gvtNew: BoardCnt := Board.NewThreadCount;
2728- gvtUser: BoardCnt := Board.UserThreadCount;
2729- else
2730- BoardCnt := 0;
2731- end;
2732- {
2733- case GikoForm.ViewType of
2734- gvtAll: BoardCnt := Board.Count;
2735- gvtLog: BoardCnt := Board.GetLogThreadCount;
2736- gvtNew: BoardCnt := Board.GetNewThreadCount;
2737- gvtUser: BoardCnt := Board.GetUserThreadCount;
2738- else
2739- BoardCnt := 0;
2740- end;
2741- }
2742-// if Board = nil then Exit;
2743- if (BoardCnt <= 0) or (Item = nil) or (Item.Index > BoardCnt)
2744- or (ListView.Items.Count = 0) or (not (Board.Items[Item.Index] is TThreadItem)) then Exit;
2745-
2746- //‰ü‘P‚·‚ׂ«ƒuƒƒbƒN/////////////////////////////////////////////////////
2747- ThreadItem := nil;
2748- case GikoForm.ViewType of
2749- gvtAll: if Item.Index >= Board.Count then Exit else
2750- ThreadItem := TThreadItem(Board.Items[Item.Index]);
2751- gvtLog: ThreadItem := Board.GetLogThread(Item.Index);
2752- gvtNew: ThreadItem := Board.GetNewThread(Item.Index);
2753- gvtUser: ThreadItem := Board.GetUserThread(Item.Index);
2754- end;
2755- //////////////////////////////////////////////////////////////////////////
2756-
2757- if ThreadItem = nil then Exit;
2758-
2759- RepStr := CustomStringReplace(ThreadItem.Title, '&lt;', '<' );
2760- RepStr := CustomStringReplace(RepStr, '&gt;', '>' );
2761- RepStr := CustomStringReplace(RepStr, '&quot;', '"' );
2762- RepStr := CustomStringReplace(RepStr, '&amp;', '&' );
2763- //RepStr := StringReplace(RepStr, '—M', ',', [rfReplaceAll]);
2764- if Item.SubItems.Count <> ListView.Columns.Count then begin
2765- Item.SubItems.Clear;
2766- Item.SubItems.Capacity := GikoSys.Setting.BoardColumnOrder.Count;
2767- for i := GikoSys.Setting.BoardColumnOrder.Count - 1 downto 1 do
2768- Item.SubItems.Add('');
2769- end;
2770-
2771- if ListNumberVisibleAction.Checked then
2772- Item.Caption := IntToStr(ThreadItem.No) + ': ' + RepStr
2773- else
2774- Item.Caption := RepStr;
2775-
2776- case ThreadItem.AgeSage of
2777- gasNone: Item.StateIndex := -1;
2778- gasNew: Item.StateIndex := 0;
2779- gasAge: Item.StateIndex := 1;
2780- gasSage: Item.StateIndex := 2;
2781- end;
2782-
2783- if ThreadItem.IsLogFile then begin
2784- idx := 0;
2785- for i := 0 to ListView.Columns.Count - 1 do begin
2786- if GikoSys.Setting.BoardColumnOrder.Count <= i then
2787- Break;
2788-// case TGikoBoardColumnID( ListView.Column[ i ].Tag ) of
2789- case GikoSys.Setting.BoardColumnOrder[ i ] of
2790- gbcTitle:
2791- // Item.Caption ‚Í SubItems ‚ÉŠÜ‚Ü‚ê–³‚¢‚Ì‚Å
2792- Dec( idx );
2793-
2794- gbcAllCount:
2795- Item.SubItems[ idx ] := IntToStr(ThreadItem.AllResCount);
2796-
2797- gbcLocalCount:
2798- Item.SubItems[ idx ] := IntToStr(ThreadItem.Count);
2799-
2800- gbcNonAcqCount:
2801- Item.SubItems[ idx ] := IntToStr(ThreadItem.AllResCount - ThreadItem.Count);
2802-
2803- gbcNewCount:
2804- if ThreadItem.NewResCount = 0 then
2805- Item.SubItems[ idx ] := ''
2806- else
2807- Item.SubItems[ idx ] := IntToStr(ThreadItem.NewResCount);
2808-
2809- gbcUnReadCount:
2810- Item.SubItems[ idx ] := '';
2811-
2812- gbcRoundName:
2813- if ThreadItem.Round then
2814- Item.SubItems[ idx ] := ThreadItem.RoundName
2815- else
2816- Item.SubItems[ idx ] := '';
2817-
2818- gbcRoundDate://gbcLastModified:
2819- if (ThreadItem.RoundDate = ZERO_DATE) then begin
2820- Item.SubItems[ idx ] := '';
2821- end else
2822- Item.SubItems[ idx ] := FormatDateTime('yyyy/mm/dd hh:mm:ss', ThreadItem.RoundDate);
2823-
2824- gbcCreated:
2825- if ThreadItem.CreateDate = ZERO_DATE then begin
2826- Item.SubItems[ idx ] := '';
2827- end else
2828- Item.SubItems[ idx ] := FormatDateTime('yyyy/mm/dd hh:mm:ss', ThreadItem.CreateDate);
2829-
2830- gbcLastModified:
2831- if (ThreadItem.LastModified = ZERO_DATE) then begin
2832- Item.SubItems[ idx ] := '';
2833- end else
2834- Item.SubItems[ idx ] := FormatDateTime('yyyy/mm/dd hh:mm:ss', ThreadItem.LastModified);
2835-
2836-
2837- end;
2838- Inc( idx );
2839- end;
2840-
2841- if ThreadItem.NewArrival then
2842- Item.ImageIndex := ITEM_ICON_THREADNEW1
2843- else
2844- Item.ImageIndex := ITEM_ICON_THREADLOG1;
2845-
2846-
2847- end else begin
2848- idx := 0;
2849- for i := 0 to GikoSys.Setting.BoardColumnOrder.Count - 1 do begin
2850-// case TGikoBoardColumnID( ListView.Column[ i ].Tag ) of
2851- case GikoSys.Setting.BoardColumnOrder[ i ] of
2852- gbcTitle:
2853- // Item.Caption ‚Í SubItems ‚ÉŠÜ‚Ü‚ê–³‚¢‚Ì‚Å
2854- Dec( idx );
2855-
2856- gbcAllCount:
2857- Item.SubItems[ idx ] := IntToStr(ThreadItem.AllResCount);
2858-
2859- gbcRoundDate://gbcLastModified:
2860- Item.SubItems[ idx ] := '';
2861-
2862- gbcCreated:
2863- if ThreadItem.CreateDate = ZERO_DATE then begin
2864- Item.SubItems[ idx ] := '';
2865- end else
2866- Item.SubItems[ idx ] := FormatDateTime('yyyy/mm/dd hh:mm:ss', ThreadItem.CreateDate);
2867-
2868- gbcLastModified:
2869- Item.SubItems[ idx ] := '';
2870-
2871- else
2872- Item.SubItems[ idx ] := '';
2873- end;
2874- Inc( idx );
2875- end;
2876- if ThreadItem.NewArrival then
2877- Item.ImageIndex := ITEM_ICON_THREADNEW1
2878- else
2879- Item.ImageIndex := ITEM_ICON_THREAD1;
2880- end;
2881-
2882- Item.Data := ThreadItem;
2883-
2884- end;
2885-end;
2886-
2887-procedure TGikoForm.ListViewDataFind(Sender: TObject; Find: TItemFind;
2888- const FindString: String; const FindPosition: TPoint; FindData: Pointer;
2889- StartIndex: Integer; Direction: TSearchDirection; Wrap: Boolean;
2890- var Index: Integer);
2891-begin
2892-
2893-//
2894-end;
2895-
2896-procedure TGikoForm.ListViewDataHint(Sender: TObject; StartIndex,
2897- EndIndex: Integer);
2898-begin
2899-//
2900-end;
2901-
2902-procedure TGikoForm.ListViewDataStateChange(Sender: TObject; StartIndex,
2903- EndIndex: Integer; OldState, NewState: TItemStates);
2904-begin
2905-//
2906-end;
2907-
2908-procedure TGikoForm.BrowserStatusTextChange(Sender: TObject; const Text: WideString);
2909-var
2910- p: TPoint;
2911- s: string;
2912- tmp2: string;
2913- URL: string;
2914- ATitle: Boolean;
2915-
2916- threadItem : TThreadItem;
2917- board : TBoard;
2918- Protocol, Host, Path, Document, Port, Bookmark: string;
2919-
2920- wkInt: Integer;
2921- wkIntSt: Integer;
2922- wkIntTo: Integer;
2923- ActiveFileName: string;
2924- e: IHTMLElement;
2925- Ext: string;
2926-// buf, buf2: string;
2927- PathRec: TPathRec;
2928-begin
2929- if not( TObject(Sender) is TWebBrowser )then
2930- Exit;
2931- try
2932- try
2933- if (TWebBrowser(Sender) <> nil) and (not TWebBrowser(Sender).Busy) and (Assigned(TWebBrowser(Sender).Document)) then begin
2934- if LowerCase(OleVariant(IHTMLDocument2(TWebBrowser(Sender).Document)).charset) <> 'shift_jis' then begin
2935- OleVariant(IHTMLDocument2(TWebBrowser(Sender).Document)).charset := 'shift_jis';
2936- end;
2937- end;
2938- except
2939- end;
2940- finally
2941- end;
2942- if PreviewTimer.Enabled then
2943- PreviewTimer.Enabled := False;
2944- Application.CancelHint;
2945- try
2946- if GetActiveContent <> nil then
2947- ActiveFileName := ChangeFileExt(ExtractFileName(GetActiveContent.FileName), '')
2948- else
2949- ActiveFileName := '';
2950- except
2951- FActiveContent := nil;
2952- Exit;
2953- end;
2954-
2955- StatusBar.Panels[1].Text := Text;
2956-
2957- if FHint <> nil then begin
2958- FHint.ReleaseHandle;
2959- FHint.ClearAllRes;
2960- end;
2961- if FPreviewBrowser <> nil then
2962- ShowWindow(FPreviewBrowser.Handle, SW_HIDE);
2963-
2964- if not GikoSys.Setting.UnActivePopup then
2965- if not GikoForm.Active then
2966- Exit;
2967-
2968-//file:///C:/Borland/Projects/gikoNavi/test/read.cgi/qa/990576336/10
2969-//file:///C:/Borland/Projects/gikoNavi/test/read.cgi/qa/990576336/10-15
2970-
2971- s := '';
2972- Ext := AnsiLowerCase(ExtractFileExt(Text));
2973- if (Pos('http://', Text) = 1) and (GikoSys.Setting.PreviewVisible) and
2974- ((Ext = '.jpg') or (Ext = '.jpeg') or (Ext = '.gif') or (Ext = '.png')) then begin
2975- if FPreviewBrowser = nil then begin
2976- FPreviewBrowser := TPreviewBrowser.Create(Self);
2977- ShowWindow(FPreviewBrowser.Handle, SW_HIDE);
2978- TOleControl(FPreviewBrowser).Parent := nil;
2979- end;
2980- FPreviewBrowser.Navigate(BLANK_HTML);//‘O‰ñ‚̃vƒŒƒrƒ…[‰æ‘œÁ‹Ž—p
2981- FPreviewURL := Text;
2982- PreviewTimer.Interval := GikoSys.Setting.PreviewWait;
2983- PreviewTimer.Enabled := True;
2984- end else if (Pos('about:blank', Text) = 1) or (Pos('http://', Text) = 1) or (Pos('mailto:', Text) = 1) then begin
2985- if Pos('mailto:', Text) = 1 then begin
2986- s := StringReplace(Text, 'mailto:', '', [rfIgnoreCase]);
2987- //ƒMƒRƒiƒrƒXƒŒ ƒp[ƒg3‚Ì466Ž‚ÉŠ´ŽÓ
2988- GetCursorPos(p);
2989- p.x := p.x - TWebBrowser(Sender).ClientOrigin.x;
2990- p.y := p.y - TWebBrowser(Sender).ClientOrigin.y;
2991- e := IHTMLDocument2(TWebBrowser(Sender).Document).elementFromPoint(p.x, p.y);
2992- if (Assigned(e)) then begin
2993- tmp2 := ZenToHan(e.Get_outerText);
2994- if (GikoSys.IsNumeric(tmp2)) then begin
2995- //‚“‚̓ŒƒX”ԍ†‚Á‚Û‚¢‚Á‚·B
2996- wkIntSt := StrToInt(tmp2);
2997- wkIntTo := StrToInt(tmp2);
2998- //s := GetThreadText(wkBBS, wkKey, wkIntSt, wkIntTo, False, False);
2999- FHint.PopupType := gptThread;
3000- SetResPopupText(GetActiveContent, wkIntSt, wkIntTo, False, False);
3001- end else begin
3002- FHint.PopupType := gptRaw;
3003- FHint.Caption := s;
3004- end;
3005- end;
3006- end else begin
3007- threadItem := GetActiveContent;
3008- URL := GetRespopupURL(Text, threadItem.URL);
3009- PathRec := Gikosys.Parse2chURL2(URL);
3010- if (PathRec.FNoParam) then begin
3011- PathRec.FSt := 1;
3012- PathRec.FTo := 1;
3013- end else begin
3014- Gikosys.GetPopupResNumber(URL,PathRec.FSt,PathRec.FTo);
3015- end;
3016- GikoSys.ParseURI( URL, Protocol, Host, Path, Document, Port, Bookmark );
3017-
3018- if PathRec.FDone or (not GikoSys.Is2chHost( Host )) then begin
3019-
3020- URL := GikoSys.GetBrowsableThreadURL( URL );
3021- wkIntSt := PathRec.FSt;
3022- wkIntTo := PathRec.FTo;
2045+ URL := GikoSys.GetBrowsableThreadURL( URL );
2046+ wkIntSt := PathRec.FSt;
2047+ wkIntTo := PathRec.FTo;
30232048
30242049 if (wkIntSt = 0) and (wkIntTo = 0) then begin
30252050 wkIntSt := 1;
@@ -3057,13 +2082,11 @@ begin
30572082 wkIntTo := 1;
30582083 end;
30592084 FHint.PopupType := gptThread;
3060- SetResPopupText( threadItem, wkIntSt, wkIntTo, ATitle, PathRec.FFirst );
2085+ HTMLCreater.SetResPopupText(FHint, threadItem, wkIntSt, wkIntTo, ATitle, PathRec.FFirst );
30612086 end;
30622087 end;
30632088 end;
30642089
3065- //if s <> '' then
3066- // ShowTextPopup(s);
30672090 if FHint.PopupType = gptRaw then begin
30682091 if FHint.Caption <> '' then
30692092 ShowTextPopup;
@@ -3077,22 +2100,17 @@ end;
30772100 procedure TGikoForm.SetEnabledCloseButton(Enabled: Boolean);
30782101 var
30792102 SysMenu: HMenu;
3080- //SysMenuApp: HMenu;
30812103 begin
30822104 FEnabledCloseButton := Enabled;
30832105 SysMenu := GetSystemMenu(Handle, False);
3084- //SysMenuApp := GetSystemMenu(Application.Handle, False);
30852106
30862107 if Enabled then begin
30872108 EnableMenuItem(SysMenu, SC_CLOSE, MF_BYCOMMAND or MF_ENABLED);
3088- //EnableMenuItem(SysMenuApp, SC_CLOSE, MF_BYCOMMAND or MF_ENABLED);
30892109 end else begin
30902110 EnableMenuItem(SysMenu, SC_CLOSE, MF_BYCOMMAND or MF_GRAYED);
3091- //EnableMenuItem(SysMenuApp, SC_CLOSE, MF_BYCOMMAND or MF_GRAYED);
30922111 end;
30932112
30942113 DrawMenuBar(Handle);
3095- //DrawMenuBar(Application.Handle);
30962114 end;
30972115
30982116 procedure TGikoForm.TreeViewChanging(Sender: TObject; Node: TTreeNode;
@@ -3152,57 +2170,13 @@ begin
31522170 Result := FHttpState;
31532171 end;
31542172
3155-{!
3156-\brief ListView ‚Ì Column ‚ð^‚̃Jƒ‰ƒ€‚É•ÏŠ·
3157-
3158-Delphi 6 Personal ‚Å‚Ì ListView ‚Å‚Í ListViewColumnClick ƒCƒxƒ“ƒg‚Å
3159-³‚µ‚¢ƒJƒ‰ƒ€‚ª“n‚³‚ê‚È‚¢‚½‚߁A³‚µ‚¢ƒJƒ‰ƒ€‚É•ÏŠ·‚µ‚Ü‚·B
3160-}
3161-function TGikoForm.ActiveListTrueColumn( column : TListColumn ) : TListColumn;
3162-{*
3163-var
3164- i, idx : Integer;
3165- orderList : TList;
3166-*}
3167-begin
3168-
3169- // ³‚µ‚­•ÏŠ·‚·‚é•û–@‚ª•ª‚©‚ç‚È‚¢‚Ì‚Å•Û—¯
3170- Result := column;
3171- Exit;
3172-{*
3173- Result := column;
3174-
3175- if TObject( FActiveList ) is TBBS then
3176- orderList := GikoSys.Setting.BBSColumnOrder
3177- else if TObject( FActiveList ) is TCategory then
3178- orderList := GikoSys.Setting.CategoryColumnOrder
3179- else if TObject( FActiveList ) is TBoard then
3180- orderList := GikoSys.Setting.BoardColumnOrder
3181- else
3182- Exit;
3183-
3184- idx := column.Tag;
3185-
3186- for i := 0 to ListView.Columns.Count - 1 do begin
3187- if Integer( orderList[ ListView.Column[ i ].Tag ] ) = 0 then begin
3188- if idx = 0 then
3189- Result := ListView.Column[ i ]
3190- else if idx <= i then
3191- Result := ListView.Column[ idx - 1 ];
3192- Exit;
3193- end;
3194- end;
3195-*}
3196-
3197-end;
3198-
31992173 procedure TGikoForm.ListViewColumnClick(Sender: TObject;
32002174 Column: TListColumn);
32012175 var
32022176 id, idx : Integer;
32032177 orderList : TList;
32042178 begin
3205- idx := ActiveListTrueColumn( Column ).Tag;
2179+ idx := TListViewUtils.ActiveListTrueColumn( Column ).Tag;
32062180
32072181 if TObject( FActiveList ) is TBBS then
32082182 orderList := GikoSys.Setting.BBSColumnOrder
@@ -3221,69 +2195,7 @@ begin
32212195 FSortOrder := id = 0;
32222196 end;
32232197
3224- ListViewSort(Sender, Column);
3225-end;
3226-
3227-procedure TGikoForm.ListViewSort(Sender: TObject; Column: TListColumn);
3228-var
3229- i, id, idx : Integer;
3230- orderList : TList;
3231- wkBBS: TBBS;
3232- wkCategory: TCategory;
3233- wkBoard: TBoard;
3234-begin
3235- idx := ActiveListTrueColumn( Column ).Tag;
3236-
3237- for i := 0 to ListView.Columns.Count - 1 do begin
3238- ListView.Column[i].ImageIndex := -1;
3239- end;
3240-
3241- if FSortOrder then
3242- ListView.Column[ idx ].ImageIndex := ITEM_ICON_SORT1
3243- else
3244- ListView.Column[ idx ].ImageIndex := ITEM_ICON_SORT2;
3245-
3246- Sort.SortNoFlag := ListNumberVisibleAction.Checked;
3247-
3248- //if TObject(TreeView.Selected.Data) is TBBS then begin
3249- if TObject( FActiveList ) is TBBS then begin
3250- //wkBBS := TBBS(TreeView.Selected.Data);
3251- wkBBS := TBBS( FActiveList );
3252- orderList := GikoSys.Setting.BBSColumnOrder;
3253- id := Integer( orderList[ idx ] );
3254- Sort.SortOrder := FSortOrder;
3255- Sort.SortIndex := id;
3256- GikoSys.Setting.BBSSortIndex := id;
3257- GikoSys.Setting.BBSSortOrder := FSortOrder;
3258- wkBBS.Sort(CategorySortProc);
3259- //end else if TObject(TreeView.Selected.Data) is TCategory then begin
3260- end else if TObject( FActiveList ) is TCategory then begin
3261- //wkCategory := TCategory(TreeView.Selected.Data);
3262- wkCategory := TCategory( FActiveList );
3263- orderList := GikoSys.Setting.CategoryColumnOrder;
3264- id := Integer( orderList[ idx ] );
3265- Sort.SortOrder := FSortOrder;
3266- Sort.SortIndex := id;
3267- GikoSys.Setting.CategorySortIndex := id;
3268- GikoSys.Setting.CategorySortOrder := FSortOrder;
3269- wkCategory.CustomSort(BoardSortProc);
3270- //end else if TObject(TreeView.Selected.Data) is TBoard then begin
3271- end else if TObject( FActiveList ) is TBoard then begin
3272- //wkBoard := TBoard(TreeView.Selected.Data);
3273- wkBoard := TBoard( FActiveList );
3274- orderList := GikoSys.Setting.BoardColumnOrder;
3275- id := Integer( orderList[ idx ] );
3276- Sort.SortOrder := FSortOrder;
3277- Sort.SortIndex := id;
3278- GikoSys.Setting.BoardSortIndex := id;
3279- GikoSys.Setting.BoardSortOrder := FSortOrder;
3280- wkBoard.CustomSort(ThreadItemSortProc);
3281- end else begin
3282- id := 0;
3283- end;
3284-
3285- ListView.Refresh;
3286- FSortIndex := id;
2198+ TListViewUtils.ListViewSort(Sender, ListView, Column, GikoDM.ListNumberVisibleAction.Checked, FSortOrder, FSortIndex );
32872199 end;
32882200
32892201 procedure TGikoForm.MenuToolBarCustomDrawButton(Sender: TToolBar;
@@ -4039,12 +2951,20 @@ begin
40392951
40402952 // ActiveListColumnSave;
40412953
4042- if Obj is TBBS then begin
4043- SetCategoryListItem(TBBS(Obj));
4044- end else if Obj is TCategory then begin
4045- SetBoardListItem(TCategory(Obj));
4046- end else if Obj is TBoard then begin
4047- SetThreadListItem(TBoard(Obj));
2954+ Screen.Cursor := crHourGlass;
2955+ try
2956+ if Obj is TBBS then begin
2957+ TListViewUtils.SetCategoryListItem(TBBS(obj), ListView, GikoDM.ListNumberVisibleAction.Checked,
2958+ FSortIndex, FSortOrder);
2959+ end else if Obj is TCategory then begin
2960+ TListViewUtils.SetBoardListItem(TCategory(Obj), ListView, GikoDM.ListNumberVisibleAction.Checked,
2961+ FSortIndex, FSortOrder);
2962+ end else if Obj is TBoard then begin
2963+ TListViewUtils.SetThreadListItem(TBoard(Obj), ListView, GikoDM.ListNumberVisibleAction.Checked,
2964+ FSortIndex, FSortOrder);
2965+ end;
2966+ finally
2967+ Screen.Cursor := crDefault;
40482968 end;
40492969
40502970 if idx >= 0 then begin
@@ -4089,8 +3009,6 @@ begin
40893009 end;
40903010
40913011 SetActiveList(Board);
4092- //
4093- //SetThreadListItem(Board); //SetActiveList“à‚ŌĂ΂ê‚é‚©‚ç2d‚ɌĂяo‚·•K—v‚È‚µ
40943012 end;
40953013 end;
40963014
@@ -4414,13 +3332,14 @@ begin
44143332 end;
44153333 CabinetSelectToolButton.Caption := inBBS.Title;
44163334
4417- CabinetHistoryAction.Checked := False;
4418- CabinetFavoriteAction.Checked := False;
3335+ GikoDM.CabinetHistoryAction.Checked := False;
3336+ GikoDM.CabinetFavoriteAction.Checked := False;
44193337
44203338 if (FTreeType <> gtt2ch) or (FActiveBBS <> inBBS) then begin
44213339 FTreeType := gtt2ch;
44223340 HistoryToolBar.Hide;
4423- SetBoardTreeNode( inBBS );
3341+ FActiveBBS := inBBS;
3342+ TListViewUtils.SetBoardTreeNode(inBBS, TreeView);
44243343 TreeView.Items.GetFirstNode.Expanded := True; //?c???[?g?b?v???????J??
44253344 //?c???[??g?b?v?????I????
44263345 if GetActiveList = nil then
@@ -4471,13 +3390,14 @@ begin
44713390 end;
44723391 CabinetSelectToolButton.Caption := inBBS.Title;
44733392
4474- CabinetHistoryAction.Checked := False;
4475- CabinetFavoriteAction.Checked := False;
3393+ GikoDM.CabinetHistoryAction.Checked := False;
3394+ GikoDM.CabinetFavoriteAction.Checked := False;
44763395
44773396 if (FTreeType <> gtt2ch) or (FActiveBBS <> inBBS) then begin
44783397 FTreeType := gtt2ch;
44793398 HistoryToolBar.Hide;
4480- SetBoardTreeNode( inBBS );
3399+ FActiveBBS := inBBS;
3400+ TListViewUtils.SetBoardTreeNode(inBBS, TreeView);
44813401 TreeView.Items.GetFirstNode.Expanded := True; //ƒcƒŠ[ƒgƒbƒv€–Ú‚¾‚¯‚ðŠJ‚­
44823402 //ƒcƒŠ[‚̃gƒbƒv€–Ú‚ð‘I‘ð‚·‚é
44833403 if GetActiveList = nil then begin
@@ -4508,13 +3428,13 @@ begin
45083428 if CabinetPanel.Visible then begin
45093429 if FTreeType = gttHistory then begin
45103430 CabinetVisible( False );
4511- CabinetHistoryAction.Checked := False;
3431+ GikoDM.CabinetHistoryAction.Checked := False;
45123432 end else begin
4513- CabinetHistoryAction.Checked := True;
3433+ GikoDM.CabinetHistoryAction.Checked := True;
45143434 end;
45153435 end else begin
4516- CabinetVisible( True );
4517- CabinetHistoryAction.Checked := True;
3436+ CabinetVisible( True );
3437+ GikoDM.CabinetHistoryAction.Checked := True;
45183438 end;
45193439
45203440 // BBS...BBS, History, Favorite
@@ -4523,8 +3443,8 @@ begin
45233443 FavoriteTreeView.Visible := False;
45243444 TreeView.Visible := True;
45253445
4526- CabinetBBSAction.Checked := False;
4527- CabinetFavoriteAction.Checked := False;
3446+ GikoDM.CabinetBBSAction.Checked := False;
3447+ GikoDM.CabinetFavoriteAction.Checked := False;
45283448
45293449 if FTreeType <> gttHistory then begin
45303450 b := CabinetSelectPopupMenu.Items.Count - 1;
@@ -4647,13 +3567,13 @@ begin
46473567 if Item is TBoard then begin // not TCategory
46483568 if GikoSys.Setting.ListOrientation = gloHorizontal then begin
46493569 if GikoSys.Setting.ListWidthState = glsMax then begin
4650- BrowserMinAction.Execute;
3570+ GikoDM.BrowserMinAction.Execute;
46513571 if GikoForm.Visible then
46523572 ListView.SetFocus;
46533573 end;
46543574 end else begin
46553575 if GikoSys.Setting.ListHeightState = glsMax then begin
4656- BrowserMinAction.Execute;
3576+ GikoDM.BrowserMinAction.Execute;
46573577 if GikoForm.Visible then
46583578 ListView.SetFocus;
46593579 end;
@@ -4722,11 +3642,11 @@ begin
47223642 if GikoSys.Setting.BrowserAutoMaximize = gbmClick then begin
47233643 if GikoSys.Setting.ListOrientation = gloHorizontal then begin
47243644 if GikoSys.Setting.ListWidthState = glsMin then begin
4725- BrowserMaxAndFocusAction.Execute;
3645+ GikoDM.BrowserMaxAndFocusAction.Execute;
47263646 end;
47273647 end else begin
47283648 if GikoSys.Setting.ListHeightState = glsMin then begin
4729- BrowserMaxAndFocusAction.Execute;
3649+ GikoDM.BrowserMaxAndFocusAction.Execute;
47303650 end;
47313651 end;
47323652 end;
@@ -4753,13 +3673,13 @@ begin
47533673 if GikoSys.Setting.BrowserAutoMaximize = gbmDoubleClick then begin
47543674 if GikoSys.Setting.ListOrientation = gloHorizontal then begin
47553675 if GikoSys.Setting.ListWidthState = glsMin then begin
4756- BrowserMaxAction.Execute;
4757- SetFocusForBrowserAction.Execute;
3676+ GikoDM.BrowserMaxAction.Execute;
3677+ GikoDM.SetFocusForBrowserAction.Execute;
47583678 end;
47593679 end else begin
47603680 if GikoSys.Setting.ListHeightState = glsMin then begin
4761- BrowserMaxAction.Execute;
4762- SetFocusForBrowserAction.Execute;
3681+ GikoDM.BrowserMaxAction.Execute;
3682+ GikoDM.SetFocusForBrowserAction.Execute;
47633683 end;
47643684 end;
47653685 end;
@@ -4810,781 +3730,53 @@ begin
48103730 try
48113731 top := 0;
48123732 nm := AName;
4813- item := OleVariant( activeBrower.Document as IHTMLDocument2).anchors.item(nm);
4814- item.focus();
4815- repeat
4816- top := top + item.offsetTop;
4817- item := item.offsetParent;
4818- until AnsiCompareText(item.tagName, 'body' ) = 0;
4819-
4820- OleVariant(activeBrower.Document as IHTMLDocument2).body.scrollTop := top;
4821- except
4822- end;
4823- end;
4824-end;
4825-
4826-procedure TGikoForm.TreeViewCollapsed(Sender: TObject; Node: TTreeNode);
4827-begin
4828- if TObject(Node.Data) is TBBS then begin
4829- TBBS(Node.Data).NodeExpand := False;
4830- end else if TObject(Node.Data) is TCategory then begin
4831- TCategory(Node.Data).NodeExpand := False;
4832- end else if TObject(Node.Data) is TBoard then begin
4833- TBoard(Node.Data).NodeExpand := False;
4834- end;
4835-end;
4836-
4837-procedure TGikoForm.MessageListViewResize(Sender: TObject);
4838-begin
4839-// MessageListView.Column[0].Width := MessageListView.ClientWidth - 16;
4840-end;
4841-
4842-procedure TGikoForm.SelectListItem(List: TList);
4843-var
4844- TmpListItem: TListItem;
4845-begin
4846- List.Clear;
4847- List.Capacity := 0;
4848- TmpListItem := ListView.Selected;
4849- while TmpListItem <> nil do begin
4850- List.Add(TmpListItem.Data);
4851- TmpListItem := ListView.GetNextItem(TmpListItem, sdAll, [isSelected]);
4852- end;
4853-
4854-end;
4855-
4856-procedure TGikoForm.ExitActionExecute(Sender: TObject);
4857-begin
4858- Close;
4859-end;
4860-
4861-procedure TGikoForm.AllSelectActionExecute(Sender: TObject);
4862-begin
4863- ListViewAllSelect;
4864-end;
4865-
4866-procedure TGikoForm.StdToolBarVisibleActionExecute(Sender: TObject);
4867-var
4868- CoolBand: TCoolBand;
4869-begin
4870- CoolBand := GetCoolBand(MainCoolBar, StdToolBar);
4871- if CoolBand = nil then
4872- Exit;
4873- GikoSys.Setting.StdToolBarVisible := StdToolBarVisibleAction.Checked;
4874- CoolBand.Visible := GikoSys.Setting.StdToolBarVisible;
4875- StdToolBarVisiblePMenu.Checked := GikoSys.Setting.StdToolBarVisible;
4876-end;
4877-
4878-procedure TGikoForm.AddressBarVisibleActionExecute(Sender: TObject);
4879-var
4880- CoolBand: TCoolBand;
4881-begin
4882- CoolBand := GetCoolBand(MainCoolBar, AddressToolBar);
4883- if CoolBand = nil then
4884- Exit;
4885- GikoSys.Setting.AddressBarVisible := AddressBarVisibleAction.Checked;
4886- CoolBand.Visible := GikoSys.Setting.AddressBarVisible;
4887- AddressToolBarVisiblePMenu.Checked := GikoSys.Setting.AddressBarVisible;
4888-end;
4889-
4890-procedure TGikoForm.LinkBarVisibleActionExecute(Sender: TObject);
4891-var
4892- CoolBand: TCoolBand;
4893-begin
4894- CoolBand := GetCoolBand(MainCoolBar, LinkToolBar);
4895- if CoolBand = nil then
4896- Exit;
4897- GikoSys.Setting.LinkBarVisible := LinkBarVisibleAction.Checked;
4898- CoolBand.Visible := GikoSys.Setting.LinkBarVisible;
4899- LinkToolBarVisiblePMenu.Checked := GikoSys.Setting.LinkBarVisible;
4900-end;
4901-
4902-procedure TGikoForm.ListToolBarVisibleActionExecute(Sender: TObject);
4903-var
4904- CoolBand: TCoolBand;
4905-begin
4906- CoolBand := GetCoolBand(ListCoolBar, ListToolBar);
4907- if CoolBand = nil then
4908- Exit;
4909- CoolBand.Visible := ListToolBarVisibleAction.Checked;
4910- GikoSys.Setting.ListToolBarVisible := ListToolBarVisibleAction.Checked;
4911-
4912-end;
4913-
4914-procedure TGikoForm.ListNameBarVisibleActionExecute(Sender: TObject);
4915-var
4916- CoolBand: TCoolBand;
4917-begin
4918- CoolBand := GetCoolBand(ListCoolBar, ListNameToolBar);
4919- if CoolBand = nil then
4920- Exit;
4921- CoolBand.Visible := ListNameBarVisibleAction.Checked;
4922- GikoSys.Setting.ListNameBarVisible := ListNameBarVisibleAction.Checked;
4923-end;
4924-
4925-procedure TGikoForm.BrowserToolBarVisibleActionExecute(Sender: TObject);
4926-var
4927- CoolBand: TCoolBand;
4928-begin
4929- CoolBand := GetCoolBand(BrowserCoolBar, BrowserToolBar);
4930- if CoolBand = nil then
4931- Exit;
4932- CoolBand.Visible := BrowserToolBarVisibleAction.Checked;
4933- GikoSys.Setting.BrowserToolBarVisible := BrowserToolBarVisibleAction.Checked;
4934-end;
4935-
4936-procedure TGikoForm.BrowserNameBarVisibleActionExecute(Sender: TObject);
4937-var
4938- CoolBand: TCoolBand;
4939-begin
4940- CoolBand := GetCoolBand(BrowserCoolBar, BrowserNameToolBar);
4941- if CoolBand = nil then
4942- Exit;
4943- CoolBand.Visible := BrowserNameBarVisibleAction.Checked;
4944- GikoSys.Setting.BrowserNameBarVisible := BrowserNameBarVisibleAction.Checked;
4945-end;
4946-
4947-procedure TGikoForm.MsgBarVisibleActionExecute(Sender: TObject);
4948-begin
4949- MessageSplitter.Visible := MsgBarVisibleAction.Checked;
4950- MessagePanel.Top := MessageSplitter.Top + MessageSplitter.Height;
4951- MessageSplitter.Top := MessagePanel.Top + 1;
4952- MessagePanel.Visible := MsgBarVisibleAction.Checked;
4953- GikoSys.Setting.MessageBarVisible := MsgBarVisibleAction.Checked;
4954-end;
4955-
4956-procedure TGikoForm.StatusBarVisibleActionExecute(Sender: TObject);
4957-begin
4958- StatusBar.Visible := StatusBarVisibleAction.Checked;
4959- GikoSys.Setting.StatusBarVisible := StatusBarVisibleAction.Checked;
4960-end;
4961-
4962-procedure TGikoForm.IconStyleExecute(Sender: TObject);
4963-begin
4964- case ListView.ViewStyle of
4965- vsIcon: SmallIconAction.Execute;
4966- vsSmallIcon: ListIconAction.Execute;
4967- vsList: DetailIconAction.Execute;
4968- vsReport: LargeIconAction.Execute;
4969- end;
4970-end;
4971-
4972-procedure TGikoForm.LargeIconActionExecute(Sender: TObject);
4973-begin
4974- ListView.ViewStyle := vsIcon;
4975- LargeIconAction.Checked := True;
4976-end;
4977-
4978-procedure TGikoForm.SmallIconActionExecute(Sender: TObject);
4979-begin
4980- ListView.ViewStyle := vsSmallIcon;
4981- SmallIconAction.Checked := True;
4982-end;
4983-
4984-procedure TGikoForm.ListIconActionExecute(Sender: TObject);
4985-begin
4986- ListView.ViewStyle := vsList;
4987- ListIconAction.Checked := True;
4988-end;
4989-
4990-procedure TGikoForm.DetailIconActionExecute(Sender: TObject);
4991-begin
4992- ListView.ViewStyle := vsReport;
4993- DetailIconAction.Checked := True;
4994-end;
4995-
4996-procedure TGikoForm.SearchActionExecute(Sender: TObject);
4997-var
4998- chk: TObject;
4999-begin
5000-
5001- if FSearchDialog = nil then begin
5002- if (GikoForm.GetActiveList is TCategory) or (GikoForm.GetActiveList is TBoard) then
5003- chk := GikoForm.GetActiveList
5004- else
5005- chk := nil;
5006-
5007- FSearchDialog := TSearchDialog.Create(Self, chk);
5008- FSearchDialog.SearchComboBox.Items.Assign( GikoSys.Setting.SelectTextList );
5009- end;
5010-
5011- try
5012- FSearchDialog.Show;
5013- except
5014- end;
5015-
5016-end;
5017-
5018-procedure TGikoForm.OptionActionExecute(Sender: TObject);
5019-var
5020- Dlg: TOptionDialog;
5021-begin
5022- Dlg := TOptionDialog.Create(Self);
5023- try
5024- Dlg.ShowModal;
5025- finally
5026- Dlg.Release;
5027- end;
5028-end;
5029-
5030-procedure TGikoForm.GikoNaviWebPageActionExecute(Sender: TObject);
5031-const
5032- URL_GIKONAVI: string = 'http://gikonavi.sourceforge.jp/';
5033-begin
5034- GikoSys.OpenBrowser(URL_GIKONAVI, gbtAuto);
5035-end;
5036-
5037-procedure TGikoForm.MonazillaWebPageActionExecute(Sender: TObject);
5038-const
5039- URL_MONAZILLA: string = 'http://www.monazilla.org/';
5040-begin
5041- GikoSys.OpenBrowser(URL_MONAZILLA, gbtAuto);
5042-end;
5043-
5044-procedure TGikoForm.BBS2chWebPageActionExecute(Sender: TObject);
5045-const
5046- URL_2ch: string = 'http://www.2ch.net/';
5047-begin
5048- GikoSys.OpenBrowser(URL_2ch, gbtAuto);
5049-end;
5050-
5051-procedure TGikoForm.GikoFolderOpenActionExecute(Sender: TObject);
5052-begin
5053-// GikoSys.OpenBrowser(GikoSys.GetAppDir, gbtIE);
5054- GikoSys.CreateProcess('explorer.exe', '/e,"' + GikoSys.GetAppDir + '"');
5055-end;
5056-
5057-procedure TGikoForm.AboutActionExecute(Sender: TObject);
5058-var
5059- Dlg: TAboutDialog;
5060-begin
5061- Dlg := TAboutDialog.Create(Self);
5062- try
5063- Dlg.ShowModal;
5064- finally
5065- Dlg.Release;
5066- end;
5067-end;
5068-
5069-procedure TGikoForm.CabinetHistoryActionExecute(Sender: TObject);
5070-begin
5071- ShowHistoryTree;
5072-end;
5073-
5074-procedure TGikoForm.CabinetVisible( isVisible : Boolean );
5075-begin
5076- TreeSplitter.Visible := isVisible;
5077- CabinetPanel.Visible := isVisible;
5078- CabinetVisibleAction.Checked := isVisible;
5079-end;
5080-
5081-procedure TGikoForm.CabinetVisibleActionExecute(Sender: TObject);
5082-begin
5083- case FTreeType of
5084- gttHistory: CabinetHistoryAction.Execute;
5085- gttFavorite: CabinetFavoriteAction.Execute;
5086- else
5087- CabinetBBSAction.Execute;
5088- end;
5089-end;
5090-
5091-procedure TGikoForm.AllItemActionExecute(Sender: TObject);
5092-begin
5093- try
5094- if ViewType <> gvtAll then
5095- SetListViewType(gvtAll);
5096- GikoSys.Setting.ThreadRange := gtrAll;
5097- AllItemAction.Checked := True;
5098- // SelectComboBox ‚Ì—š—ð‚ðXV‚µ‚Ä‚¨‚­
5099- ModifySelectList;
5100- // SelectComboBox ‚Ì’l‚ðƒNƒŠƒA
5101- if SelectComboBoxPanel.Visible then begin
5102- SelectComboBox.Text := SELECTCOMBOBOX_NAME;
5103- SelectComboBox.Color := SELECTCOMBOBOX_COLOR;
5104- ListView.SetFocus;
5105- end;
5106- except
5107- end;
5108-end;
5109-
5110-procedure TGikoForm.LogItemActionExecute(Sender: TObject);
5111-begin
5112- try
5113- if ViewType <> gvtLog then
5114- SetListViewType(gvtLog);
5115- GikoSys.Setting.ThreadRange := gtrLog;
5116- LogItemAction.Checked := True;
5117- // SelectComboBox ‚Ì—š—ð‚ðXV‚µ‚Ä‚¨‚­
5118- ModifySelectList;
5119- // SelectComboBox ‚Ì’l‚ðƒNƒŠƒA
5120- if SelectComboBoxPanel.Visible then begin
5121- SelectComboBox.Text := SELECTCOMBOBOX_NAME;
5122- SelectComboBox.Color := SELECTCOMBOBOX_COLOR;
5123- ListView.SetFocus;
5124- end;
5125- except
5126- end;
5127-end;
5128-
5129-procedure TGikoForm.NewItemActionExecute(Sender: TObject);
5130-begin
5131- try
5132-
5133- if ViewType <> gvtNew then
5134- SetListViewType(gvtNew);
5135- GikoSys.Setting.ThreadRange := gtrNew;
5136- NewItemAction.Checked := True;
5137- // SelectComboBox ‚Ì—š—ð‚ðXV‚µ‚Ä‚¨‚­
5138- ModifySelectList;
5139- // SelectComboBox ‚Ì’l‚ðƒNƒŠƒA
5140- if SelectComboBoxPanel.Visible then begin
5141- SelectComboBox.Text := SELECTCOMBOBOX_NAME;
5142- SelectComboBox.Color := SELECTCOMBOBOX_COLOR;
5143- ListView.SetFocus;
5144- end;
5145- except
5146- end;
5147-end;
5148-
5149-procedure TGikoForm.SelectItemActionExecute(Sender: TObject);
5150-var
5151- idx: Integer;
5152- Dlg: TListSelectDialog;
5153-begin
5154- try
5155- if SelectComboBoxPanel.Visible then begin
5156- if SelectComboBoxPanel.Left + SelectComboBoxPanel.Width < ListToolBar.Width then begin
5157- // SelectComboBox ‚ª‚ ‚éê‡‚̓tƒH[ƒJƒX‚ðˆÚ‚·
5158- if GikoSys.Setting.ListOrientation = gloHorizontal then begin
5159- if GikoSys.Setting.ListWidthState = glsMax then
5160- BrowserMinAction.Execute;
5161- end else begin
5162- if GikoSys.Setting.ListHeightState = glsMax then
5163- BrowserMinAction.Execute;
5164- end;
5165- SelectComboBox.SetFocus;
5166- exit;
5167- end;
5168- end;
5169- except
5170- end;
5171-
5172- if SelectComboBox.Text = SELECTCOMBOBOX_NAME then begin
5173- SelectComboBox.Text := '';
5174- SelectComboBox.Color := clWindow;
5175- end;
5176-
5177- AllItemAction.Checked := False;
5178- LogItemAction.Checked := False;
5179- NewItemAction.Checked := False;
5180- //SelectItemAction.Checked := True;
5181- ModifySelectList;
5182- Dlg := TListSelectDialog.Create(Self);
5183- try
5184- Dlg.SelectComboBox.Items.Assign(GikoSys.Setting.SelectTextList);
5185- Dlg.SelectComboBox.Text := SelectComboBox.Text;
5186- Dlg.ShowModal;
5187- if Dlg.ModalResult = mrCancel then begin
5188- if Length( SelectComboBox.Text ) = 0 then begin
5189- AllItemAction.Checked := True;
5190- SelectComboBox.Text := SELECTCOMBOBOX_NAME;
5191- SelectComboBox.Color := SELECTCOMBOBOX_COLOR;
5192- end;
5193-
5194- if GetActiveList is TBoard then
5195- SetListViewType(gvtUser, TBoard(GetActiveList).ParentCategory.ParenTBBS.SelectText , Dlg.KubetsuCheckBox.Checked);
5196- end else begin
5197- idx := GikoSys.Setting.SelectTextList.IndexOf(Dlg.SelectComboBox.Text);
5198- if idx <> -1 then
5199- GikoSys.Setting.SelectTextList.Delete(idx);
5200- GikoSys.Setting.SelectTextList.Insert(0, Dlg.SelectComboBox.Text);
5201- while Dlg.SelectComboBox.Items.Count > 100 do begin
5202- Dlg.SelectComboBox.Items.Delete(Dlg.SelectComboBox.Items.Count - 1);
5203- end;
5204-
5205- if Length( Dlg.SelectComboBox.Text ) = 0 then begin
5206- SelectComboBox.Text := SELECTCOMBOBOX_NAME;
5207- SelectComboBox.Color := SELECTCOMBOBOX_COLOR;
5208- end else begin
5209- SelectComboBox.Text := Dlg.SelectComboBox.Text;
5210- SelectComboBox.Color := clWindow;
5211- end;
5212- SetListViewType(gvtUser, Dlg.SelectComboBox.Text, Dlg.KubetsuCheckBox.Checked);
5213- end;
5214- finally
5215- Dlg.Release;
5216- end;
5217-end;
5218-
5219-procedure TGikoForm.ListNumberVisibleActionExecute(Sender: TObject);
5220-begin
5221- GikoSys.Setting.ListViewNo := ListNumberVisibleAction.Checked;
5222- ListView.Refresh;
5223-end;
5224-
5225-procedure TGikoForm.UpFolderActionExecute(Sender: TObject);
5226-begin
5227- if GetActiveList is TBoard then begin
5228- if TBoard(GetActiveList).ParentCategory <> nil then
5229- SelectTreeNode(TBoard(GetActiveList).ParentCategory, True);
5230- end else if GetActiveList is TCategory then begin
5231- SelectTreeNode(TCategory(GetActiveList).ParenTBBS, True);
5232- end;
5233-end;
5234-
5235-procedure TGikoForm.RoundActionExecute(Sender: TObject);
5236-var
5237- Dlg: TRoundDialog;
5238-begin
5239- Dlg := TRoundDialog.Create(Self);
5240- try
5241- Dlg.ShowModal;
5242- finally
5243- Dlg.Release;
5244- end;
5245-end;
5246-
5247-procedure TGikoForm.StopActionExecute(Sender: TObject);
5248-begin
5249- FControlThread.DownloadAbort;
5250- if FWorkCount <> 0 then FWorkCount := 0;
5251- try
5252- Animate.Active := False;
5253- except
5254- end;
5255- Screen.Cursor := crDefault;
5256-end;
5257-
5258-procedure TGikoForm.MsgBarCloseActionExecute(Sender: TObject);
5259-begin
5260-// MessagePanel.Visible := False;
5261-// MessageSplitter.Visible := False;
5262-// MsgBarVisibleAction.Checked := False;
5263- MsgBarVisibleAction.Execute;
5264-end;
5265-
5266-procedure TGikoForm.BrowserMaxActionExecute(Sender: TObject);
5267-begin
5268- if GikoSys.Setting.ListOrientation = gloHorizontal then begin
5269- case GikoSys.Setting.ListWidthState of
5270- glsMax: begin
5271- //’ʏí•\Ž¦‚É‚·‚é
5272- if FActiveContent <> nil then
5273- SendMessage(FActiveContent.FBrowser.Handle, WM_SETREDRAW, 0, 0); //•`‰æ’âŽ~
5274- ViewPanel.Width := FBrowserSizeWidth;
5275- BrowserMaxAction.ImageIndex := TOOL_ICON_WIDTH_MAX;
5276- BrowserMinAction.ImageIndex := TOOL_ICON_WIDTH_MIN;
5277- GikoSys.Setting.ListWidthState := glsNormal;
5278- if FActiveContent <> nil then
5279- SendMessage(FActiveContent.FBrowser.Handle, WM_SETREDRAW, 1, 0); //•`‰æ
5280- end;
5281- glsMin, glsNormal: begin
5282- //Å‘å•\Ž¦‚É‚·‚é
5283- if FActiveContent <> nil then
5284- SendMessage(FActiveContent.FBrowser.Handle, WM_SETREDRAW, 0, 0); //•`‰æ’âŽ~
5285- if GikoSys.Setting.ListWidthState = glsNormal then
5286- FBrowserSizeWidth := ViewPanel.Width;
5287- if FActiveContent <> nil then
5288- SendMessage(FActiveContent.FBrowser.Handle, WM_SETREDRAW, 1, 0); //•`‰æ
5289- ViewPanel.Width := 1;
5290- BrowserMaxAction.ImageIndex := TOOL_ICON_WIDTH_NORMAL;
5291- BrowserMinAction.ImageIndex := TOOL_ICON_WIDTH_MIN;
5292- GikoSys.Setting.ListWidthState := glsMax;
5293- end;
5294- end;
5295- end else begin
5296- case GikoSys.Setting.ListHeightState of
5297- glsMax: begin
5298- //’ʏí•\Ž¦‚É‚·‚é
5299- if FActiveContent <> nil then
5300- SendMessage(FActiveContent.FBrowser.Handle, WM_SETREDRAW, 0, 0); //•`‰æ’âŽ~
5301- ViewPanel.Height := FBrowserSizeHeight;
5302- BrowserMaxAction.ImageIndex := TOOL_ICON_HEIGHT_MAX;
5303- BrowserMinAction.ImageIndex := TOOL_ICON_HEIGHT_MIN;
5304- GikoSys.Setting.ListHeightState := glsNormal;
5305- if FActiveContent <> nil then
5306- SendMessage(FActiveContent.FBrowser.Handle, WM_SETREDRAW, 1, 0); //•`‰æ
5307- end;
5308- glsMin, glsNormal: begin
5309- //Å‘å•\Ž¦‚É‚·‚é
5310- if FActiveContent <> nil then
5311- SendMessage(FActiveContent.FBrowser.Handle, WM_SETREDRAW, 0, 0); //•`‰æ’âŽ~
5312- if GikoSys.Setting.ListHeightState = glsNormal then
5313- FBrowserSizeHeight := ViewPanel.Height;
5314- if FActiveContent <> nil then
5315- SendMessage(FActiveContent.FBrowser.Handle, WM_SETREDRAW, 1, 0); //•`‰æ
5316- ViewPanel.Height := 1;
5317- BrowserMaxAction.ImageIndex := TOOL_ICON_HEIGHT_NORMAL;
5318- BrowserMinAction.ImageIndex := TOOL_ICON_HEIGHT_MIN;
5319- GikoSys.Setting.ListHeightState := glsMax;
5320- end;
5321- end;
5322- end;
5323-// Mouse.CursorPos := BrowserSizeButton.ClientToScreen(Point(
5324-// System.Round(BrowserToolBar.ButtonWidth div 2),
5325-// System.Round(BrowserToolBar.ButtonHeight div 2)));
5326- //BrowserTab.OnChange(nil);
5327-end;
5328-
5329-procedure TGikoForm.BrowserMinActionExecute(Sender: TObject);
5330-begin
5331-
5332- if GikoSys.Setting.ListOrientation = gloHorizontal then begin
5333- case GikoSys.Setting.ListWidthState of
5334- glsMax, glsNormal: begin
5335- //Å¬•\Ž¦‚É‚·‚é
5336- if FActiveContent <> nil then
5337- SendMessage(FActiveContent.FBrowser.Handle, WM_SETREDRAW, 0, 0); //•`‰æ’âŽ~
5338- if GikoSys.Setting.ListWidthState = glsNormal then
5339- FBrowserSizeWidth := ViewPanel.Width;
5340- if FActiveContent <> nil then
5341- SendMessage(FActiveContent.FBrowser.Handle, WM_SETREDRAW, 1, 0); //•`‰æ
5342- ViewPanel.Width := ThreadMainPanel.Width - 80;
5343- BrowserMaxAction.ImageIndex := TOOL_ICON_WIDTH_MAX;
5344- BrowserMinAction.ImageIndex := TOOL_ICON_WIDTH_NORMAL;
5345- GikoSys.Setting.ListWidthState := glsMin;
5346- end;
5347- glsMin: begin
5348- //’ʏí•\Ž¦‚É‚·‚é
5349- if FActiveContent <> nil then
5350- SendMessage(FActiveContent.FBrowser.Handle, WM_SETREDRAW, 0, 0); //•`‰æ’âŽ~
5351- ViewPanel.Width := FBrowserSizeWidth;
5352- BrowserMaxAction.ImageIndex := TOOL_ICON_WIDTH_MAX;
5353- BrowserMinAction.ImageIndex := TOOL_ICON_WIDTH_MIN;
5354- GikoSys.Setting.ListWidthState := glsNormal;
5355- if FActiveContent <> nil then
5356- SendMessage(FActiveContent.FBrowser.Handle, WM_SETREDRAW, 1, 0); //•`‰æ
5357- end;
5358- end;
5359- end else begin
5360- case GikoSys.Setting.ListHeightState of
5361- glsMax, glsNormal: begin
5362- //Å¬•\Ž¦‚É‚·‚é
5363- if FActiveContent <> nil then
5364- SendMessage(FActiveContent.FBrowser.Handle, WM_SETREDRAW, 0, 0); //•`‰æ’âŽ~
5365- if GikoSys.Setting.ListHeightState = glsNormal then
5366- FBrowserSizeHeight := ViewPanel.Height;
5367- ViewPanel.Height := ThreadMainPanel.Height - BrowserCoolBar.Height - 7;
5368- BrowserMaxAction.ImageIndex := TOOL_ICON_HEIGHT_MAX;
5369- BrowserMinAction.ImageIndex := TOOL_ICON_HEIGHT_NORMAL;
5370- GikoSys.Setting.ListHeightState := glsMin;
5371- if FActiveContent <> nil then
5372- SendMessage(FActiveContent.FBrowser.Handle, WM_SETREDRAW, 1, 0); //•`‰æ
5373- end;
5374- glsMin: begin
5375- //’ʏí•\Ž¦‚É‚·‚é
5376- if FActiveContent <> nil then
5377- SendMessage(FActiveContent.FBrowser.Handle, WM_SETREDRAW, 0, 0); //•`‰æ’âŽ~
5378- ViewPanel.Height := FBrowserSizeHeight;
5379- BrowserMaxAction.ImageIndex := TOOL_ICON_HEIGHT_MAX;
5380- BrowserMinAction.ImageIndex := TOOL_ICON_HEIGHT_MIN;
5381- GikoSys.Setting.ListHeightState := glsNormal;
5382- if FActiveContent <> nil then
5383- SendMessage(FActiveContent.FBrowser.Handle, WM_SETREDRAW, 1, 0); //•`‰æ
5384- end;
5385- end;
5386- end;
5387-end;
5388-
5389-procedure TGikoForm.ScrollTopActionExecute(Sender: TObject);
5390-begin
5391- BrowserMovement('top');
5392-end;
5393-
5394-procedure TGikoForm.ScrollLastActionExecute(Sender: TObject);
5395-begin
5396- BrowserMovement('bottom');
5397-end;
5398-
5399-procedure TGikoForm.ScrollNewActionExecute(Sender: TObject);
5400-begin
5401- BrowserMovement('new');
5402-end;
5403-
5404-procedure TGikoForm.ScrollKokoActionExecute(Sender: TObject);
5405-begin
5406- BrowserMovement('koko');
5407-end;
5408-
5409-procedure TGikoForm.EditorActionExecute(Sender: TObject);
5410-var
5411- Editor: TEditorForm;
5412- Item: TThreadItem;
5413-begin
5414- Item := GetActiveContent;
5415- if Item = nil then Exit;
5416- Editor := TEditorForm.Create(Application.MainForm);
5417- Editor.SetThreadItem(Item);
5418- GikoSys.LoadEditorKeySetting(Editor.ActionList);
5419- Editor.Show;
5420- Editor.BodyEdit.SetFocus;
5421-end;
5422-
5423-procedure TGikoForm.IEActionExecute(Sender: TObject);
5424-begin
5425- ShowThreadAction.Execute;
5426-end;
5427-
5428-procedure TGikoForm.ShowThreadActionExecute(Sender: TObject);
5429-var
5430- ThreadItem: TThreadItem;
5431-begin
5432- ThreadItem := GetActiveContent;
5433- if ThreadItem = nil then Exit;
5434- GikoSys.OpenBrowser(ThreadItem.URL, gbtAuto);
5435-end;
5436-
5437-procedure TGikoForm.ShowBoardActionExecute(Sender: TObject);
5438-var
5439- ThreadItem: TThreadItem;
5440-begin
5441- ThreadItem := GetActiveContent;
5442- if ThreadItem = nil then Exit;
5443- GikoSys.OpenBrowser(ThreadItem.ParentBoard.URL, gbtAuto);
5444-end;
5445-
5446-//(Thread)URL‚ðƒRƒs[
5447-procedure TGikoForm.URLCopyActionExecute(Sender: TObject);
5448-var
5449- s: string;
5450-begin
5451- s := '';
5452- if TObject(GetActiveContent) is TBoard then
5453- s := s + TBoard(GetActiveContent).URL + #13#10
5454- else if TObject(GetActiveContent) is TThreadItem then
5455- s := s + TThreadItem(GetActiveContent).URL + #13#10;
5456- if s <> '' then
5457- Clipboard.AsText := s;
5458-end;
5459-
5460-//(Thread)ƒXƒŒƒbƒh–¼‚ðƒRƒs[
5461-procedure TGikoForm.NameCopyActionExecute(Sender: TObject);
5462-var
5463- s: string;
5464-begin
5465- s := '';
5466- if TObject(GetActiveContent) is TBoard then
5467- s := s + TBoard(GetActiveContent).Title + #13#10
5468- else if TObject(GetActiveContent) is TThreadItem then
5469- s := s + TThreadItem(GetActiveContent).Title + #13#10;
5470- if s <> '' then
5471- Clipboard.AsText := s;
5472-end;
5473-
5474-//(Thread)ƒXƒŒƒbƒh–¼‚ÆURL‚ðƒRƒs[
5475-procedure TGikoForm.NameURLCopyActionExecute(Sender: TObject);
5476-var
5477- s: string;
5478-begin
5479- s := '';
5480- if TObject(GetActiveContent) is TBoard then
5481- s := s + TBoard(GetActiveContent).Title + #13#10 + TBoard(GetActiveContent).URL + #13#10
5482- else if TObject(GetActiveContent) is TThreadItem then
5483- s := s + TThreadItem(GetActiveContent).Title + #13#10 + TThreadItem(GetActiveContent).URL + #13#10;
5484- if s <> '' then
5485- Clipboard.AsText := s;
5486-end;
5487-
5488-procedure TGikoForm.ItemReloadActionExecute(Sender: TObject);
5489-var
5490- ThreadItem: TThreadItem;
5491- shiftDown: Boolean;
5492-begin
5493- ThreadItem := GetActiveContent;
5494- shiftDown := GetAsyncKeyState(VK_SHIFT) = Smallint($8001);
5495- if ThreadItem <> nil then
5496- DownloadContent(ThreadItem, shiftDown);
5497-end;
5498-
5499-procedure TGikoForm.SelectListReloadActionExecute(Sender: TObject);
5500-var
5501- i: Integer;
5502- List: TList;
5503- msg: string;
5504- shiftDown: Boolean;
5505-begin
5506- shiftDown := GetAsyncKeyState(VK_SHIFT) = Smallint($8001);
5507- if GetActiveList is TCategory then begin
5508- List := TList.Create;
5509- try
5510- SelectListItem(List);
5511- if List.Count > 5 then begin
5512- msg := '5ŒÂˆÈã‚ÍŽw’è‚Å‚«‚Ü‚¹‚ñ' + #13#10
5513- + '‚Q‚¿‚á‚ñ‚˂镉‰×ŒyŒ¸‚É‚²‹¦—Í‚­‚¾‚³‚¢';
5514- MsgBox(Handle, msg, 'Œx', MB_ICONEXCLAMATION);
5515- Exit;
5516- end;
5517- for i := 0 to List.Count - 1 do begin
5518- if TObject(List[i]) is TBoard then
5519- DownloadList(TBoard(List[i]), shiftDown);
5520- end;
5521- finally
5522- List.Free;
5523- end;
5524- end else if GetActiveList is TBoard then begin
5525- DownloadList(TBoard(GetActiveList), shiftDown);
5526- end;
5527-end;
5528-
5529-procedure TGikoForm.SelectThreadReloadActionExecute(Sender: TObject);
5530-var
5531- List: TList;
5532- i: Integer;
5533- msg: string;
5534- shiftDown: Boolean;
5535-begin
5536- shiftDown := GetAsyncKeyState(VK_SHIFT) = Smallint($8001);
5537- List := TList.Create;
5538- try
5539- SelectListItem(List);
5540- if List.Count > 10 then begin
5541- msg := '10ŒÂˆÈã‚ÍŽw’è‚Å‚«‚Ü‚¹‚ñ' + #13#10
5542- + '‚Q‚¿‚á‚ñ‚˂镉‰×ŒyŒ¸‚É‚²‹¦—Í‚­‚¾‚³‚¢';
5543- MsgBox(Handle, msg, 'Œx', MB_ICONEXCLAMATION);
5544- Exit;
5545- end;
5546- for i := 0 to List.Count - 1 do begin
5547- if TObject(List[i]) is TThreadItem then
5548- DownloadContent(TThreadItem(List[i]), shiftDown);
3733+ item := OleVariant( activeBrower.Document as IHTMLDocument2).anchors.item(nm);
3734+ item.focus();
3735+ repeat
3736+ top := top + item.offsetTop;
3737+ item := item.offsetParent;
3738+ until AnsiCompareText(item.tagName, 'body' ) = 0;
3739+
3740+ OleVariant(activeBrower.Document as IHTMLDocument2).body.scrollTop := top;
3741+ except
55493742 end;
5550- finally
5551- List.Free;
55523743 end;
55533744 end;
5554-//ActiveList‚ªTCategoy‚ŃXƒŒˆê——‚Å‚P‚ˆȏã‘I‘ð‚©ActiveList‚ªTBoard‚Å—LŒø‚È
5555-//Action‚Å‹¤’Ê
5556-procedure TGikoForm.SelectListReloadActionUpdate(Sender: TObject);
3745+
3746+procedure TGikoForm.TreeViewCollapsed(Sender: TObject; Node: TTreeNode);
55573747 begin
5558-{$IFDEF ACTCHK}
5559- //–³‚­‚Ä‚à‚¢‚¢IF•¶@ƒR[ƒh‚©‚ç–³—‚â‚èŒÄ‚΂Ȃ¢‚È‚çƒ`ƒFƒbƒN‚µ‚È‚­‚Ä‚àc
5560- if (Sender <> nil) and (Sender is TAction) then begin
5561-{$ENDIF}
5562- if (GetActiveList is TCategory) and (ListView.SelCount > 0) then
5563- TAction(Sender).Enabled := True
5564- else if GetActiveList is TBoard then
5565- TAction(Sender).Enabled := True
5566- else
5567- TAction(Sender).Enabled := False;
5568-{$IFDEF ACTCHK}
3748+ if TObject(Node.Data) is TBBS then begin
3749+ TBBS(Node.Data).NodeExpand := False;
3750+ end else if TObject(Node.Data) is TCategory then begin
3751+ TCategory(Node.Data).NodeExpand := False;
3752+ end else if TObject(Node.Data) is TBoard then begin
3753+ TBoard(Node.Data).NodeExpand := False;
55693754 end;
5570-{$ENDIF}
55713755 end;
5572-//ActiveList‚ªTBoard‚ŃXƒŒˆê——‚Å‚P‚ˆȏã‘I‘ð‚µ‚Ä‚¢‚é‚Æ—LŒø‚É‚È‚éAction‚Å‹¤’Ê
5573-procedure TGikoForm.SelectThreadReloadActionUpdate(Sender: TObject);
3756+
3757+procedure TGikoForm.MessageListViewResize(Sender: TObject);
3758+begin
3759+// MessageListView.Column[0].Width := MessageListView.ClientWidth - 16;
3760+end;
3761+procedure TGikoForm.CabinetVisible( isVisible : Boolean );
55743762 begin
5575-{$IFDEF ACTCHK}
5576- //–³‚­‚Ä‚à‚¢‚¢IF•¶@ƒR[ƒh‚©‚ç–³—‚â‚èŒÄ‚΂Ȃ¢‚È‚çƒ`ƒFƒbƒN‚µ‚È‚­‚Ä‚àc
5577- if (Sender <> nil) and (Sender is TAction) then begin
5578-{$ENDIF}
5579- TAction(Sender).Enabled := (GetActiveList is TBoard) and (ListView.SelCount > 0);
5580-{$IFDEF ACTCHK}
5581- end;
5582-{$ENDIF}
3763+ TreeSplitter.Visible := isVisible;
3764+ CabinetPanel.Visible := isVisible;
3765+ GikoDM.CabinetVisibleAction.Checked := isVisible;
55833766 end;
55843767
5585-procedure TGikoForm.UpFolderActionUpdate(Sender: TObject);
3768+procedure TGikoForm.SelectListItem(List: TList);
3769+var
3770+ TmpListItem: TListItem;
55863771 begin
5587- UpFolderAction.Enabled := not (GetActiveList is TBBS);
3772+ List.Clear;
3773+ List.Capacity := 0;
3774+ TmpListItem := ListView.Selected;
3775+ while TmpListItem <> nil do begin
3776+ List.Add(TmpListItem.Data);
3777+ TmpListItem := ListView.GetNextItem(TmpListItem, sdAll, [isSelected]);
3778+ end;
3779+
55883780 end;
55893781
55903782 procedure TGikoForm.FormResize(Sender: TObject);
@@ -5611,75 +3803,6 @@ begin
56113803
56123804 end;
56133805
5614-procedure TGikoForm.ScrollKokoActionUpdate(Sender: TObject);
5615-begin
5616- ScrollKokoAction.Enabled := (GetActiveContent <> nil)
5617- and (GetActiveContent.IsLogFile)
5618- and (GetActiveContent.Kokomade <> -1);
5619-
5620-end;
5621-
5622-//ƒuƒ‰ƒEƒUƒ^ƒu‚ª‚P‚ˆȏã‚Å—LŒø‚É‚È‚éAction‚Å‹¤’ʉ»
5623-procedure TGikoForm.AllTabCloseActionUpdate(Sender: TObject);
5624-begin
5625-{$IFDEF ACTCHK}
5626- //–³‚­‚Ä‚à‚¢‚¢IF•¶@ƒR[ƒh‚©‚ç–³—‚â‚èŒÄ‚΂Ȃ¢‚È‚çƒ`ƒFƒbƒN‚µ‚È‚­‚Ä‚àc
5627- if (Sender <> nil) and (Sender is TAction) then begin
5628-{$ENDIF}
5629- TAction(Sender).Enabled := (BrowserTab.Tabs.Count > 0);
5630-{$IFDEF ACTCHK}
5631- end;
5632-{$ENDIF}
5633-end;
5634-
5635-procedure TGikoForm.LogDeleteActionExecute(Sender: TObject);
5636-const
5637- DEL_MSG = 'g^0h‚̃ƒO‚ðíœ‚µ‚Ü‚·B‚æ‚낵‚¢‚Å‚·‚©H';
5638- DEL_SAME_MSG = '‚±‚ê‚ç ^0 ŒÂ‚̃XƒŒƒbƒh‚̃ƒO‚ðíœ‚µ‚Ü‚·B‚æ‚낵‚¢‚Å‚·‚©H';
5639- DEL_TITLE = 'íœŠm”F';
5640-var
5641- ThreadItem: TThreadItem;
5642- TmpListItem: TListItem;
5643- List: TList;
5644- i: Integer;
5645-begin
5646- List := TList.Create;
5647- try
5648- TmpListItem := ListView.Selected;
5649- while TmpListItem <> nil do begin
5650- if TObject(TmpListItem.Data) is TThreadItem then begin
5651- ThreadItem := TThreadItem(TmpListItem.Data);
5652- if ThreadItem.IsLogFile then
5653- List.Add(ThreadItem);
5654- end;
5655- TmpListItem := ListView.GetNextItem(TmpListItem, sdAll, [isSelected]);
5656- end;
5657-
5658- if GikoSys.Setting.DeleteMsg and (List.Count > 0) then begin
5659- if (GetKeyState( VK_SHIFT ) and $80000000) = 0 then begin
5660- if List.Count = 1 then begin
5661- if MsgBox(Handle, StringReplace( DEL_MSG, '^0', TThreadItem( List[ 0 ] ).Title, [rfReplaceAll] ) , DEL_TITLE, MB_YESNO or MB_ICONWARNING or MB_DEFBUTTON2) <> ID_YES then
5662- Exit;
5663- end else begin
5664- if MsgBox(Handle, StringReplace( DEL_SAME_MSG, '^0', IntToStr( List.Count ), [rfReplaceAll] ), DEL_TITLE, MB_YESNO or MB_ICONWARNING or MB_DEFBUTTON2) <> IDYES then
5665- Exit;
5666- end;
5667- end;
5668- end;
5669-
5670- for i := 0 to List.Count - 1 do begin
5671- ThreadItem := TThreadItem(List[i]);
5672- DeleteHistory(ThreadItem);
5673- DeleteTab(ThreadItem);
5674- ThreadItem.DeleteLogFile;
5675-
5676- TreeView.Refresh; // UnRead ‚Ì•\Ž¦‚ðXV
5677- end;
5678- ListView.Refresh;
5679- finally
5680- List.Free;
5681- end;
5682-end;
56833806 procedure TGikoForm.DeleteTab(BrowserRecord: TBrowserRecord);
56843807 var
56853808 i, j, idx: Integer;
@@ -5794,327 +3917,49 @@ begin
57943917
57953918 BrowserTab.Tabs.EndUpdate;
57963919 if( FActiveContent = nil) then
5797- BrowserTab.OnChange(nil);
5798- Exit;
5799- end;
5800- end;
5801-end;
5802-procedure TGikoForm.KokomadeActionExecute(Sender: TObject);
5803-var
5804- No: Integer;
5805- ThreadItem: TThreadItem;
5806-begin
5807- No := KokoPopupMenu.Tag;
5808- if No = 0 then Exit;
5809- ThreadItem := GetActiveContent;
5810- if ThreadItem = nil then Exit;
5811- ThreadItem.Kokomade := No;
5812- FActiveContent.Thread.ScrollTop := OleVariant(IHTMLDocument2(FActiveContent.Browser.Document)).Body.ScrollTop;
5813- FActiveContent.FRepaint := true;
5814- InsertBrowserTab(FActiveContent.Thread, true);
5815- Application.ProcessMessages;
5816-end;
5817-
5818-procedure TGikoForm.ZenbuActionExecute(Sender: TObject);
5819-var
5820- ThreadItem: TThreadItem;
5821-begin
5822- ThreadItem := GetActiveContent;
5823- if ThreadItem = nil then Exit;
5824- ThreadItem.Kokomade := -1;
5825- FActiveContent.Thread.ScrollTop := OleVariant(IHTMLDocument2(FActiveContent.Browser.Document)).Body.ScrollTop;
5826- FActiveContent.FRepaint := true;
5827- InsertBrowserTab(FActiveContent.Thread, true);
5828- Application.ProcessMessages;
5829-end;
5830-
5831-function TGikoForm.Hook(var Message: TMessage): Boolean;
5832-begin
5833- //ƒTƒuƒtƒH[ƒ€‚ªƒƒCƒ“ƒƒjƒ…[‚ðŽ‚½‚È‚¢‚Æ‚«‚ɁAƒƒCƒ“ƒtƒH[ƒ€‚Ì
5834- //ƒƒjƒ…[‚̃Vƒ‡[ƒgƒJƒbƒgƒL[‚ªƒTƒuƒƒjƒ…[‚©‚ç“ü—Í‚³‚ê‚é‚Ì‚ð‰ñ”ð
5835- Result := False;
5836- case Message.Msg of
5837- CM_APPKEYDOWN:
5838- Result := True; //ƒVƒ‡[ƒgƒJƒbƒgƒL[–³Œø
5839- CM_APPSYSCOMMAND:
5840- Result := True; // ƒAƒNƒZƒ‰ƒŒ[ƒ^‚𖳌ø‚É‚·‚é
5841- end;
5842-end;
5843-
5844-procedure TGikoForm.KokoResActionExecute(Sender: TObject);
5845-var
5846- Editor: TEditorForm;
5847- Item: TThreadItem;
5848- Number: Integer;
5849-begin
5850- Number := KokoPopupMenu.Tag;
5851- if Number = 0 then Exit;
5852- Item := GetActiveContent;
5853- if Item = nil then Exit;
5854-
5855- Editor := TEditorForm.Create(Self);
5856- Editor.SetThreadItem(Item);
5857- GikoSys.LoadEditorKeySetting(Editor.ActionList);
5858- Editor.BodyEdit.Text := '>>' + IntToStr(Number) + #13#10;
5859- Editor.Show;
5860- Editor.BodyEdit.SetFocus;
5861-end;
5862-
5863-procedure TGikoForm.ListPopupMenuPopup(Sender: TObject);
5864-begin
5865- ItemRoundPMenu.Visible := (GetActiveList is TBoard);
5866- ItemReservPMenu.Visible := (GetActiveList is TBoard);
5867- LPMSep01.Visible := (GetActiveList is TBoard);
5868- ListRoundPMenu.Visible := (GetActiveList is TCategory);// or (GetActiveList is TBoard);
5869- ListReservPMenu.Visible := (GetActiveList is TCategory);// or (GetActiveList is TBoard);
5870- LPMSep02.Visible := (GetActiveList is TCategory) or (GetActiveList is TBoard);
5871- KidokuPMenu.Visible := (GetActiveList is TBoard);
5872- MidokuPMenu.Visible := (GetActiveList is TBoard);
5873- UrlCopyPMenu.Visible := (GetActiveList is TCategory) or (GetActiveList is TBoard);
5874- NameUrlCopyPMenu.Visible := (GetActiveList is TCategory) or (GetActiveList is TBoard);
5875- AllSelectPMenu.Visible := (GetActiveList is TCategory) or (GetActiveList is TBoard);
5876- LPMSep05.Visible := (GetActiveList is TCategory) or (GetActiveList is TBoard);
5877- DeletePMenu.Visible := (GetActiveList is TBoard);
5878- LPMSep06.Visible := (GetActiveList is TCategory) or (GetActiveList is TBoard);
5879- BoardFavoriteAddMenu.Visible := (GetActiveList is TCategory);
5880- ThreadFavoriteAddMenu.Visible := (GetActiveList is TBoard);
5881-
5882- AddRoundNameMenu(ItemReservPMenu);
5883- AddRoundNameMenu(ListReservPMenu);
5884-end;
5885-
5886-procedure TGikoForm.BoardIEActionExecute(Sender: TObject);
5887-var
5888- URL: string;
5889-begin
5890- if GetActiveList is TBoard then begin
5891- URL := TBoard(GetActiveList).URL;
5892- GikoSys.OpenBrowser(URL, gbtAuto);
5893- end;
5894-end;
5895-
5896-procedure TGikoForm.SelectItemURLCopyActionExecute(Sender: TObject);
5897-var
5898- List: TList;
5899- i: Integer;
5900- s: string;
5901-begin
5902- s := '';
5903- List := TList.Create;
5904- try
5905- SelectListItem(List);
5906- for i := 0 to List.Count - 1 do begin
5907- if TObject(List[i]) is TBoard then
5908- s := s + TBoard(List[i]).URL + #13#10
5909- else if TObject(List[i]) is TThreadItem then
5910- s := s + TThreadItem(List[i]).URL + #13#10;
5911- end;
5912- if s <> '' then
5913- Clipboard.AsText := s;
5914- finally
5915- List.Free;
5916- end;
5917-end;
5918-
5919-procedure TGikoForm.SelectItemNameCopyActionExecute(Sender: TObject);
5920-var
5921- List: TList;
5922- i: Integer;
5923- s: string;
5924-begin
5925- s := '';
5926- List := TList.Create;
5927- try
5928- SelectListItem(List);
5929- for i := 0 to List.Count - 1 do begin
5930- if TObject(List[i]) is TBoard then
5931- s := s + TBoard(List[i]).Title + #13#10
5932- else if TObject(List[i]) is TThreadItem then
5933- s := s + TThreadItem(List[i]).Title + #13#10;
5934- end;
5935- if s <> '' then
5936- Clipboard.AsText := s;
5937- finally
5938- List.Free;
5939- end;
5940-end;
5941-
5942-procedure TGikoForm.SelectItemNameURLCopyActionExecute(Sender: TObject);
5943-var
5944- List: TList;
5945- i: Integer;
5946- s: string;
5947-begin
5948- s := '';
5949- List := TList.Create;
5950- try
5951- SelectListItem(List);
5952- for i := 0 to List.Count - 1 do begin
5953- if TObject(List[i]) is TBoard then
5954- s := s + TBoard(List[i]).Title + #13#10 + TBoard(List[i]).URL + #13#10
5955- else if TObject(List[i]) is TThreadItem then
5956- s := s + TThreadItem(List[i]).Title + #13#10 + TThreadItem(List[i]).URL + #13#10;
5957- end;
5958- if s <> '' then
5959- Clipboard.AsText := s;
5960- finally
5961- List.Free;
5962- end;
5963-end;
5964-
5965-//ActiveList‚ªTBoard‚©TCategory‚ŃXƒŒˆê——‚Å‚P‚ˆȏã‘I‘ð‚µ‚Ä‚¢‚é‚Æ—LŒø‚É‚È‚éActionde‹¤’Ê
5966-procedure TGikoForm.SelectItemNameCopyActionUpdate(Sender: TObject);
5967-begin
5968-{$IFDEF ACTCHK}
5969- //–³‚­‚Ä‚à‚¢‚¢IF•¶@ƒR[ƒh‚©‚ç–³—‚â‚èŒÄ‚΂Ȃ¢‚È‚çƒ`ƒFƒbƒN‚µ‚È‚­‚Ä‚àc
5970- if (Sender <> nil) and (Sender is TAction) then begin
5971-{$ENDIF}
5972- if ((GetActiveList is TBoard) or (GetActiveList is TCategory))and (ListView.SelCount > 0) then
5973- TAction(Sender).Enabled := True
5974- else
5975- TAction(Sender).Enabled := False;
5976-{$IFDEF ACTCHK}
5977- end;
5978-{$ENDIF}
5979-
5980-end;
5981-
5982-procedure TGikoForm.AllSelectActionUpdate(Sender: TObject);
5983-begin
5984- AllSelectAction.Enabled := ListView.SelCount > 0;
5985-end;
5986-
5987-procedure TGikoForm.BrowserTabCloseActionExecute(Sender: TObject);
5988-var
5989- idx: Integer;
5990-// ThreadItem: TThreadItem;
5991-begin
5992- idx := BrowserTab.TabIndex;
5993- if idx <> -1 then begin
5994- if BrowserTab.Tabs.Objects[idx] <> nil then begin
5995- //ThreadItem := TThreadItem(BrowserTab.Tabs.Objects[idx]);
5996- DeleteTab(TBrowserRecord(BrowserTab.Tabs.Objects[idx]));
5997- end;
5998- end;
5999-end;
6000-
6001-procedure TGikoForm.NotSelectTabCloseActionExecute(Sender: TObject);
6002-var
6003- i: Integer;
6004- idx: Integer;
6005-begin
6006- idx := BrowserTab.TabIndex;
6007- if idx = -1 then Exit;
6008- BrowserTab.Tabs.BeginUpdate;
6009- for i := BrowserTab.Tabs.Count - 1 downto BrowserTab.TabIndex + 1 do begin
6010- TBrowserRecord(BrowserTab.Tabs.Objects[i]).Free;
6011- BrowserTab.Tabs.Delete(i);
6012- end;
6013- if idx > 0 then begin
6014- for i := BrowserTab.TabIndex - 1 downto 0 do begin
6015- TBrowserRecord(BrowserTab.Tabs.Objects[i]).Free;
6016- BrowserTab.Tabs.Delete(i);
6017- end;
6018- end;
6019- BrowserTab.Tabs.EndUpdate;
6020-end;
6021-
6022-procedure TGikoForm.AllTabCloseActionExecute(Sender: TObject);
6023-var
6024- i: Integer;
6025-begin
6026- if GikoSys.Setting.ShowDialogForAllTabClose then
6027- if(MessageDlg('‘S‚Ẵ^ƒu‚ð•Â‚¶‚Ä‚æ‚낵‚¢‚Å‚·‚©H', mtConfirmation,[mbOk, mbCancel], 0) = mrCancel ) then
6028- Exit;
6029-
6030- FActiveContent := nil;
6031- BrowserNullTab.Thread := nil;
6032- BrowserTab.OnChange := nil;
6033- BrowserTab.Tabs.BeginUpdate;
6034- for i := BrowserTab.Tabs.Count - 1 downto 0 do begin
6035- TBrowserRecord(BrowserTab.Tabs.Objects[i]).Free;
6036- end;
6037- BrowserTab.Tabs.Clear;
6038- BrowserTab.Tabs.EndUpdate;
6039- BrowserTab.OnChange := BrowserTabChange;
6040- SetContent(BrowserNullTab);
6041- Self.Caption := CAPTION_NAME ;
6042-end;
6043-
6044-procedure TGikoForm.TreeSelectBoradReloadExecute(Sender: TObject);
6045-var
6046- Board: TBoard;
6047- TmpTreeNode: TTreeNode;
6048-begin
6049- TmpTreeNode := FClickNode;
6050- TreeView.Selected := FClickNode;
6051- Board := nil;
6052-
6053- if TObject(TmpTreeNode.Data) is TBoard then
6054- Board := TBoard(TmpTreeNode.Data)
6055- else if TObject(TmpTreeNode.Data) is TFavoriteBoardItem then
6056- Board := TFavoriteBoardItem(TmpTreeNode.Data).Item;
6057-
6058- if Board <> nil then
6059- DownloadList(Board);
6060-end;
6061-
6062-procedure TGikoForm.TreeSelectThreadReloadExecute(Sender: TObject);
6063-var
6064- ThreadItem: TThreadItem;
6065- TmpTreeNode: TTreeNode;
6066-begin
6067- TmpTreeNode := FClickNode;
6068- TreeView.Selected := FClickNode;
6069- ThreadItem := nil;
6070-
6071- if TObject(TmpTreeNode.Data) is TThreadItem then
6072- ThreadItem := TThreadItem(TmpTreeNode.Data)
6073- else if TObject(TmpTreeNode.Data) is TFavoriteThreadItem then
6074- ThreadItem := TFavoriteThreadItem(TmpTreeNode.Data).Item;
6075-
6076- if ThreadItem <> nil then
6077- DownloadContent(ThreadItem);
3920+ BrowserTab.OnChange(nil);
3921+ Exit;
3922+ end;
3923+ end;
60783924 end;
6079-
6080-procedure TGikoForm.TreeSelectURLCopyExecute(Sender: TObject);
6081-var
6082- TmpTreeNode: TTreeNode;
6083- s: string;
3925+function TGikoForm.Hook(var Message: TMessage): Boolean;
60843926 begin
6085- TmpTreeNode := FClickNode;
6086- TreeView.Selected := FClickNode;
6087- if TObject(TmpTreeNode.Data) is TBoard then begin
6088- s := TBoard(TmpTreeNode.Data).URL + #13#10;
6089- end else if TObject(TmpTreeNode.Data) is TFavoriteBoardItem then begin
6090- s := TFavoriteBoardItem(TmpTreeNode.Data).URL + #13#10;
6091- end else if (TObject(TmpTreeNode.Data) is TThreadItem) then begin
6092- s := TThreadItem(TmpTreeNode.Data).URL + #13#10;
6093- end else if TObject(TmpTreeNode.Data) is TFavoriteThreadItem then begin
6094- s := TFavoriteThreadItem(TmpTreeNode.Data).URL + #13#10;
3927+ //ƒTƒuƒtƒH[ƒ€‚ªƒƒCƒ“ƒƒjƒ…[‚ðŽ‚½‚È‚¢‚Æ‚«‚ɁAƒƒCƒ“ƒtƒH[ƒ€‚Ì
3928+ //ƒƒjƒ…[‚̃Vƒ‡[ƒgƒJƒbƒgƒL[‚ªƒTƒuƒƒjƒ…[‚©‚ç“ü—Í‚³‚ê‚é‚Ì‚ð‰ñ”ð
3929+ Result := False;
3930+ case Message.Msg of
3931+ CM_APPKEYDOWN:
3932+ Result := True; //ƒVƒ‡[ƒgƒJƒbƒgƒL[–³Œø
3933+ CM_APPSYSCOMMAND:
3934+ Result := True; // ƒAƒNƒZƒ‰ƒŒ[ƒ^‚𖳌ø‚É‚·‚é
60953935 end;
6096- Clipboard.AsText := s;
60973936 end;
60983937
6099-procedure TGikoForm.TreeSelectNameURLCopyExecute(Sender: TObject);
6100-var
6101- TmpTreeNode: TTreeNode;
6102- s: string;
3938+procedure TGikoForm.ListPopupMenuPopup(Sender: TObject);
61033939 begin
6104- TmpTreeNode := FClickNode;
6105- TreeView.Selected := FClickNode;
6106- if TObject(TmpTreeNode.Data) is TBoard then begin
6107- s := TBoard(TmpTreeNode.Data).Title + #13#10 + TBoard(TmpTreeNode.Data).URL + #13#10;
6108- end else if TObject(TmpTreeNode.Data) is TFavoriteBoardItem then begin
6109- s := TFavoriteBoardItem(TmpTreeNode.Data).Item.Title + #13#10 + TFavoriteBoardItem(TmpTreeNode.Data).URL + #13#10;
6110- end else if (TObject(TmpTreeNode.Data) is TThreadItem) then begin
6111- s := TThreadItem(TmpTreeNode.Data).Title + #13#10 + TThreadItem(TmpTreeNode.Data).URL + #13#10;
6112- end else if TObject(TmpTreeNode.Data) is TFavoriteThreadItem then begin
6113- s := TFavoriteThreadItem(TmpTreeNode.Data).Item.Title + #13#10 + TFavoriteThreadItem(TmpTreeNode.Data).URL + #13#10;
6114- end;
6115- Clipboard.AsText := s;
3940+ ItemRoundPMenu.Visible := (GetActiveList is TBoard);
3941+ ItemReservPMenu.Visible := (GetActiveList is TBoard);
3942+ LPMSep01.Visible := (GetActiveList is TBoard);
3943+ ListRoundPMenu.Visible := (GetActiveList is TCategory);// or (GetActiveList is TBoard);
3944+ ListReservPMenu.Visible := (GetActiveList is TCategory);// or (GetActiveList is TBoard);
3945+ LPMSep02.Visible := (GetActiveList is TCategory) or (GetActiveList is TBoard);
3946+ KidokuPMenu.Visible := (GetActiveList is TBoard);
3947+ MidokuPMenu.Visible := (GetActiveList is TBoard);
3948+ UrlCopyPMenu.Visible := (GetActiveList is TCategory) or (GetActiveList is TBoard);
3949+ NameUrlCopyPMenu.Visible := (GetActiveList is TCategory) or (GetActiveList is TBoard);
3950+ AllSelectPMenu.Visible := (GetActiveList is TCategory) or (GetActiveList is TBoard);
3951+ LPMSep05.Visible := (GetActiveList is TCategory) or (GetActiveList is TBoard);
3952+ DeletePMenu.Visible := (GetActiveList is TBoard);
3953+ LPMSep06.Visible := (GetActiveList is TCategory) or (GetActiveList is TBoard);
3954+ BoardFavoriteAddMenu.Visible := (GetActiveList is TCategory);
3955+ ThreadFavoriteAddMenu.Visible := (GetActiveList is TBoard);
3956+
3957+ AddRoundNameMenu(ItemReservPMenu);
3958+ AddRoundNameMenu(ListReservPMenu);
61163959 end;
61173960
3961+
3962+//ActiveList‚ªTBoard‚©TCategory‚ŃXƒŒˆê——‚Å‚P‚ˆȏã‘I‘ð‚µ‚Ä‚¢‚é‚Æ—LŒø‚É‚È‚éActionde‹¤’Ê
61183963 procedure TGikoForm.TreePopupMenuPopup(Sender: TObject);
61193964 begin
61203965 FClickNode := TreeView.Selected;
@@ -6297,31 +4142,31 @@ begin
62974142 if GikoSys.Setting.ListOrientation = gloHorizontal then begin
62984143 if ViewPanel.Width < 2 then begin
62994144 ViewPanel.Width := 1;
6300- BrowserMaxAction.ImageIndex := TOOL_ICON_WIDTH_NORMAL;
6301- BrowserMinAction.ImageIndex := TOOL_ICON_WIDTH_MIN;
4145+ GikoDM.BrowserMaxAction.ImageIndex := TOOL_ICON_WIDTH_NORMAL;
4146+ GikoDM.BrowserMinAction.ImageIndex := TOOL_ICON_WIDTH_MIN;
63024147 GikoSys.Setting.ListWidthState := glsMax;
63034148 end else if ViewPanel.Width > (ThreadMainPanel.Width - 80) then begin
6304- BrowserMaxAction.ImageIndex := TOOL_ICON_WIDTH_MAX;
6305- BrowserMinAction.ImageIndex := TOOL_ICON_WIDTH_NORMAL;
4149+ GikoDM.BrowserMaxAction.ImageIndex := TOOL_ICON_WIDTH_MAX;
4150+ GikoDM.BrowserMinAction.ImageIndex := TOOL_ICON_WIDTH_NORMAL;
63064151 GikoSys.Setting.ListWidthState := glsMin;
63074152 end else begin
6308- BrowserMaxAction.ImageIndex := TOOL_ICON_WIDTH_MAX;
6309- BrowserMinAction.ImageIndex := TOOL_ICON_WIDTH_MIN;
4153+ GikoDM.BrowserMaxAction.ImageIndex := TOOL_ICON_WIDTH_MAX;
4154+ GikoDM.BrowserMinAction.ImageIndex := TOOL_ICON_WIDTH_MIN;
63104155 GikoSys.Setting.ListWidthState := glsNormal;
63114156 end;
63124157 end else begin
63134158 if ViewPanel.Height < 2 then begin
63144159 ViewPanel.Height := 1;
6315- BrowserMaxAction.ImageIndex := TOOL_ICON_HEIGHT_NORMAL;
6316- BrowserMinAction.ImageIndex := TOOL_ICON_HEIGHT_MIN;
4160+ GikoDM.BrowserMaxAction.ImageIndex := TOOL_ICON_HEIGHT_NORMAL;
4161+ GikoDM.BrowserMinAction.ImageIndex := TOOL_ICON_HEIGHT_MIN;
63174162 GikoSys.Setting.ListHeightState := glsMax;
63184163 end else if ViewPanel.Height > (ThreadMainPanel.Height - BrowserCoolBar.Height - 7) then begin
6319- BrowserMaxAction.ImageIndex := TOOL_ICON_HEIGHT_MAX;
6320- BrowserMinAction.ImageIndex := TOOL_ICON_HEIGHT_NORMAL;
4164+ GikoDM.BrowserMaxAction.ImageIndex := TOOL_ICON_HEIGHT_MAX;
4165+ GikoDM.BrowserMinAction.ImageIndex := TOOL_ICON_HEIGHT_NORMAL;
63214166 GikoSys.Setting.ListHeightState := glsMin;
63224167 end else begin
6323- BrowserMaxAction.ImageIndex := TOOL_ICON_HEIGHT_MAX;
6324- BrowserMinAction.ImageIndex := TOOL_ICON_HEIGHT_MIN;
4168+ GikoDM.BrowserMaxAction.ImageIndex := TOOL_ICON_HEIGHT_MAX;
4169+ GikoDM.BrowserMinAction.ImageIndex := TOOL_ICON_HEIGHT_MIN;
63254170 GikoSys.Setting.ListHeightState := glsNormal;
63264171 end;
63274172 end;
@@ -6381,7 +4226,7 @@ begin
63814226 (ListView.Focused) or (SelectComboBox.Focused) or (AddressComboBox.Focused)
63824227 then
63834228 else
6384- SetFocusForBrowserAction.Execute;
4229+ GikoDM.SetFocusForBrowserAction.Execute;
63854230
63864231 end;
63874232
@@ -6463,7 +4308,7 @@ begin
64634308 BrowserBottomPanel.Visible := False;
64644309 // BrowserTab.Visible := False;
64654310 // BrowserTopPanel.Height := 26;
6466- AllTabCloseAction.Execute;
4311+ GikoDM.AllTabCloseAction.Execute;
64674312 end;
64684313 end;
64694314
@@ -6596,33 +4441,6 @@ begin
65964441 end;
65974442 end;
65984443
6599-procedure TGikoForm.SelectReservActionUpdate(Sender: TObject);
6600-var
6601- i: Integer;
6602- List: TList;
6603-begin
6604- if (GetActiveList is TBoard) and (ListView.SelCount > 0) then begin
6605- List := TList.Create;
6606- try
6607- SelectListItem(List);
6608- for i := 0 to List.Count - 1 do begin
6609- if TObject(List[i]) is TThreadItem then begin
6610- if TThreadItem(List[i]).IsLogFile then begin
6611- SelectReservAction.Enabled := True;
6612- Exit;
6613- end;
6614- end;
6615- end;
6616- SelectReservAction.Enabled := False;
6617- finally
6618- List.Free;
6619- end;
6620- end else if (GetActiveList is TCategory) and (ListView.SelCount > 0) then
6621- SelectReservAction.Enabled := True
6622- else
6623- SelectReservAction.Enabled := False;
6624-end;
6625-
66264444 procedure TGikoForm.RoundNamePopupMenuPopup(Sender: TObject);
66274445 begin
66284446 AddRoundNameMenu(RoundNamePopupMenu.Items);
@@ -6636,11 +4454,11 @@ begin
66364454 MenuItem.Clear;
66374455 Item := TMenuItem.Create(Self);
66384456 Item.Caption := 'V‚µ‚¢–¼‘O‚ŏ„‰ñ—\–ñ(&N)...';
6639- Item.OnClick := SelectNewRoundNameExecute;
4457+ Item.OnClick := GikoDM.SelectNewRoundNameExecute;
66404458 MenuItem.Add(Item);
66414459 Item := TMenuItem.Create(Self);
66424460 Item.Caption := '„‰ñƒŠƒXƒg‚©‚çíœ(&D)';
6643- Item.OnClick := SelectDeleteRoundExecute;
4461+ Item.OnClick := GikoDM.SelectDeleteRoundExecute;
66444462 MenuItem.Add(Item);
66454463 Item := TMenuItem.Create(Self);
66464464 Item.Caption := '-';
@@ -6653,49 +4471,6 @@ begin
66534471 end;
66544472 end;
66554473
6656-procedure TGikoForm.SelectNewRoundNameExecute(Sender: TObject);
6657-var
6658- s: string;
6659- Dlg: TRoundNameDialog;
6660- cnt: Integer;
6661-
6662-begin
6663- //ŒÄ‚яo‚µŒ³‚ªATAction‚ÅListView‚É‘I‘ð‚ª‚¢‚È‚¯‚ê‚΁AEXIT‚·‚é
6664- if (Sender is TAction) and (ListView.Selected = nil) then
6665- Exit;
6666-
6667- //“o˜^ãŒÀƒ`ƒFƒbƒN
6668- cnt := RoundList.Count[grtBoard];
6669- cnt := cnt + RoundList.Count[grtItem];
6670- if cnt > 500 then begin
6671- MsgBox(Handle, '„‰ñ‚Í500ˆÈã“o˜^‚Å‚«‚Ü‚¹‚ñ', 'ƒGƒ‰[', MB_OK or MB_ICONSTOP);
6672- Exit;
6673- end;
6674-
6675- Dlg := TRoundNameDialog.Create(Self);
6676- try
6677- Dlg.ShowModal;
6678- if Dlg.ModalResult <> mrCancel then begin
6679- s := Trim(Dlg.RoundNameEdit.Text);
6680- if (Sender is TMenuItem) then begin
6681- SetSelectItemRound(True, s, TMenuItem(Sender).Parent.Name);
6682- end else if (Sender is TAction) then begin
6683- if (ListView.Selected <> nil) then begin
6684- if (TObject(ListView.Selected.Data) is TThreadItem) then begin
6685- SetSelectItemRound(True, s,
6686- TThreadItem(ListView.Selected.Data).Title);
6687- end else if (TObject(ListView.Selected.Data) is TBoard) then begin
6688- SetSelectItemRound(True, s,
6689- TBoard(ListView.Selected.Data).Title);
6690- end;
6691- end;
6692- end;
6693- ListView.Refresh;
6694- end;
6695- finally
6696- Dlg.Free;
6697- end;
6698-end;
66994474 procedure TGikoForm.SetSelectItemRound(RoundFlag: Boolean; RoundName: string; ParentName: string);
67004475 var
67014476 threadItem : TThreadItem;
@@ -6742,37 +4517,6 @@ begin
67424517 end;
67434518 end;
67444519
6745-procedure TGikoForm.SelectDeleteRoundExecute(Sender: TObject);
6746-var
6747- s : String;
6748-begin
6749- if (Sender is TMenuItem) then begin
6750- try
6751- SetSelectItemRound(False, '', TMenuItem(Sender).Parent.Name);
6752- except
6753- end;
6754- end else if (Sender is TAction) then begin
6755- try
6756- if ListView.Selected <> nil then begin
6757- if (TObject(ListView.Selected.Data) is TThreadItem) then begin
6758- s := TThreadItem(ListView.Selected.Data).Title;
6759- end else if (TObject(ListView.Selected.Data) is TBoard) then begin
6760- s := TBoard(ListView.Selected.Data).Title;
6761- end;
6762- SetSelectItemRound(False, '', s);
6763-
6764- end;
6765- except
6766- end;
6767- end;
6768- ListView.Refresh;
6769-end;
6770-
6771-procedure TGikoForm.SelectReservActionExecute(Sender: TObject);
6772-begin
6773- // ‚±‚̃Rƒƒ“ƒgíœ‚µ‚Ä‚Í‘Ê–Ú
6774-end;
6775-
67764520 procedure TGikoForm.SetSelectRoundName(Sender: TObject);
67774521 var
67784522 MenuItem: TMenuItem;
@@ -6784,256 +4528,6 @@ begin
67844528 end;
67854529 end;
67864530
6787-procedure TGikoForm.NewBoardActionExecute(Sender: TObject);
6788-var
6789- Dlg: TNewBoardDialog;
6790- Msg: string;
6791- i: Integer;
6792-begin
6793- for i := 0 to Screen.CustomFormCount - 1 do begin
6794- if TObject(Screen.CustomForms[i]) is TEditorForm then begin
6795- Msg := 'ƒŒƒXƒGƒfƒBƒ^‚ð‘S‚ĕ‚¶‚Ä‚­‚¾‚³‚¢';
6796- MsgBox(Handle, Msg, 'ƒGƒ‰[', MB_OK or MB_ICONSTOP);
6797- Exit;
6798- end;
6799- end;
6800- Dlg := TNewBoardDialog.Create(Self);
6801- try
6802- Dlg.ShowModal;
6803- finally
6804- Dlg.Release;
6805- end;
6806-end;
6807-
6808-procedure TGikoForm.LoginActionExecute(Sender: TObject);
6809-var
6810- TmpCursor: TCursor;
6811- msg : String;
6812-begin
6813- if GikoSys.Dolib.Connected then begin
6814- //ƒƒOƒAƒEƒg
6815- GikoSys.Dolib.Disconnect;
6816- LoginAction.Checked := False;
6817- AddMessageList(GikoSys.Setting.GetMessage(Ord(gmLogout)), nil, gmiOK);
6818- LoginAction.Caption := 'ƒƒOƒCƒ“(&L)';
6819- end else begin
6820- TmpCursor := Screen.Cursor;
6821- Screen.Cursor := crHourGlass;
6822- try
6823- //’ʏ탍ƒOƒCƒ“
6824- if not GikoSys.Setting.ForcedLogin then begin
6825- GikoSys.Dolib.ClientUA := 'gikoNavi/1.00';
6826- GikoSys.Dolib.UserName := GikoSys.Setting.UserID;
6827- GikoSys.Dolib.Password := GikoSys.Setting.Password;
6828- if GikoSys.Setting.ReadProxy then begin
6829- GikoSys.Dolib.ProxyAddress := GikoSys.Setting.ReadProxyAddress;
6830- GikoSys.Dolib.ProxyPort := GikoSys.Setting.ReadProxyPort;
6831- end else begin
6832- GikoSys.Dolib.ProxyAddress := '';
6833- GikoSys.Dolib.ProxyPort := 0;
6834- end;
6835- if GikoSys.Dolib.Connect then begin
6836- LoginAction.Checked := True;
6837- AddMessageList(GikoSys.Setting.GetMessage(Ord(gmLogin)) + GikoSys.Setting.UserID, nil, gmiOK);
6838- LoginAction.Caption := 'ƒƒOƒAƒEƒg(&L)';
6839- //LoginToolButton.Style := tbsCheck;
6840- end else begin
6841- // MsgBox(Handle, 'ƒƒOƒCƒ“o—ˆ‚Ü‚¹‚ñ‚Å‚µ‚½', 'ƒGƒ‰[', MB_OK or MB_ICONSTOP);
6842- AddMessageList(GikoSys.Dolib.ErrorMsg, nil, gmiNG);
6843- PlaySound('Error');
6844- LoginAction.Checked := False;
6845- //LoginToolButton.Down := False;
6846- ///LoginToolButton.Style := tbsButton;
6847- end;
6848- end else begin
6849- msg := '‹­§ƒƒOƒCƒ“ƒ‚[ƒh‚ł́CƒT[ƒo‚̏ؖ¾‘‚Ì—LŒø«‚ðƒ`ƒFƒbƒN‚µ‚Ü‚¹‚ñB' + #13#10
6850- + '‹U‘•ƒT[ƒo‚̏ꍇA‚ ‚È‚½‚̃pƒXƒ[ƒh“‚Ü‚ê‚é‰Â”\«‚ª‚ ‚è‚Ü‚·B' + #13#10
6851- + '‚±‚̃‚[ƒh‚эƒOƒCƒ“‚ðŽŽ‚Ý‚Ü‚·‚©H' + #13#10;
6852- if MsgBox(Handle, msg, 'Œx', MB_YESNO or MB_ICONEXCLAMATION) = IDYES then begin
6853- GikoSys.Dolib.ClientUA := 'gikoNavi/1.00';
6854- GikoSys.Dolib.UserName := GikoSys.Setting.UserID;
6855- GikoSys.Dolib.Password := GikoSys.Setting.Password;
6856- if GikoSys.Setting.ReadProxy then begin
6857- GikoSys.Dolib.ProxyAddress := GikoSys.Setting.ReadProxyAddress;
6858- GikoSys.Dolib.ProxyPort := GikoSys.Setting.ReadProxyPort;
6859- end else begin
6860- GikoSys.Dolib.ProxyAddress := '';
6861- GikoSys.Dolib.ProxyPort := 0;
6862- end;
6863- //SSLáŠQ—p‹­§ƒƒOƒCƒ“
6864- GikoSys.Dolib.ForcedConnect;
6865- if GikoSys.Dolib.Connect then begin
6866- LoginAction.Checked := True;
6867- AddMessageList(GikoSys.Setting.GetMessage(Ord(gmForceLogin)) + GikoSys.Setting.UserID, nil, gmiOK);
6868- LoginAction.Caption := 'ƒƒOƒAƒEƒg(&L)';
6869- //LoginToolButton.Style := tbsCheck;
6870- end else begin
6871- // MsgBox(Handle, 'ƒƒOƒCƒ“o—ˆ‚Ü‚¹‚ñ‚Å‚µ‚½', 'ƒGƒ‰[', MB_OK or MB_ICONSTOP);
6872- AddMessageList(GikoSys.Dolib.ErrorMsg, nil, gmiNG);
6873- PlaySound('Error');
6874- LoginAction.Checked := False;
6875- //LoginToolButton.Down := False;
6876- //LoginToolButton.Style := tbsButton;
6877- end;
6878- end else begin
6879- LoginAction.Checked := False;
6880- //LoginToolButton.Down := False;
6881- //LoginToolButton.Style := tbsButton;
6882- end;
6883- end;
6884- finally
6885- Screen.Cursor := TmpCursor;
6886- end;
6887- end;
6888-end;
6889-
6890-procedure TGikoForm.KeySettingActionExecute(Sender: TObject);
6891-var
6892- Dlg: TKeySettingForm;
6893-begin
6894- Dlg := TKeySettingForm.Create(Self);
6895- try
6896- if Dlg.ShowModal = mrOk then begin
6897- GikoSys.SaveKeySetting(ActionList);
6898- GikoSys.SaveEditorKeySetting(Dlg.EditorForm.ActionList);
6899- GikoSys.Setting.Gestures.SaveGesture( GikoSys.Setting.GetGestureFileName );
6900- end;
6901-
6902- finally
6903- Dlg.Release;
6904- MouseGesture.UnHook;
6905- MouseGesture.OnGestureStart := OnGestureStart;
6906- MouseGesture.OnGestureMove := OnGestureMove;
6907- MouseGesture.OnGestureEnd := OnGestureEnd;
6908- if GikoSys.Setting.GestureEnabled then begin
6909- GikoSys.Setting.Gestures.ClearGesture;
6910- GikoSys.Setting.Gestures.LoadGesture(
6911- GikoSys.Setting.GetGestureFileName, ActionList );
6912- MouseGesture.SetHook( Handle );
6913- end;
6914- end;
6915-end;
6916-
6917-procedure TGikoForm.ArrangeActionExecute(Sender: TObject);
6918-begin
6919- if ArrangeAction.Checked then begin
6920- //c
6921- ViewPanel.Align := alNone;
6922- ListSplitter.Align := alNone;
6923- ThreadPanel.Align := alNone;
6924-
6925- ViewPanel.Width := FBrowserSizeWidth;
6926- ViewPanel.Align := alLeft;
6927-
6928- ListSplitter.Width := 5;
6929- ListSplitter.Align := alLeft;
6930-
6931- ViewPanel.Left := -10;
6932-
6933- ThreadPanel.Align := alClient;
6934-
6935- GikoSys.Setting.ListOrientation := gloHorizontal;
6936- case GikoSys.Setting.ListWidthState of
6937- glsMax: begin
6938- BrowserMaxAction.ImageIndex := TOOL_ICON_WIDTH_NORMAL;
6939- BrowserMinAction.ImageIndex := TOOL_ICON_WIDTH_MIN;
6940- ViewPanel.Width := 1;
6941- end;
6942- glsNormal: begin
6943- BrowserMaxAction.ImageIndex := TOOL_ICON_WIDTH_MAX;
6944- BrowserMinAction.ImageIndex := TOOL_ICON_WIDTH_MIN;
6945- end;
6946- glsMin: begin
6947- BrowserMaxAction.ImageIndex := TOOL_ICON_WIDTH_MAX;
6948- BrowserMinAction.ImageIndex := TOOL_ICON_WIDTH_NORMAL;
6949- ViewPanel.Width := ThreadMainPanel.Width - 80;
6950- end;
6951- end;
6952- end else begin
6953- //‰¡
6954- ViewPanel.Align := alNone;
6955- ListSplitter.Align := alNone;
6956- ThreadPanel.Align := alNone;
6957-
6958- ViewPanel.Height := FBrowserSizeHeight;
6959- ViewPanel.Align := alTop;
6960-
6961- ListSplitter.Height := 5;
6962- ListSplitter.Align := alTop;
6963-
6964- ViewPanel.Top := -10;
6965-
6966- ThreadPanel.Align := alClient;
6967- GikoSys.Setting.ListOrientation := gloVertical;
6968- case GikoSys.Setting.ListHeightState of
6969- glsMax: begin
6970- BrowserMaxAction.ImageIndex := TOOL_ICON_HEIGHT_NORMAL;
6971- BrowserMinAction.ImageIndex := TOOL_ICON_HEIGHT_MIN;
6972- ViewPanel.Height := 1;
6973- end;
6974- glsNormal: begin
6975- BrowserMaxAction.ImageIndex := TOOL_ICON_HEIGHT_MAX;
6976- BrowserMinAction.ImageIndex := TOOL_ICON_HEIGHT_MIN;
6977- end;
6978- glsMin: begin
6979- BrowserMaxAction.ImageIndex := TOOL_ICON_HEIGHT_MAX;
6980- BrowserMinAction.ImageIndex := TOOL_ICON_HEIGHT_NORMAL;
6981- ViewPanel.Height := ThreadMainPanel.Height - BrowserCoolBar.Height - 7;
6982- end;
6983- end;
6984- end;
6985-
6986-end;
6987-
6988-procedure TGikoForm.PaneInitActionExecute(Sender: TObject);
6989-begin
6990- CabinetPanel.Width := 150;
6991- MessagePanel.Height := 40;
6992-
6993- FBrowserSizeWidth := 200;
6994- FBrowserSizeHeight := 200;
6995- if ArrangeAction.Checked then begin
6996- ViewPanel.Width := FBrowserSizeWidth;
6997- end else begin
6998- ViewPanel.Height := FBrowserSizeHeight;
6999- end;
7000- if GikoSys.Setting.ListOrientation = gloHorizontal then begin
7001- if GikoSys.Setting.ListHeightState = glsMax then begin
7002- BrowserMaxAction.ImageIndex := TOOL_ICON_HEIGHT_MAX;
7003- GikoSys.Setting.ListHeightState := glsNormal;
7004- end;
7005- end else begin
7006- if GikoSys.Setting.ListWidthState = glsMax then begin
7007- BrowserMaxAction.ImageIndex := TOOL_ICON_WIDTH_MAX;
7008- GikoSys.Setting.ListWidthState := glsNormal;
7009- end;
7010- end;
7011-end;
7012-
7013-procedure TGikoForm.ActiveLogDeleteActionExecute(Sender: TObject);
7014-const
7015- DEL_MSG = 'g^0h‚̃ƒO‚ðíœ‚µ‚Ü‚·B‚æ‚낵‚¢‚Å‚·‚©H';
7016- DEL_TITLE = 'íœŠm”F';
7017-var
7018- idx: Integer;
7019- ThreadItem: TThreadItem;
7020-begin
7021- idx := BrowserTab.TabIndex;
7022- if idx <> -1 then begin
7023- if BrowserTab.Tabs.Objects[idx] <> nil then begin
7024- ThreadItem := TBrowserRecord(BrowserTab.Tabs.Objects[idx]).FThread;
7025- if GikoSys.Setting.DeleteMsg then
7026- if (GetKeyState( VK_SHIFT ) and $80000000) = 0 then
7027- if MsgBox(Handle, StringReplace( DEL_MSG, '^0', ThreadItem.Title, [rfReplaceAll] ) , DEL_TITLE, MB_YESNO or MB_ICONWARNING or MB_DEFBUTTON2) <> ID_YES then
7028- Exit;
7029- DeleteTab(TBrowserRecord(BrowserTab.Tabs.Objects[idx]));
7030- ThreadItem.DeleteLogFile;
7031- if ThreadItem.ParentBoard = FActiveList then
7032- ListView.Refresh;
7033- end;
7034- end;
7035-end;
7036-
70374531 function TGikoForm.GetCoolBand(CoolBar: TCoolBar; Control: TWinControl): TCoolBand;
70384532 var
70394533 i: Integer;
@@ -7049,125 +4543,10 @@ begin
70494543 end;
70504544 end;
70514545
7052-procedure TGikoForm.BrowserTabToolBarResize(Sender: TObject);
7053-begin
7054- if BrowserTab.Parent = BrowserTabToolBar then
7055- BrowserTab.Width := BrowserTabToolBar.Width;
7056-end;
7057-
7058-procedure TGikoForm.SelectTextClearActionExecute(Sender: TObject);
7059-const
7060- DEL_MSG = 'iž‚Ý‘S—š—ð‚ðíœ‚µ‚Ü‚·B‚æ‚낵‚¢‚Å‚·‚©H';
7061- DEL_TITLE = 'íœŠm”F';
7062-begin
7063- if (GetKeyState( VK_SHIFT ) and $80000000) = 0 then
7064- if MsgBox(Handle, DEL_MSG, DEL_TITLE, MB_YESNO or MB_ICONWARNING or MB_DEFBUTTON2) <> ID_YES then
7065- Exit;
7066- GikoSys.Setting.SelectTextList.Clear;
7067- SelectComboBox.Items.Clear;
7068- SelectComboBox.Text := '';
7069- SetListViewType( gvtAll );
7070-end;
7071-
7072-procedure TGikoForm.NameTextClearActionExecute(Sender: TObject);
7073-var
7074- i: Integer;
7075-const
7076- DEL_MSG = 'ƒŒƒXƒGƒfƒBƒ^–¼‘O‘S—š—ð‚ðíœ‚µ‚Ü‚·B‚æ‚낵‚¢‚Å‚·‚©H';
7077- DEL_TITLE = 'íœŠm”F';
7078-begin
7079- if (GetKeyState( VK_SHIFT ) and $80000000) = 0 then
7080- if MsgBox(Handle, DEL_MSG, DEL_TITLE, MB_YESNO or MB_ICONWARNING or MB_DEFBUTTON2) <> ID_YES then
7081- Exit;
7082- GikoSys.Setting.NameList.Clear;
7083- for i := 0 to Screen.CustomFormCount - 1 do begin
7084- if TObject(Screen.CustomForms[i]) is TEditorForm then
7085- TEditorForm(Screen.CustomForms[i]).NameComboBox.Items.Clear;
7086- end;
7087-end;
7088-
7089-procedure TGikoForm.MailTextClearActionExecute(Sender: TObject);
7090-var
7091- i: Integer;
7092-const
7093- DEL_MSG = 'ƒŒƒXƒGƒfƒBƒ^ƒ[ƒ‹‘S—š—ð‚ðíœ‚µ‚Ü‚·B‚æ‚낵‚¢‚Å‚·‚©H';
7094- DEL_TITLE = 'íœŠm”F';
7095-begin
7096- if (GetKeyState( VK_SHIFT ) and $80000000) = 0 then
7097- if MsgBox(Handle, DEL_MSG, DEL_TITLE, MB_YESNO or MB_ICONWARNING or MB_DEFBUTTON2) <> ID_YES then
7098- Exit;
7099- GikoSys.Setting.MailList.Clear;
7100- for i := 0 to Screen.CustomFormCount - 1 do begin
7101- if TObject(Screen.CustomForms[i]) is TEditorForm then
7102- TEditorForm(Screen.CustomForms[i]).MailComboBox.Items.Clear;
7103- end;
7104-end;
7105-
7106-procedure TGikoForm.LeftmostTabSelectActionExecute(Sender: TObject);
7107-begin
7108- if BrowserTab.Tabs.Count > 0 then begin
7109- BrowserTab.TabIndex := 0;
7110- BrowserTab.OnChange(nil);
7111- end;
7112-end;
7113-
7114-procedure TGikoForm.LeftTabSelectActionExecute(Sender: TObject);
7115-begin
7116- if BrowserTab.Tabs.Count > 0 then begin
7117- if BrowserTab.TabIndex = -1 then begin
7118- BrowserTab.TabIndex := 0;
7119- BrowserTab.OnChange(nil);
7120- end else if BrowserTab.TabIndex > 0 then begin
7121- BrowserTab.TabIndex := BrowserTab.TabIndex - 1;
7122- BrowserTab.OnChange(nil);
7123- end;
7124- end;
7125-end;
7126-
7127-procedure TGikoForm.RightTabSelectActionExecute(Sender: TObject);
7128-begin
7129- if BrowserTab.Tabs.Count > 0 then begin
7130- if BrowserTab.TabIndex = -1 then begin
7131- BrowserTab.TabIndex := BrowserTab.Tabs.Count - 1;
7132- BrowserTab.OnChange(nil);
7133- end else if BrowserTab.TabIndex < (BrowserTab.Tabs.Count - 1) then begin
7134- BrowserTab.TabIndex := BrowserTab.TabIndex + 1;
7135- BrowserTab.OnChange(nil);
7136- end;
7137- end;
7138-end;
7139-
7140-procedure TGikoForm.RightmostTabSelectActionExecute(Sender: TObject);
7141-begin
7142- if BrowserTab.Tabs.Count > 0 then begin
7143- BrowserTab.TabIndex := BrowserTab.Tabs.Count - 1;
7144- BrowserTab.OnChange(nil);
7145- end;
7146-end;
7147-
7148-//ƒuƒ‰ƒEƒUƒ^ƒu‚ª‚P‚ˆȏã‚ō¶’[‚Å‚È‚¢Action‚Å‹¤’Ê
7149-procedure TGikoForm.LeftTabSelectActionUpdate(Sender: TObject);
7150-begin
7151-{$IFDEF ACTCHK}
7152- //–³‚­‚Ä‚à‚¢‚¢IF•¶@ƒR[ƒh‚©‚ç–³—‚â‚èŒÄ‚΂Ȃ¢‚È‚çƒ`ƒFƒbƒN‚µ‚È‚­‚Ä‚àc
7153- if (Sender <> nil) and (Sender is TAction) then begin
7154-{$ENDIF}
7155- TAction(Sender).Enabled := (BrowserTab.Tabs.Count > 0) and (BrowserTab.TabIndex <> 0);
7156-{$IFDEF ACTCHK}
7157- end;
7158-{$ENDIF}
7159-end;
7160-//ƒuƒ‰ƒEƒUƒ^ƒu‚ª‚P‚ˆȏã‚ʼnE’[‚Å‚È‚¢Action‚Å‹¤’Ê
7161-procedure TGikoForm.RightTabSelectActionUpdate(Sender: TObject);
4546+procedure TGikoForm.BrowserTabToolBarResize(Sender: TObject);
71624547 begin
7163-{$IFDEF ACTCHK}
7164- //–³‚­‚Ä‚à‚¢‚¢IF•¶@ƒR[ƒh‚©‚ç–³—‚â‚èŒÄ‚΂Ȃ¢‚È‚çƒ`ƒFƒbƒN‚µ‚È‚­‚Ä‚àc
7165- if (Sender <> nil) and (Sender is TAction) then begin
7166-{$ENDIF}
7167- TAction(Sender).Enabled := (BrowserTab.Tabs.Count > 0) and (BrowserTab.TabIndex <> BrowserTab.Tabs.Count - 1);
7168-{$IFDEF ACTCHK}
7169- end;
7170-{$ENDIF}
4548+ if BrowserTab.Parent = BrowserTabToolBar then
4549+ BrowserTab.Width := BrowserTabToolBar.Width;
71714550 end;
71724551
71734552 procedure TGikoForm.WMSettingChange(var Message: TWMWinIniChange);
@@ -7200,11 +4579,11 @@ begin
72004579
72014580 //‚¨‹C‚É“ü‚è‚̒ljÁ
72024581 NewMenu := TMenuItem.Create(MainMenu);
7203- NewMenu.Action := FavoriteAddAction;
4582+ NewMenu.Action := GikoDM.FavoriteAddAction;
72044583 FavoriteMenu.Add(NewMenu);
72054584 //‚¨‹C‚É“ü‚è‚̐®—
72064585 NewMenu := TMenuItem.Create(FavoriteMenu);
7207- NewMenu.Action := FavoriteArrangeAction;
4586+ NewMenu.Action := GikoDM.FavoriteArrangeAction;
72084587 FavoriteMenu.Add(NewMenu);
72094588 //ƒZƒpƒŒ[ƒ^
72104589 NewMenu := TMenuItem.Create(FavoriteMenu);
@@ -7298,11 +4677,6 @@ begin
72984677 SetLinkBar;
72994678 end;
73004679
7301-procedure TGikoForm.FavoriteAddActionExecute(Sender: TObject);
7302-begin
7303- ShowFavoriteAddDialog(GetActiveContent);
7304-end;
7305-
73064680 procedure TGikoForm.FavoriteClick(Sender: TObject);
73074681 begin
73084682
@@ -7346,51 +4720,16 @@ begin
73464720
73474721 if GikoSys.Setting.ListOrientation = gloHorizontal then begin
73484722 if GikoSys.Setting.ListWidthState = glsMin then begin
7349- BrowserMaxAndFocusAction.Execute;
4723+ GikoDM.BrowserMaxAndFocusAction.Execute;
73504724 end;
73514725 end else begin
73524726 if GikoSys.Setting.ListHeightState = glsMin then begin
7353- BrowserMaxAndFocusAction.Execute;
4727+ GikoDM.BrowserMaxAndFocusAction.Execute;
73544728 end;
73554729 end;
73564730 end;
73574731 end;
73584732
7359-procedure TGikoForm.BoardFavoriteAddActionExecute(Sender: TObject);
7360-begin
7361- if TObject(ListView.Selected.Data) is TBoard then
7362- ShowFavoriteAddDialog(TObject(ListView.Selected.Data));
7363-end;
7364-
7365-procedure TGikoForm.BoardFavoriteAddActionUpdate(Sender: TObject);
7366-begin
7367- BoardFavoriteAddAction.Enabled := (GetActiveList is TCategory) and (ListView.SelCount > 0);
7368-end;
7369-
7370-procedure TGikoForm.ThreadFavoriteAddActionExecute(Sender: TObject);
7371-begin
7372- if TObject(ListView.Selected.Data) is TThreadItem then
7373- ShowFavoriteAddDialog(TObject(ListView.Selected.Data));
7374-end;
7375-
7376-procedure TGikoForm.TreeSelectFavoriteAddActionExecute(Sender: TObject);
7377-begin
7378- ShowFavoriteAddDialog(TObject(FClickNode.Data));
7379-end;
7380-
7381-procedure TGikoForm.FavoriteArrangeActionExecute(Sender: TObject);
7382-var
7383- Dlg: TFavoriteArrangeDialog;
7384-begin
7385- Dlg := TFavoriteArrangeDialog.Create(Self);
7386- try
7387- Dlg.ShowModal;
7388- finally
7389- Dlg.Release;
7390- end;
7391- PostMessage( Handle, USER_SETLINKBAR, 0, 0 );
7392-end;
7393-
73944733 procedure TGikoForm.BBSMenuItemOnClick(
73954734 Sender : TObject
73964735 );
@@ -7407,25 +4746,6 @@ begin
74074746
74084747 end;
74094748
7410-procedure TGikoForm.MoveToActionExecute(Sender: TObject);
7411-var
7412- URL: string;
7413- idx: Integer;
7414-begin
7415- URL := Trim(AddressComboBox.Text);
7416- MoveToURL(URL);
7417-
7418- idx := AddressComboBox.Items.IndexOf(URL);
7419- if idx = -1 then begin
7420- AddressComboBox.Items.Insert(0, URL);
7421- if AddressComboBox.Items.Count > GikoSys.Setting.AddressHistoryCount then
7422- AddressComboBox.Items.Delete(AddressComboBox.Items.Count - 1);
7423- end else begin
7424- AddressComboBox.Items.Delete(idx);
7425- AddressComboBox.Items.Insert(0, URL);
7426- end;
7427-end;
7428-
74294749 procedure TGikoForm.MoveToURL(const inURL: string);
74304750 var
74314751 protocol, host, path, document, port, bookmark : string;
@@ -7649,7 +4969,7 @@ procedure TGikoForm.AddressComboBoxKeyDown(Sender: TObject; var Key: Word;
76494969 Shift: TShiftState);
76504970 begin
76514971 if Key = VK_RETURN then
7652- MoveToAction.Execute;
4972+ GikoDM.MoveToAction.Execute;
76534973 end;
76544974
76554975 procedure TGikoForm.BrowserEnter(Sender: TObject);
@@ -7756,55 +5076,6 @@ begin
77565076 end;
77575077 end;
77585078
7759-procedure TGikoForm.BrowserTabVisibleActionExecute(Sender: TObject);
7760-begin
7761- GikoSys.Setting.BrowserTabVisible := BrowserTabVisibleAction.Checked;
7762- SetBrowserTabState;
7763-end;
7764-
7765-procedure TGikoForm.BrowserTabTopActionExecute(Sender: TObject);
7766-begin
7767- BrowserTabBottomAction.Checked := False;
7768- BrowserTabTopAction.Checked := True;
7769- GikoSys.Setting.BrowserTabPosition := gtpTop;
7770- SetBrowserTabState;
7771-end;
7772-
7773-procedure TGikoForm.BrowserTabBottomActionExecute(Sender: TObject);
7774-begin
7775- BrowserTabTopAction.Checked := False;
7776- BrowserTabBottomAction.Checked := True;
7777- GikoSys.Setting.BrowserTabPosition := gtpBottom;
7778- SetBrowserTabState;
7779-end;
7780-
7781-procedure TGikoForm.BrowserTabTabStyleActionExecute(Sender: TObject);
7782-begin
7783- BrowserTabButtonStyleAction.Checked := False;
7784- BrowserTabFlatStyleAction.Checked := False;
7785- BrowserTabTabStyleAction.Checked := True;
7786- GikoSys.Setting.BrowserTabStyle := gtsTab;
7787- SetBrowserTabState;
7788-end;
7789-
7790-procedure TGikoForm.BrowserTabButtonStyleActionExecute(Sender: TObject);
7791-begin
7792- BrowserTabTabStyleAction.Checked := False;
7793- BrowserTabFlatStyleAction.Checked := False;
7794- BrowserTabButtonStyleAction.Checked := True;
7795- GikoSys.Setting.BrowserTabStyle := gtsButton;
7796- SetBrowserTabState;
7797-end;
7798-
7799-procedure TGikoForm.BrowserTabFlatStyleActionExecute(Sender: TObject);
7800-begin
7801- BrowserTabFlatStyleAction.Checked := True;
7802- BrowserTabTabStyleAction.Checked := False;
7803- BrowserTabButtonStyleAction.Checked := False;
7804- GikoSys.Setting.BrowserTabStyle := gtsFlat;
7805- SetBrowserTabState;
7806-end;
7807-
78085079 procedure TGikoForm.PreviewTimerTimer(Sender: TObject);
78095080 var
78105081 p: TPoint;
@@ -7949,7 +5220,7 @@ end;
79495220
79505221 procedure TGikoForm.MessageHideButtonClick(Sender: TObject);
79515222 begin
7952- MsgBarCloseAction.Execute;
5223+ GikoDM.MsgBarCloseAction.Execute;
79535224 end;
79545225
79555226 function TGikoForm.OnDocumentContextMenu(Sender: TObject): WordBool;
@@ -7973,7 +5244,7 @@ begin
79735244 if ThreadItem <> nil then begin
79745245 Num := StrToInt(s);
79755246 FHint.PopupType := gptThread;
7976- SetResPopupText(ThreadItem, Num, Num, False, False);
5247+ HTMLCreater.SetResPopupText(FHint, ThreadItem, Num, Num, False, False);
79775248 if FHint.ResCount <> 0 then
79785249 ShowTextPopup;
79795250 Result := False;
@@ -7985,104 +5256,6 @@ begin
79855256 end;
79865257 end;
79875258
7988-procedure TGikoForm.SetResPopupText(threadItem: TThreadItem; StNum, ToNum: Integer; Title, First: Boolean);
7989-var
7990- i: Integer;
7991- tmp: string;
7992- FileName: string;
7993- Line: Integer;
7994-
7995- wkInt: Integer;
7996-
7997- Res: TResRec;
7998- Header: string;
7999- Body: string;
8000- boardPlugIn : TBoardPlugIn;
8001-begin
8002- try
8003- if StNum > ToNum then begin
8004- wkInt := StNum;
8005- StNum := ToNum;
8006- ToNum := wkInt;
8007- end;
8008-
8009- //Å‘å10ƒŒƒX‚Ü‚Å•\Ž¦
8010- if StNum + MAX_POPUP_RES < ToNum then
8011- ToNum := StNum + MAX_POPUP_RES;
8012-
8013- //ƒ^ƒCƒgƒ‹•\Ž¦
8014- if Title then
8015- if ThreadItem <> nil then
8016- FHint.Title := ThreadItem.Title;
8017-
8018- if ThreadItem <> nil then begin
8019- //if ThreadItem.IsBoardPlugInAvailable then begin
8020- if ThreadItem.ParentBoard.IsBoardPlugInAvailable then begin
8021- //===== ƒvƒ‰ƒOƒCƒ“‚É‚æ‚é•\Ž¦
8022- //boardPlugIn := ThreadItem.BoardPlugIn;
8023- boardPlugIn := ThreadItem.ParentBoard.BoardPlugIn;
8024-
8025- // ƒtƒHƒ“ƒg‚âƒTƒCƒY‚̐ݒè
8026- // •¶ŽšƒR[ƒh‚̓vƒ‰ƒOƒCƒ“‚É”C‚¹‚é
8027- for i := StNum to ToNum do begin
8028- Line := i;
8029- //‚±‚±‚Å‚Q‚¿‚á‚ñ‚Ë‚é‚Ìdat‚ÌŒ`Ž®‚Å‚Ps“ǂݍž‚ß‚ê‚Î¥¥¥B«“Ç‚ß‚é‚悤‚É‚È‚Á‚½
8030- tmp := boardPlugIn.GetDat( DWORD( threadItem ), i );
8031- if (tmp <> '') And ( not GikoSys.FAbon.CheckAbonPopupRes(tmp) And( not GikoSys.FAbon.CheckIndividualAbonList(line))) then begin
8032- Res := DivideStrLine(tmp);
8033- if (GikoSys.Setting.ShowMail = false) or (Length(res.FMailTo) = 0) then
8034- Header := IntToStr(Line) + ' –¼‘OF ' + Res.FName + ' “Še“úF ' + Res.FDateTime
8035- else
8036- Header := IntToStr(Line) + ' –¼‘OF ' + Res.FName + ' [' + res.FMailTo + '] “Še“úF ' + Res.FDateTime;
8037- Header := DeleteFontTag(Header);
8038- Header := CustomStringReplace(Header, '<br>', '',true);
8039-
8040- Body := CustomStringReplace(Res.FBody, '<br> ', #10,true);
8041- Body := CustomStringReplace(Body, '<br>', #10,true);
8042- Body := CustomStringReplace(Body, '</a>', '',true);
8043- Body := GikoSys.DeleteLink(Body);
8044- Body := CustomStringReplace(Body, '&lt;', '<');
8045- Body := CustomStringReplace(Body, '&gt;', '>');
8046- Body := CustomStringReplace(Body, '&quot;', '"');
8047- Body := CustomStringReplace(Body, '&amp;', '&');
8048- Body := CustomStringReplace(Body, '&nbsp;', ' ');
8049-
8050- FHint.Add(Header, Body);
8051- //FHint.Title := '';
8052- end;
8053- end;
8054- end else begin
8055- for i := StNum to ToNum do begin
8056- Line := i;
8057- FileName := ThreadItem.FilePath;
8058- tmp := GikoSys.ReadThreadFile(FileName, Line);
8059- if (tmp <> '') And ( not GikoSys.FAbon.CheckAbonPopupRes(tmp) And( not GikoSys.FAbon.CheckIndividualAbonList(line))) then begin
8060- Res := DivideStrLine(tmp);
8061- if (GikoSys.Setting.ShowMail = false) or (Length(res.FMailTo) = 0) then
8062- Header := IntToStr(Line) + ' –¼‘OF ' + Res.FName + ' “Še“úF ' + Res.FDateTime
8063- else
8064- Header := IntToStr(Line) + ' –¼‘OF ' + Res.FName + ' [' + res.FMailTo + '] “Še“úF ' + Res.FDateTime;
8065-
8066- Body := DeleteFontTag(Res.FBody);
8067- Body := CustomStringReplace(Body, '<br> ', #10,true);
8068- Body := CustomStringReplace(Body, '<br>', #10,true);
8069- Body := CustomStringReplace(Body, '</a>', '',true);
8070- Body := GikoSys.DeleteLink(Body);
8071- Body := CustomStringReplace(Body, '&lt;', '<');
8072- Body := CustomStringReplace(Body, '&gt;', '>');
8073- Body := CustomStringReplace(Body, '&quot;', '"');
8074- Body := CustomStringReplace(Body, '&amp;', '&');
8075- Body := CustomStringReplace(Body, '&nbsp;', ' ');
8076- FHint.Add(Header, Body);
8077- //FHint.Title := ''; //‚½‚Ô‚ñ‚±‚ê‚Í‚¢‚ç‚È‚¢‚ñ‚¾‚¯‚ǂˁB‚à‚¶‚ã ‚â‚Á‚Ï‚è‚¢‚ç‚È‚©‚Á‚½i2004/01/13j
8078- end;
8079- end;
8080- end;
8081- end;
8082- finally
8083- end;
8084-end;
8085-
80865259 procedure TGikoForm.ShowTextPopup;
80875260 var
80885261 p: TPoint;
@@ -8123,25 +5296,7 @@ begin
81235296 end;
81245297 end;
81255298
8126-procedure TGikoForm.GikoHelpActionExecute(Sender: TObject);
8127-var
8128- FileName: string;
8129-begin
8130- FileName := GikoSys.GetAppDir + 'batahlp.chm';
8131- if not FileExists(FileName) then begin
8132- MsgBox(
8133- Handle,
8134- 'ƒwƒ‹ƒv‚ªŒ©‚‚©‚è‚Ü‚¹‚ñ‚Å‚µ‚½' + #13#10 +
8135- 'ƒwƒ‹ƒvƒtƒ@ƒCƒ‹‚ðƒMƒRƒiƒr‚̃tƒHƒ‹ƒ_‚É’u‚¢‚Ä‚­‚¾‚³‚¢' + #13#10 +
8136- 'ƒwƒ‹ƒv‚̓MƒRƒiƒr‚̃TƒCƒg‚É’u‚¢‚Ä‚ ‚è‚Ü‚·',
8137- 'ƒGƒ‰[',
8138- MB_ICONSTOP);
8139- Exit;
8140- end;
8141- ShellExecute(Handle, 'open', PChar(FileName), '', PChar(GikoSys.GetAppDir), SW_SHOW);
8142-end;
8143-
8144-procedure TGikoForm.ToolButton18Click(Sender: TObject);
5299+procedure TGikoForm.HistoryAllClearToolButtonClick(Sender: TObject);
81455300 const
81465301 DEL_MSG = '‘S—š—ð‚ðíœ‚µ‚Ü‚·B‚æ‚낵‚¢‚Å‚·‚©H';
81475302 DEL_TITLE = 'íœŠm”F';
@@ -8156,18 +5311,6 @@ begin
81565311 end;
81575312 end;
81585313
8159-procedure TGikoForm.KotehanActionExecute(Sender: TObject);
8160-var
8161- Dlg: TKotehanDialog;
8162-begin
8163- Dlg := TKotehanDialog.Create(Self);
8164- try
8165- Dlg.ShowModal;
8166- finally
8167- Dlg.Release;
8168- end;
8169-end;
8170-
81715314 procedure TGikoForm.SetLinkBar;
81725315 var
81735316 i: Integer;
@@ -8743,112 +5886,6 @@ begin
87435886 end;
87445887 end;
87455888
8746-procedure TGikoForm.ThreadEditorActionExecute(Sender: TObject);
8747-var
8748- Editor: TEditorForm;
8749-begin
8750- if not (GetActiveList is TBoard) then
8751- Exit;
8752- Editor := TEditorForm.Create(Self);
8753- Editor.SetBoard(TBoard(GetActiveList));
8754- Editor.Show;
8755- Editor.BodyEdit.SetFocus;
8756-end;
8757-
8758-procedure TGikoForm.ToolBarSettingActionExecute(Sender: TObject);
8759-var
8760- Dlg: TToolBarSettingDialog;
8761- i: Integer;
8762- //Component: TComponent;
8763- ToolButton : TToolButton;
8764-begin
8765- Dlg := TToolBarSettingDialog.Create(Self, ActionList);
8766- try
8767- Dlg.AddToolBar(StdToolBar, gttStandard);
8768- Dlg.AddToolBar(ListToolBar, gttList);
8769- Dlg.AddToolBar(BrowserToolBar, gttBrowser);
8770- case FToolBarSettingSender of
8771- tssMain: Dlg.ToolBarIndex := 0;
8772- tssList: Dlg.ToolBarIndex := 1;
8773- tssBrowser: Dlg.ToolBarIndex := 2;
8774- end;
8775- if Dlg.ShowModal = mrOK then begin
8776- SetToolBarPopup;
8777-
8778- //Å“K•‚ðÄÝ’è‚·‚邽‚ß‚É“K“–‚ȃvƒƒpƒeƒB‚ð‚¢‚¶‚­‚é
8779- for i := 0 to MainCoolBar.Bands.Count - 1 do begin
8780- MainCoolBar.Bands[i].MinWidth := MainCoolBar.Bands[i].MinWidth + 1;
8781- MainCoolBar.Bands[i].MinWidth := MainCoolBar.Bands[i].MinWidth - 1;
8782- end;
8783- for i := 0 to ListCoolBar.Bands.Count - 1 do begin
8784- ListCoolBar.Bands[i].MinWidth := ListCoolBar.Bands[i].MinWidth + 1;
8785- ListCoolBar.Bands[i].MinWidth := ListCoolBar.Bands[i].MinWidth - 1;
8786- end;
8787- for i := 0 to BrowserCoolBar.Bands.Count - 1 do begin
8788- BrowserCoolBar.Bands[i].MinWidth := BrowserCoolBar.Bands[i].MinWidth + 1;
8789- BrowserCoolBar.Bands[i].MinWidth := BrowserCoolBar.Bands[i].MinWidth - 1;
8790- end;
8791-
8792- SaveToolBarSetting(StdToolBar);
8793- SaveToolBarSetting(ListToolBar);
8794- //ListToolBar‚É‚¢‚é‚©‚à‚µ‚ê‚È‚¢iž‚ÝComboBox‚ð”z’u
8795- SelectComboBoxPanel.Visible := False;
8796- try
8797- for i := ListToolBar.ControlCount - 1 downto 0 do
8798- begin
8799- if ListToolBar.Controls[ i ].Action = SelectItemAction then
8800- begin
8801- SelectComboBoxPanel.Left := ListToolBar.Controls[ i ].Left;
8802- SelectComboBoxPanel.Width := GikoSys.Setting.SelectComboBoxWidth;
8803- SelectComboBoxPanel.Parent := ListToolBar;
8804- SelectComboBoxPanel.Visible := True;
8805-
8806- SelectComboBox.Left := 0;
8807- SelectComboBox.Top := 0;
8808- SelectComboBox.Height := SelectComboBoxPanel.ClientHeight;
8809- SelectComboBox.Width := SelectComboBoxPanel.Width -
8810- SelectComboBoxSplitter.Width;
8811-
8812-
8813- //ˆê‚ÂŒ©‚¦‚È‚¢ƒ{ƒ^ƒ“‚ð“Ë‚Áž‚Þ
8814- ToolButton := TToolButton(ListToolBar.FindComponent('SelectComboBoxDummy'));
8815- if ToolButton <> nil then begin
8816- ToolButton.Parent := nil;
8817- end else begin
8818- ToolButton := TToolButton.Create(ListToolBar);
8819- ToolButton.Name := 'SelectComboBoxDummy';
8820- end;
8821-
8822- ToolButton.Style := tbsSeparator;
8823- ToolButton.Width := 0;
8824- ToolButton.Left := ListToolBar.Controls[ i ].Left;
8825- ListToolBar.InsertControl(ToolButton);
8826- ToolButton.Visible := False;
8827-
8828- // ƒXƒŒƒbƒhiž‚ׂ̗ɃZƒpƒŒ[ƒ^‚ª‚ ‚éê‡‚͉B‚·
8829- if (i + 1) < ListToolBar.ControlCount then
8830- if ListToolBar.Controls[ i + 1 ] is TToolButton then
8831- if TToolButton( ListToolBar.Controls[ i + 1 ] ).Style = tbsSeparator then
8832- ListToolBar.Controls[ i + 1 ].Visible := False;
8833-
8834-
8835- // ƒXƒŒƒbƒhižƒ{ƒ^ƒ“‚ð‰B‚·
8836- ListToolBar.Controls[ i ].Visible := False;
8837-
8838- break;
8839- end;
8840- end;
8841- except
8842- end;
8843- ResetBandInfo( ListCoolBar, ListToolBar );
8844- SaveToolBarSetting(BrowserToolBar);
8845- end;
8846- finally
8847- Dlg.Release;
8848- FToolBarSettingSender := tssNone;
8849- end;
8850-end;
8851-
88525889 function TGikoForm.FindToolBarButton( bar : TToolBar; action : TAction ) : TToolButton;
88535890 var
88545891 i : Integer;
@@ -8876,21 +5913,21 @@ begin
88765913 for i := 0 to StdToolBar.ButtonCount - 1 do begin
88775914 end;
88785915 for i := 0 to ListToolBar.ButtonCount - 1 do begin
8879- if ListToolBar.Buttons[i].Action = IconStyle then
5916+ if ListToolBar.Buttons[i].Action = GikoDM.IconStyle then
88805917 ListToolBar.Buttons[i].DropdownMenu := ListIconPopupMenu;
8881- if ListToolBar.Buttons[i].Action = SelectReservAction then
5918+ if ListToolBar.Buttons[i].Action = GikoDM.SelectReservAction then
88825919 ListToolBar.Buttons[i].DropdownMenu := RoundNamePopupMenu;
88835920 end;
8884- aIEButton := FindToolBarButton( BrowserToolBar, IEAction );
5921+ aIEButton := FindToolBarButton( BrowserToolBar, GikoDM.IEAction );
88855922 if aIEButton <> nil then
88865923 aIEButton.DropdownMenu := BrowserPopupMenu;
8887- aCabinetBBSButton := FindToolBarButton( StdToolBar, CabinetBBSAction );
5924+ aCabinetBBSButton := FindToolBarButton( StdToolBar, GikoDM.CabinetBBSAction );
88885925 if aCabinetBBSButton <> nil then
88895926 aCabinetBBSButton.DropdownMenu := BBSSelectPopupMenu;
8890- aResRangeButton := FindToolBarButton( BrowserToolBar, ResRangeAction );
5927+ aResRangeButton := FindToolBarButton( BrowserToolBar, GikoDM.ResRangeAction );
88915928 if aResRangeButton <> nil then
88925929 aResRangeButton.DropdownMenu := ResRangePopupMenu;
8893- aThreadRangeButton:= FindToolBarButton( ListToolBar, ThreadRangeAction );
5930+ aThreadRangeButton:= FindToolBarButton( ListToolBar, GikoDM.ThreadRangeAction );
88945931 if aThreadRangeButton <> nil then
88955932 aThreadRangeButton.DropdownMenu := ThreadRangePopupMenu;
88965933 end;
@@ -8936,17 +5973,17 @@ begin
89365973
89375974 if Length( text ) = 0 then
89385975 begin
8939- AllItemAction.Checked := True;
8940- LogItemAction.Checked := False;
8941- NewItemAction.Checked := False;
5976+ GikoDM.AllItemAction.Checked := True;
5977+ GikoDM.LogItemAction.Checked := False;
5978+ GikoDM.NewItemAction.Checked := False;
89425979 end else begin
89435980 // ƒ`ƒ‰‚‚­‚ÆŒ™‚¾‚©‚çAˆê‰ž‰Ÿ‚µ‚Ä‚ ‚é‚Æ‚«‚¾‚¯ˆ—‚·‚é
8944- if AllItemAction.Checked then
8945- AllItemAction.Checked := False;
8946- if LogItemAction.Checked then
8947- LogItemAction.Checked := False;
8948- if NewItemAction.Checked then
8949- NewItemaction.Checked := False;
5981+ if GikoDM.AllItemAction.Checked then
5982+ GikoDM.AllItemAction.Checked := False;
5983+ if GikoDM.LogItemAction.Checked then
5984+ GikoDM.LogItemAction.Checked := False;
5985+ if GikoDM.NewItemAction.Checked then
5986+ GikoDM.NewItemaction.Checked := False;
89505987 end;
89515988
89525989 if Length( text ) = 0 then
@@ -8999,12 +6036,12 @@ begin
89996036 *}
90006037 end else begin
90016038 // ƒ`ƒ‰‚‚­‚ÆŒ™‚¾‚©‚çAˆê‰ž‰Ÿ‚µ‚Ä‚ ‚é‚Æ‚«‚¾‚¯ˆ—‚·‚é
9002- if AllItemAction.Checked then
9003- AllItemAction.Checked := False;
9004- if LogItemAction.Checked then
9005- LogItemAction.Checked := False;
9006- if NewItemAction.Checked then
9007- NewItemaction.Checked := False;
6039+ if GikoDM.AllItemAction.Checked then
6040+ GikoDM.AllItemAction.Checked := False;
6041+ if GikoDM.LogItemAction.Checked then
6042+ GikoDM.LogItemAction.Checked := False;
6043+ if GikoDM.NewItemAction.Checked then
6044+ GikoDM.NewItemaction.Checked := False;
90086045 end;
90096046
90106047 end;
@@ -9052,140 +6089,7 @@ begin
90526089 end;
90536090
90546091
9055-//NGƒ[ƒhƒtƒ@ƒCƒ‹‚ðÄ“ǂݍž‚Ý‚·‚é
9056-procedure TGikoForm.SelectResActionExecute(Sender: TObject);
9057-var
9058- Dlg: TListSelectDialog;
9059- FilterList : TStringList;
9060- idx : Integer;
9061-begin
9062- Dlg := TListSelectDialog.Create(Self);
9063- try
9064- Dlg.SelectComboBox.Items.Assign(GikoSys.Setting.SelectTextList);
9065- Dlg.SelectComboBox.Text := FSelectResWord;
9066- Dlg.ShowModal;
9067- if Dlg.ModalResult = mrOK then begin
9068- SelectResAction.Checked := True;
9069- if Length( Dlg.SelectComboBox.Text ) = 0 then begin
9070- // ‹ó“ü—Í‚Å OK ‚͍i‚荞‚Ý‰ðœ‚Æ“¯ˆÓ‹`
9071- ResRangeAction.Execute;
9072- end else begin
9073- GikoSys.ResRange := Ord( grrSelect );
9074-
9075- // ÅŒã‚ɐݒ肵‚½‚à‚Ì‚ðŠo‚¦‚Ä‚¨‚­
9076- FSelectResWord := Dlg.SelectComboBox.Text;
9077-
9078- // ŒŸõ—š—ð‚̍XV
9079- idx := GikoSys.Setting.SelectTextList.IndexOf(Dlg.SelectComboBox.Text);
9080- if idx <> -1 then
9081- GikoSys.Setting.SelectTextList.Delete(idx);
9082- GikoSys.Setting.SelectTextList.Insert(0, Dlg.SelectComboBox.Text);
9083- while Dlg.SelectComboBox.Items.Count > 100 do begin
9084- Dlg.SelectComboBox.Items.Delete(Dlg.SelectComboBox.Items.Count - 1);
9085- end;
9086-
9087- try
9088- //if SelectComboBox.Parent <> nil then
9089- if SelectComboBoxPanel.Visible then
9090- SelectComboBox.Items.Assign( GikoSys.Setting.SelectTextList );
9091- except
9092- end;
9093-
9094- // ƒtƒBƒ‹ƒ^‚̐ݒè
9095- FilterList := TStringList.Create;
9096- try
9097- GikoSys.FSelectResFilter.Reverse := True;
9098- FilterList.Delimiter := ' '; //‹æØ‚èŽq‚𔼊pƒXƒy[ƒX‚ɐݒè
9099- FilterList.DelimitedText := Dlg.SelectComboBox.Text;
9100-
9101- GikoSys.FSelectResFilter.LoadFromStringList( FilterList );
9102- finally
9103- FilterList.Free;
9104- end;
9105- RepaintAllTabsBrowser();
9106- end;
9107- end else begin
9108- // ƒLƒƒƒ“ƒZƒ‹
9109- if GikoSys.ResRange <> Ord( grrSelect ) then
9110- ResRangeAction.Execute;
9111- end;
9112- finally
9113- Dlg.Release;
9114- end;
9115-
9116-end;
9117-
91186092 // ‘S‚ẴŒƒX‚ð•\Ž¦
9119-procedure TGikoForm.AllResActionExecute(Sender: TObject);
9120-var
9121- FilterList : TStringList;
9122-begin
9123- if(FActiveContent <> nil) and (FActiveContent.FBrowser <> nil )
9124- and (FActiveContent.FBrowser.Busy) then Exit;
9125-
9126- FResRangeMenuSelect := Ord( grrAll );
9127- AllResAction.Checked := True;
9128-
9129- if GikoSys.ResRange <> Ord( grrAll ) then begin
9130- GikoSys.ResRange := Ord( grrAll );
9131-
9132- // ƒtƒBƒ‹ƒ^•¶Žš—ñ‚ð‹ó‚É‚·‚é
9133- FilterList := TStringList.Create;
9134- try
9135- GikoSys.FSelectResFilter.LoadFromStringList( FilterList );
9136- GikoSys.FSelectResFilter.Reverse := False;
9137- finally
9138- FilterList.Free;
9139- end;
9140-
9141- FSelectResWord := '';
9142-
9143- RepaintAllTabsBrowser();
9144- end;
9145-end;
9146-
9147-procedure TGikoForm.ReloadClick(Sender: TObject);
9148-begin
9149- if GikoSys.FAbon.ReLoadFromNGwordFile =false then begin
9150- MsgBox(Handle, 'NGƒ[ƒhƒtƒ@ƒCƒ‹‚̍ēǂݍž‚Ý‚ÉŽ¸”s‚µ‚Ü‚µ‚½', 'ƒGƒ‰[', MB_OK or MB_ICONEXCLAMATION);
9151- end else begin
9152- RepaintAllTabsBrowser();
9153- end;
9154-
9155-end;
9156-
9157-procedure TGikoForm.GoBackClick(Sender: TObject);
9158-var
9159- s: string;
9160-begin
9161- if GikoSys.FAbon.GoForward =false then begin
9162- MsgBox(Handle, 'ˆê‚‘O‚ÌNGƒ[ƒhƒtƒ@ƒCƒ‹‚̓ǂݍž‚Ý‚ÉŽ¸”s‚µ‚Ü‚µ‚½', 'ƒGƒ‰[', MB_OK or MB_ICONEXCLAMATION);
9163- end else begin
9164- s := GikoSys.FAbon.NGwordname;
9165- StatusBar.Panels.Items[2].Text := s;
9166- StatusBar.Panels[2].Width := Max(StatusBar.Canvas.TextWidth(s), 100);
9167- StatusBarResize(Sender);
9168- RepaintAllTabsBrowser();
9169- end;
9170-
9171-end;
9172-
9173-procedure TGikoForm.GoFowardClick(Sender: TObject);
9174-var
9175- s: string;
9176-begin
9177- if GikoSys.FAbon.GoBack =false then begin
9178- MsgBox(Handle, 'ˆê‚ÂŒã‚ë‚ÌNGƒ[ƒhƒtƒ@ƒCƒ‹‚̓ǂݍž‚Ý‚ÉŽ¸”s‚µ‚Ü‚µ‚½', 'ƒGƒ‰[', MB_OK or MB_ICONEXCLAMATION);
9179- end else begin
9180- s := GikoSys.FAbon.NGwordname;
9181- StatusBar.Panels.Items[2].Text := s;
9182- StatusBar.Panels[2].Width := Max(StatusBar.Canvas.TextWidth(s), 100);
9183- StatusBarResize(Sender);
9184- RepaintAllTabsBrowser();
9185- end;
9186-
9187-end;
9188-
91896093 procedure TGikoForm.SelectComboBoxSplitterMouseMove(Sender: TObject;
91906094 Shift: TShiftState; X, Y: Integer);
91916095 var
@@ -9233,134 +6137,34 @@ begin
92336137 pos.Y := Y;
92346138 DraggingSelectComboBoxPosition := SelectComboBoxSplitter.ClientToScreen( pos );
92356139
9236-end;
9237-
9238-procedure TGikoForm.SelectComboBoxSplitterMouseUp(Sender: TObject;
9239- Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
9240-begin
9241- IsDraggingSelectComboBox := False;
9242-
9243-end;
9244-
9245-procedure TGikoForm.StatusBarResize(Sender: TObject);
9246-begin
9247- StatusBar.Panels[1].Width := StatusBar.Width -
9248- StatusBar.Panels[0].Width -
9249- StatusBar.Panels[2].Width;
9250-end;
9251-procedure TGikoForm.SelectComboBoxEnter(Sender: TObject);
9252-begin
9253-
9254- if (Length( SelectComboBox.Text ) = 0) or
9255- (SelectComboBox.Text = SELECTCOMBOBOX_NAME) then
9256- begin
9257- SelectComboBox.Text := '';
9258- SelectComboBox.Color := clWindow;
9259- end;
9260-
9261-end;
9262-
9263-//”–¼ŒŸõ
9264-procedure TGikoForm.TreeSelectSearchBoardNameExecute(Sender: TObject);
9265-var
9266- s : String;
9267- msg : String;
9268- CurItem : TTreeNode;
9269- next : boolean;
9270-begin
9271- if InputQuery('”–¼ŒŸõ','”–¼‚Ì“ü—Í',s) then begin
9272- next := true;
9273- while next do begin
9274- if TreeView.Selected = nil then
9275- CurItem := TreeView.Items.GetFirstNode
9276- else begin
9277- CurItem := TreeView.Selected.GetNext;
9278- if CurItem = nil then
9279- CurItem := TreeView.Items.GetFirstNode;
9280- end;
9281- while CurItem <> nil do begin
9282- if (CurItem.ImageIndex <> 2) and (VaguePos(s,CurItem.Text) <> 0) then begin
9283- break;
9284- end;
9285- CurItem := CurItem.GetNext;
9286- end;
9287- try
9288- if CurItem = nil then begin
9289- msg := 'æ“ª‚É–ß‚è‚Ü‚·‚©H';
9290- if MsgBox(Handle, msg, '', MB_YESNO or MB_ICONEXCLAMATION) = mrYes then begin
9291- CurItem := TreeView.Items.GetFirstNode;
9292- end else begin
9293- Exit;
9294- end;
9295- TreeView.Select(CurItem);
9296- TreeView.SetFocus;
9297- end else begin
9298- TreeView.Select(CurItem);
9299- TreeView.SetFocus;
9300- msg := 'ŽŸ‚ɍs‚«‚Ü‚·‚©H';
9301- if MsgBox(Handle, msg, '', MB_YESNO or MB_ICONEXCLAMATION) = mrYes then begin
9302- next := true;
9303- end else begin
9304- next := false;
9305- end;
9306- end;
9307-
9308- except
9309- Exit;
9310- end;
9311- end;
9312- end;
9313-end;
9314-
9315-procedure TGikoForm.CabinetFavoriteActionExecute(Sender: TObject);
9316-var
9317- i, b : Integer;
9318- item : TMenuItem;
9319-begin
9320-
9321- if CabinetPanel.Visible then begin
9322- if FTreeType = gttFavorite then begin
9323- CabinetVisible( False );
9324- CabinetFavoriteAction.Checked := False;
9325- end else begin
9326- CabinetFavoriteAction.Checked := True;
9327- end;
9328- end else begin
9329- CabinetVisible( True );
9330- CabinetFavoriteAction.Checked := True;
9331- end;
9332-
9333- // BBS...BBS, History, Favorite
9334- GikoSys.Setting.CabinetIndex := CabinetSelectPopupMenu.Items.Count - 1;
9335-
9336- b := CabinetSelectPopupMenu.Items.Count - 1;
9337- for i := 0 to b do begin
9338- item := CabinetSelectPopupMenu.Items[ i ];
9339- if item is TBBSMenuItem then begin
9340- item.Checked := False;
9341- // CabinetMenu ‚Í CabinetSelectPopupMenu ‚Æ“¯‚¶‚ÆŒˆ‚ß‚¤‚¿‚µ‚¿‚Ⴄ
9342- CabinetMenu.Items[ i ].Checked := False;
9343- end;
9344- end;
6140+end;
93456141
9346- // ƒLƒƒƒrƒlƒbƒgƒc[ƒ‹ƒo[‹y‚уLƒƒƒrƒlƒbƒg‚Ì•\Ž¦Ø‘Ö
9347- HistoryToolBar.Hide;
9348- FavoriteToolBar.Show;
9349- TreeView.Visible := False;
9350- FavoriteTreeView.Visible := True;
6142+procedure TGikoForm.SelectComboBoxSplitterMouseUp(Sender: TObject;
6143+ Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
6144+begin
6145+ IsDraggingSelectComboBox := False;
93516146
9352- CabinetSelectToolButton.Caption := '‚¨‹C‚É“ü‚è';
9353- FTreeType := gttFavorite;
6147+end;
93546148
9355- // ƒƒjƒ…[‹y‚у{ƒ^ƒ“‚̃`ƒFƒbƒN‚ðÝ’è
9356- CabinetBBSAction.Checked := False;
9357- CabinetHistoryAction.Checked := False;
6149+procedure TGikoForm.StatusBarResize(Sender: TObject);
6150+begin
6151+ StatusBar.Panels[1].Width := StatusBar.Width -
6152+ StatusBar.Panels[0].Width -
6153+ StatusBar.Panels[2].Width;
6154+end;
6155+procedure TGikoForm.SelectComboBoxEnter(Sender: TObject);
6156+begin
93586157
9359- // ‚¨‹C‚É“ü‚è‚̃cƒŠ[‚ð“WŠJ
9360- FavoriteTreeView.Items.GetFirstNode.Expanded := True;
6158+ if (Length( SelectComboBox.Text ) = 0) or
6159+ (SelectComboBox.Text = SELECTCOMBOBOX_NAME) then
6160+ begin
6161+ SelectComboBox.Text := '';
6162+ SelectComboBox.Color := clWindow;
6163+ end;
93616164
93626165 end;
93636166
6167+//”–¼ŒŸõ
93646168 procedure TGikoForm.FavoriteMoveTo( SenderNode, SourceNode: TTreeNode );
93656169 begin
93666170
@@ -9450,33 +6254,20 @@ begin
94506254 SenderNode := FDropSpaceNode;
94516255
94526256 if Source = FavoriteTreeView then begin
9453-
94546257 SourceNode := FavoriteTreeView.Selected;
94556258 FavoriteMoveTo( SenderNode, SourceNode );
9456-
94576259 end else if Source is TLinkToolButton then begin
9458-
94596260 LinkToolButton := TLinkToolButton( Source );
9460- //ShowMessage(LinkToolButton.Text);
94616261 SourceNode := TreeNodeDataFind( FavoriteTreeView.Items.GetFirstNode, LinkToolButton.Data );
94626262 FavoriteMoveTo( SenderNode, SourceNode );
9463-
94646263 end else if Source = BrowserTab then begin
9465-
94666264 idx := BrowserTab.TabIndex;
94676265 FavoriteAddTo( SenderNode, BrowserTab.Tabs.Objects[idx] );
94686266 end else if Source = ListView then begin
9469-
94706267 FavoriteAddTo( SenderNode, ListView.Selected.Data );
9471-
94726268 end else if Source = TreeView then begin
9473-
94746269 FavoriteAddTo( SenderNode, TreeView.Selected.Data );
9475-
94766270 end;
9477-
9478-
9479-
94806271 end;
94816272
94826273 procedure TGikoForm.FavoriteTreeViewDragDrop(Sender, Source: TObject; X,
@@ -9520,12 +6311,12 @@ begin
95206311 VK_F2:
95216312 begin
95226313 FClickNode := FavoriteTreeView.Selected;
9523- FavoriteTreeViewRenameActionExecute( Sender );
6314+ GikoDM.FavoriteTreeViewRenameActionExecute( Sender );
95246315 end;
95256316 VK_DELETE:
95266317 begin
95276318 FClickNode := FavoriteTreeView.Selected;
9528- FavoriteTreeViewDeleteActionExecute( Sender );
6319+ GikoDM.FavoriteTreeViewDeleteActionExecute( Sender );
95296320 end;
95306321 VK_RETURN:
95316322 begin
@@ -9580,8 +6371,6 @@ begin
95806371 FavoriteTreeDeletePopupMenu.Visible := False;
95816372 FavoriteTreeRenamePopupMenu.Visible := False;
95826373 FavoriteTreeNewFolderPopupMenu.Visible := False;
9583- //FavoriteTreeBrowseBoardPopupMenu.Visible := False;
9584- //FavoriteTreeBrowseThreadPopupMenu.Visible := False;
95856374 FavoriteTreeURLCopyPopupMenu.Visible := False;
95866375 FavoriteTreeNameCopyPopupMenu.Visible := False;
95876376 FavoriteTreeNameURLCopyPopupMenu.Visible := False;
@@ -9592,8 +6381,6 @@ begin
95926381 FavoriteTreeDeletePopupMenu.Visible := False;
95936382 FavoriteTreeRenamePopupMenu.Visible := False;
95946383 FavoriteTreeNewFolderPopupMenu.Visible := True;
9595- //FavoriteTreeBrowseBoardPopupMenu.Visible := False;
9596- //FavoriteTreeBrowseThreadPopupMenu.Visible := False;
95976384 FavoriteTreeURLCopyPopupMenu.Visible := False;
95986385 FavoriteTreeNameCopyPopupMenu.Visible := True;
95996386 FavoriteTreeNameURLCopyPopupMenu.Visible := False;
@@ -9604,8 +6391,6 @@ begin
96046391 FavoriteTreeDeletePopupMenu.Visible := True;
96056392 FavoriteTreeRenamePopupMenu.Visible := False;
96066393 FavoriteTreeNewFolderPopupMenu.Visible := True;
9607- //FavoriteTreeBrowseBoardPopupMenu.Visible := False;
9608- //FavoriteTreeBrowseThreadPopupMenu.Visible := False;
96096394 FavoriteTreeURLCopyPopupMenu.Visible := False;
96106395 FavoriteTreeNameCopyPopupMenu.Visible := True;
96116396 FavoriteTreeNameURLCopyPopupMenu.Visible := False;
@@ -9616,8 +6401,6 @@ begin
96166401 FavoriteTreeDeletePopupMenu.Visible := True;
96176402 FavoriteTreeRenamePopupMenu.Visible := True;
96186403 FavoriteTreeNewFolderPopupMenu.Visible := True;
9619- //FavoriteTreeBrowseBoardPopupMenu.Visible := False;
9620- //FavoriteTreeBrowseThreadPopupMenu.Visible := False;
96216404 FavoriteTreeURLCopyPopupMenu.Visible := False;
96226405 FavoriteTreeNameCopyPopupMenu.Visible := True;
96236406 FavoriteTreeNameURLCopyPopupMenu.Visible := False;
@@ -9628,8 +6411,6 @@ begin
96286411 FavoriteTreeDeletePopupMenu.Visible := True;
96296412 FavoriteTreeRenamePopupMenu.Visible := True;
96306413 FavoriteTreeNewFolderPopupMenu.Visible := True;
9631- //FavoriteTreeBrowseBoardPopupMenu.Visible := True;
9632- //FavoriteTreeBrowseThreadPopupMenu.Visible := True;
96336414 FavoriteTreeURLCopyPopupMenu.Visible := True;
96346415 FavoriteTreeNameCopyPopupMenu.Visible := True;
96356416 FavoriteTreeNameURLCopyPopupMenu.Visible := True;
@@ -9640,8 +6421,6 @@ begin
96406421 FavoriteTreeDeletePopupMenu.Visible := True;
96416422 FavoriteTreeRenamePopupMenu.Visible := True;
96426423 FavoriteTreeNewFolderPopupMenu.Visible := True;
9643- //FavoriteTreeBrowseBoardPopupMenu.Visible := True;
9644- //FavoriteTreeBrowseThreadPopupMenu.Visible := False;
96456424 FavoriteTreeURLCopyPopupMenu.Visible := True;
96466425 FavoriteTreeNameCopyPopupMenu.Visible := True;
96476426 FavoriteTreeNameURLCopyPopupMenu.Visible := True;
@@ -9652,8 +6431,6 @@ begin
96526431 FavoriteTreeDeletePopupMenu.Visible := False;
96536432 FavoriteTreeRenamePopupMenu.Visible := False;
96546433 FavoriteTreeNewFolderPopupMenu.Visible := False;
9655- //FavoriteTreeBrowseBoardPopupMenu.Visible := False;
9656- //FavoriteTreeBrowseThreadPopupMenu.Visible := False;
96576434 FavoriteTreeURLCopyPopupMenu.Visible := False;
96586435 FavoriteTreeNameCopyPopupMenu.Visible := False;
96596436 FavoriteTreeNameURLCopyPopupMenu.Visible := False;
@@ -9663,99 +6440,6 @@ begin
96636440
96646441 end;
96656442
9666-procedure TGikoForm.FavoriteTreeViewDeleteActionExecute(Sender: TObject);
9667-const
9668- DEL_LINK_MSG = 'gƒŠƒ“ƒNh‚̓Šƒ“ƒNƒo[—pƒtƒHƒ‹ƒ_‚Å‚·Bíœ‚µ‚Ä‚æ‚낵‚¢‚Å‚·‚©H';
9669- DEL_MSG = 'g^0h‚ðíœ‚µ‚Ü‚·B‚æ‚낵‚¢‚Å‚·‚©H';
9670- DEL_TITLE = 'íœŠm”F';
9671-begin
9672-
9673- if FClickNode = nil then
9674- Exit;
9675- if FClickNode.IsFirstNode then
9676- Exit;
9677- if (GetKeyState( VK_SHIFT ) and $80000000) = 0 then begin
9678- if FClickNode.Text = Favorite.FAVORITE_LINK_NAME then begin
9679- if MsgBox(Handle, DEL_LINK_MSG, DEL_TITLE, MB_YESNO or MB_ICONWARNING or MB_DEFBUTTON2) <> ID_YES then
9680- Exit;
9681- end else begin
9682- if MsgBox(Handle, StringReplace( DEL_MSG, '^0', FClickNode.Text, [rfReplaceAll] ) , DEL_TITLE, MB_YESNO or MB_ICONWARNING or MB_DEFBUTTON2) <> ID_YES then
9683- Exit;
9684- end;
9685- end;
9686-
9687- //FDeleteList.Add(FClickNode.Data);
9688- //SetDeleteItemList(FClickNode);
9689-
9690- FClickNode.Delete;
9691-
9692- SetLinkBar;
9693-
9694-end;
9695-
9696-procedure TGikoForm.FavoriteTreeViewRenameActionExecute(Sender: TObject);
9697-var
9698- node : TTreeNode;
9699-begin
9700-
9701- if FClickNode = nil then
9702- Exit;
9703- if FClickNode.IsFirstNode then
9704- Exit;
9705- if FClickNode.Text = Favorite.FAVORITE_LINK_NAME then
9706- Exit;
9707- FavoriteTreeView.ReadOnly := False;
9708- if (FTreeType = gttFavorite) and (CabinetPanel.Visible) then begin
9709- node := FClickNode.Parent;
9710- while node <> nil do begin
9711- node.Expanded := True;
9712- node := node.Parent;
9713- end;
9714- FClickNode.EditText;
9715- end else begin
9716- FClickNode.Text := InputBox( '–¼‘O‚̕ύX', '‚¨‹C‚É“ü‚è‚̐V‚µ‚¢–¼‘O‚ð“ü—Í‚µ‚Ä‚­‚¾‚³‚¢', FClickNode.Text );
9717- end;
9718-
9719- SetLinkBar;
9720-
9721-end;
9722-
9723-procedure TGikoForm.FavoriteTreeViewNewFolderActionExecute(
9724- Sender: TObject);
9725-var
9726- NewFavFolder: TFavoriteFolder;
9727- Node: TTreeNode;
9728-begin
9729-
9730- if FClickNode = nil then
9731- Exit;
9732-
9733- try
9734- if not (TObject(FClickNode.Data) is TFavoriteFolder) then begin
9735- FavoriteTreeView.Selected := FClickNode.Parent;
9736- FClickNode := FClickNode.Parent;
9737- end;
9738-
9739- NewFavFolder := TFavoriteFolder.Create;
9740- Node := FavoriteTreeView.Items.AddChildObject(FClickNode, 'V‚µ‚¢ƒtƒHƒ‹ƒ_', NewFavFolder);
9741- Node.ImageIndex := 14;
9742- Node.SelectedIndex := 14;
9743- // FClickNode.Selected.Expanded := True;
9744- FavoriteTreeView.Selected := Node;
9745- FClickNode := Node;
9746- FavoriteTreeViewRenameAction.Execute;
9747- finally
9748- end;
9749-
9750-end;
9751-
9752-procedure TGikoForm.ToolButton19Click(Sender: TObject);
9753-begin
9754-
9755- FavoriteArrangeActionExecute( nil );
9756-
9757-end;
9758-
97596443 procedure TGikoForm.FavoriteBrowseFolder( node: TTreeNode );
97606444 var
97616445 i: Integer;
@@ -9774,192 +6458,27 @@ begin
97746458
97756459 end;
97766460
9777-procedure TGikoForm.FavoriteTreeViewBrowseFolderActionExecute(
9778- Sender: TObject);
9779-begin
9780-
9781- FavoriteBrowseFolder( FClickNode );
9782- //BrowserTab.OnChange(nil);
9783-
9784-end;
9785-
97866461 procedure TGikoForm.FavoriteTreeViewDblClick(Sender: TObject);
9787-begin
9788-
9789- FClickNode := FavoriteTreeView.Selected;
9790- FavoriteTreeViewReloadActionExecute( Sender );
9791-
9792-end;
9793-
9794-procedure TGikoForm.FavoriteTreeViewLogDeleteActionExecute(
9795- Sender: TObject);
9796-const
9797- DEL_MSG = 'g^0h‚̃ƒO‚ðíœ‚µ‚Ü‚·B‚æ‚낵‚¢‚Å‚·‚©H';
9798- DEL_TITLE = 'íœŠm”F';
9799-var
9800- ThreadItem: TThreadItem;
9801- FavThread: TFavoriteThreadItem;
9802-begin
9803-
9804- if FClickNode = nil then Exit;
9805- if not (TObject(FClickNode.Data) is TFavoriteThreadItem) then Exit;
9806-
9807- FavThread := TFavoriteThreadItem( FClickNode.Data );
9808- ThreadItem := FavThread.Item;
9809-
9810- try
9811- if GikoSys.Setting.DeleteMsg then begin
9812- if (GetKeyState( VK_SHIFT ) and $80000000) = 0 then
9813- if MsgBox(Handle, StringReplace( DEL_MSG, '^0', FClickNode.Text, [rfReplaceAll] ) , DEL_TITLE, MB_YESNO or MB_ICONWARNING or MB_DEFBUTTON2) <> ID_YES then
9814- Exit;
9815- end;
9816-
9817- DeleteHistory(ThreadItem);
9818- DeleteTab(ThreadItem);
9819- ThreadItem.DeleteLogFile;
9820-
9821- ListView.Refresh;
9822- finally
9823- end;
9824-
9825-end;
9826-
9827-procedure TGikoForm.FavoriteTreeViewReloadActionExecute(Sender: TObject);
9828-var
9829- ThreadItem: TThreadItem;
9830- FavThread: TFavoriteThreadItem;
9831- Board: TBoard;
9832- FavBoard: TFavoriteBoardItem;
9833- shiftDown: Boolean;
9834-begin
9835-
9836- if FClickNode = nil then Exit;
9837-
9838- shiftDown := GetAsyncKeyState(VK_SHIFT) = Smallint($8001);
9839-
9840- if TObject( FClickNode.Data ) is TFavoriteThreadItem then begin
9841- FavThread := TFavoriteThreadItem( FClickNode.Data );
9842- ThreadItem := FavThread.Item;
9843- if ThreadItem <> nil then
9844- DownloadContent(ThreadItem, shiftDown);
9845- end else if TObject( FClickNode.Data ) is TFavoriteBoardItem then begin
9846- FavBoard := TFavoriteBoardItem( FClickNode.Data );
9847- Board := FavBoard.Item;
9848- DownloadList(Board, shiftDown);
9849- end;
9850-
9851-end;
9852-
9853-procedure TGikoForm.FavoriteTreeViewURLCopyActionExecute(Sender: TObject);
9854-var
9855- FavThread : TFavoriteThreadItem;
9856- FavBoard : TFavoriteBoardItem;
9857- s : string;
9858-begin
9859-
9860- if FClickNode = nil then Exit;
9861-
9862- if (TObject(FClickNode.Data) is TFavoriteThreadItem) then begin
9863-
9864- FavThread := TFavoriteThreadItem( FClickNode.Data );
9865- s := FavThread.URL + #13#10;
9866- if s <> '' then
9867- Clipboard.AsText := s;
9868-
9869- end else if (TObject(FClickNode.Data) is TFavoriteBoardItem) then begin
9870-
9871- FavBoard := TFavoriteBoardItem( FClickNode.Data );
9872- s := FavBoard.URL + #13#10;
9873- if s <> '' then
9874- Clipboard.AsText := s;
9875-
9876- end;
9877-
9878-end;
9879-
9880-procedure TGikoForm.FavoriteTreeViewNameCopyActionExecute(Sender: TObject);
9881-var
9882- ThreadItem: TThreadItem;
9883- FavThread: TFavoriteThreadItem;
9884- Board: TBoard;
9885- FavBoard: TFavoriteBoardItem;
9886- s: string;
9887-begin
9888-
9889- if FClickNode = nil then Exit;
9890-
9891- if (TObject(FClickNode.Data) is TFavoriteThreadItem) then begin
9892-
9893- FavThread := TFavoriteThreadItem( FClickNode.Data );
9894- ThreadItem := FavThread.Item;
9895-
9896- try
9897- s := ThreadItem.Title + #13#10;
9898- if s <> '' then
9899- Clipboard.AsText := s;
9900- finally
9901- end;
9902-
9903- end else if (TObject(FClickNode.Data) is TFavoriteBoardItem) then begin
9904-
9905- FavBoard := TFavoriteBoardItem( FClickNode.Data );
9906- Board := FavBoard.Item;
9907- if Board <> nil then
9908- if not Board.IsThreadDatRead then
9909- GikoSys.ReadSubjectFile(Board);
9910-
9911- try
9912- s := Board.Title + #13#10;
9913- if s <> '' then
9914- Clipboard.AsText := s;
9915- finally
9916- end;
9917-
9918- end;
9919-
9920-end;
9921-
9922-procedure TGikoForm.FavoriteTreeViewNameURLCopyActionExecute(
9923- Sender: TObject);
99246462 var
9925- ThreadItem: TThreadItem;
9926- FavThread: TFavoriteThreadItem;
9927- Board: TBoard;
9928- FavBoard: TFavoriteBoardItem;
9929- s: string;
6463+ mousePoint : TPoint;
6464+ item : TTreeNode;
6465+ rect : TRect;
99306466 begin
9931-
9932- if FClickNode = nil then Exit;
9933-
9934- if (TObject(FClickNode.Data) is TFavoriteThreadItem) then begin
9935-
9936- FavThread := TFavoriteThreadItem( FClickNode.Data );
9937- ThreadItem := FavThread.Item;
9938-
9939- try
9940- s := ThreadItem.Title + #13#10 + ThreadItem.URL + #13#10;
9941- if s <> '' then
9942- Clipboard.AsText := s;
9943- finally
9944- end;
9945-
9946- end else if (TObject(FClickNode.Data) is TFavoriteBoardItem) then begin
9947-
9948- FavBoard := TFavoriteBoardItem( FClickNode.Data );
9949- Board := FavBoard.Item;
9950- if Board <> nil then
9951- if not Board.IsThreadDatRead then
9952- GikoSys.ReadSubjectFile(Board);
9953-
9954- try
9955- s := Board.Title + #13#10 + Board.URL + #13#10;
9956- if s <> '' then
9957- Clipboard.AsText := s;
9958- finally
6467+ mousePoint := Mouse.CursorPos;
6468+ mousePoint := FavoriteTreeView.ScreenToClient(mousePoint);
6469+ item := FavoriteTreeView.GetNodeAt(mousePoint.X, mousePoint.Y);
6470+ //‘I‘ð‚µ‚½ƒAƒCƒeƒ€‚Æ“¯‚¶‚©ƒ`ƒFƒbƒN
6471+ if item = FavoriteTreeView.Selected then begin
6472+ //•\Ž¦‚µ‚Ä‚¢‚é”͈͂Ɠ¯‚¶‚Æ‚±‚ë‚©ƒ`ƒFƒbƒN
6473+ rect := item.DisplayRect(true);
6474+ //ƒCƒ[ƒW•ª¶‚ɐL‚΂·
6475+ rect.Left := rect.Left - FavoriteTreeView.Images.Width;
6476+ if ((mousePoint.X >= rect.Left) and (mousePoint.X <= rect.Right)) and
6477+ ((mousePoint.Y >= rect.Top) and (mousePoint.Y <= rect.Bottom)) then begin
6478+ FClickNode := FavoriteTreeView.Selected;
6479+ GikoDM.FavoriteTreeViewReloadActionExecute( Sender );
99596480 end;
9960-
99616481 end;
9962-
99636482 end;
99646483
99656484 function TGikoForm.TreeNodeDataFind(Node: TTreeNode; FindPointer: Pointer): TTreeNode;
@@ -10019,11 +6538,11 @@ begin
100196538 //*)
100206539 if GikoSys.Setting.ListOrientation = gloHorizontal then begin
100216540 if GikoSys.Setting.ListWidthState = glsMin then begin
10022- BrowserMaxAndFocusAction.Execute;
6541+ GikoDM.BrowserMaxAndFocusAction.Execute;
100236542 end;
100246543 end else begin
100256544 if GikoSys.Setting.ListHeightState = glsMin then begin
10026- BrowserMaxAndFocusAction.Execute;
6545+ GikoDM.BrowserMaxAndFocusAction.Execute;
100276546 end;
100286547 end;
100296548 end;
@@ -10037,16 +6556,6 @@ begin
100376556
100386557 end;
100396558
10040-procedure TGikoForm.ResRangeActionExecute(Sender: TObject);
10041-begin
10042- case FResRangeMenuSelect of
10043- Ord( grrAll ): AllResAction.Execute;
10044- Ord( grrKoko ): OnlyKokoResAction.Execute;
10045- Ord( grrNew ): OnlyNewResAction.Execute;
10046- 100: OnlyAHundredResAction.Execute;
10047- end;
10048-end;
10049-
100506559 procedure TGikoForm.FavoriteTreeViewEndDrag(Sender, Target: TObject; X,
100516560 Y: Integer);
100526561 begin
@@ -10074,86 +6583,30 @@ end;
100746583
100756584 procedure TGikoForm.MainCoolBarContextPopup(Sender: TObject;
100766585 MousePos: TPoint; var Handled: Boolean);
10077-begin
10078-
10079- FToolBarSettingSender := tssMain;
10080- MousePos := MainCoolBar.ClientToScreen( MousePos );
10081- MainCoolBarPopupMenu.Popup( MousePos.X, MousePos.Y );
10082-
10083-end;
10084-
10085-procedure TGikoForm.BrowserCoolBarContextPopup(Sender: TObject;
10086- MousePos: TPoint; var Handled: Boolean);
10087-begin
10088-
10089- FToolBarSettingSender := tssBrowser;
10090- MousePos := BrowserCoolBar.ClientToScreen( MousePos );
10091- MainCoolBarPopupMenu.Popup( MousePos.X, MousePos.Y );
10092-
10093-end;
10094-procedure TGikoForm.ExportFavoriteFileAccept(Sender: TObject);
10095-begin
10096-
10097- if FavoriteDM.SaveFavoriteFile( ExportFavoriteFile.Dialog.FileName ) Then begin
10098- ShowMessage('ƒtƒ@ƒCƒ‹‚ðo—Í‚µ‚Ü‚µ‚½');
10099- end else begin
10100- ShowMessage('ƒtƒ@ƒCƒ‹‚̏o—Í‚ÉŽ¸”s‚µ‚Ü‚µ‚½');
10101- end;
10102-end;
10103-procedure TGikoForm.SetListViewBackGroundColor(value: TColor);
10104-begin
10105- if FListViewBackGroundColor <> value then begin
10106- FListViewBackGroundColor := value;
10107- ListView.Color := FListViewBackGroundColor;
10108- end;
10109-end;
10110-procedure TGikoForm.ExportFavoriteFileBeforeExecute(Sender: TObject);
10111-begin
10112- ExportFavoriteFile.Dialog.FileName := FavoriteDM.GetFavoriteFilePath;
10113-end;
10114-
10115-procedure TGikoForm.CabinetBBSActionExecute(Sender: TObject);
10116-begin
10117-
10118- if CabinetPanel.Visible then begin
10119- if FTreeType = gtt2ch then begin
10120- CabinetVisible( False );
10121-
10122- CabinetBBSAction.Checked := False;
10123- end else begin
10124- CabinetBBSAction.Checked := True;
10125- end;
10126- end else begin
10127- CabinetVisible( True );
10128- CabinetBBSAction.Checked := True;
10129- end;
6586+begin
101306587
10131- if FActiveBBS = nil then
10132- ShowBBSTree( BBSs[ 0 ] )
10133- else
10134- ShowBBSTree( FActiveBBS );
6588+ FToolBarSettingSender := tssMain;
6589+ MousePos := MainCoolBar.ClientToScreen( MousePos );
6590+ MainCoolBarPopupMenu.Popup( MousePos.X, MousePos.Y );
101356591
101366592 end;
101376593
10138-procedure TGikoForm.FavoriteTreeViewBrowseThreadActionExecute(
10139- Sender: TObject);
10140-var
10141- threadItem : TThreadItem;
6594+procedure TGikoForm.BrowserCoolBarContextPopup(Sender: TObject;
6595+ MousePos: TPoint; var Handled: Boolean);
101426596 begin
101436597
10144- if FClickNode = nil then Exit;
10145-
10146- if (TObject(FClickNode.Data) is TFavoriteThreadItem) then begin
10147-
10148- threadItem := TFavoriteThreadItem( FClickNode.Data ).Item;
10149- if threadItem = nil then
10150- Exit;
10151- GikoSys.OpenBrowser( threadItem.URL, gbtAuto );
6598+ FToolBarSettingSender := tssBrowser;
6599+ MousePos := BrowserCoolBar.ClientToScreen( MousePos );
6600+ MainCoolBarPopupMenu.Popup( MousePos.X, MousePos.Y );
101526601
6602+end;
6603+procedure TGikoForm.SetListViewBackGroundColor(value: TColor);
6604+begin
6605+ if FListViewBackGroundColor <> value then begin
6606+ FListViewBackGroundColor := value;
6607+ ListView.Color := FListViewBackGroundColor;
101536608 end;
10154-
101556609 end;
10156-
101576610 procedure TGikoForm.FavoriteTreeBrowseBoardPopupMenuClick(Sender: TObject);
101586611 var
101596612 threadItem : TThreadItem;
@@ -10180,13 +6633,6 @@ begin
101806633
101816634 end;
101826635
10183-procedure TGikoForm.UpBoardActionExecute(Sender: TObject);
10184-begin
10185-
10186- SelectTreeNode( GetActiveContent.ParentBoard, True );
10187-
10188-end;
10189-
101906636 procedure TGikoForm.BrowserTabContextPopup(Sender: TObject;
101916637 MousePos: TPoint; var Handled: Boolean);
101926638 var
@@ -10197,13 +6643,8 @@ begin
101976643 BrowserTab.TabIndex := idx;
101986644 BrowserTab.OnChange(nil);
101996645 end;
10200-
102016646 end;
102026647
10203-procedure TGikoForm.KoreCopyExecute(Sender: TObject);
10204-begin
10205- KonoresCopy(KokoPopupMenu.Tag, true);
10206-end;
102076648 procedure TGikoForm.KonoresCopy(Number: Integer; ReplaceTag : Boolean);
102086649 var
102096650 ThreadItem: TThreadItem;
@@ -10426,13 +6867,13 @@ begin
104266867 if TObject( Node.Data ) is TBoard then begin // not TCategory
104276868 if GikoSys.Setting.ListOrientation = gloHorizontal then begin
104286869 if GikoSys.Setting.ListWidthState = glsMax then begin
10429- BrowserMinAction.Execute;
6870+ GikoDM.BrowserMinAction.Execute;
104306871 if GikoForm.Visible then
104316872 ListView.SetFocus;
104326873 end;
104336874 end else begin
104346875 if GikoSys.Setting.ListHeightState = glsMax then begin
10435- BrowserMinAction.Execute;
6876+ GikoDM.BrowserMinAction.Execute;
104366877 if GikoForm.Visible then
104376878 ListView.SetFocus;
104386879 end;
@@ -10504,13 +6945,13 @@ begin
105046945 begin
105056946 if (FActiveContent <> nil) and (FActiveContent.Browser <> nil) then begin
105066947 if IsDialogMessage( FActiveContent.Browser.Handle, Msg ) then begin
10507- UpBoardAction.Execute;
6948+ GikoDM.UpBoardAction.Execute;
105086949 Handled := True;
105096950 end;
105106951 end;
105116952 if not Handled then begin
105126953 if IsDialogMessage( ListView.Handle, Msg ) then begin
10513- UpFolderAction.Execute;
6954+ GikoDM.UpFolderAction.Execute;
105146955 Handled := True;
105156956 end;
105166957 end;
@@ -10591,24 +7032,26 @@ begin
105917032
105927033 end;
105937034
10594-procedure TGikoForm.TreeSelectNameCopyExecute(Sender: TObject);
10595-var
10596- s: string;
10597-begin
10598- TreeView.Selected := FClickNode;
10599- s := FClickNode.Text;
10600- Clipboard.AsText := s;
10601-end;
10602-
106037035 procedure TGikoForm.FavoriteTreeViewMouseUp(Sender: TObject;
106047036 Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
7037+var
7038+ item : TTreeNode;
7039+ rect : TRect;
106057040 begin
10606-
106077041 if (abs( X - FMouseDownPos.X ) < Mouse.DragThreshold) and
106087042 (abs( Y - FMouseDownPos.Y ) < Mouse.DragThreshold) then begin
10609- FavoriteClick( TObject( FavoriteTreeView.Selected ) );
7043+ item := FavoriteTreeView.GetNodeAt(X, Y);
7044+ if item = FavoriteTreeView.Selected then begin
7045+ //ƒCƒ[ƒW”͈͂ðŽæ“¾
7046+ rect := FavoriteTreeView.Selected.DisplayRect(true);
7047+ //ƒAƒCƒRƒ“•ª¶‚ɐL‚΂·
7048+ rect.Left := rect.Left - FavoriteTreeView.Images.Width;
7049+ if ((X >= rect.Left) and (X <= rect.Right)) and
7050+ ((Y >= rect.Top) and (Y <= rect.Bottom)) then begin
7051+ FavoriteClick( TObject( FavoriteTreeView.Selected ) );
7052+ end;
7053+ end;
106107054 end;
10611-
106127055 end;
106137056
106147057 destructor TBrowserRecord.Destroy;
@@ -10695,75 +7138,8 @@ begin
106957138 end;
106967139
106977140
10698-procedure TGikoForm.SetFocusForBrowserActionExecute(Sender: TObject);
10699-begin
10700- FActiveContent.FBrowser.SetFocus;
10701-end;
10702-//ƒuƒ‰ƒEƒU‚ª‚ ‚Á‚āANULLƒ^ƒu—p‚Ì‚È‚¯‚ê‚ΗLŒø‚É‚È‚éAction‚Å‹¤’Ê
10703-procedure TGikoForm.SetFocusForBrowserActionUpdate(Sender: TObject);
10704-begin
10705-{$IFDEF ACTCHK}
10706- //–³‚­‚Ä‚à‚¢‚¢IF•¶@ƒR[ƒh‚©‚ç–³—‚â‚èŒÄ‚΂Ȃ¢‚È‚çƒ`ƒFƒbƒN‚µ‚È‚­‚Ä‚àc
10707- if (Sender <> nil) and (Sender is TAction) then begin
10708-{$ENDIF}
10709- if( FActiveContent <> nil) and (FActiveContent.Browser <> nil) and
10710- (FActiveContent.Browser <> BrowserNullTab.Browser) then
10711- TAction(Sender).Enabled := true
10712- else
10713- TAction(Sender).Enabled := false;
10714-{$IFDEF ACTCHK}
10715- end;
10716-{$ENDIF}
10717-end;
10718-
10719-procedure TGikoForm.SetFocusForThreadListActionExecute(Sender: TObject);
10720-begin
10721- if FActiveContent <> nil then
10722- WebBrowserClick(FActiveContent.Browser); //ˆê‰ñBrowser‚É“–‚Ä‚È‚¢‚Æ“®‚©‚È‚¢‚Æ‚«‚ª‚ ‚é
10723- ListView.SetFocus;
10724-
10725- if( ListView.Items.Count > 0 ) and (ListView.ItemFocused = nil) then
10726- ListView.Items.Item[0].Selected := true; //‘I‘ðƒAƒCƒeƒ€‚ª–³‚¢‚Æ‚«‚͐擪‚Ì‚ð‘I‘ð‚·‚é
10727-
10728- //ƒXƒNƒ[ƒ‹‚³‚¹‚é
10729- if (ListView.ItemFocused <> nil) then begin
10730- ListView.ItemFocused.MakeVisible(False);
10731- end;
10732-end;
10733-
10734-procedure TGikoForm.SetFocusForCabinetActionExecute(Sender: TObject);
10735-begin
10736- if FActiveContent <> nil then
10737- WebBrowserClick(FActiveContent.Browser); //ˆê‰ñBrowser‚É“–‚Ä‚È‚¢‚Æ“®‚©‚È‚¢‚Æ‚«‚ª‚ ‚é
10738- if TreeView.Visible then begin
10739- TreeView.SetFocus;
10740- if(TreeView.Items.Count > 0) and ( TreeView.Selected = nil ) then
10741- TreeView.Items.Item[0].Selected := true;
10742- end else if FavoriteTreeView.Visible then begin
10743- FavoriteTreeView.SetFocus;
10744- if(FavoriteTreeView.Items.Count > 0) and (FavoriteTreeView.Selected = nil) then
10745- FavoriteTreeView.Items.Item[0].Selected := true;
10746- end;
10747-end;
10748-procedure TGikoForm.SetFocusForCabinetActionUpdate(Sender: TObject);
10749-begin
10750- SetFocusForCabinetAction.Enabled := CabinetPanel.Visible;
10751-end;
10752-
10753-//ƒuƒ‰ƒEƒU‚ðÅ‘剻‚µ‚ătƒH[ƒJƒX‚ð“–‚Ä‚éB
10754-procedure TGikoForm.BrowserMaxAndFocusActionExecute(Sender: TObject);
10755-begin
10756- BrowserMaxAction.Execute;
10757- SetFocusForBrowserAction.Execute;
10758-end;
107597141
107607142 //ƒXƒŒƒbƒhˆê——‚ðÅ‘剻‚µ‚ătƒH[ƒJƒX‚ð“–‚Ä‚é
10761-procedure TGikoForm.ThreadlistMaxAndFocusActionExecute(Sender: TObject);
10762-begin
10763- BrowserMinAction.Execute;
10764- SetFocusForThreadListAction.Execute;
10765-end;
10766-
107677143 procedure TGikoForm.SelectTimerTimer(Sender: TObject);
107687144 begin
107697145 SelectTimer.Interval := 0;
@@ -10774,219 +7150,6 @@ begin
107747150 end;
107757151 end;
107767152
10777-procedure TGikoForm.SelectItemSaveForDatExecute(Sender: TObject);
10778-var
10779- List: TList;
10780- i: Integer;
10781-begin
10782- List := TList.Create;
10783- try
10784- Screen.Cursor := crHourGlass;
10785- SelectListItem(List);
10786- if ((GikoSys.Setting.ListOrientation = gloVertical) and
10787- (GikoSys.Setting.ListHeightState = glsMax)) or
10788- ((GikoSys.Setting.ListOrientation = gloHorizontal) and
10789- (GikoSys.Setting.ListWidthState = glsMax)) then
10790- ShowMessage('ƒXƒŒƒbƒhˆê——‚ð•\Ž¦‚µ‚Ä‚­‚¾‚³‚¢')
10791- else if(List.Count = 0) then
10792- ShowMessage('ƒXƒŒƒbƒh‚ð‘I‘ð‚µ‚Ä‚­‚¾‚³‚¢')
10793- else begin
10794- FileSaveAs1.Dialog.Title := '‘I‘ðƒXƒŒƒbƒh‚ðdat‚Ì‚Ü‚Ü•Û‘¶';
10795- FileSaveAs1.Dialog.Filter := 'DATƒtƒ@ƒCƒ‹(*.dat)|*.dat';
10796- for i := 0 to List.Count - 1 do begin
10797- if (TObject(List[i]) is TThreadItem) and (TThreadItem(List[i]).IsLogFile) then begin
10798- FileSaveAs1.Dialog.FileName := TThreadItem(List[i]).FileName;
10799- if FileSaveAs1.Dialog.Execute then begin
10800- CopyFile(PChar(TThreadItem(List[i]).FilePath),
10801- PChar(FileSaveAs1.Dialog.FileName), true);
10802- end;
10803- end;
10804- end;
10805- end;
10806- finally
10807- Screen.Cursor := crDefault;
10808- List.Free;
10809- end;
10810-
10811-end;
10812-
10813-procedure TGikoForm.SelectItemSaveForHTMLExecute(Sender: TObject);
10814-var
10815- List: TList;
10816- i: Integer;
10817- html: TStringList;
10818- title: string;
10819-begin
10820- List := TList.Create;
10821- try
10822- Screen.Cursor := crHourGlass;
10823- SelectListItem(List);
10824- if ((GikoSys.Setting.ListOrientation = gloVertical) and
10825- (GikoSys.Setting.ListHeightState = glsMax)) or
10826- ((GikoSys.Setting.ListOrientation = gloHorizontal) and
10827- (GikoSys.Setting.ListWidthState = glsMax)) then
10828- ShowMessage('ƒXƒŒƒbƒhˆê——‚ð•\Ž¦‚µ‚Ä‚­‚¾‚³‚¢')
10829- else if(List.Count = 0) then
10830- ShowMessage('ƒXƒŒƒbƒh‚ð‘I‘ð‚µ‚Ä‚­‚¾‚³‚¢')
10831- else begin
10832- FileSaveAs1.Dialog.Title := '‘I‘ðƒXƒŒƒbƒh‚ðHTML‰»‚µ‚Ä•Û‘¶';
10833- FileSaveAs1.Dialog.Filter := 'HTMLƒtƒ@ƒCƒ‹(*.html)|*.html';
10834- for i := 0 to List.Count - 1 do begin
10835- if (TObject(List[i]) is TThreadItem) and (TThreadItem(List[i]).IsLogFile) then begin
10836- FileSaveAs1.Dialog.FileName := ReplaseNoValidateChar(TThreadItem(List[i]).Title) + '.html';
10837- if FileSaveAs1.Dialog.Execute then begin
10838- html := TStringList.Create;
10839- title := TThreadItem(List[i]).Title;
10840- try
10841- HTMLCreater.CreateHTML3(html, TThreadItem(List[i]), title);
10842- html.SaveToFile(FileSaveAs1.Dialog.FileName);
10843- SkinorCSSFilesCopy(ExtractFilePath(FileSaveAs1.Dialog.FileName));
10844- finally
10845- html.Free;
10846- end;
10847- end;
10848- end;
10849- end;
10850- end;
10851- finally
10852- Screen.Cursor := crDefault;
10853- List.Free;
10854- end;
10855-end;
10856-procedure TGikoForm.SkinorCSSFilesCopy(path: string);
10857-var
10858- tmp, tmpD, tmpF: string;
10859- current: string;
10860- dirs: TStringList;
10861- files: TStringList;
10862- i, j: Integer;
10863-begin
10864- if GikoSys.Setting.UseSkin then begin
10865- current := ExtractFilePath(GikoSys.GetSkinDir);
10866- tmp := GikoSys.Setting.CSSFileName;
10867- end else if GikoSys.Setting.UseCSS then begin
10868- current := ExtractFilePath(GikoSys.GetStyleSheetDir);
10869- tmp := ExtractFilePath(GikoSys.GetStyleSheetDir + GikoSys.Setting.CSSFileName);
10870- end;
10871- dirs := TStringList.Create;
10872- try
10873- dirs.Add(tmp);
10874- if tmp <> current then begin
10875- GikoSys.GetDirectoryList(current, '*.*', dirs, true);
10876- for i := 0 to dirs.Count - 1 do begin
10877- files := TStringList.Create;
10878- try
10879- files.BeginUpdate;
10880- gikoSys.GetFileList(dirs[i], '*.*', files, true);
10881- files.EndUpdate;
10882- tmpD := CustomStringReplace(dirs[i], GikoSys.GetConfigDir, path);
10883- if (AnsiPos(dirs[i], tmp) <> 0) and not (DirectoryExists(tmpD)) then
10884- ForceDirectories(tmpD);
10885-
10886- if(dirs[i] = tmp) and (dirs[i] <> current) then begin
10887- for j := 0 to files.Count - 1 do begin
10888- tmpF := CustomStringReplace(files[j], GikoSys.GetConfigDir, path);
10889- if not FileExists(tmpF) then begin
10890- CopyFile(PChar(files[j]), PChar(tmpF),True);
10891- end;
10892- end;
10893- end;
10894- finally
10895- files.Free;
10896- end;
10897- end;
10898- end else begin
10899- tmpD := CustomStringReplace(dirs[0], GikoSys.GetConfigDir, path);
10900- if not DirectoryExists(tmpD) then
10901- ForceDirectories(tmpD);
10902- tmpF := CustomStringReplace(GikoSys.GetStyleSheetDir + GikoSys.Setting.CSSFileName
10903- , GikoSys.GetConfigDir, path);
10904- if not FileExists(tmpF) then begin
10905- CopyFile(PChar(GikoSys.GetStyleSheetDir + GikoSys.Setting.CSSFileName)
10906- , PChar(tmpF), True);
10907- end;
10908- end;
10909- finally
10910- dirs.Free;
10911- end;
10912-
10913-
10914-end;
10915-procedure TGikoForm.KidokuActionExecute(Sender: TObject);
10916-var
10917- List: TList;
10918- i: Integer;
10919-begin
10920- List := TList.Create;
10921- try
10922- SelectListItem(List);
10923- for i := 0 to List.Count - 1 do begin
10924- if TObject(List[i]) is TThreadItem then begin
10925- if (TThreadItem(List[i]).UnRead) then begin
10926- TThreadItem(List[i]).UnRead := false;
10927- TThreadItem(List[i]).ParentBoard.UnRead := TThreadItem(List[i]).ParentBoard.UnRead - 1;
10928- end;
10929- end;
10930- end;
10931- if TreeView.Visible then
10932- TreeView.Refresh;
10933- if ListView.Visible then
10934- ListView.Refresh;
10935- finally
10936- List.Free;
10937- end;
10938-end;
10939-
10940-procedure TGikoForm.MidokuActionExecute(Sender: TObject);
10941-var
10942- List: TList;
10943- i: Integer;
10944-begin
10945- List := TList.Create;
10946- try
10947- SelectListItem(List);
10948- for i := 0 to List.Count - 1 do begin
10949- if TObject(List[i]) is TThreadItem then begin
10950- if (TThreadItem(List[i]).IsLogFile) and (not TThreadItem(List[i]).UnRead) then begin
10951- TThreadItem(List[i]).UnRead := true;
10952- TThreadItem(List[i]).ParentBoard.UnRead := TThreadItem(List[i]).ParentBoard.UnRead + 1;
10953- end;
10954- end;
10955- end;
10956- if TreeView.Visible then
10957- TreeView.Refresh;
10958- if ListView.Visible then
10959- ListView.Refresh;
10960- finally
10961- List.Free;
10962- end;
10963-end;
10964-
10965-procedure TGikoForm.LogFolderOpenActionExecute(Sender: TObject);
10966-var
10967- List: TList;
10968-begin
10969- if ((GikoSys.Setting.ListOrientation = gloVertical) and
10970- (GikoSys.Setting.ListHeightState = glsMax)) or
10971- ((GikoSys.Setting.ListOrientation = gloHorizontal) and
10972- (GikoSys.Setting.ListWidthState = glsMax)) then begin
10973- if(GetActiveContent <> nil) then begin
10974- GikoSys.CreateProcess('explorer.exe', '/e,"' + ExtractFilePath(GetActiveContent.FilePath) + '"');
10975- end;
10976- end else if GetActiveList is TCategory then begin
10977- List := TList.Create;
10978- try
10979- SelectListItem(List);
10980- GikoSys.CreateProcess('explorer.exe', '/e,"' + ExtractFilePath(TBoard(List[0]).FilePath) + '"');
10981- finally
10982- List.Free;
10983- end;
10984- end else if GetActiveList is TBoard then begin
10985- GikoSys.CreateProcess('explorer.exe', '/e,"' + ExtractFilePath(TBoard(GetActiveList).FilePath) + '"');
10986- end;
10987-
10988-end;
10989-
109907153 function TGikoForm.GetTabURLs(AStringList: TStringList) : Boolean;
109917154 var
109927155 rec : TBrowserRecord;
@@ -11006,17 +7169,6 @@ begin
110067169 Result := True;
110077170 end;
110087171
11009-procedure TGikoForm.TabsSaveActionExecute(Sender: TObject);
11010-begin
11011-
11012- if not SaveTabURLs then begin
11013- if TabsSaveAction.Tag = 0 then
11014- ShowMessage('•Û‘¶‚·‚éƒ^ƒu‚ª‚ ‚è‚Ü‚¹‚ñ')
11015- else if TabsSaveAction.Tag = 1 then
11016- GikoForm.TabsOpenAction.Tag := -1;
11017- end;
11018-end;
11019-
110207172 function TGikoForm.SaveTabURLs : Boolean;
110217173 const
110227174 Filename = 'tab.sav';
@@ -11044,16 +7196,6 @@ begin
110447196 end;
110457197 end;
110467198
11047-procedure TGikoForm.TabsOpenActionExecute(Sender: TObject);
11048-begin
11049- if TabsOpenAction.Tag <> -1 then begin
11050- if not LoadTabURLs then begin
11051- if TabsOpenAction.Tag = 0 then
11052- ShowMessage('•\Ž¦‚·‚éƒ^ƒu‚ª‚ ‚è‚Ü‚¹‚ñB');
11053- end;
11054- end;
11055-end;
11056-
110577199 function TGikoForm.LoadTabURLs : Boolean;
110587200 var
110597201 i, bound : Integer;
@@ -11066,179 +7208,44 @@ begin
110667208 //‹N“®Žž‚Ƀ^ƒuŽ©“®•œŒ³‚ð“ü‚ê‚Ä‚¢‚é‚ƁA‹óƒy[ƒW—p‚ÌBrowser‚Ì
110677209 //•`‰æ‚ªI‚í‚Á‚Ä‚¢‚È‚­‚āAƒNƒŠƒbƒNƒCƒxƒ“ƒg‚̐ݒ蓙‚É“Ë“ü‚·‚é‚Ì‚Å
110687210 //‚±‚±‚ŏI‚í‚点‚Ä‚¨‚­
11069- while (Browser.ReadyState <> READYSTATE_COMPLETE) and
11070- (Browser.ReadyState <> READYSTATE_INTERACTIVE) do begin
11071- Application.ProcessMessages;
11072- end;
11073- end;
11074-
11075- fileName := ExtractFilePath(Application.ExeName) + 'tab.sav';
11076- URLs := TStringList.Create();
11077- GikoTab := GikoSys.Setting.BrowserTabAppend;
11078- try
11079- try
11080- Result := True;
11081- if FileExists(fileName) then begin
11082- URLs.LoadFromFile(fileName);
11083- bound := URLs.Count - 1;
11084- if bound > -1 then begin
11085- GikoSys.Setting.BrowserTabAppend := gtpLast;//TGikoTabAppend(1);
11086- for i := 0 to bound do begin
11087- item := BBSsFindThreadFromURL( URLs[ i ] );
11088- if item <> nil then
11089- InsertBrowserTab( item, false );
11090- end;
11091- end else
11092- Result := False;
11093- end else
11094- Result := False;
11095- except
11096- on EFOpenError do begin
11097- ShowMessage('ƒ^ƒuƒtƒ@ƒCƒ‹‚ªŠJ‚¯‚Ü‚¹‚ñ');
11098- end;
11099- end;
11100- finally
11101- GikoSys.Setting.BrowserTabAppend := GikoTab;
11102- URLs.Free;
11103- end;
11104-
11105-end;
11106-
11107-procedure TGikoForm.OnlyAHundredResActionExecute(Sender: TObject);
11108-var
11109- FilterList : TStringList;
11110-begin
11111- if (FActiveContent <> nil) and (FActiveContent.FBrowser <> nil)
11112- and (FActiveContent.FBrowser.Busy) then Exit;
11113-
11114- FResRangeMenuSelect := 100;
11115- OnlyAHundredResAction.Checked := True;
11116-
11117- if GikoSys.ResRange <> 100 then begin
11118- GikoSys.ResRange := 100;
11119-
11120- // ƒtƒBƒ‹ƒ^•¶Žš—ñ‚ð‹ó‚É‚·‚é
11121- FilterList := TStringList.Create;
11122- try
11123- GikoSys.FSelectResFilter.LoadFromStringList( FilterList );
11124- GikoSys.FSelectResFilter.Reverse := False;
11125- finally
11126- FilterList.Free;
11127- end;
11128-
11129- FSelectResWord := '';
11130- RepaintAllTabsBrowser();
11131- end;
11132-end;
11133-
11134-procedure TGikoForm.OnlyKokoResActionExecute(Sender: TObject);
11135-var
11136- FilterList : TStringList;
11137-begin
11138- if (FActiveContent <> nil) and (FActiveContent.FBrowser <> nil)
11139- and (FActiveContent.FBrowser.Busy) then Exit;
11140-
11141- FResRangeMenuSelect := Ord( grrKoko );
11142- OnlyKokoResAction.Checked := True;
11143-
11144- if GikoSys.ResRange <> Ord( grrKoko ) then begin
11145- GikoSys.ResRange := Ord( grrKoko );
11146-
11147- // ƒtƒBƒ‹ƒ^•¶Žš—ñ‚ð‹ó‚É‚·‚é
11148- FilterList := TStringList.Create;
11149- try
11150- GikoSys.FSelectResFilter.LoadFromStringList( FilterList );
11151- GikoSys.FSelectResFilter.Reverse := False;
11152- finally
11153- FilterList.Free;
11154- end;
11155-
11156- FSelectResWord := '';
11157- RepaintAllTabsBrowser();
11158- end;
11159-end;
11160-
11161-procedure TGikoForm.OnlyNewResActionExecute(Sender: TObject);
11162-var
11163- FilterList : TStringList;
11164-begin
11165- if (FActiveContent <> nil) and (FActiveContent.FBrowser <> nil)
11166- and (FActiveContent.FBrowser.Busy) then Exit;
11167-
11168- FResRangeMenuSelect := Ord( grrNew );
11169- OnlyNewResAction.Checked := True;
11170-
11171- if GikoSys.ResRange <> Ord( grrNew ) then begin
11172- GikoSys.ResRange := Ord( grrNew );
11173-
11174- // ƒtƒBƒ‹ƒ^•¶Žš—ñ‚ð‹ó‚É‚·‚é
11175- FilterList := TStringList.Create;
11176- try
11177- GikoSys.FSelectResFilter.LoadFromStringList( FilterList );
11178- GikoSys.FSelectResFilter.Reverse := False;
11179- finally
11180- FilterList.Free;
7211+ while (Browser.ReadyState <> READYSTATE_COMPLETE) and
7212+ (Browser.ReadyState <> READYSTATE_INTERACTIVE) do begin
7213+ Application.ProcessMessages;
111817214 end;
11182-
11183- FSelectResWord := '';
11184- RepaintAllTabsBrowser();
111857215 end;
11186-end;
111877216
11188-procedure TGikoForm.BrowsBoradHeadActionExecute(Sender: TObject);
11189-var
11190- RefURL, URL : string;
11191- List : TList;
11192-begin
11193- RefURL := '';
11194- if GetActiveList is TCategory then begin
11195- List := TList.Create;
7217+ fileName := ExtractFilePath(Application.ExeName) + 'tab.sav';
7218+ URLs := TStringList.Create();
7219+ GikoTab := GikoSys.Setting.BrowserTabAppend;
7220+ try
111967221 try
11197- SelectListItem(List);
11198- RefURL := TBoard(List[0]).URL;
11199- finally
11200- List.Free;
7222+ Result := True;
7223+ if FileExists(fileName) then begin
7224+ URLs.LoadFromFile(fileName);
7225+ bound := URLs.Count - 1;
7226+ if bound > -1 then begin
7227+ GikoSys.Setting.BrowserTabAppend := gtpLast;//TGikoTabAppend(1);
7228+ for i := 0 to bound do begin
7229+ item := BBSsFindThreadFromURL( URLs[ i ] );
7230+ if item <> nil then
7231+ InsertBrowserTab( item, false );
7232+ end;
7233+ end else
7234+ Result := False;
7235+ end else
7236+ Result := False;
7237+ except
7238+ on EFOpenError do begin
7239+ ShowMessage('ƒ^ƒuƒtƒ@ƒCƒ‹‚ªŠJ‚¯‚Ü‚¹‚ñ');
7240+ end;
112017241 end;
11202- end else if GetActiveList is TBoard then begin
11203- RefURL := TBoard(GetActiveList).URL
11204- end;
11205- if RefURL <> '' then begin
11206- if RefURL[Length(RefURL)] <> '/' then
11207- URL := RefURL + '/' + 'head.txt'
11208- else
11209- URL := RefURL + 'head.txt';
11210-
11211- MoveToURL(URL);
11212- end else begin
11213- ShowMessage('”‚ð“Á’è‚Å‚«‚Ü‚¹‚ñ‚Å‚µ‚½B');
11214- end;
11215-
11216-end;
11217-
11218-//NGƒ[ƒhƒtƒ@ƒCƒ‹‚ð•ÒW‚·‚邽‚ß‚ÉŠJ‚­
11219-procedure TGikoForm.EditNGActionExecute(Sender: TObject);
11220-begin
11221- GikoSys.FAbon.EditNGwords;
11222-end;
11223-
11224-procedure TGikoForm.ThreadRangeActionExecute(Sender: TObject);
11225-begin
11226- case GikoSys.Setting.ThreadRange of
11227- gtrAll: AllItemAction.Execute;
11228- gtrLog: LogItemAction.Execute;
11229- gtrNew: NewItemAction.Execute;
7242+ finally
7243+ GikoSys.Setting.BrowserTabAppend := GikoTab;
7244+ URLs.Free;
112307245 end;
11231-end;
112327246
11233-procedure TGikoForm.TabAutoSaveActionExecute(Sender: TObject);
11234-begin
11235- SaveTabURLs;
112367247 end;
112377248
11238-procedure TGikoForm.TabAutoLoadActionExecute(Sender: TObject);
11239-begin
11240- LoadTabURLs;
11241-end;
112427249
112437250 /// ListView ‚̃Jƒ‰ƒ€•‚¨‚æ‚шʒu‚Ì•Û‘¶
112447251 procedure TGikoForm.ActiveListColumnSave;
@@ -11421,38 +7428,6 @@ begin
114217428
114227429 end;
114237430 //Žw’肵‚½”ԍ†‚̃ŒƒX‚Éjump‚·‚éAction
11424-procedure TGikoForm.JumpToNumOfResActionExecute(Sender: TObject);
11425-var
11426- str: string;
11427- res: integer;
11428-begin
11429- str := '1';
11430- if( InputQuery('Žw’肵‚½”ԍ†‚̃ŒƒX‚É”ò‚Ô', '”ԍ†‚ð“ü—Í‚µ‚Ä‚­‚¾‚³‚¢', str) ) then begin
11431- str := ZenToHan(str);
11432- res := StrToIntDef(str, -1);
11433- if (res > 0) and (res <= GetActiveContent.Count) then begin
11434- BrowserMovement(IntToStr(res), FActiveContent);
11435- SetFocusForBrowserAction.Execute;
11436- end else if res > GetActiveContent.Count then begin
11437- BrowserMovement(IntToStr(GetActiveContent.Count), FActiveContent);
11438- SetFocusForBrowserAction.Execute;
11439- end;
11440- end;
11441-end;
11442-
11443-procedure TGikoForm.FavoriteTreeViewCollapseActionExecute(Sender: TObject);
11444-var
11445- node : TTreeNode;
11446-begin
11447-
11448- node := FavoriteTreeView.Items.GetFirstNode;
11449- while node <> nil do begin
11450- if node.HasChildren then
11451- node.Expanded := False;
11452- node := node.GetNext;
11453- end;
11454-
11455-end;
114567431 procedure TGikoForm.ReleaseBrowser( BRecord: TBrowserRecord);
114577432 begin
114587433 if BRecord <> nil then begin
@@ -11531,7 +7506,7 @@ begin
115317506 if GikoSys.Setting.GestureEnabled then begin
115327507 GikoSys.Setting.Gestures.ClearGesture;
115337508 GikoSys.Setting.Gestures.LoadGesture(
11534- GikoSys.Setting.GetGestureFileName, ActionList );
7509+ GikoSys.Setting.GetGestureFileName, GikoDM.GikoFormActionList );
115357510 MouseGesture.UnHook;
115367511 MouseGesture.OnGestureStart := OnGestureStart;
115377512 MouseGesture.OnGestureMove := OnGestureMove;
@@ -11654,73 +7629,6 @@ begin
116547629 CoolBarResized( Sender, BrowserCoolBar );
116557630 end;
116567631
11657-procedure TGikoForm.RightTabCloseActionExecute(Sender: TObject);
11658-var
11659- i: Integer;
11660- idx: Integer;
11661-begin
11662- idx := BrowserTab.TabIndex;
11663- if idx = -1 then Exit;
11664- BrowserTab.Tabs.BeginUpdate;
11665- for i := BrowserTab.Tabs.Count - 1 downto idx + 1 do begin
11666- TBrowserRecord(BrowserTab.Tabs.Objects[i]).Free;
11667- BrowserTab.Tabs.Delete(i);
11668- end;
11669- BrowserTab.Tabs.EndUpdate;
11670-end;
11671-//ƒuƒ‰ƒEƒUƒ^ƒu‚ª‚Q‚ˆȏ゠‚ê‚ΗLŒø‚É‚È‚éƒAƒNƒVƒ‡ƒ“‚Å‹¤’ʉ»
11672-procedure TGikoForm.RightTabCloseActionUpdate(Sender: TObject);
11673-begin
11674-{$IFDEF ACTCHK}
11675- //–³‚­‚Ä‚à‚¢‚¢IF•¶@ƒR[ƒh‚©‚ç–³—‚â‚èŒÄ‚΂Ȃ¢‚È‚çƒ`ƒFƒbƒN‚µ‚È‚­‚Ä‚àc
11676- if (Sender <> nil) and (Sender is TAction) then begin
11677-{$ENDIF}
11678- TAction(Sender).Enabled := (BrowserTab.Tabs.Count > 1);
11679-{$IFDEF ACTCHK}
11680- end;
11681-{$ENDIF}
11682-end;
11683-
11684-procedure TGikoForm.LeftTabCloseActionExecute(Sender: TObject);
11685-var
11686- i: Integer;
11687- idx: Integer;
11688-begin
11689- idx := BrowserTab.TabIndex;
11690- if idx = -1 then Exit;
11691- BrowserTab.Tabs.BeginUpdate;
11692- if idx > 0 then begin
11693- for i := idx - 1 downto 0 do begin
11694- TBrowserRecord(BrowserTab.Tabs.Objects[i]).Free;
11695- BrowserTab.Tabs.Delete(i);
11696- end;
11697- end;
11698- BrowserTab.Tabs.EndUpdate;
11699-end;
11700-
11701-procedure TGikoForm.SameIDResAnchorActionExecute(Sender: TObject);
11702-var
11703- ThreadItem : TThreadItem;
11704- No, count, rc : Integer;
11705- body : string;
11706- limited: boolean;
11707-begin
11708- No := KokoPopupMenu.Tag;
11709- if No = 0 then Exit;
11710- ThreadItem := GetActiveContent;
11711- if ThreadItem = nil then Exit;
11712- count := GikoSys.GetSameIDResCount(No, FActiveContent.Thread);
11713- limited := false;
11714- if count > 20 then begin
11715- rc := GikoUtil.MsgBox(Handle,
11716- '20ŒÂˆÈã‚ ‚è‚Ü‚·‚ªA‚·‚ׂĕ\Ž¦‚µ‚Ü‚·‚©H',
11717- 'IDƒ|ƒbƒvƒAƒbƒvŒx',
11718- MB_YESNO or MB_ICONQUESTION);
11719- limited := rc <> ID_YES;
11720- end;
11721- body := GikoSys.GetSameIDResAnchor(No, ThreadItem, limited);
11722- IDAnchorPopup(body);
11723-end;
117247632 //IDƒAƒ“ƒJ[’ljÁ
117257633 procedure TGikoForm.IDAnchorPopup(Abody :string);
117267634 var
@@ -11756,16 +7664,6 @@ begin
117567664 except
117577665 end;
117587666 end;
11759-//‚±‚̃ŒƒX‚ ‚ځ`‚ñ
11760-procedure TGikoForm.IndividualAbon1ActionExecute(Sender: TObject);
11761-begin
11762- IndividualAbon(KokoPopupMenu.Tag, 1);
11763-end;
11764-//‚±‚̃ŒƒX“§–¾‚ ‚ځ`‚ñ
11765-procedure TGikoForm.IndividualAbon0ActionExecute(Sender: TObject);
11766-begin
11767- IndividualAbon(KokoPopupMenu.Tag, 0);
11768-end;
117697667
117707668 //‚±‚̃ŒƒX‚ ‚ځ`‚ñ
117717669 procedure TGikoForm.IndividualAbon(Atag, Atype : Integer);
@@ -11797,106 +7695,6 @@ begin
117977695 InsertBrowserTab( ThreadItem, True );
117987696 end;
117997697
11800-procedure TGikoForm.AntiIndividualAbonActionExecute(Sender: TObject);
11801-var
11802- IndividualForm :TIndividualAbonForm;
11803- ThreadItem : TThreadItem;
11804- msg : String;
11805- ReadList : TStringList;
11806- wordCount : TWordCount;
11807-begin
11808- IndividualForm := TIndividualAbonForm.Create(Self);
11809- try
11810- ThreadItem := GetActiveContent;
11811- ThreadItem.ScrollTop := OleVariant(IHTMLDocument2(FActiveContent.Browser.Document)).Body.ScrollTop;
11812- if (ThreadItem <> nil) and (ThreadItem.IsLogFile) then begin
11813- if IndividualForm.SetThreadLogFileName(ThreadItem.GetThreadFileName) then begin
11814- ReadList := TStringList.Create;
11815- wordCount := TWordCount.Create;
11816- try
11817-{$IFDEF SPAM_FILTER_ENABLED}
11818- // ƒXƒpƒ€‚ð‰ðœ
11819- ReadList.LoadFromFile( ThreadItem.GetThreadFileName );
11820- GikoSys.SpamCountWord( ReadList[ KokoPopupMenu.Tag - 1 ], wordCount );
11821- GikoSys.SpamForget( wordCount, True ); // ƒXƒpƒ€‚ð‰ðœ
11822- GikoSys.SpamLearn( wordCount, False ); // ƒnƒ€‚ɐݒè
11823-{$ENDIF}
11824- if IndividualForm.DeleteNG(KokoPopupMenu.Tag) then begin
11825- FActiveContent.Repaint := true;
11826- InsertBrowserTab( ThreadItem, True );
11827- end;
11828- finally
11829- wordCount.Free;
11830- ReadList.Free;
11831- end;
11832- end else begin
11833- msg := '‚±‚̃XƒŒƒbƒh‚ł͌•ʂ ‚ځ`‚ñ‚ðs‚Á‚Ä‚Ü‚¹‚ñ';
11834- MsgBox(Handle, msg, 'ƒƒbƒZ[ƒW', MB_OK);
11835- end;
11836- end;
11837- finally
11838- IndividualForm.Release;
11839- end;
11840-end;
11841-
11842-procedure TGikoForm.AntiIndividualAbonDlgActionExecute(Sender: TObject);
11843-var
11844- IndividualForm :TIndividualAbonForm;
11845- ThreadItem : TThreadItem;
11846- msg : String;
11847- ReadList : TStringList;
11848- wordCount : TWordCount;
11849-{$IFDEF SPAM_FILTER_ENABLED}
11850- i : Integer;
11851-{$ENDIF}
11852-begin
11853- IndividualForm := TIndividualAbonForm.Create(Self);
11854- try
11855- ThreadItem := GetActiveContent;
11856- ThreadItem.ScrollTop := OleVariant(IHTMLDocument2(FActiveContent.Browser.Document)).Body.ScrollTop;
11857- if (ThreadItem <> nil) and (ThreadItem.IsLogFile) then begin
11858- if IndividualForm.SetThreadLogFileName(ThreadItem.GetThreadFileName) then begin
11859- if (IndividualForm.ShowModal = mrOK) then begin
11860- ReadList := TStringList.Create;
11861- wordCount := TWordCount.Create;
11862- try
11863-{$IFDEF SPAM_FILTER_ENABLED}
11864- // ƒXƒpƒ€‚ð‰ðœ
11865- ReadList.LoadFromFile( ThreadItem.GetThreadFileName );
11866- for i := 0 to IndividualForm.DeleteList.Count - 1 do begin
11867- GikoSys.SpamCountWord( ReadList[ StrToInt(IndividualForm.DeleteList[i]) - 1 ], wordCount );
11868- GikoSys.SpamForget( wordCount, True ); // ƒXƒpƒ€‚ð‰ðœ
11869- GikoSys.SpamLearn( wordCount, False ); // ƒnƒ€‚ɐݒè
11870- end;
11871-{$ENDIF}
11872- if IndividualForm.FRepaint then begin
11873- FActiveContent.Repaint := true;
11874- InsertBrowserTab( ThreadItem, True );
11875- end;
11876- finally
11877- wordCount.Free;
11878- ReadList.Free;
11879- end;
11880- end;
11881- end else begin
11882- msg := '‚±‚̃XƒŒƒbƒh‚ł͌•ʂ ‚ځ`‚ñ‚ðs‚Á‚Ä‚Ü‚¹‚ñ';
11883- MsgBox(Handle, msg, 'ƒƒbƒZ[ƒW', MB_OK);
11884- end;
11885- end;
11886- finally
11887- IndividualForm.Release;
11888- end;
11889-end;
11890-
11891-procedure TGikoForm.IndividualAbonID1ActionExecute(Sender: TObject);
11892-begin
11893- IndividualAbonID(1);
11894-end;
11895-
11896-procedure TGikoForm.IndividualAbonID0ActionExecute(Sender: TObject);
11897-begin
11898- IndividualAbonID(0);
11899-end;
119007698 //“¯ˆêID‚Ì‚ ‚ځ`‚ñ
119017699 procedure TGikoForm.IndividualAbonID(Atype : Integer);
119027700 var
@@ -11958,60 +7756,6 @@ begin
119587756
119597757 end;
119607758
11961-procedure TGikoForm.MuteActionExecute(Sender: TObject);
11962-begin
11963- GikoSys.Setting.Mute := not GikoSys.Setting.Mute;
11964-end;
11965-
11966-procedure TGikoForm.SortActiveColumnActionExecute(Sender: TObject);
11967-var
11968- i : Integer;
11969-begin
11970- for i := 0 to ListView.Columns.Count - 1 do begin
11971- if (ListView.Column[ i ].ImageIndex = ITEM_ICON_SORT1) or
11972- (ListView.Column[ i ].ImageIndex = ITEM_ICON_SORT2) then begin
11973- FSortOrder := not FSortOrder;
11974- ListViewSort( nil, ListView.Column[ i ] );
11975- break;
11976- end;
11977- end;
11978-end;
11979-
11980-procedure TGikoForm.SortNextColumnActionExecute(Sender: TObject);
11981-var
11982- i, id : Integer;
11983-begin
11984- for i := 0 to ListView.Columns.Count - 1 do begin
11985- if (ListView.Column[ i ].ImageIndex = ITEM_ICON_SORT1) or
11986- (ListView.Column[ i ].ImageIndex = ITEM_ICON_SORT2) then begin
11987- id := i + 1;
11988- if id > ListView.Columns.Count - 1 then
11989- id := 0;
11990- FSortOrder := id = 0;
11991- ListViewSort( nil, ListView.Column[ id ] );
11992- break;
11993- end;
11994- end;
11995-
11996-end;
11997-procedure TGikoForm.SortPrevColumnActionExecute(Sender: TObject);
11998-var
11999- i, id : Integer;
12000-begin
12001- for i := 0 to ListView.Columns.Count - 1 do begin
12002- if (ListView.Column[ i ].ImageIndex = ITEM_ICON_SORT1) or
12003- (ListView.Column[ i ].ImageIndex = ITEM_ICON_SORT2) then begin
12004- id := i - 1;
12005- if id < 0 then
12006- id := ListView.Columns.Count - 1;
12007- FSortOrder := id = 0;
12008- ListViewSort( nil, ListView.Column[ id ] );
12009- break;
12010- end;
12011- end;
12012-
12013-end;
12014-
120157759 procedure TGikoForm.RepaintAllTabsBrowser();
120167760 var
120177761 i : Integer;
@@ -12026,82 +7770,10 @@ begin
120267770
120277771 end;
120287772
12029-procedure TGikoForm.MessageListViewAdvancedCustomDrawItem(
12030- Sender: TCustomListView; Item: TListItem; State: TCustomDrawState;
12031- Stage: TCustomDrawStage; var DefaultDraw: Boolean);
12032-begin
12033- //if DiffComp then begin
12034- //if Odd(Item.Index) then Sender.Canvas.Brush.Color := clBlue;
12035- //DiffComp := False;
12036-// end;
12037-end;
12038-
12039-procedure TGikoForm.BeLogInOutActionExecute(Sender: TObject);
12040-begin
12041- GikoSys.Setting.BeLogin := not GikoSys.Setting.BeLogin;
12042-end;
12043-
120447773 procedure TGikoForm.BeLogInOutActionUpdate(Sender: TObject);
120457774 begin
12046- if (GikoSys.Setting.BeUserID <> '') and (GikoSys.Setting.BeCode <> '') then begin
12047- if (GikoSys.Setting.BeLogin) then BeLogInOutAction.Checked := true
12048- else BeLogInOutAction.Checked := false;
12049- BeLogInOutAction.Enabled := true
12050- end else
12051- BeLogInOutAction.Enabled := false;
12052-
12053-end;
12054-//ƒŠƒ“ƒN‚Ì•¶Žš—ñ‚©‚烌ƒXƒ|ƒbƒvƒAƒbƒv—p‚ÌURL‚É•ÏŠ·‚·‚é
12055-function TGikoForm.GetRespopupURL(AText, AThreadURL : string): string;
12056-var
12057- wkInt: Integer;
12058-begin
12059- Result := '';
12060- if Pos('about:blank..', AText) = 1 then begin
12061- wkInt := LastDelimiter( '/', AThreadURL );
12062- if Pos( '?', Copy( AThreadURL, wkInt, MaxInt ) ) = 0 then begin
12063- // Thread.URL ‚Í PATH_INFO “n‚µ
12064- Result := Copy( AThreadURL, 1, LastDelimiter( '/', AThreadURL ) );
12065- wkInt := LastDelimiter( '/', AText );
12066- if Pos( '?', Copy( AText, wkInt, MaxInt ) ) = 0 then
12067- // Text ‚à PATH_INFO “n‚µ
12068- Result := Result + Copy( AText, LastDelimiter( '/', AText ) + 1, MaxInt )
12069- else
12070- // Text ‚Í QUERY_STRING “n‚µ
12071- Result := Result + Copy( AText, LastDelimiter( '?', AText ) + 1, MaxInt );
12072- end else begin
12073- // Thread.URL ‚Í QUERY_STRING “n‚µ
12074- Result := Copy( AThreadURL, 1, LastDelimiter( '?', AThreadURL ) );
12075- wkInt := LastDelimiter( '/', AText );
12076- if Pos( '?', Copy( Text, wkInt, MaxInt ) ) = 0 then begin
12077- // Text ‚Í PATH_INFO “n‚µ
12078- // URL ‚ɔ‚ƃL[‚ª‘«‚ç‚È‚¢‚Ì‚Å Text ‚©‚ç’¸‘Õ‚·‚é
12079- wkInt := LastDelimiter( '/', Copy( AText, 1, wkInt - 1 ) );
12080- wkInt := LastDelimiter( '/', Copy( AText, 1, wkInt - 1 ) );
12081- Result := Copy( Result, 1, Length( Result ) - 1 ) + Copy( AText, wkInt, MaxInt );
12082- end else begin
12083- // Text ‚à QUERY_STRING “n‚µ
12084- Result := Result + Copy( Text, LastDelimiter( '?', AText ) + 1, MaxInt )
12085- end;
12086- end;
12087- end else if Pos('about:blank/bbs/', AText) = 1 then begin
12088- //‚µ‚½‚ç‚ÎJBBS‚ÌŽd•Ï‚Ì‹zŽû
12089- AText := CustomStringReplace(AText, 'about:blank/bbs/', 'about:blank../../bbs/');
12090- Result := GetRespopupURL(AText, AThreadURL);
12091- end else begin
12092- Result := AText;
12093- end;
12094-
120957775 end;
120967776 //ListView‚Ì‘I‘ðó‘Ô‚ð‰ðœ‚·‚é
12097-procedure TGikoForm.UnSelectedListViewActionExecute(Sender: TObject);
12098-begin
12099- if ListView.Selected <> nil then begin
12100- ListView.Selected.Focused := True;
12101- ListView.Selected := nil;
12102- end;
12103-end;
12104-
121057777 procedure TGikoForm.ListViewKeyUp(Sender: TObject; var Key: Word;
121067778 Shift: TShiftState);
121077779 begin
@@ -12119,42 +7791,6 @@ begin
121197791 end;
121207792 end;
121217793 end;
12122-//TAction‚ÅGetActiveContent‚ªnilˆÈŠO‚Å—LŒø‚É‚È‚é
12123-procedure TGikoForm.DependActiveCntentActionUpdate(Sender: TObject);
12124-begin
12125-{$IFDEF ACTCHK}
12126- //–³‚­‚Ä‚à‚¢‚¢IF•¶@ƒR[ƒh‚©‚ç–³—‚â‚èŒÄ‚΂Ȃ¢‚È‚çƒ`ƒFƒbƒN‚µ‚È‚­‚Ä‚àc
12127- if (Sender <> nil) and (Sender is TAction) then begin
12128-{$ENDIF}
12129- TAction(Sender).Enabled := (GetActiveContent <> nil);
12130-{$IFDEF ACTCHK}
12131- end;
12132-{$ENDIF}
12133-end;
12134-//TAction‚ÅGetActiveContent‚ªnilˆÈŠO‚©‚ƒƒO‚ðŽ‚Á‚Ä‚¢‚é
12135-procedure TGikoForm.DependActiveCntentLogActionUpdate(Sender: TObject);
12136-begin
12137-{$IFDEF ACTCHK}
12138- //–³‚­‚Ä‚à‚¢‚¢IF•¶@ƒR[ƒh‚©‚ç–³—‚â‚èŒÄ‚΂Ȃ¢‚È‚çƒ`ƒFƒbƒN‚µ‚È‚­‚Ä‚àc
12139- if (Sender <> nil) and (Sender is TAction) then begin
12140-{$ENDIF}
12141- TAction(Sender).Enabled := (GetActiveContent <> nil) and (GetActiveContent.IsLogFile);
12142-{$IFDEF ACTCHK}
12143- end;
12144-{$ENDIF}
12145-end;
12146-//TAction‚ÅActiveList‚ªTBoard‚Å—LŒø‚É‚È‚é
12147-procedure TGikoForm.DependActiveListTBoardActionUpdate(Sender: TObject);
12148-begin
12149-{$IFDEF ACTCHK}
12150- //–³‚­‚Ä‚à‚¢‚¢IF•¶@ƒR[ƒh‚©‚ç–³—‚â‚èŒÄ‚΂Ȃ¢‚È‚çƒ`ƒFƒbƒN‚µ‚È‚­‚Ä‚àc
12151- if (Sender <> nil) and (Sender is TAction) then begin
12152-{$ENDIF}
12153- TAction(Sender).Enabled := (GetActiveList is TBoard);
12154-{$IFDEF ACTCHK}
12155- end;
12156-{$ENDIF}
12157-end;
121587794
121597795 procedure TGikoForm.FavoriteTreeViewEditing(Sender: TObject;
121607796 Node: TTreeNode; var AllowEdit: Boolean);
@@ -12176,11 +7812,77 @@ begin
121767812 MsgBox(Handle, s, 'ˆ—‚³‚ê‚È‚©‚Á‚½—áŠO', MB_OK or MB_ICONSTOP);
121777813 end;
121787814
12179-procedure TGikoForm.WikiFAQWebPageActionExecute(Sender: TObject);
12180-const
12181- URL_Wiki: string = 'http://gikowiki.dyndns.info/index.php?FAQ';
7815+//Application‚ÌMainForm‚ðŽæ“¾‚·‚é
7816+function TGikoForm.GetMainForm(): TComponent;
7817+begin
7818+ Result := Application.MainForm;
7819+end;
7820+//Œ»Ý‚̃J[ƒ\ƒ‹‚ðŽæ“¾‚·‚é
7821+function TGikoForm.GetScreenCursor(): TCursor;
7822+begin
7823+ Result := Screen.Cursor;
7824+end;
7825+//ƒJ[ƒ\ƒ‹‚ðÝ’è‚·‚é
7826+procedure TGikoForm.SetScreenCursor(Cursor : TCursor);
7827+begin
7828+ if (Screen.Cursor <> Cursor) then
7829+ Screen.Cursor := Cursor;
7830+end;
7831+//ƒXƒNƒŠ[ƒ“ã‚ÉEditorForm‚ª‚¢‚é‚©
7832+function TGikoForm.EditorFormExists(): boolean;
7833+var
7834+ i : Integer;
7835+begin
7836+ Result := false;
7837+ //ƒXƒNƒŠ[ƒ“ã‚Ì‘S‚ẴtƒH[ƒ€‚©‚çAEditorForm‚ð’T‚·
7838+ for i := 0 to Screen.CustomFormCount - 1 do begin
7839+ if TObject(Screen.CustomForms[i]) is TEditorForm then begin
7840+ Result := true;
7841+ Break;
7842+ end;
7843+ end;
7844+end;
7845+//ƒXƒNƒŠ[ƒ“ã‚É‚¢‚é‚·‚ׂĂÌEditorForm‚©‚ç–¼‘O‚Ì—š—ð‚ðíœ‚·‚é
7846+procedure TGikoForm.AllEditroFormNameTextClearClear();
7847+var
7848+ i : Integer;
7849+begin
7850+ for i := 0 to Screen.CustomFormCount - 1 do begin
7851+ if TObject(Screen.CustomForms[i]) is TEditorForm then
7852+ TEditorForm(Screen.CustomForms[i]).NameComboBox.Items.Clear;
7853+ end;
7854+end;
7855+//ƒXƒNƒŠ[ƒ“ã‚É‚¢‚é‚·‚ׂĂÌEditorForm‚©‚烁[ƒ‹—š—ð‚ðíœ‚·‚é
7856+procedure TGikoForm.AllEditroFormMailTextClearClear();
7857+var
7858+ i : Integer;
121827859 begin
12183- GikoSys.OpenBrowser(URL_Wiki, gbtAuto);
7860+ for i := 0 to Screen.CustomFormCount - 1 do begin
7861+ if TObject(Screen.CustomForms[i]) is TEditorForm then
7862+ TEditorForm(Screen.CustomForms[i]).MailComboBox.Items.Clear;
7863+ end;
7864+end;
7865+
7866+
7867+// *************************************************************************
7868+//! ƒLƒƒƒrƒlƒbƒg‚ð•Â‚¶‚é~ƒ{ƒ^ƒ“‚̃NƒŠƒbƒNƒCƒxƒ“ƒg
7869+// *************************************************************************
7870+procedure TGikoForm.CabinetCloseSpeedButtonClick(Sender: TObject);
7871+begin
7872+ //Action‚Őݒ肷‚é‚ƃLƒƒƒvƒVƒ‡ƒ“‚ªÁ‚¹‚È‚¢‚̂ŁAOnClickƒCƒxƒ“ƒg‚Å‚Ì
7873+ //ŒÄ‚яo‚µ‚É‚µ‚½@by ‚à‚¶‚ã
7874+ if GikoDM.CabinetVisibleAction.Enabled then begin
7875+ GikoDM.CabinetVisibleAction.Execute;
7876+ end;
7877+end;
7878+// *************************************************************************
7879+//! ‚¨‹C‚É“ü‚èƒLƒƒƒrƒlƒbƒg‚̐®—ƒ{ƒ^ƒ“‚̃NƒŠƒbƒNƒCƒxƒ“ƒg
7880+// *************************************************************************
7881+procedure TGikoForm.FavoriteArrangeToolButtonClick(Sender: TObject);
7882+begin
7883+ if GikoDM.FavoriteArrangeAction.Enabled then begin
7884+ GikoDM.FavoriteArrangeAction.Execute;
7885+ end;
121847886 end;
121857887
121867888 initialization
--- /dev/null
+++ b/GikoDataModule.dfm
@@ -0,0 +1,3198 @@
1+object GikoDM: TGikoDM
2+ OldCreateOrder = False
3+ OnCreate = DataModuleCreate
4+ Left = 573
5+ Top = 362
6+ Height = 336
7+ Width = 286
8+ object GikoFormActionList: TActionList
9+ Images = ToobarImageList
10+ Left = 48
11+ Top = 12
12+ object OnlyAHundredResAction: TAction
13+ Category = #12473#12524#12483#12489
14+ AutoCheck = True
15+ Caption = #26368#26032'100'#12524#12473#12398#12415#34920#31034'(&H)'
16+ GroupIndex = 2
17+ Hint = #26368#26032'100'#12524#12473#12398#12415#34920#31034
18+ ImageIndex = 38
19+ OnExecute = OnlyAHundredResActionExecute
20+ end
21+ object OnlyKokoResAction: TAction
22+ Category = #12473#12524#12483#12489
23+ AutoCheck = True
24+ Caption = #26410#35501#12524#12473#12398#12415#34920#31034'(&K)'
25+ GroupIndex = 2
26+ Hint = #26410#35501#12524#12473#12398#12415#34920#31034
27+ ImageIndex = 46
28+ OnExecute = OnlyKokoResActionExecute
29+ end
30+ object LoginAction: TAction
31+ Category = #12501#12449#12452#12523
32+ AutoCheck = True
33+ Caption = #12525#12464#12452#12531'(&L)'
34+ Hint = #12525#12464#12452#12531#65295#12525#12464#12450#12454#12488#12434#12377#12427
35+ ImageIndex = 3
36+ OnExecute = LoginActionExecute
37+ end
38+ object NewBoardAction: TAction
39+ Category = #12501#12449#12452#12523
40+ Caption = #26495#26356#26032'(&B)...'
41+ Hint = #12508#12540#12489#26356#26032#12480#12452#12450#12525#12464#12434#34920#31034#12377#12427
42+ OnExecute = NewBoardActionExecute
43+ end
44+ object LogDeleteAction: TAction
45+ Category = #12501#12449#12452#12523
46+ Caption = #12525#12464#21066#38500'(&D)'
47+ Hint = #36984#25246#12373#12428#12390#12356#12427#12473#12524#12483#12489#12434#21066#38500#12377#12427
48+ ShortCut = 46
49+ OnExecute = LogDeleteActionExecute
50+ OnUpdate = LogDeleteActionUpdate
51+ end
52+ object KidokuAction: TAction
53+ Category = #32232#38598
54+ Caption = #26082#35501#12395#12377#12427'(&K)'
55+ Hint = #36984#25246#12373#12428#12390#12356#12427#12473#12524#12483#12489#12434#26082#35501#12395#12377#12427
56+ OnExecute = KidokuActionExecute
57+ end
58+ object StdToolBarVisibleAction: TAction
59+ Category = #34920#31034
60+ AutoCheck = True
61+ Caption = #27161#28310#12484#12540#12523#12496#12540'(&S)'
62+ Checked = True
63+ Hint = #27161#28310#12484#12540#12523#12496#12540#12398#34920#31034#29366#24907#12434#22793#26356#12377#12427
64+ OnExecute = StdToolBarVisibleActionExecute
65+ end
66+ object AddressBarVisibleAction: TAction
67+ Category = #34920#31034
68+ AutoCheck = True
69+ Caption = #12450#12489#12524#12473#12496#12540'(&A)'
70+ Checked = True
71+ Hint = #12450#12489#12524#12473#12496#12540#12398#34920#31034#29366#24907#12434#22793#26356#12377#12427
72+ OnExecute = AddressBarVisibleActionExecute
73+ end
74+ object LinkBarVisibleAction: TAction
75+ Category = #34920#31034
76+ AutoCheck = True
77+ Caption = #12522#12531#12463#12496#12540'(&K)'
78+ Checked = True
79+ Hint = #12522#12531#12463#12496#12540#12398#34920#31034#29366#24907#12434#22793#26356#12377#12427
80+ OnExecute = LinkBarVisibleActionExecute
81+ end
82+ object ListToolBarVisibleAction: TAction
83+ Category = #34920#31034
84+ AutoCheck = True
85+ Caption = #12522#12473#12488#12484#12540#12523#12496#12540'(&L)'
86+ Checked = True
87+ Hint = #12522#12473#12488#12484#12540#12523#12496#12540#12398#34920#31034#29366#24907#12434#22793#26356#12377#12427
88+ OnExecute = ListToolBarVisibleActionExecute
89+ end
90+ object SearchAction: TAction
91+ Category = #12484#12540#12523
92+ Caption = #12525#12464#26908#32034'(&S)'
93+ Hint = #12525#12464#26908#32034#12480#12452#12450#12525#12464#12434#34920#31034#12377#12427
94+ ImageIndex = 34
95+ ShortCut = 16454
96+ OnExecute = SearchActionExecute
97+ end
98+ object GikoNaviWebPageAction: TAction
99+ Category = #12504#12523#12503
100+ Caption = #12462#12467#12490#12499#12398#12454#12455#12502#12469#12452#12488'(&G)'
101+ Hint = #12462#12467#12490#12499#12398#12454#12455#12502#12469#12452#12488#12434#34920#31034#12377#12427
102+ OnExecute = GikoNaviWebPageActionExecute
103+ end
104+ object MonazillaWebPageAction: TAction
105+ Category = #12504#12523#12503
106+ Caption = #12514#12490#12472#12521#12398#12454#12455#12502#12469#12452#12488'(&M)'
107+ Hint = #12514#12490#12472#12521#12398#12454#12455#12502#12469#12452#12488#12434#34920#31034#12377#12427
108+ OnExecute = MonazillaWebPageActionExecute
109+ end
110+ object BBS2chWebPageAction: TAction
111+ Category = #12504#12523#12503
112+ Caption = '2'#12385#12419#12435#12397#12427#12488#12483#12503#12506#12540#12472'(&N)'
113+ Hint = '2'#12385#12419#12435#12397#12427#12488#12483#12503#12506#12540#12472#12434#34920#31034#12377#12427
114+ OnExecute = BBS2chWebPageActionExecute
115+ end
116+ object GikoFolderOpenAction: TAction
117+ Category = #12504#12523#12503
118+ Caption = #12462#12467#12490#12499#12501#12457#12523#12480#12434#38283#12367'(&F)'
119+ Hint = #12462#12467#12490#12499#12398#12501#12457#12523#12480#12434#38283#12367
120+ OnExecute = GikoFolderOpenActionExecute
121+ end
122+ object AboutAction: TAction
123+ Category = #12504#12523#12503
124+ Caption = #12496#12540#12472#12519#12531#24773#22577'(&A)...'
125+ Hint = #12496#12540#12472#12519#12531#24773#22577#12434#34920#31034#12377#12427
126+ OnExecute = AboutActionExecute
127+ end
128+ object SelectTextClearAction: TAction
129+ Category = #12501#12449#12452#12523
130+ Caption = #32094#36796#12415#23653#27508#28040#21435'(&S)'
131+ Hint = #32094#36796#12415#23653#27508#12434#28040#21435#12377#12427
132+ OnExecute = SelectTextClearActionExecute
133+ end
134+ object NameTextClearAction: TAction
135+ Category = #12501#12449#12452#12523
136+ Caption = #12524#12473#12456#12487#12451#12479#21517#21069#23653#27508#20840#28040#21435'(&N)'
137+ Hint = #12524#12473#12456#12487#12451#12479#12398#21517#21069#23653#27508#12434#28040#21435#12377#12427
138+ OnExecute = NameTextClearActionExecute
139+ end
140+ object MailTextClearAction: TAction
141+ Category = #12501#12449#12452#12523
142+ Caption = #12524#12473#12456#12487#12451#12479#12513#12540#12523#23653#27508#28040#21435'(&N)'
143+ Hint = #12524#12473#12456#12487#12451#12479#12398#12513#12540#12523#23653#27508#12434#28040#21435#12377#12427
144+ OnExecute = MailTextClearActionExecute
145+ end
146+ object ExitAction: TAction
147+ Category = #12501#12449#12452#12523
148+ Caption = #32066#20102'(&X)'
149+ Hint = #12462#12467#12490#12499#12434#32066#20102#12377#12427
150+ OnExecute = ExitActionExecute
151+ end
152+ object ListNameBarVisibleAction: TAction
153+ Category = #34920#31034
154+ AutoCheck = True
155+ Caption = #12522#12473#12488#21517#31216'(&I)'
156+ Checked = True
157+ Hint = #12522#12473#12488#21517#31216#12398#34920#31034#29366#24907#12434#22793#26356#12377#12427
158+ OnExecute = ListNameBarVisibleActionExecute
159+ end
160+ object BrowserToolBarVisibleAction: TAction
161+ Category = #34920#31034
162+ AutoCheck = True
163+ Caption = #12502#12521#12454#12470#12484#12540#12523#12496#12540'(&B)'
164+ Checked = True
165+ Hint = #12502#12521#12454#12470#12484#12540#12523#12496#12540#12398#34920#31034#29366#24907#12434#22793#26356#12377#12427
166+ OnExecute = BrowserToolBarVisibleActionExecute
167+ end
168+ object BrowserNameBarVisibleAction: TAction
169+ Category = #34920#31034
170+ AutoCheck = True
171+ Caption = #12502#12521#12454#12470#21517#31216'(&R)'
172+ Checked = True
173+ Hint = #12502#12521#12454#12470#21517#31216#12398#34920#31034#29366#24907#12434#22793#26356#12377#12427
174+ OnExecute = BrowserNameBarVisibleActionExecute
175+ end
176+ object MsgBarVisibleAction: TAction
177+ Category = #34920#31034
178+ AutoCheck = True
179+ Caption = #12513#12483#12475#12540#12472#12496#12540'(&E)'
180+ Hint = #12513#12483#12475#12540#12472#12496#12540#12398#34920#31034#29366#24907#12434#22793#26356#12377#12427
181+ OnExecute = MsgBarVisibleActionExecute
182+ end
183+ object MsgBarCloseAction: TAction
184+ Category = #34920#31034
185+ Caption = #38281#12376#12427'(&C)'
186+ Hint = #12513#12483#12475#12540#12472#12496#12540#12434#38281#12376#12427
187+ OnExecute = MsgBarCloseActionExecute
188+ end
189+ object StatusBarVisibleAction: TAction
190+ Category = #34920#31034
191+ AutoCheck = True
192+ Caption = #12473#12486#12540#12479#12473#12496#12540'(&U)'
193+ Hint = #12473#12486#12540#12479#12473#12496#12540#12398#34920#31034#29366#24907#12434#22793#26356#12377#12427
194+ OnExecute = StatusBarVisibleActionExecute
195+ end
196+ object CabinetBBSAction: TAction
197+ Category = #34920#31034
198+ AutoCheck = True
199+ Caption = #25522#31034#26495'(&N)'
200+ Hint = #12461#12515#12499#12493#12483#12488#12398#34920#31034#12434#25522#31034#26495#12395#12377#12427
201+ ImageIndex = 35
202+ OnExecute = CabinetBBSActionExecute
203+ end
204+ object CabinetHistoryAction: TAction
205+ Category = #34920#31034
206+ AutoCheck = True
207+ Caption = #23653#27508#12522#12473#12488'(&H)'
208+ Hint = #12461#12515#12499#12493#12483#12488#12398#34920#31034#12434#23653#27508#12522#12473#12488#12395#12377#12427
209+ ImageIndex = 36
210+ OnExecute = CabinetHistoryActionExecute
211+ end
212+ object OnlyNewResAction: TAction
213+ Category = #12473#12524#12483#12489
214+ AutoCheck = True
215+ Caption = #26032#30528#12524#12473#12398#12415#34920#31034'(&N)'
216+ GroupIndex = 2
217+ Hint = #26032#30528#12524#12473#12398#12415#34920#31034
218+ ImageIndex = 45
219+ OnExecute = OnlyNewResActionExecute
220+ end
221+ object CabinetFavoriteAction: TAction
222+ Category = #34920#31034
223+ AutoCheck = True
224+ Caption = #12362#27671#12395#20837#12426'(&A)'
225+ Hint = #12461#12515#12499#12493#12483#12488#12398#34920#31034#12434#12362#27671#12395#20837#12426#12522#12473#12488#12395#12377#12427
226+ ImageIndex = 37
227+ OnExecute = CabinetFavoriteActionExecute
228+ end
229+ object CabinetVisibleAction: TAction
230+ Category = #34920#31034
231+ AutoCheck = True
232+ Caption = #12461#12515#12499#12493#12483#12488#34920#31034'(&O)'
233+ Hint = #12461#12515#12499#12493#12483#12488#12398#34920#31034#29366#24907#12434#22793#26356#12377#12427
234+ ImageIndex = 1
235+ OnExecute = CabinetVisibleActionExecute
236+ end
237+ object ListNumberVisibleAction: TAction
238+ Category = #26495
239+ AutoCheck = True
240+ Caption = #12522#12473#12488#30058#21495#34920#31034'(&N)'
241+ Hint = #12522#12473#12488#30058#21495#34920#31034#12434#22793#26356#12377#12427
242+ ImageIndex = 6
243+ OnExecute = ListNumberVisibleActionExecute
244+ end
245+ object UpFolderAction: TAction
246+ Category = #26495
247+ Caption = #19978#12408'(&U)'
248+ Hint = #19978#20301#12501#12457#12523#12480#12395#31227#21205#12377#12427
249+ ImageIndex = 8
250+ ShortCut = 8
251+ OnExecute = UpFolderActionExecute
252+ OnUpdate = UpFolderActionUpdate
253+ end
254+ object CabinetCloseAction: TAction
255+ Category = #34920#31034
256+ Caption = #38281#12376#12427'(&C)'
257+ Hint = #12461#12515#12499#12493#12483#12488#12434#38281#12376#12427
258+ OnExecute = CabinetCloseActionExecute
259+ end
260+ object IconStyle: TAction
261+ Category = #26495
262+ Caption = #34920#31034'(&V)'
263+ Hint = #34920#31034
264+ ImageIndex = 7
265+ OnExecute = IconStyleExecute
266+ end
267+ object LargeIconAction: TAction
268+ Category = #34920#31034
269+ Caption = #22823#12365#12356#12450#12452#12467#12531'(&G)'
270+ GroupIndex = 2
271+ Hint = #12522#12473#12488#12434#22823#12365#12356#12450#12452#12467#12531#34920#31034#12395#12377#12427
272+ OnExecute = LargeIconActionExecute
273+ end
274+ object SmallIconAction: TAction
275+ Category = #34920#31034
276+ Caption = #23567#12373#12356#12450#12452#12467#12531'(&M)'
277+ GroupIndex = 2
278+ Hint = #12522#12473#12488#12434#23567#12373#12356#12450#12452#12467#12531#34920#31034#12395#12377#12427
279+ OnExecute = SmallIconActionExecute
280+ end
281+ object ListIconAction: TAction
282+ Category = #34920#31034
283+ Caption = #19968#35239'(&L)'
284+ GroupIndex = 2
285+ Hint = #12522#12473#12488#12434#19968#35239#34920#31034#12395#12377#12427
286+ OnExecute = ListIconActionExecute
287+ end
288+ object DetailIconAction: TAction
289+ Category = #34920#31034
290+ Caption = #35443#32048'(&D)'
291+ GroupIndex = 2
292+ Hint = #12522#12473#12488#12434#35443#32048#34920#31034#12395#12377#12427
293+ OnExecute = DetailIconActionExecute
294+ end
295+ object MidokuAction: TAction
296+ Category = #32232#38598
297+ Caption = #26410#35501#12395#12377#12427'(&M)'
298+ Hint = #36984#25246#12373#12428#12390#12356#12427#12473#12524#12483#12489#12434#26410#35501#12395#12377#12427
299+ OnExecute = MidokuActionExecute
300+ end
301+ object AllSelectAction: TAction
302+ Category = #32232#38598
303+ Caption = #12377#12409#12390#36984#25246'(&A)'
304+ Hint = #12522#12473#12488#12434#12377#12409#12390#36984#25246#12377#12427
305+ ShortCut = 16449
306+ OnExecute = AllSelectActionExecute
307+ OnUpdate = AllSelectActionUpdate
308+ end
309+ object AllItemAction: TAction
310+ Category = #26495
311+ AutoCheck = True
312+ Caption = #12377#12409#12390#12398#12473#12524#12483#12489#12434#34920#31034'(&A)'
313+ GroupIndex = 1
314+ Hint = #12473#12524#12483#12489#12434#12377#12409#12390#34920#31034#12377#12427
315+ ImageIndex = 9
316+ ShortCut = 16433
317+ OnExecute = AllItemActionExecute
318+ OnUpdate = DependActiveListTBoardActionUpdate
319+ end
320+ object LogItemAction: TAction
321+ Category = #26495
322+ AutoCheck = True
323+ Caption = #12525#12464#26377#12426#12473#12524#12483#12489#34920#31034'(&L)'
324+ GroupIndex = 1
325+ Hint = #12525#12464#26377#12426#12473#12524#12483#12489#12398#12415#34920#31034#12377#12427
326+ ImageIndex = 10
327+ ShortCut = 16434
328+ OnExecute = LogItemActionExecute
329+ OnUpdate = DependActiveListTBoardActionUpdate
330+ end
331+ object NewItemAction: TAction
332+ Category = #26495
333+ AutoCheck = True
334+ Caption = #26032#30528#12473#12524#12483#12489#34920#31034'(&N)'
335+ GroupIndex = 1
336+ Hint = #26032#30528#12473#12524#12483#12489#12398#12415#34920#31034#12377#12427
337+ ImageIndex = 11
338+ ShortCut = 16435
339+ OnExecute = NewItemActionExecute
340+ OnUpdate = DependActiveListTBoardActionUpdate
341+ end
342+ object ThreadRangeAction: TAction
343+ Category = #26495
344+ AutoCheck = True
345+ Caption = #12473#12524#12483#12489#12398#34920#31034#31684#22258#12434#35373#23450'(&H)'
346+ GroupIndex = 1
347+ Hint = #12473#12524#12483#12489#12398#34920#31034#31684#22258#12434#35373#23450
348+ ImageIndex = 10
349+ OnExecute = ThreadRangeActionExecute
350+ OnUpdate = DependActiveCntentActionUpdate
351+ end
352+ object SelectItemAction: TAction
353+ Category = #26495
354+ AutoCheck = True
355+ Caption = #12473#12524#12483#12489#32094#36796#12415#34920#31034'(&S)...'
356+ GroupIndex = 1
357+ Hint = #12473#12524#12483#12489#32094#36796#12415#12480#12452#12450#12525#12464#12434#34920#31034#12377#12427
358+ ImageIndex = 12
359+ ShortCut = 16436
360+ OnExecute = SelectItemActionExecute
361+ OnUpdate = DependActiveListTBoardActionUpdate
362+ end
363+ object StopAction: TAction
364+ Category = #34920#31034
365+ Caption = #20013#27490'(&S)'
366+ GroupIndex = 2
367+ Hint = #12480#12454#12531#12525#12540#12489#12434#20013#27490#12377#12427
368+ ImageIndex = 2
369+ ShortCut = 27
370+ OnExecute = StopActionExecute
371+ end
372+ object OptionAction: TAction
373+ Category = #12484#12540#12523
374+ Caption = #12458#12503#12471#12519#12531'(&O)...'
375+ Hint = #12458#12503#12471#12519#12531#12480#12452#12450#12525#12464#12434#34920#31034#12377#12427
376+ OnExecute = OptionActionExecute
377+ end
378+ object RoundAction: TAction
379+ Category = #12484#12540#12523
380+ Caption = #24033#22238#12434#23455#34892'(&R)...'
381+ Hint = #24033#22238#12480#12452#12450#12525#12464#12434#34920#31034#12377#12427
382+ ImageIndex = 0
383+ OnExecute = RoundActionExecute
384+ end
385+ object BrowserMaxAction: TAction
386+ Category = #12473#12524#12483#12489
387+ Caption = #12473#12524#12434#22823#12365#12367#34920#31034'(&E)'
388+ Hint = #12473#12524#12483#12489#34920#31034#12456#12522#12450#12434#22823#12365#12367#34920#31034#12377#12427
389+ ImageIndex = 16
390+ OnExecute = BrowserMaxActionExecute
391+ end
392+ object BrowserMinAction: TAction
393+ Category = #12473#12524#12483#12489
394+ Caption = #12473#12524#12434#23567#12373#12367#34920#31034'(&W)'
395+ Hint = #12473#12524#12483#12489#34920#31034#12456#12522#12450#12434#23567#12373#12367#34920#31034#12377#12427
396+ ImageIndex = 17
397+ OnExecute = BrowserMinActionExecute
398+ end
399+ object ScrollTopAction: TAction
400+ Category = #12473#12524#12483#12489
401+ Caption = #20808#38957#12408#31227#21205'(&T)'
402+ Hint = #29694#22312#34920#31034#12375#12390#12356#12427#12473#12524#12483#12489#12398#20808#38957#12408#31227#21205#12377#12427
403+ ImageIndex = 22
404+ OnExecute = ScrollTopActionExecute
405+ OnUpdate = DependActiveCntentLogActionUpdate
406+ end
407+ object ScrollLastAction: TAction
408+ Category = #12473#12524#12483#12489
409+ Caption = #26368#24460#12408#31227#21205'(&L)'
410+ Hint = #29694#22312#34920#31034#12375#12390#12356#12427#12473#12524#12483#12489#26368#24460#12408#31227#21205#12377#12427
411+ ImageIndex = 23
412+ OnExecute = ScrollLastActionExecute
413+ OnUpdate = DependActiveCntentLogActionUpdate
414+ end
415+ object ScrollNewAction: TAction
416+ Category = #12473#12524#12483#12489
417+ Caption = #26032#30528#12408#31227#21205'(&N)'
418+ Hint = #29694#22312#34920#31034#12375#12390#12356#12427#12473#12524#12483#12489#12398#26032#30528#12408#31227#21205#12377#12427
419+ ImageIndex = 24
420+ OnExecute = ScrollNewActionExecute
421+ OnUpdate = DependActiveCntentLogActionUpdate
422+ end
423+ object ScrollKokoAction: TAction
424+ Category = #12473#12524#12483#12489
425+ Caption = #12467#12467#12414#12391#35501#12435#12384#12408#31227#21205'(&K)'
426+ Hint = #29694#22312#34920#31034#12375#12390#12356#12427#12473#12524#12483#12489#12398#12467#12467#12414#12391#35501#12435#12384#12408#31227#21205#12377#12427
427+ ImageIndex = 25
428+ OnExecute = ScrollKokoActionExecute
429+ OnUpdate = ScrollKokoActionUpdate
430+ end
431+ object EditorAction: TAction
432+ Category = #12473#12524#12483#12489
433+ Caption = #12524#12473#26360#12365#36796#12415'(&R)'
434+ Hint = #12524#12473#26360#12365#36796#12415#12454#12451#12531#12489#12454#12434#34920#31034#12377#12427
435+ ImageIndex = 26
436+ ShortCut = 16466
437+ OnExecute = EditorActionExecute
438+ OnUpdate = DependActiveCntentLogActionUpdate
439+ end
440+ object IEAction: TAction
441+ Category = #12473#12524#12483#12489
442+ Caption = #12502#12521#12454#12470#12391#34920#31034'(&B)'
443+ Hint = #12473#12524#12434#12502#12521#12454#12470#12391#34920#31034#12377#12427
444+ ImageIndex = 27
445+ OnExecute = IEActionExecute
446+ OnUpdate = DependActiveCntentActionUpdate
447+ end
448+ object ShowThreadAction: TAction
449+ Category = #12473#12524#12483#12489
450+ Caption = #12473#12524#12483#12489#12434#12502#12521#12454#12470#12391#34920#31034'(&S)'
451+ Hint = #29694#22312#34920#31034#12375#12390#12356#12427#12473#12524#12483#12489#12434#12502#12521#12454#12470#12391#34920#31034#12377#12427
452+ ImageIndex = 27
453+ OnExecute = ShowThreadActionExecute
454+ OnUpdate = DependActiveCntentActionUpdate
455+ end
456+ object ShowBoardAction: TAction
457+ Category = #12473#12524#12483#12489
458+ Caption = #26495#12434#12502#12521#12454#12470#12391#34920#31034'(&B)'
459+ Hint = #29694#22312#34920#31034#12375#12390#12356#12427#12473#12524#12483#12489#12398#26495#12434#12502#12521#12454#12470#12391#34920#31034#12377#12427
460+ ImageIndex = 27
461+ OnExecute = ShowBoardActionExecute
462+ OnUpdate = DependActiveCntentActionUpdate
463+ end
464+ object URLCopyAction: TAction
465+ Category = #12473#12524#12483#12489
466+ Caption = 'URL'#12434#12467#12500#12540'(&C)'
467+ Hint = #29694#22312#34920#31034#12375#12390#12356#12427#12473#12524#12483#12489#12398'URL'#12434#12467#12500#12540#12377#12427
468+ OnExecute = URLCopyActionExecute
469+ OnUpdate = DependActiveCntentActionUpdate
470+ end
471+ object NameCopyAction: TAction
472+ Category = #12473#12524#12483#12489
473+ Caption = #12473#12524#12483#12489#21517#12434#12467#12500#12540'(&T)'
474+ Hint = #29694#22312#34920#31034#12375#12390#12356#12427#12473#12524#12483#12489#21517#12434#12467#12500#12540#12377#12427
475+ OnExecute = NameCopyActionExecute
476+ OnUpdate = DependActiveCntentActionUpdate
477+ end
478+ object NameURLCopyAction: TAction
479+ Category = #12473#12524#12483#12489
480+ Caption = #12473#12524#12483#12489#21517#12392'URL'#12434#12467#12500#12540'(&M)'
481+ Hint = #29694#22312#34920#31034#12375#12390#12356#12427#12473#12524#12483#12489#21517#12392'URL'#12434#12467#12500#12540#12377#12427
482+ OnExecute = NameURLCopyActionExecute
483+ OnUpdate = DependActiveCntentActionUpdate
484+ end
485+ object ItemReloadAction: TAction
486+ Category = #12473#12524#12483#12489
487+ Caption = #12473#12524#12483#12489#12480#12454#12531#12525#12540#12489'(&A)'
488+ Hint = #34920#31034#12373#12428#12390#12356#12427#12473#12524#12483#12489#12434#12480#12454#12531#12525#12540#12489#12377#12427
489+ ImageIndex = 28
490+ OnExecute = ItemReloadActionExecute
491+ OnUpdate = DependActiveCntentActionUpdate
492+ end
493+ object ThreadEditorAction: TAction
494+ Category = #26495
495+ Caption = #26032#12473#12524#20316#25104'(&T)'
496+ Hint = #26032#12473#12524#26360#12365#36796#12415#12454#12451#12531#12489#12454#12434#34920#31034#12377#12427
497+ ImageIndex = 26
498+ OnExecute = ThreadEditorActionExecute
499+ OnUpdate = DependActiveListTBoardActionUpdate
500+ end
501+ object BoardIEAction: TAction
502+ Category = #26495
503+ Caption = #12502#12521#12454#12470#12391#34920#31034'(&B)'
504+ Hint = #29694#22312#34920#31034#12375#12390#12356#12427#26495#12434#12502#12521#12454#12470#12391#34920#31034#12377#12427
505+ ImageIndex = 27
506+ OnExecute = BoardIEActionExecute
507+ OnUpdate = DependActiveListTBoardActionUpdate
508+ end
509+ object SelectItemURLCopyAction: TAction
510+ Category = #26495
511+ Caption = 'URL'#12434#12467#12500#12540'(&C)'
512+ Hint = #36984#25246#12373#12428#12390#12356#12427#12473#12524#12483#12489#12398'URL'#12434#12467#12500#12540#12377#12427
513+ OnExecute = SelectItemURLCopyActionExecute
514+ OnUpdate = SelectItemURLCopyActionUpdate
515+ end
516+ object SelectItemNameCopyAction: TAction
517+ Category = #26495
518+ Caption = #21517#21069#12434#12467#12500#12540'(&C)'
519+ Hint = #36984#25246#12373#12428#12390#12356#12427#26495#12398#21517#21069#12434#12467#12500#12540#12377#12427
520+ OnExecute = SelectItemNameCopyActionExecute
521+ OnUpdate = SelectItemNameCopyActionUpdate
522+ end
523+ object SelectItemNameURLCopyAction: TAction
524+ Category = #26495
525+ Caption = #21517#21069#12392'URL'#12434#12467#12500#12540'(&N)'
526+ Hint = #36984#25246#12373#12428#12390#12356#12427#12473#12524#12483#12489#12398#21517#21069#12392'URL'#12434#12467#12500#12540#12377#12427
527+ OnExecute = SelectItemNameURLCopyActionExecute
528+ OnUpdate = SelectItemNameCopyActionUpdate
529+ end
530+ object SelectListReloadAction: TAction
531+ Category = #26495
532+ Caption = #36984#25246#12473#12524#12483#12489#19968#35239#12480#12454#12531#12525#12540#12489'(&D)'
533+ Hint = #36984#25246#12373#12428#12390#12356#12427#12473#12524#12483#12489#19968#35239#12434#12480#12454#12531#12525#12540#12489#12377#12427
534+ ImageIndex = 13
535+ OnExecute = SelectListReloadActionExecute
536+ OnUpdate = SelectListReloadActionUpdate
537+ end
538+ object SelectThreadReloadAction: TAction
539+ Category = #26495
540+ Caption = #36984#25246#12473#12524#12483#12489#12480#12454#12531#12525#12540#12489'(&E)'
541+ Hint = #36984#25246#12373#12428#12390#12356#12427#12473#12524#12483#12489#12434#12480#12454#12531#12525#12540#12489#12377#12427
542+ ImageIndex = 14
543+ OnExecute = SelectThreadReloadActionExecute
544+ OnUpdate = SelectThreadReloadActionUpdate
545+ end
546+ object BrowserTabCloseAction: TAction
547+ Category = #12473#12524#12483#12489
548+ Caption = #12450#12463#12486#12451#12502#12479#12502#12434#38281#12376#12427'(&X)'
549+ Hint = #29694#22312#38283#12356#12390#12356#12427#12479#12502#12434#38281#12376#12427
550+ ImageIndex = 41
551+ OnExecute = BrowserTabCloseActionExecute
552+ OnUpdate = BrowserTabCloseActionUpdate
553+ end
554+ object NotSelectTabCloseAction: TAction
555+ Category = #12473#12524#12483#12489
556+ Caption = #12450#12463#12486#12451#12502#12479#12502#20197#22806#12434#38281#12376#12427'(&V)'
557+

Ein Teil der Diff wurde aufgrund der Größenbeschränkung abgeschnitten. Verwenden Sie Ihren lokalen Client, um die vollständige Diff.