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