Drops Desktop CD-ROM Collection/Drops Desktop CD-ROM Collection.iso/files/calender/data1.cab/Program_Executable_Files/calendar.exe/0/RCDATA/TIMMAINFORM/TIMMAINFORM.txt

Text File | 2004-01-07 | 19.7 KB | 1,005 lines

object ImMainForm: TImMainForm
  Left = 756
  Top = 525
  BorderStyle = bsNone
  ClientHeight = 600
  ClientWidth = 835
  Color = clBtnFace
  Font.Charset = SHIFTJIS_CHARSET
  Font.Color = clWindowText
  Font.Height = 15
  Font.Name = '�l�r �o�S�V�b�N'
  Font.Style = []
  OldCreateOrder = False
  Scaled = False
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 15
  object BasFrmImg: TImage
    Left = 0
    Top = 0
    Width = 835
    Height = 600
    Align = alClient
    Enabled = False
    ParentShowHint = False
    ShowHint = False
    Transparent = True
    OnClick = MonNumImgClick
  end
  object MonNumImg1: TImage
    Left = 310
    Top = 40
    Width = 25
    Height = 25
    OnClick = MonNumImgClick
  end
  object MonNumImg2: TImage
    Left = 330
    Top = 40
    Width = 31
    Height = 25
    OnClick = MonNumImgClick
  end
  object MonNumImg3: TImage
    Left = 350
    Top = 40
    Width = 25
    Height = 25
    OnClick = MonNumImgClick
  end
  object MonNumImg4: TImage
    Left = 370
    Top = 40
    Width = 25
    Height = 25
    OnClick = MonNumImgClick
  end
  object MonNumImg5: TImage
    Left = 390
    Top = 40
    Width = 25
    Height = 25
    OnClick = MonNumImgClick
  end
  object MonNumImg6: TImage
    Left = 410
    Top = 40
    Width = 25
    Height = 25
    OnClick = MonNumImgClick
  end
  object MonNumImg7: TImage
    Left = 430
    Top = 40
    Width = 25
    Height = 25
    OnClick = MonNumImgClick
  end
  object MonNumImg8: TImage
    Left = 450
    Top = 40
    Width = 25
    Height = 25
    OnClick = MonNumImgClick
  end
  object MonNumImg9: TImage
    Left = 470
    Top = 40
    Width = 25
    Height = 25
    OnClick = MonNumImgClick
  end
  object MonNumImg10: TImage
    Left = 490
    Top = 40
    Width = 25
    Height = 25
    OnClick = MonNumImgClick
  end
  object MonNumImg11: TImage
    Left = 510
    Top = 40
    Width = 25
    Height = 25
    OnClick = MonNumImgClick
  end
  object MonNumImg12: TImage
    Left = 530
    Top = 40
    Width = 25
    Height = 25
    OnClick = MonNumImgClick
  end
  object YerNumImg4: TImage
    Left = 470
    Top = 10
    Width = 25
    Height = 25
  end
  object YerNumImg3: TImage
    Left = 490
    Top = 10
    Width = 25
    Height = 25
  end
  object YerNumImg2: TImage
    Left = 510
    Top = 10
    Width = 25
    Height = 25
  end
  object YerNumImg1: TImage
    Left = 530
    Top = 10
    Width = 25
    Height = 25
  end
  object MonthImg: TImage
    Left = 310
    Top = 10
    Width = 50
    Height = 25
  end
  object BigMonImg: TImage
    Left = 260
    Top = 10
    Width = 50
    Height = 50
  end
  object BunboImg1: TImage
    Left = 110
    Top = 120
    Width = 21
    Height = 21
  end
  object BunboImg2: TImage
    Left = 130
    Top = 120
    Width = 21
    Height = 21
  end
  object LineImg: TImage
    Left = 110
    Top = 110
    Width = 41
    Height = 11
  end
  object BunsiImg1: TImage
    Left = 110
    Top = 90
    Width = 21
    Height = 21
  end
  object BunsiImg2: TImage
    Left = 130
    Top = 90
    Width = 21
    Height = 21
  end
  object SelTabImg1: TImage
    Left = 390
    Top = 200
    Width = 71
    Height = 41
    ParentShowHint = False
    ShowHint = True
    Transparent = True
    OnClick = SelTabImgsClick
    OnMouseDown = SelTabImgMouseDown
  end
  object SelTabImg2: TImage
    Tag = 1
    Left = 470
    Top = 200
    Width = 71
    Height = 41
    ParentShowHint = False
    ShowHint = True
    Transparent = True
    OnClick = SelTabImgsClick
    OnMouseDown = SelTabImgMouseDown
  end
  object TabLbl1: TLabel
    Left = 405
    Top = 215
    Width = 8
    Height = 15
    Caption = '1'
    Color = clWhite
    Font.Charset = SHIFTJIS_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = '�l�r �o�S�V�b�N'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    Transparent = True
    OnClick = SelTabImgsClick
    OnMouseDown = SelTabImgMouseDown
  end
  object TabLbl2: TLabel
    Tag = 1
    Left = 475
    Top = 215
    Width = 8
    Height = 15
    Caption = '2'
    Color = clWhite
    Font.Charset = SHIFTJIS_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = '�l�r �o�S�V�b�N'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    Transparent = True
    OnClick = SelTabImgsClick
    OnMouseDown = SelTabImgMouseDown
  end
  object SelTabImg3: TImage
    Tag = 2
    Left = 550
    Top = 200
    Width = 71
    Height = 41
    ParentShowHint = False
    ShowHint = True
    Transparent = True
    OnClick = SelTabImgsClick
    OnMouseDown = SelTabImgMouseDown
  end
  object SelTabImg4: TImage
    Tag = 3
    Left = 630
    Top = 200
    Width = 71
    Height = 41
    ParentShowHint = False
    ShowHint = True
    Transparent = True
    OnClick = SelTabImgsClick
    OnMouseDown = SelTabImgMouseDown
  end
  object TabLbl3: TLabel
    Tag = 2
    Left = 560
    Top = 210
    Width = 8
    Height = 15
    Caption = '3'
    Color = clWhite
    Font.Charset = SHIFTJIS_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = '�l�r �o�S�V�b�N'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    Transparent = True
    OnClick = SelTabImgsClick
    OnMouseDown = SelTabImgMouseDown
  end
  object TabLbl4: TLabel
    Tag = 3
    Left = 640
    Top = 210
    Width = 8
    Height = 15
    Caption = '4'
    Color = clWhite
    Font.Charset = SHIFTJIS_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = '�l�r �o�S�V�b�N'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    Transparent = True
    OnClick = SelTabImgsClick
    OnMouseDown = SelTabImgMouseDown
  end
  object UpDatBtn2: TImageButton
    Left = 88
    Top = 48
    Width = 32
    Height = 32
    NumGlyphs = 1
    OnClick = UpDatBtnClick
  end
  object TelopSheet1: TTelopSheet
    Left = 410
    Top = 510
    Width = 320
    Height = 16
  end
  object TabNxtIBtn: TImageButton
    Tag = 1
    Left = 780
    Top = 140
    Width = 40
    Height = 40
    NumGlyphs = 1
    OnClick = TabRevNxtIBtnClick
  end
  object TabRevIBtn: TImageButton
    Left = 330
    Top = 140
    Width = 40
    Height = 40
    NumGlyphs = 1
    OnClick = TabRevNxtIBtnClick
  end
  object SetCalBtn: TImageButton
    Left = 640
    Top = 0
    Width = 29
    Height = 28
    NumGlyphs = 1
    OnClick = CtrBtnClick
  end
  object DsnBtn: TImageButton
    Tag = 1
    Left = 668
    Top = 0
    Width = 28
    Height = 28
    NumGlyphs = 1
    OnClick = CtrBtnClick
  end
  object HlpBtn: TImageButton
    Tag = 2
    Left = 700
    Top = 0
    Width = 29
    Height = 28
    NumGlyphs = 1
    OnClick = CtrBtnClick
  end
  object SmlBtn: TImageButton
    Left = 770
    Top = 0
    Width = 29
    Height = 28
    NumGlyphs = 1
    OnClick = SmlBtnClick
  end
  object EndBtn: TImageButton
    Left = 800
    Top = 0
    Width = 29
    Height = 28
    NumGlyphs = 1
    OnClick = EndBtnClick
  end
  object ImBtn: TImageButton
    Left = 16
    Top = 0
    Width = 29
    Height = 28
    NumGlyphs = 1
    OnClick = ImSetupBtnUrlClick
  end
  object UpDatBtn: TImageButton
    Left = 88
    Top = 16
    Width = 29
    Height = 28
    NumGlyphs = 1
    OnClick = UpDatBtnClick
  end
  object MPagBakBtn: TImageButton
    Left = 10
    Top = 90
    Width = 29
    Height = 28
    NumGlyphs = 1
    OnClick = MMPagBtnClick
  end
  object MPagNxtBtn: TImageButton
    Tag = 1
    Left = 50
    Top = 90
    Width = 29
    Height = 28
    NumGlyphs = 1
    OnClick = MMPagBtnClick
  end
  object MntDwnBtn: TImageButton
    Left = 530
    Top = 70
    Width = 29
    Height = 28
    NumGlyphs = 1
    OnClick = MntUpDwnBtnClick
  end
  object MntUpBtn: TImageButton
    Tag = 1
    Left = 600
    Top = 70
    Width = 29
    Height = 28
    NumGlyphs = 1
    OnClick = MntUpDwnBtnClick
  end
  object YerUpBtn: TImageButton
    Tag = 1
    Left = 650
    Top = 30
    Width = 29
    Height = 28
    NumGlyphs = 1
    OnClick = YerUpDwnBtnClick
  end
  object YerDwnBtn: TImageButton
    Left = 650
    Top = 70
    Width = 29
    Height = 28
    NumGlyphs = 1
    OnClick = YerUpDwnBtnClick
  end
  object SeatEditBtn: TImageButton
    Left = 700
    Top = 50
    Width = 29
    Height = 28
    NumGlyphs = 1
    OnClick = SeatEditBtnClick
  end
  object MntBtn: TImageButton
    Left = 740
    Top = 50
    Width = 29
    Height = 28
    NumGlyphs = 1
    OnClick = MWDBtnClick
  end
  object WekBtn: TImageButton
    Tag = 1
    Left = 770
    Top = 50
    Width = 29
    Height = 28
    NumGlyphs = 1
    OnClick = MWDBtnClick
  end
  object DayBtn: TImageButton
    Tag = 2
    Left = 800
    Top = 50
    Width = 29
    Height = 28
    NumGlyphs = 1
    OnClick = MWDBtnClick
  end
  object ImBasePnl: TPanel
    Left = 10
    Top = 155
    Width = 311
    Height = 261
    Color = clWhite
    TabOrder = 15
    Visible = False
    object ImSetupImg: TImage
      Left = 1
      Top = 1
      Width = 309
      Height = 259
      Align = alClient
      Visible = False
    end
    object ImSetupLabel1: TLabel
      Left = 60
      Top = 180
      Width = 93
      Height = 15
      Caption = 'ImSetupLabel1'
      Visible = False
    end
    object ImSetupLabel2: TLabel
      Left = 60
      Top = 210
      Width = 93
      Height = 15
      Caption = 'ImSetupLabel2'
      Visible = False
    end
    object TabImg1: TImage
      Left = 210
      Top = 10
      Width = 31
      Height = 31
    end
    object TabImg2: TImage
      Tag = 1
      Left = 240
      Top = 10
      Width = 31
      Height = 31
    end
    object SmnSelImg: TImage
      Left = 190
      Top = 40
      Width = 21
      Height = 21
      Visible = False
    end
    object SupSelImg1: TImage
      Left = 10
      Top = 40
      Width = 21
      Height = 21
      Visible = False
      OnDblClick = SupSelImgDblClick
      OnMouseDown = SupSelImgMouseDown
    end
    object SupSelImg2: TImage
      Tag = 1
      Left = 30
      Top = 40
      Width = 21
      Height = 21
      Visible = False
      OnDblClick = SupSelImgDblClick
      OnMouseDown = SupSelImgMouseDown
    end
    object SupSelImg3: TImage
      Tag = 2
      Left = 50
      Top = 40
      Width = 21
      Height = 21
      Visible = False
      OnDblClick = SupSelImgDblClick
      OnMouseDown = SupSelImgMouseDown
    end
    object SupSelImg4: TImage
      Tag = 3
      Left = 70
      Top = 40
      Width = 21
      Height = 21
      Visible = False
      OnDblClick = SupSelImgDblClick
      OnMouseDown = SupSelImgMouseDown
    end
    object SupSelImg5: TImage
      Tag = 4
      Left = 90
      Top = 40
      Width = 21
      Height = 21
      Visible = False
      OnDblClick = SupSelImgDblClick
      OnMouseDown = SupSelImgMouseDown
    end
    object SupSelImg6: TImage
      Tag = 5
      Left = 110
      Top = 40
      Width = 21
      Height = 21
      Visible = False
      OnDblClick = SupSelImgDblClick
      OnMouseDown = SupSelImgMouseDown
    end
    object SupSelImg7: TImage
      Tag = 6
      Left = 130
      Top = 40
      Width = 21
      Height = 21
      Visible = False
      OnDblClick = SupSelImgDblClick
      OnMouseDown = SupSelImgMouseDown
    end
    object SupSelImg8: TImage
      Tag = 7
      Left = 150
      Top = 40
      Width = 21
      Height = 21
      Visible = False
      OnDblClick = SupSelImgDblClick
      OnMouseDown = SupSelImgMouseDown
    end
    object SupSelLbl1: TLabel
      Left = 10
      Top = 60
      Width = 8
      Height = 15
      Caption = '1'
    end
    object SupSelLbl2: TLabel
      Left = 20
      Top = 60
      Width = 8
      Height = 15
      Caption = '2'
    end
    object SupSelLbl3: TLabel
      Left = 30
      Top = 60
      Width = 8
      Height = 15
      Caption = '3'
    end
    object SupSelLbl4: TLabel
      Left = 40
      Top = 60
      Width = 8
      Height = 15
      Caption = '4'
    end
    object SupSelLbl5: TLabel
      Left = 50
      Top = 60
      Width = 8
      Height = 15
      Caption = '5'
    end
    object SupSelLbl6: TLabel
      Left = 60
      Top = 60
      Width = 8
      Height = 15
      Caption = '6'
    end
    object ImSetupCBox1: TCheckBox
      Left = 10
      Top = 80
      Width = 500
      Height = 21
      TabOrder = 0
      Visible = False
    end
    object ImSetupCBox2: TCheckBox
      Left = 10
      Top = 100
      Width = 500
      Height = 21
      TabOrder = 1
      Visible = False
    end
    object ImSetupRButton1: TRadioButton
      Left = 10
      Top = 120
      Width = 375
      Height = 21
      TabOrder = 2
      Visible = False
      OnClick = ImSetupRButtonClick
    end
    object ImSetupRButton2: TRadioButton
      Tag = 1
      Left = 10
      Top = 140
      Width = 375
      Height = 21
      TabOrder = 3
      Visible = False
      OnClick = ImSetupRButtonClick
    end
    object ImSetupRButton3: TRadioButton
      Tag = 2
      Left = 10
      Top = 160
      Width = 375
      Height = 21
      TabOrder = 4
      Visible = False
      OnClick = ImSetupRButtonClick
    end
    object ImSetupEdit1: TEdit
      Left = 0
      Top = 180
      Width = 41
      Height = 23
      TabOrder = 5
      Visible = False
    end
    object ImSetupEdit2: TEdit
      Left = 0
      Top = 210
      Width = 41
      Height = 23
      TabOrder = 6
      Visible = False
    end
    object ImSetupBtn1: TImageButton
      Left = 0
      Top = 10
      Width = 29
      Height = 28
      NumGlyphs = 1
      OnClick = ImSetupBtn1Click
      Visible = False
    end
    object ImSetupBtn2: TImageButton
      Tag = 1
      Left = 30
      Top = 10
      Width = 29
      Height = 28
      NumGlyphs = 1
      OnClick = ImSetupBtnUrlClick
      Visible = False
    end
    object ImSetupBtn3: TImageButton
      Tag = 2
      Left = 60
      Top = 10
      Width = 29
      Height = 28
      NumGlyphs = 1
      OnClick = ImSetupBtn3Click
      Visible = False
    end
    object ImSetupBtn4: TImageButton
      Tag = 3
      Left = 90
      Top = 10
      Width = 29
      Height = 28
      NumGlyphs = 1
      OnClick = ImSetupBtn4Click
      Visible = False
    end
    object ImSetupBtn5: TImageButton
      Tag = 4
      Left = 120
      Top = 10
      Width = 29
      Height = 28
      NumGlyphs = 1
      OnClick = ImSetupBtnRetClick
      Visible = False
    end
    object ImSetupBtn6: TImageButton
      Tag = 5
      Left = 150
      Top = 10
      Width = 31
      Height = 31
      NumGlyphs = 1
      OnClick = ImSetupBtnUrlClick
    end
    object ImSetupBtn7: TImageButton
      Tag = 6
      Left = 180
      Top = 10
      Width = 31
      Height = 31
      NumGlyphs = 1
      OnClick = ImSetupBtnUrlClick
    end
  end
  object ImMediaSheet1: TImMediaSheet
    Left = 170
    Top = 440
    Width = 171
    Height = 151
  end
  object ImBtn2: TImageButton
    Tag = 7
    Left = 48
    Top = -1
    Width = 29
    Height = 28
    NumGlyphs = 1
    OnClick = ImSetupBtnUrlClick
  end
  object ImMainTimer: TTimer
    Enabled = False
    OnTimer = ImMainTimerTimer
    Left = 640
    Top = 448
  end
  object EditPupMenu: TPopupMenu
    Left = 128
    object PupMakeNewSeat: TMenuItem
      Caption = '�V�K�V�[�g�̍쐬'
      OnClick = EditPupItemClick
    end
    object PupLoadSeat: TMenuItem
      Tag = 1
      Caption = '�V�[�g�̓Ǎ���'
      OnClick = EditPupItemClick
    end
    object PupSaveSeat: TMenuItem
      Tag = 2
      Caption = '�V�[�g�̕ۑ�'
      OnClick = EditPupItemClick
    end
    object PupRenameSest: TMenuItem
      Tag = 3
      Caption = '�V�[�g���̕ύX'
      OnClick = EditPupItemClick
    end
    object PupDelSeat: TMenuItem
      Tag = 4
      Caption = '�V�[�g�̍폜'
      OnClick = EditPupItemClick
    end
    object PupCGAddDel: TMenuItem
      Tag = 5
      Caption = '�摜�̒lj��E�폜'
      OnClick = EditPupItemClick
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object PupCansel: TMenuItem
      Caption = '�L�����Z��'
    end
    object PupNon: TMenuItem
      Tag = 8
      Caption = '-'
    end
    object PupDev: TMenuItem
      Tag = 9
      Caption = '�Ǘ��җp'
      OnClick = EditPupItemClick
    end
    object PupUdt: TMenuItem
      Tag = 10
      Caption = '�X�V�f�[�^�쐬'
      OnClick = EditPupItemClick
    end
  end
  object ImSetUpPup: TPopupMenu
    Left = 224
    Top = 116
    object ChgFrmMySch: TMenuItem
      Caption = '�K�p����'
      OnClick = ChgFrmMySchClick
    end
    object DelFrmMySch: TMenuItem
      Caption = '�폜����'
      OnClick = DelFrmMySchClick
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object N3: TMenuItem
      Caption = '�L�����Z��'
    end
  end
  object ImcCtrl1: TImcCtrl
    MaxAddSheetPageNum = 99
    DataGroupID = '********'
    AppGroupID = '********'
    Left = 168
    Top = 8
  end
  object ImcCtrl2: TImcCtrl
    MaxAddSheetPageNum = 99
    DataGroupID = '********'
    AppGroupID = '********'
    Left = 168
    Top = 40
  end
  object MakeSchDlg1: TMakeSchDlg
    MaxLoadSheetNum = 1000
    MaxAddSheetPageNum = 99
    Left = 224
    Top = 72
  end
  object AppendPup: TPopupMenu
    Left = 128
    Top = 24
    object AppendSnd: TMenuItem
      Caption = '�����t�@�C���̑I��'
      OnClick = AppendPupClick
    end
    object AppendMov: TMenuItem
      Tag = 1
      Caption = '����t�@�C���̑I��'
      OnClick = AppendPupClick
    end
    object AppendUrl: TMenuItem
      Tag = 2
      Caption = 'URL�̏�������'
      OnClick = AppendPupClick
    end
    object DelAppend: TMenuItem
      Caption = '�Y�t�𔍂���'
      OnClick = DelAppendClick
    end
    object N4: TMenuItem
      Caption = '-'
    end
    object AppendCcl: TMenuItem
      Tag = 3
      Caption = '�L�����Z��'
    end
  end
  object SealPup: TPopupMenu
    Left = 128
    Top = 48
    object SealPltOpn: TMenuItem
      Caption = '�V�[���p���b�g���J��'
      OnClick = SealPltOpnClick
    end
    object DelSeal: TMenuItem
      Caption = '�V�[���𔍂���'
      OnClick = DelSealClick
    end
    object N5: TMenuItem
      Caption = '-'
    end
    object N6: TMenuItem
      Caption = '�L�����Z��'
    end
  end
  object SealPlt1: TSealPlt
    Left = 256
    Top = 72
  end
  object CalSelTabPup: TPopupMenu
    Left = 128
    Top = 72
    object DspTabBig: TMenuItem
      Caption = '�^�u��傫���\��'
      OnClick = DspTabClick
    end
    object DspTabSml: TMenuItem
      Tag = 1
      Caption = '�^�u���������\��'
      OnClick = DspTabClick
    end
    object N9: TMenuItem
      Caption = '-'
    end
    object TopicDspOff: TMenuItem
      Caption = '�g�s�b�N��\�����Ȃ�'
      OnClick = TopicDspOnOffClick
    end
    object TopicDspOn: TMenuItem
      Tag = 1
      Caption = '�g�s�b�N��\������'
      OnClick = TopicDspOnOffClick
    end
    object TopicSelect: TMenuItem
      Tag = 2
      Caption = '�g�s�b�N��I������'
      OnClick = TopicDspOnOffClick
    end
    object N7: TMenuItem
      Caption = '-'
    end
    object N8: TMenuItem
      Caption = '�L�����Z��'
    end
  end
  object ImcCtrl3: TImcCtrl
    MaxAddSheetPageNum = 99
    DataGroupID = '********'
    AppGroupID = '********'
    Left = 168
    Top = 80
  end
  object Timer1: TTimer
    Enabled = False
    Left = 680
    Top = 448
  end
  object IniTimer: TTimer
    Enabled = False
    OnTimer = IniTimerTimer
    Left = 720
    Top = 448
  end
end