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