object Form1: TForm1 Left = 193 Top = 107 BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsSingle Caption = 'Tarmanian Tactics Utility Program' ClientHeight = 129 ClientWidth = 337 Font.Charset = SHIFTJIS_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = '�l�r �o�S�V�b�N' Font.Style = [] Position = poScreenCenter OnClose = CloseApp PixelsPerInch = 96 TextHeight = 12 object Bevel2: TBevel Left = 8 Top = 88 Width = 321 Height = 33 Style = bsRaised end object Bevel1: TBevel Left = 8 Top = 8 Width = 321 Height = 73 Style = bsRaised end object Label1: TLabel Left = 24 Top = 24 Width = 187 Height = 12 Caption = 'Tarmanian Tactics�@�N���ҋ@���D�D�D' Font.Charset = SHIFTJIS_CHARSET Font.Color = clBlue Font.Height = -12 Font.Name = '�l�r �o�S�V�b�N' Font.Style = [] ParentFont = False end object SpeedButton1: TSpeedButton Left = 148 Top = 92 Width = 57 Height = 25 Caption = 'MODE+0' Flat = True Font.Charset = SHIFTJIS_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = '�l�r �S�V�b�N' Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton2: TSpeedButton Left = 208 Top = 92 Width = 57 Height = 25 Caption = 'MODE+1' Flat = True Font.Charset = SHIFTJIS_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = '�l�r �S�V�b�N' Font.Style = [] ParentFont = False OnClick = SpeedButton2Click end object SpeedButton3: TSpeedButton Left = 268 Top = 92 Width = 57 Height = 25 Caption = 'MODE+X' Flat = True Font.Charset = SHIFTJIS_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = '�l�r �S�V�b�N' Font.Style = [] ParentFont = False OnClick = SpeedButton3Click end object Label2: TLabel Left = 24 Top = 99 Width = 104 Height = 12 Caption = '�A�C�e���̐��\�ύX' end object CheckBox1: TCheckBox Left = 24 Top = 48 Width = 145 Height = 17 Caption = '�������������X�V����' State = cbChecked TabOrder = 0 end object Timer1: TTimer Interval = 500 OnTimer = TimerTrap Left = 288 Top = 40 end end