OSDN Git Service

Added actSendLogWindow, clipping current script to the log window
[winbottle/winbottle.git] / bottleclient / LogForm.dfm
1 object frmLog: TfrmLog
2   Left = 288
3   Top = 243
4   Width = 607
5   Height = 343
6   Caption = #12525#12464' - '#12480#12502#12523#12463#12522#12483#12463#12391#20877#29983
7   Color = clBtnFace
8   Font.Charset = SHIFTJIS_CHARSET
9   Font.Color = clWindowText
10   Font.Height = -12
11   Font.Name = #65325#65331' '#65328#12468#12471#12483#12463
12   Font.Style = []
13   OldCreateOrder = False
14   ShowHint = True
15   OnCreate = FormCreate
16   OnDestroy = FormDestroy
17   PixelsPerInch = 96
18   TextHeight = 12
19   object ToolBar: TToolBar
20     Left = 0
21     Top = 0
22     Width = 599
23     Height = 22
24     AutoSize = True
25     Caption = 'ToolBar'
26     EdgeBorders = []
27     Flat = True
28     Images = frmSender.imgIcon
29     TabOrder = 0
30     object tbtnClear: TToolButton
31       Left = 0
32       Top = 0
33       Hint = #12525#12464#28040#21435'|'#12377#12409#12390#12398#34920#31034#12373#12428#12390#12356#12427#12525#12464#12434#28040#21435#12375#12414#12377
34       Caption = #12525#12464#28040#21435
35       ImageIndex = 21
36       OnClick = tbtnClearClick
37     end
38     object tbtnOpenLog: TToolButton
39       Left = 23
40       Top = 0
41       Caption = #12458#12540#12503#12531'(&O)'
42       ImageIndex = 38
43       OnClick = tbtnOpenLogClick
44     end
45     object tbtnSaveLog: TToolButton
46       Left = 46
47       Top = 0
48       Hint = #12525#12464#12501#12449#12452#12523#20445#23384
49       Caption = #20445#23384
50       DropdownMenu = PopupMenuSaveLog
51       ImageIndex = 27
52       Style = tbsDropDown
53       OnClick = mnSaveLogXMLClick
54     end
55     object tbtnDownloadLog: TToolButton
56       Left = 80
57       Top = 0
58       Action = frmSender.actDownloadLog
59     end
60     object ToolButton1: TToolButton
61       Left = 103
62       Top = 0
63       Width = 8
64       Caption = 'ToolButton1'
65       ImageIndex = 29
66       Style = tbsSeparator
67     end
68     object tbtnInsertCue: TToolButton
69       Left = 111
70       Top = 0
71       Action = frmSender.actInsertCue
72     end
73     object tbtnFindBottle: TToolButton
74       Left = 134
75       Top = 0
76       Hint = #12508#12488#12523#12434#26908#32034#12377#12427
77       Caption = #26908#32034'(&F)'
78       ImageIndex = 37
79       OnClick = tbtnFindBottleClick
80     end
81     object tbtnPreviewStyle: TToolButton
82       Left = 157
83       Top = 0
84       Hint = #12525#12464#12503#12524#12499#12517#12540#12398#34920#31034#24418#24335#12434#22793#26356#12375#12414#12377
85       Caption = #12503#12524#12499#12517#12540#12473#12479#12452#12523
86       DropdownMenu = PopupMenuPreviewStyle
87       ImageIndex = 33
88       Style = tbsDropDown
89       OnClick = tbtnPreviewStyleClick
90     end
91     object tbtnListPreviewStyle: TToolButton
92       Left = 191
93       Top = 0
94       Hint = #12522#12473#12488#12398#12473#12463#12522#12503#12488#34920#31034#24418#24335#12434#22793#26356#12375#12414#12377
95       Caption = #12473#12463#12522#12503#12488#34920#31034#24418#24335
96       DropdownMenu = PopupMenuListPreviewStyle
97       ImageIndex = 41
98       Style = tbsDropDown
99       OnClick = tbtnListPreviewStyleClick
100     end
101     object ToolButton2: TToolButton
102       Left = 225
103       Top = 0
104       Width = 8
105       Caption = 'ToolButton2'
106       ImageIndex = 33
107       Style = tbsSeparator
108     end
109     object tbtnVoteMessage: TToolButton
110       Left = 233
111       Top = 0
112       Action = frmSender.actVoteMessage
113     end
114     object tbtnAgreeMessage: TToolButton
115       Left = 256
116       Top = 0
117       Action = frmSender.actAgreeMessage
118     end
119     object tbtnSendEditor: TToolButton
120       Left = 279
121       Top = 0
122       Action = frmSender.actSendEditor
123     end
124   end
125   object pnlUpper: TPanel
126     Left = 0
127     Top = 22
128     Width = 599
129     Height = 287
130     Align = alClient
131     BevelOuter = bvNone
132     TabOrder = 1
133     object StatusBar: TStatusBar
134       Left = 0
135       Top = 268
136       Width = 599
137       Height = 19
138       Panels = <
139         item
140           Width = 80
141         end
142         item
143           Width = 50
144         end>
145     end
146     object pnlPanel: TPanel
147       Left = 0
148       Top = 0
149       Width = 599
150       Height = 268
151       Align = alClient
152       BevelOuter = bvNone
153       TabOrder = 1
154       object Splitter: TSplitter
155         Left = 0
156         Top = 156
157         Width = 599
158         Height = 3
159         Cursor = crVSplit
160         Align = alBottom
161         ResizeStyle = rsUpdate
162       end
163       object Panel1: TPanel
164         Left = 0
165         Top = 0
166         Width = 599
167         Height = 156
168         Align = alClient
169         TabOrder = 0
170         object tabBottleLog: TTabControl
171           Left = 1
172           Top = 1
173           Width = 597
174           Height = 26
175           Align = alTop
176           PopupMenu = PopupMenuTab
177           TabOrder = 0
178           OnChange = tabBottleLogChange
179           OnChanging = tabBottleLogChanging
180           OnContextPopup = tabBottleLogContextPopup
181           OnDragDrop = tabBottleLogDragDrop
182           OnDragOver = tabBottleLogDragOver
183           OnEndDrag = tabBottleLogEndDrag
184           OnMouseDown = tabBottleLogMouseDown
185         end
186         object lvwLog: TListView
187           Left = 1
188           Top = 27
189           Width = 597
190           Height = 128
191           Align = alClient
192           BevelInner = bvNone
193           BorderStyle = bsNone
194           Columns = <
195             item
196               Caption = #26085#20184
197               Width = 120
198             end
199             item
200               Caption = #12481#12515#12531#12493#12523
201               Width = 70
202             end
203             item
204               Caption = #12468#12540#12473#12488
205               Width = 60
206             end
207             item
208               Alignment = taRightJustify
209               Caption = #25237#31080
210               Width = 40
211             end
212             item
213               Alignment = taRightJustify
214               Caption = #21516#24847
215               Width = 40
216             end
217             item
218               Caption = #12473#12463#12522#12503#12488
219               Width = 400
220             end>
221           DragMode = dmAutomatic
222           HideSelection = False
223           OwnerData = True
224           OwnerDraw = True
225           ReadOnly = True
226           RowSelect = True
227           PopupMenu = PopupMenuListView
228           SmallImages = frmSender.imgIcon
229           TabOrder = 1
230           ViewStyle = vsReport
231           OnChange = lvwLogChange
232           OnClick = lvwLogClick
233           OnColumnClick = lvwLogColumnClick
234           OnCustomDrawItem = lvwLogCustomDrawItem
235           OnData = lvwLogData
236           OnDblClick = lvwLogDblClick
237           OnDrawItem = lvwLogDrawItem
238           OnEndDrag = lvwLogEndDrag
239           OnDragDrop = lvwLogDragDrop
240           OnDragOver = lvwLogDragOver
241           OnKeyPress = lvwLogKeyPress
242           OnStartDrag = lvwLogStartDrag
243         end
244       end
245       object pnlPreviewArea: TPanel
246         Left = 0
247         Top = 159
248         Width = 599
249         Height = 109
250         Align = alBottom
251         TabOrder = 1
252         inline TalkShowFrame: TfrmTalkShow
253           Left = 1
254           Top = 1
255           Width = 597
256           Height = 107
257           Align = alClient
258           TabOrder = 0
259           Visible = False
260           inherited PanelBevel: TPanel
261             Width = 597
262             Height = 107
263             inherited PaintBox: TPaintBox
264               Width = 579
265               Height = 105
266             end
267             inherited ScrollBar: TScrollBar
268               Left = 580
269               Height = 105
270             end
271           end
272         end
273         object edtScript: TRichEdit
274           Left = 1
275           Top = 1
276           Width = 597
277           Height = 107
278           Align = alClient
279           Font.Charset = SHIFTJIS_CHARSET
280           Font.Color = clWindowText
281           Font.Height = -12
282           Font.Name = #65325#65331' '#12468#12471#12483#12463
283           Font.Style = []
284           HideScrollBars = False
285           ParentFont = False
286           PopupMenu = PopupMenuPreview
287           ReadOnly = True
288           ScrollBars = ssVertical
289           TabOrder = 1
290           Visible = False
291         end
292       end
293     end
294   end
295   object SsParser: TSsParser
296     Left = 440
297     Top = 54
298   end
299   object PopupMenuPreview: TPopupMenu
300     Left = 408
301     Top = 54
302     object mnPopCopy: TMenuItem
303       Action = frmSender.actEditCopy
304     end
305   end
306   object PopupMenuListView: TPopupMenu
307     Images = frmSender.imgIcon
308     OnPopup = PopupMenuListViewPopup
309     Left = 376
310     Top = 56
311     object mnPopUpCopyScript: TMenuItem
312       Caption = #12371#12398'Bottle'#12473#12463#12522#12503#12488#12434#12467#12500#12540'(&C)'
313       Enabled = False
314       Hint = #12473#12463#12522#12503#12488#12434#12463#12522#12483#12503#12508#12540#12489#12395#12467#12500#12540
315       ImageIndex = 2
316       OnClick = mnPopUpCopyScriptClick
317     end
318     object mnPopUpVoteMessage: TMenuItem
319       Action = frmSender.actVoteMessage
320     end
321     object mnPopUpAgreeMessage: TMenuItem
322       Action = frmSender.actAgreeMessage
323     end
324     object mnSendEditor: TMenuItem
325       Action = frmSender.actSendEditor
326     end
327     object mnInsertCue: TMenuItem
328       Action = frmSender.actInsertCue
329     end
330     object mnJumpURL: TMenuItem
331       Caption = '&URL'#12472#12515#12531#12503
332       Enabled = False
333       Hint = 'URL'#12434#12502#12521#12454#12470#12391#38283#12367
334     end
335   end
336   object SaveDialog: TSaveDialog
337     DefaultExt = 'txt'
338     Filter = 
339       #12525#12464#12501#12449#12452#12523' (*.log)|*.log|'#12486#12461#12473#12488#12501#12449#12452#12523' (*.txt)|*.txt|XML'#12501#12449#12452#12523' (*.xml)|*.xm' +
340       'l|'#12377#12409#12390#12398#12501#12449#12452#12523' (*.*)|*.*'
341     Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
342     Title = #12525#12464#12501#12449#12452#12523#12398#20445#23384
343     Left = 344
344     Top = 56
345   end
346   object PopupMenuSaveLog: TPopupMenu
347     Left = 304
348     Top = 56
349     object mnSaveLogXML: TMenuItem
350       Caption = '&XML'#24418#24335
351       Default = True
352       OnClick = mnSaveLogXMLClick
353     end
354     object mnSaveLog: TMenuItem
355       Caption = 'sstp.log'#24418#24335'(&S)'
356       OnClick = mnSaveLogClick
357     end
358     object mnSaveLogChannel: TMenuItem
359       Caption = 'sstp.log'#24418#24335'('#12481#12515#12531#12493#12523#20184')(&C)'
360       OnClick = mnSaveLogChannelClick
361     end
362     object mnSaveLogScript: TMenuItem
363       Caption = #12473#12463#12522#12503#12488#12398#12415'(&N)'
364       OnClick = mnSaveLogScriptClick
365     end
366   end
367   object PopupMenuPreviewStyle: TPopupMenu
368     OnPopup = PopupMenuPreviewStylePopup
369     Left = 272
370     Top = 54
371     object mnPreviewStyleConversation: TMenuItem
372       Caption = #23550#35441#24418#24335'(&D)'
373       Hint = #12479#12464#12398#34920#31034#12373#12428#12394#12356#24418#24335
374       OnClick = mnPreviewStyleClick
375     end
376     object mnPreviewStyleConversationImage: TMenuItem
377       Tag = 1
378       Caption = #23550#35441#24418#24335'('#30011#20687#12354#12426')(&I)'
379       Hint = #23550#35441#24418#24335#12539#12469#12540#12501#12451#12473#12503#12524#12499#12517#12540#30011#20687#20184#12365
380       OnClick = mnPreviewStyleClick
381     end
382     object mnPreviewStyleScript: TMenuItem
383       Tag = 2
384       Caption = #12473#12463#12522#12503#12488#34920#31034'(&S)'
385       Hint = #12510#12540#12463#12450#12483#12503#12434#20840#12390#34920#31034#12375#12414#12377
386       OnClick = mnPreviewStyleClick
387     end
388     object mnPreviewStyleScriptWithLineBreak: TMenuItem
389       Tag = 3
390       Caption = #12473#12463#12522#12503#12488#34920#31034'('#25913#34892#12354#12426')(&N)'
391       Hint = #12510#12540#12463#12450#12483#12503#12434#20840#12390#34920#31034#12375#12414#12377'(\n'#12391#12398#25913#34892#12354#12426')'
392       OnClick = mnPreviewStyleClick
393     end
394   end
395   object PopupMenuTab: TPopupMenu
396     Left = 240
397     Top = 56
398     object mnCloseTab: TMenuItem
399       Caption = #38281#12376#12427'(&C)'
400       Hint = #36984#25246#12373#12428#12383#12479#12502#12434#38281#12376#12427
401       OnClick = mnCloseTabClick
402     end
403     object mnChangeTabName: TMenuItem
404       Caption = #21517#21069#12398#22793#26356'(&R)...'
405       OnClick = mnChangeTabNameClick
406     end
407   end
408   object OpenDialog: TOpenDialog
409     DefaultExt = 'xml'
410     Filter = 'XML'#12501#12449#12452#12523'(*.xml;*.xbl)|*.xml;*.xbl|'#12377#12409#12390#12398#12501#12449#12452#12523'(*.*)|*.*'
411     Options = [ofHideReadOnly, ofAllowMultiSelect, ofFileMustExist, ofEnableSizing]
412     Left = 344
413     Top = 88
414   end
415   object PopupMenuListPreviewStyle: TPopupMenu
416     OnPopup = PopupMenuListPreviewStylePopup
417     Left = 272
418     Top = 88
419     object mnListPreviewStyleNoColor: TMenuItem
420       Caption = #33394#20998#12369#12375#12394#12356'(&N)'
421       OnClick = mnListPreviewStyleClick
422     end
423     object mnListPreviewStyleNormal: TMenuItem
424       Tag = 1
425       Caption = #12473#12463#12522#12503#12488#34920#31034'(&T)'
426       OnClick = mnListPreviewStyleClick
427     end
428     object mnListPreviewStyleTagStripped: TMenuItem
429       Tag = 2
430       Caption = #12479#12464#30465#30053#34920#31034'(&S)'
431       OnClick = mnListPreviewStyleClick
432     end
433   end
434   object SsParserForTalkShow: TSsParser
435     Left = 440
436     Top = 88
437   end
438   object timScrollTimer: TTimer
439     Enabled = False
440     Interval = 100
441     OnTimer = timScrollTimerTimer
442     Left = 200
443     Top = 56
444   end
445 end