object FormTVS: TFormTVS Left = 190 Top = 99 Width = 502 Height = 399 Caption = 'TV�X�P�W���[���[' Color = clBtnFace Font.Charset = SHIFTJIS_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = '�l�r �o�S�V�b�N' Font.Style = [] Menu = MainMenu1 OldCreateOrder = False OnActivate = FormActivate OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnPaint = FormPaint OnResize = FormResize PixelsPerInch = 96 TextHeight = 12 object StatusBar: TStatusBar Left = 0 Top = 331 Width = 494 Height = 22 Panels = < item Alignment = taCenter Width = 300 end item Width = 50 end> ParentShowHint = False ShowHint = True SimplePanel = False end object Panel1: TPanel Left = 0 Top = 0 Width = 494 Height = 33 Align = alTop BevelOuter = bvNone TabOrder = 1 object Label1: TLabel Left = 8 Top = 8 Width = 24 Height = 12 Caption = '�n��' end object Label2: TLabel Left = 160 Top = 8 Width = 24 Height = 12 Caption = '����' end object ComboArea: TComboBox Left = 48 Top = 8 Width = 97 Height = 20 Style = csDropDownList ItemHeight = 12 TabOrder = 1 OnChange = ComboAreaChange end object ComboTime: TComboBox Left = 280 Top = 8 Width = 81 Height = 20 Style = csDropDownList ItemHeight = 12 TabOrder = 0 OnChange = ComboTimeChange end object DateTime1: TDateTimePicker Left = 200 Top = 8 Width = 73 Height = 20 CalAlignment = dtaLeft Date = 36339.962537384260000000 Time = 36339.962537384260000000 DateFormat = dfShort DateMode = dmComboBox Kind = dtkDate ParseInput = False TabOrder = 2 OnChange = DateTime1Change end end object Grid: TStrColGrid Left = 0 Top = 32 Width = 489 Height = 297 Anchors = [akLeft, akTop, akRight, akBottom] DefaultRowHeight = 16 DefaultDrawing = False FixedCols = 0 RowCount = 2 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goRangeSelect, goDrawFocusSelected, goColSizing, goColMoving, goRowSelect] ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = Grid1Click OnColumnMoved = GridColumnMoved OnDblClick = GridDblClick CellParams = <> Fonts = <> FocusCellFontColorEnabled = True Layout = tlTop end object MainMenu1: TMainMenu Left = 32 Top = 240 object File1: TMenuItem Caption = '�t�@�C��(&F)' object mOPen: TMenuItem Caption = '�J��(&O)...' Enabled = False end object HTML1: TMenuItem Caption = 'HTML�t�@�C���ɕۑ�' Enabled = False end object CSV1: TMenuItem Caption = 'CSV�t�@�C���ɕۑ�' Enabled = False end object N3: TMenuItem Caption = '-' end object mInport: TMenuItem Caption = '�C���|�[�g(&I)...' OnClick = mInportClick end object mExport: TMenuItem Caption = '�G�N�X�|�[�g(&E)...' OnClick = mExportClick end object N2: TMenuItem Caption = '-' end object Print1: TMenuItem Caption = '���(&P)...' Enabled = False end object PrintSetup1: TMenuItem Caption = '�y�[�W�ݒ�(&R)...' Enabled = False end object N1: TMenuItem Caption = '-' end object mExit: TMenuItem Caption = '�I��(&X)' OnClick = mExitClick end end object Edit1: TMenuItem Caption = '�ҏW(&E)' object Undo1: TMenuItem Caption = '���ɖ߂�(&U)' Enabled = False ShortCut = 16474 end object N5: TMenuItem Caption = '-' end object mCut: TMenuItem Caption = '�؂���(&T)' OnClick = mCutClick end object mCopy: TMenuItem Caption = '�R�s�[(&C)' OnClick = mCopyClick end object mPaste: TMenuItem Caption = '�\��t��(&P)' OnClick = mPasteClick end object N4: TMenuItem Caption = '-' end object mFind: TMenuItem Caption = '����(&F)...' OnClick = mFindClick end end object Show1: TMenuItem Caption = '�\��(&V)' object mOverTime: TMenuItem Caption = '�͂��܂����ԑg��\��' Checked = True OnClick = mOverTimeClick end object mEndTime: TMenuItem Caption = '�I������ԑg��\��' OnClick = mEndTimeClick end object mDefaultTV: TMenuItem Caption = '����I�Ȕԑg�̂ݕ\��' OnClick = mDefaultTVClick end object N8: TMenuItem Caption = '-' end object mAllChannel: TMenuItem Caption = '���ׂĂ̕����ǂ�\��' OnClick = mAllChannelClick end object mRepaint: TMenuItem Caption = '�ŐV�̏��ɍX�V(&R)' OnClick = mRepaintClick end end object mTool: TMenuItem Caption = '�c�[��(&T)' object mAlarm: TMenuItem Caption = '�A���[�����Z�b�g...' Enabled = False end object mSearch: TMenuItem Caption = '�ԑg������...' OnClick = mSearchClick end object mDispHtml: TMenuItem Caption = '�ԑg�\���J��...' OnClick = mDispHtmlClick end object mTeiki: TMenuItem Caption = '����I�Ȕԑg������' OnClick = mTeikiClick end object mDLL: TMenuItem Caption = 'TV�K�C�h���_�E�����[�h' OnClick = mDLLClick end end object S1: TMenuItem Caption = '�ݒ�(&S)' object mDisplay: TMenuItem Caption = '�\���ݒ�...' OnClick = mDisplayClick end object mSchedule: TMenuItem Caption = '����I�Ȕԑg�̕ҏW...' OnClick = mScheduleClick end object mTVGuide: TMenuItem Caption = 'TV�K�C�h�ݒ�...' OnClick = mTVGuideClick end object mOutLook: TMenuItem Caption = 'OutLook�ݒ�...' OnClick = mOutLookClick end end object Help1: TMenuItem Caption = '�w���v(&H)' object Contents1: TMenuItem Caption = '�ڎ�(&C)' Enabled = False end object SearchforHelpOn1: TMenuItem Caption = '�g�s�b�N�̌���(&S)...' Enabled = False end object N6: TMenuItem Caption = '-' end object mAbout: TMenuItem Caption = '�o�[�W�������(&A)...' OnClick = mAboutClick end end end object OpenDialog1: TOpenDialog DefaultExt = 'txt' Filter = 'Text File|*.txt' Left = 76 Top = 239 end object vFormSet1: TvFormSet Enabled = True FormName = 'TV�X�P�W���[���[' TopName = 'Top1' LeftName = 'Left1' WidthName = 'Width1' HeightName = 'Height1' WindowStateName = 'WindowState1' Left = 156 Top = 239 end object CsvFile1: TCsvFile CSVFlags = [coDelimi, coDelStr, coLTrim, coRTrim, coAutoLoad, coStrData, co24Time, coYYYYDate] DelStr = '"' Delimiter = '"' Separator = ',' Left = 264 Top = 240 end object Timer1: TTimer Enabled = False OnTimer = Timer1Timer Left = 208 Top = 240 end object SaveDialog1: TSaveDialog DefaultExt = 'txt' Filter = 'Text File|*.txt' Left = 112 Top = 240 end object CsvFile2: TCsvFile CSVFlags = [coDelimi, coDelStr, coLTrim, coRTrim, coAutoLoad, coStrData, co24Time, coYYYYDate] DelStr = '"' Delimiter = '"' Separator = ',' Left = 304 Top = 232 end object WinUtility1: TWinUtility Left = 392 Top = 240 end object APM1: TAPM OnSuspendQuery = APM1SuspendQuery OnSuspendDenied = APM1SuspendDenied OnResumeAfterSuspend = APM1ResumeAfterSuspend ACPowerStatus = 'OnLine' ACPowerStatusFlag = 1 BatteryChargeStatus = 'Unknown' BatteryChargeStatusFlag = 10 BatteryLifePercent = 29 BatteryLifeTime = -1 BatteryLifeFullTime = -1 Enabled = True Left = 352 Top = 248 end end