- 积分
- 378
- 实力分
- 点
- 金钱数
- 两
- 技术分
- 分
- 贡献分
- 分
|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?注册会员
x
x65PapuaUtils V 059b2 E化不完全版本 & 汉化
部分E化资源来自 038D
是038D里的E化最全了
- object FormMain: TFormMain
- Left = 283
- Top = 105
- BorderIcons = [biSystemMenu, biMinimize]
- BorderStyle = bsSingle
- Caption = 'x65..x75 PapuaUtils v0.5.9 beta2 [ENG] By rEgSpy'
- ClientHeight = 393
- ClientWidth = 606
- Color = clBtnFace
- DefaultMonitor = dmDesktop
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poDefault
- Visible = True
- OnClose = FormClose
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object PageControl: TPageControl
- Left = 0
- Top = 0
- Width = 334
- Height = 364
- ActivePage = TabSheetSetup
- Align = alClient
- Constraints.MaxHeight = 364
- Constraints.MaxWidth = 334
- Constraints.MinHeight = 364
- Constraints.MinWidth = 334
- TabOrder = 0
- OnChange = PageControlChange
- object TabSheetSetup: TTabSheet
- Caption = 'Settings'
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 326
- Height = 336
- Align = alClient
- BevelOuter = bvLowered
- TabOrder = 0
- object Label26: TLabel
- Left = 136
- Top = 314
- Width = 131
- Height = 13
- Cursor = crHandPoint
- Caption = 'papuas.allsiemens.com'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- OnClick = Label26Click
- end
- object RadioGroupComPort: TRadioGroup
- Left = 8
- Top = 8
- Width = 73
- Height = 289
- Hint = 'Port choice'
- Caption = 'Port'
- ItemIndex = 0
- Items.Strings = (
- 'Com1'
- 'Com2'
- 'Com3'
- 'Com4'
- 'Com5'
- 'Com6'
- 'Com7'
- 'Com8'
- 'Com9'
- 'Com10'
- 'Com11'
- 'Com12'
- 'Com13'
- 'Com14'
- 'Com15'
- 'Com16'
- 'Com17'
- 'Com18')
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- end
- object ButtonAbout: TButton
- Left = 8
- Top = 304
- Width = 75
- Height = 25
- Hint = 'Soft Info'
- Caption = 'About'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- OnClick = ButtonAboutClick
- end
- object CheckBoxCabelPro: TCheckBox
- Left = 96
- Top = 16
- Width = 97
- Height = 17
- Hint = '"3-wires" or "User" cable (shorted 2,5,7 íà USB-COM)'
- Caption = '"No AT" cable'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- end
- object GetInfo: TButton
- Left = 96
- Top = 44
- Width = 81
- Height = 25
- Hint = 'Getting info from power on phone'
- Caption = 'Information'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- OnClick = GetInfoClick
- end
- object ButtonOff: TButton
- Left = 96
- Top = 76
- Width = 81
- Height = 25
- Hint = 'Power off phone'
- Caption = 'Power off'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- OnClick = ButtonOffClick
- end
- object ButtonSrvMode: TButton
- Left = 96
- Top = 140
- Width = 81
- Height = 25
- Hint = 'Boot phone to SERVICE MODE'
- Caption = 'Service Mode'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 5
- OnClick = ButtonSrvModeClick
- end
- object ButtonBurnIn: TButton
- Left = 96
- Top = 172
- Width = 81
- Height = 25
- Hint = 'Boot phone to INIT mode'
- Caption = 'BurnIn Mode'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 6
- OnClick = ButtonBurnInClick
- end
- object ButtonNormalMode: TButton
- Left = 96
- Top = 108
- Width = 81
- Height = 25
- Hint = 'Boot phone to NORMAL MODE'
- Caption = 'Normal Mode'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 7
- OnClick = ButtonNormalModeClick
- end
- object ButtonSrvToNorm: TButton
- Left = 208
- Top = 108
- Width = 75
- Height = 25
- Hint = 'Switch phone from SERVICE mode to NORMAL'
- Caption = 'SrvToNorm'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 8
- TabStop = False
- OnClick = ButtonSrvToNormClick
- end
- object ButtonRccpToBFC: TButton
- Left = 208
- Top = 44
- Width = 75
- Height = 25
- Hint = 'Switch phone to mode BFC command'
- Caption = 'Rccp to BFC'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 9
- OnClick = ButtonRccpToBFCClick
- end
- object ButtonBfcToAT: TButton
- Left = 208
- Top = 76
- Width = 75
- Height = 25
- Hint = 'Switch phone to mode AT command'
- Caption = 'BFC to AT'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 10
- OnClick = ButtonBfcToATClick
- end
- object CheckBoxLight: TCheckBox
- Left = 96
- Top = 204
- Width = 209
- Height = 17
- Hint =
- 'Power off lights when boot to "Service Mode" è "BurnIn Mode" f' +
- 'or batery saving.'
- Caption = 'Power off lights when boot'
- Checked = True
- ParentShowHint = False
- ShowHint = True
- State = cbChecked
- TabOrder = 11
- end
- object ButtonDispLight: TButton
- Left = 208
- Top = 140
- Width = 105
- Height = 25
- Hint = 'On/off Display lights'
- Caption = 'Display Light On'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 12
- OnClick = ButtonDispLightClick
- end
- object ButtonKbdLight: TButton
- Left = 208
- Top = 172
- Width = 105
- Height = 25
- Hint = 'On/off keyboard lights'
- Caption = 'Keyboard Light On'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 13
- OnClick = ButtonKbdLightClick
- end
- object ButtonSimSim: TButton
- Left = 96
- Top = 228
- Width = 81
- Height = 25
- Hint = 'On emulation of SIM card'
- Caption = 'SimSim'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 14
- OnClick = ButtonSimSimClick
- end
- object ButtonBFCtoBFB: TButton
- Left = 96
- Top = 260
- Width = 81
- Height = 25
- Hint = 'Switch phone to BFB protocol'
- Caption = 'BFC to BFB'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 15
- OnClick = ButtonBFCtoBFBClick
- end
- object ButtonBFBtoBFC: TButton
- Left = 208
- Top = 260
- Width = 81
- Height = 25
- Hint = 'Switch phone from BFB to BFC protocol'
- Caption = 'BFB to BFC'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 16
- OnClick = ButtonBFBtoBFCClick
- end
- object ButtonTstDisp1: TButton
- Left = 96
- Top = 292
- Width = 81
- Height = 25
- Hint = 'Test display N1'
- Caption = 'Test Disp1'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 17
- OnClick = ButtonTstDisp1Click
- end
- object ButtonTstDisp2: TButton
- Left = 208
- Top = 292
- Width = 81
- Height = 25
- Hint = 'Test display N2'
- Caption = 'Test Disp2'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 18
- OnClick = ButtonTstDisp2Click
- end
- object ButtonKeyOn: TButton
- Left = 208
- Top = 228
- Width = 105
- Height = 25
- Hint =
- 'Дублирование кнопки Вкл/Выкл на те' +
- 'лефоне'
- Caption = 'Button On/Off'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 19
- OnClick = ButtonKeyOnClick
- end
- object CheckBoxSBA: TCheckBox
- Left = 200
- Top = 16
- Width = 121
- Height = 17
- Hint = 'Another auto start (not yet stable)'
- Caption = 'Type 2 AutoStart'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 20
- end
- object ButtonGetCam: TButton
- Left = 96
- Top = 252
- Width = 57
- Height = 25
- Hint = 'Тест и чтение кадра камеры в файл.'
- Caption = 'Camera'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 21
- OnClick = ButtonGetCamClick
- end
- end
- end
- object TabSheet2: TTabSheet
- Caption = 'Codes'
- ImageIndex = 1
- object Panel2: TPanel
- Left = 0
- Top = 0
- Width = 326
- Height = 336
- Align = alClient
- BevelOuter = bvLowered
- TabOrder = 0
- object IMEI: TLabel
- Left = 32
- Top = 66
- Width = 31
- Height = 16
- Caption = 'IMEI'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label1: TLabel
- Left = 32
- Top = 90
- Width = 32
- Height = 16
- Caption = 'ESN'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label2: TLabel
- Left = 32
- Top = 114
- Width = 43
- Height = 16
- Caption = 'HASH'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label3: TLabel
- Left = 32
- Top = 140
- Width = 40
- Height = 16
- Caption = 'SKEY'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label4: TLabel
- Left = 32
- Top = 220
- Width = 40
- Height = 16
- Caption = 'BKEY'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label14: TLabel
- Left = 32
- Top = 252
- Width = 41
- Height = 16
- Caption = 'HWID'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label16: TLabel
- Left = 8
- Top = 312
- Width = 309
- Height = 13
- Caption = 'WARNING !: Reading keys supported up to ver.36 !'
- WordWrap = True
- OnClick = Label16Click
- end
- object ButtonGetCode: TButton
- Left = 192
- Top = 63
- Width = 105
- Height = 23
- Hint = 'Retrieve codes for calculating (IMEI,ESN,HASH) from phone'
- Caption = 'Read codes'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- OnClick = ButtonGetCodeClick
- end
- object EditESN: TEdit
- Left = 80
- Top = 88
- Width = 65
- Height = 21
- Hint =
- 'ESN (=FSN, =PhoneID) Personal number (Stored in Flash in spec ' +
- 'zone)'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- Text = '?'
- end
- object EditHASH: TEdit
- Left = 80
- Top = 112
- Width = 217
- Height = 21
- Hint = 'BCORE HASH (stored in BCORE at 0xA0000238)'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- Text = '?'
- end
- object EditSkey: TEdit
- Left = 80
- Top = 136
- Width = 81
- Height = 21
- Hint = 'Service key (PapuaKey, OpenAll) open ALL'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- Text = '?'
- end
- object EditIMEI: TEdit
- Left = 80
- Top = 64
- Width = 105
- Height = 21
- Hint = 'IMEI (must be enter)'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- Text = '?'
- OnChange = EditIMEIChange
- end
- object ButtonCalkSkey: TButton
- Left = 168
- Top = 135
- Width = 129
- Height = 23
- Hint = 'Calculate Skey & Bkey from HASH & ESN'
- Caption = 'Calculate Skey and Bkey'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 5
- OnClick = ButtonCalkSkeyClick
- end
- object ButtonFreaLog: TButton
- Left = 16
- Top = 280
- Width = 57
- Height = 25
- Hint = 'Freia Log'
- Caption = 'Freia.log'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 6
- OnClick = ButtonFreaLogClick
- end
- object ButtonSendSkey: TButton
- Left = 32
- Top = 190
- Width = 145
- Height = 25
- Hint = 'Enter Service Key (Skey) in phone'
- Caption = 'Enter Skey in phone'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 7
- OnClick = ButtonSendSkeyClick
- end
- object ButtonCloseSkey: TButton
- Left = 184
- Top = 190
- Width = 113
- Height = 25
- Hint = 'Unlock Service key (Skey) in phone'
- Caption = 'Unlock Skey'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 8
- OnClick = ButtonCloseSkeyClick
- end
- object ButtonOpenAll: TButton
- Left = 16
- Top = 16
- Width = 183
- Height = 33
- Hint =
- 'Auto reading,calculating and enter SKEY (PapuaKey) in flash file' +
- ' SW up to 36'
- Caption = 'Auto OpenAll'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 9
- OnClick = ButtonOpenAllClick
- end
- object EditBootKey: TEdit
- Left = 80
- Top = 218
- Width = 217
- Height = 21
- Hint = 'BootKey (key loading boots)'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 10
- Text = '?'
- end
- object ButtonX65flasher: TButton
- Left = 80
- Top = 280
- Width = 81
- Height = 25
- Hint = 'Add boot password to x65flasher.exe in config.ini'
- Caption = 'x65flasher.ini'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 11
- OnClick = ButtonX65flasherClick
- end
- object ButtonX65VKD1: TButton
- Left = 168
- Top = 280
- Width = 65
- Height = 25
- Hint = 'Save file bootloader for V_KLay v3.0x (..\V_KLay\data\Loaders)'
- Caption = 'VKD v3.0x'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 12
- OnClick = ButtonX65VKD1Click
- end
- object SpinEditHWID: TSpinEdit
- Left = 80
- Top = 248
- Width = 49
- Height = 22
- Hint = 'HardWare ID (CX65=320,S65=323) Type of phone'
- MaxValue = 65535
- MinValue = 0
- ParentShowHint = False
- ShowHint = True
- TabOrder = 13
- Value = 0
- end
- object ButtonHash: TButton
- Left = 32
- Top = 162
- Width = 265
- Height = 25
- Hint = 'Calculate HASH & Bkey from ESN & SKey'
- Caption = 'Calc HASH + Bkey from ESN + SKey'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 14
- OnClick = ButtonHashClick
- end
- object ButtonX65VKD2: TButton
- Left = 240
- Top = 280
- Width = 65
- Height = 25
- Hint =
- 'Save file bootloader for V_KLay V3.2+ (..\V_KLay\data\Loaders\x6' +
- '5.vkd)'
- Caption = 'VKD v3.2+'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 15
- OnClick = ButtonX65VKD2Click
- end
- object ButtonSave512x: TButton
- Left = 240
- Top = 248
- Width = 65
- Height = 25
- Hint = 'Building and saving blocks EEPROM 5121,5122,5123.'
- Caption = 'Save512x'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 16
- OnClick = ButtonSave512xClick
- end
- object ButtonPVVKD: TButton
- Left = 168
- Top = 248
- Width = 65
- Height = 25
- Hint = 'Save file TPbootloader for V_KLay v3.0x (..\V_KLay\data\Loaders)'
- Caption = 'PV VKD'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 17
- OnClick = ButtonPVVKDClick
- end
- object ButtonCalkESN: TButton
- Left = 152
- Top = 88
- Width = 145
- Height = 23
- Hint = 'Calculating ESN from HASH & SKEY'
- Caption = 'Calc ESN from HASH+Skey'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 18
- OnClick = ButtonCalkESNClick
- end
- object Buttonpx65v4: TButton
- Left = 215
- Top = 15
- Width = 75
- Height = 33
- Hint =
- 'Чтение ESN и HASH с помощью мидлета px65v4' +
- '.'
- Caption = 'Px65v4'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 19
- OnClick = Buttonpx65v4Click
- end
- end
- end
- object TabSheet3: TTabSheet
- Caption = 'Format FFS'
- ImageIndex = 3
- object Panel4: TPanel
- Left = 0
- Top = 0
- Width = 326
- Height = 336
- Align = alClient
- BevelInner = bvLowered
- BevelOuter = bvNone
- TabOrder = 0
- object Label15: TLabel
- Left = 88
- Top = 12
- Width = 133
- Height = 13
- Caption = 'Format FFS instances'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label17: TLabel
- Left = 12
- Top = 30
- Width = 298
- Height = 39
- Caption = ' Format will be implemented at next booting to Normal mode'
- WordWrap = True
- end
- object Label18: TLabel
- Left = 32
- Top = 78
- Width = 239
- Height = 13
- Caption = 'Must be used in "Service Mode" !'
- WordWrap = True
- end
- object Label10: TLabel
- Left = 24
- Top = 304
- Width = 125
- Height = 13
- Cursor = crHandPoint
- Caption = 'forum.allsiemens.com '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- OnClick = Label10Click
- end
- object Label13: TLabel
- Left = 168
- Top = 304
- Width = 124
- Height = 13
- Cursor = crHandPoint
- Caption = 'forum.siemens-club.ru'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- OnClick = Label13Click
- end
- object ButtonInvalidateInstanceFFS: TButton
- Left = 16
- Top = 104
- Width = 297
- Height = 25
- Hint = 'Order format FFS'
- Caption = 'After power on phone format FFS'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- OnClick = ButtonInvalidateInstanceFFSClick
- end
- object ButtonInvalidateInstanceFFS_B: TButton
- Left = 16
- Top = 136
- Width = 297
- Height = 25
- Hint = 'Order format FFS_B'
- Caption = 'After power on phone format '#39'FFS_B'#39
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- OnClick = ButtonInvalidateInstanceFFS_BClick
- end
- object Panel5: TPanel
- Left = 16
- Top = 192
- Width = 289
- Height = 105
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 2
- object Label19: TLabel
- Left = 40
- Top = 10
- Width = 210
- Height = 39
- Caption =
- ' Dont use format FFS_C if you dont have full backup of fla' +
- 'sh or if you dont understand well what you doing'
- WordWrap = True
- end
- object Label20: TLabel
- Left = 8
- Top = 86
- Width = 271
- Height = 13
- Caption = 'Repair such phone nobody can do!'
- WordWrap = True
- OnClick = Label16Click
- end
- object ButtonInvalidateInstanceFFS_C: TButton
- Left = 24
- Top = 56
- Width = 233
- Height = 25
- Hint = 'Order format FFS_C'
- Caption = 'After power on phone format '#39'FFS_C'#39
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- OnClick = ButtonInvalidateInstanceFFS_CClick
- end
- end
- end
- end
- object TabSheet4: TTabSheet
- Caption = 'Various'
- ImageIndex = 4
- object Panel6: TPanel
- Left = 0
- Top = 0
- Width = 326
- Height = 336
- Align = alClient
- BevelOuter = bvLowered
- ParentShowHint = False
- ShowHint = False
- TabOrder = 0
- object Label22: TLabel
- Left = 8
- Top = 312
- Width = 303
- Height = 13
- Caption = 'Warning:First enter Skey and work in "Service Mode"!'
- OnClick = Label16Click
- end
- object Label23: TLabel
- Left = 104
- Top = 6
- Width = 118
- Height = 13
- Caption = 'No comments!'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label24: TLabel
- Left = 64
- Top = 24
- Width = 203
- Height = 13
- Caption = '(Only for experts!.)'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object GroupBox1: TGroupBox
- Left = 72
- Top = 40
- Width = 185
- Height = 105
- Caption = 'Freeze'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- object Label21: TLabel
- Left = 16
- Top = 16
- Width = 31
- Height = 16
- Caption = 'IMEI'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object EditFreezeIMEI: TEdit
- Left = 56
- Top = 12
- Width = 121
- Height = 21
- Hint = 'Number IMEI this phone'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- Text = '?'
- OnChange = EditFreezeIMEIChange
- end
- object ButtonFreeze: TButton
- Left = 112
- Top = 72
- Width = 65
- Height = 25
- Hint =
- 'Filling fields Security data at new start phone in BCORE è OTP.' +
- '..'
- Caption = 'Freeze'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- OnClick = ButtonFreezeClick
- end
- object ButtonSetFreeze: TButton
- Left = 8
- Top = 40
- Width = 169
- Height = 25
- Hint = 'Get IMEI from phone'
- Caption = 'Read IMEI from phone'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnClick = ButtonSetFreezeClick
- end
- object ButtonCpySetFreeze: TButton
- Left = 8
- Top = 72
- Width = 89
- Height = 25
- Hint = 'Copy field IMEI from menu Codes'
- Caption = 'Set IMEI'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- OnClick = ButtonCpySetFreezeClick
- end
- end
- object ButtonStatusOTP: TButton
- Left = 120
- Top = 152
- Width = 81
- Height = 25
- Hint = 'Look '#39'OTP Status'#39
- Caption = 'OTP Status'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- OnClick = ButtonStatusOTPClick
- end
- object ButtonLockOtp: TButton
- Left = 120
- Top = 184
- Width = 81
- Height = 25
- Hint = 'Close for writting OTP zone in Flash (Forever!)'
- Caption = 'Close OTP'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnClick = ButtonLockOtpClick
- end
- object ButtonGetOtpEsn: TButton
- Left = 8
- Top = 152
- Width = 105
- Height = 25
- Hint = 'Reading number ESN from OTP zone of Flash'
- Caption = 'Reading OTP ESN'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- OnClick = ButtonGetOtpEsnClick
- end
- object ButtonGetOtpImei: TButton
- Left = 8
- Top = 184
- Width = 105
- Height = 25
- Hint = 'Read Thrue IMEI from phone.'
- Caption = 'Read OTP IMEI'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- OnClick = ButtonGetOtpImeiClick
- end
- object ButtonReadBcore: TButton
- Left = 104
- Top = 216
- Width = 113
- Height = 25
- Hint =
- 'Read (BFC protocol Bugy in Siemens phones!) and store block BCOR' +
- 'E to file'
- Caption = 'Read BCORE'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 5
- OnClick = ButtonReadBcoreClick
- end
- object ButtonClearBcore: TButton
- Left = 224
- Top = 216
- Width = 81
- Height = 25
- Hint = 'Clear core'
- Caption = 'Clear core'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 6
- OnClick = ButtonClearBcoreClick
- end
- object ButtonEEP52: TButton
- Left = 24
- Top = 216
- Width = 75
- Height = 25
- Hint = 'Build and store block 52 EEPROM to file or to phone'
- Caption = 'PvEEP52'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 7
- OnClick = ButtonEEP52Click
- end
- object ButtonRdEepBkey: TButton
- Left = 208
- Top = 152
- Width = 105
- Height = 25
- Hint = 'Read Bkey from EEP'
- Caption = 'Reading EEP Bkey'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 8
- OnClick = ButtonRdEepBkeyClick
- end
- object ButtonFind5122: TButton
- Left = 208
- Top = 184
- Width = 105
- Height = 25
- Hint = 'Read Skey from EEFULL or directly from Flash,after enter key'
- Caption = 'Read EEP Skey'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 9
- OnClick = ButtonFind5122Click
- end
- object ButtonTest: TButton
- Left = 264
- Top = 120
- Width = 41
- Height = 25
- Hint = 'Test look at blocks 76,5008,5009,5077. (for smart!)'
- Caption = 'Test'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 10
- OnClick = ButtonTestClick
- end
- object SpinEditContrast: TSpinEdit
- Left = 24
- Top = 250
- Width = 41
- Height = 22
- Hint = 'Y Contrast (0..255) for display type CSTN'
- Increment = 8
- MaxLength = 3
- MaxValue = 255
- MinValue = 0
- ParentShowHint = False
- ShowHint = True
- TabOrder = 11
- Value = 127
- end
- object SpinEditVrefContrast: TSpinEdit
- Left = 80
- Top = 250
- Width = 41
- Height = 22
- Hint = 'Vref ontrast (0..255) for display type CSTN'
- Increment = 8
- MaxLength = 3
- MaxValue = 255
- MinValue = 0
- ParentShowHint = False
- ShowHint = True
- TabOrder = 12
- Value = 127
- end
- object ButtonRdContrast: TButton
- Left = 128
- Top = 248
- Width = 105
- Height = 25
- Hint = 'Read value of "Contrast" from block 5007'
- Caption = 'Read Contrast'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 13
- OnClick = ButtonRdContrastClick
- end
- object ButtonWrContrast: TButton
- Left = 128
- Top = 280
- Width = 105
- Height = 25
- Hint = 'Write value of "Contrast" into block 5007'
- Caption = 'Write Contrast'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 14
- OnClick = ButtonWrContrastClick
- end
- object ButtonSetContrast: TButton
- Left = 24
- Top = 280
- Width = 97
- Height = 25
- Hint = 'Setting Contrast in phone with display CSTN.'
- Caption = 'Set'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 15
- OnClick = ButtonSetContrastClick
- end
- object Button5008: TButton
- Left = 248
- Top = 248
- Width = 57
- Height = 25
- Hint = 'Look at "Phone code" and locks'
- Caption = '5008'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 16
- OnClick = Button5008Click
- end
- object ButtonCalkMkey: TButton
- Left = 248
- Top = 280
- Width = 59
- Height = 25
- Hint = 'Calculate "Master key" from block 5121 from phone.'
- Caption = 'Mkeys?'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 17
- OnClick = ButtonCalkMkeyClick
- end
- object ButtonBlk71: TButton
- Left = 216
- Top = 46
- Width = 81
- Height = 25
- Hint =
- 'Отключение "Подтверждения Включен' +
- 'ия" и добавление меню "Диапазон"'
- Caption = '71 (Самолет)'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 18
- OnClick = ButtonBlk71Click
- end
- object Button1: TButton
- Left = 8
- Top = 8
- Width = 49
- Height = 25
- Caption = 'Button1'
- TabOrder = 19
- Visible = False
- OnClick = Button1Click
- end
- object ButtonSaveAllEEP: TButton
- Left = 216
- Top = 124
- Width = 81
- Height = 25
- Hint =
- 'Сохранить все EEP блоки из телефона ' +
- 'в файл.'
- Caption = 'Бэкап EEP'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 20
- OnClick = ButtonSaveAllEEPClick
- end
- object Button5005: TButton
- Left = 216
- Top = 98
- Width = 81
- Height = 25
- Hint = 'Чтение и модификация блока 5005.'
- Caption = 'MAP инфо'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 21
- OnClick = Button5005Click
- end
- object ButtonFullESN: TButton
- Left = 232
- Top = 8
- Width = 49
- Height = 25
- Caption = 'ButtonFullESN'
- TabOrder = 22
- Visible = False
- OnClick = ButtonFullESNClick
- end
- end
- end
- object TabSheet5: TTabSheet
- Caption = 'Flash'
- ImageIndex = 5
- object Panel7: TPanel
- Left = 0
- Top = 0
- Width = 326
- Height = 336
- Align = alClient
- BevelOuter = bvLowered
- ParentShowHint = False
- ShowHint = False
- TabOrder = 0
- object Label6: TLabel
- Left = 48
- Top = 12
- Width = 234
- Height = 24
- Caption = 'Think well before!'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -21
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label27: TLabel
- Left = 72
- Top = 44
- Width = 170
- Height = 13
- Caption = 'All only in test mode!'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label28: TLabel
- Left = 24
- Top = 288
- Width = 285
- Height = 13
- Caption = 'All function can kill phone!'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label29: TLabel
- Left = 56
- Top = 308
- Width = 226
- Height = 13
- Caption = 'Boot work without TP if Bkey is calculated!'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- OnClick = Label16Click
- end
- object CheckBoxTstRam: TCheckBox
- Left = 192
- Top = 48
- Width = 89
- Height = 17
- Hint = 'Тест микросхемы памяти (RAM 8Meg).'
- Caption = 'Тест ExtRAM'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 21
- OnClick = CheckBoxTstRamClick
- end
- object CheckBoxRdOTP: TCheckBox
- Left = 208
- Top = 64
- Width = 89
- Height = 17
- Caption = 'Read OTP'
- TabOrder = 15
- Visible = False
- end
- object CheckBoxPause: TCheckBox
- Left = 136
- Top = 64
- Width = 57
- Height = 17
- Hint = 'Pause for TP users :)'
- Caption = 'Pause'
- Checked = True
- ParentShowHint = False
- ShowHint = True
- State = cbChecked
- TabOrder = 1
- end
- object CheckBoxTestBus: TCheckBox
- Left = 136
- Top = 64
- Width = 153
- Height = 17
- Hint =
- 'Тест внешней шины D0..D15 и A0..A22 чипа PMB' +
- '.'
- Caption = 'Тест шины ExtRAM/ROM'
- Checked = True
- ParentShowHint = False
- ShowHint = True
- State = cbChecked
- TabOrder = 16
- OnClick = CheckBoxTestBusClick
- end
- object CheckBoxSaveEEP: TCheckBox
- Left = 136
- Top = 80
- Width = 137
- Height = 17
- Hint =
- 'Сохранить все найденные блоки EEP в ' +
- 'файл для "Siemens EEPROM Tool"'
- Caption = 'Сохранить блоки EEP'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 19
- end
- object CheckBoxBackup: TCheckBox
- Left = 32
- Top = 224
- Width = 105
- Height = 17
- Hint = 'Trying to make backup before do all functions).'
- Caption = 'Make Backup'
- Checked = True
- ParentShowHint = False
- ShowHint = True
- State = cbChecked
- TabOrder = 9
- end
- object RadioGroupSpeed: TRadioGroup
- Left = 32
- Top = 64
- Width = 97
- Height = 153
- Caption = 'Com port speed'
- ItemIndex = 1
- Items.Strings = (
- '57600'
- '115200'
- '230400'
- '460800'
- '614400'
- '921600'
- '1228800'
- '1600000')
- TabOrder = 0
- end
- object ButtonBootInfo: TButton
- Left = 80
- Top = 252
- Width = 153
- Height = 25
- Hint = 'Reading ESN & HASH with boot loader and additional works'
- Caption = 'DO JOB'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 8
- OnClick = ButtonBootInfoClick
- end
- object SpinEditVerDown: TSpinEdit
- Left = 253
- Top = 123
- Width = 44
- Height = 22
- Hint =
- 'Enter number ofminimal version for "UNDO" (0..100), if 100 - set' +
- 'by SW (=FF)'
- MaxValue = 100
- MinValue = 0
- ParentShowHint = False
- ShowHint = True
- TabOrder = 10
- Value = 99
- end
- object CheckBoxNewBcore: TCheckBox
- Left = 136
- Top = 80
- Width = 113
- Height = 17
- Hint = 'Write segment (BC65 BCORE V22) for Freeze or NewFlash!'
- Caption = 'New BCore V22'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 14
- OnClick = CheckBoxNewBcoreClick
- end
- object CheckBoxFreia: TCheckBox
- Left = 136
- Top = 96
- Width = 177
- Height = 17
- Hint = 'Replace 76,5008,5009,5077 blocks'
- Caption = 'Replace 76,5008,5009,5077'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 12
- OnClick = CheckBoxFreiaClick
- end
- object CheckBoxNew5121: TCheckBox
- Left = 136
- Top = 112
- Width = 105
- Height = 17
- Hint =
- 'Replace all Master codes to 12345678 (or another one for skilled' +
- ' users)'
- Caption = 'Replace Master'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnClick = CheckBoxNew5121Click
- end
- object CheckBoxSetVDown: TCheckBox
- Left = 136
- Top = 128
- Width = 105
- Height = 17
- Hint = 'Do undo to version 01..99 ( for old mans :)'
- Caption = 'Undo to version'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- OnClick = CheckBoxSetVDownClick
- end
- object CheckBoxClrExit: TCheckBox
- Left = 136
- Top = 144
- Width = 113
- Height = 17
- Hint = 'Erase logs messages for errors in C/?X/M/S65'
- Caption = 'Clear EXIT'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 6
- OnClick = CheckBoxClrExitClick
- end
- object CheckBoxReCalkFull: TCheckBox
- Left = 136
- Top = 160
- Width = 153
- Height = 17
- Hint =
- 'Calculate all possible keys (Master, Skey -> Bkey, Hash) è writ' +
- 'e to phone.'
- Caption = 'Recalculate Keys in Flash'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 13
- OnClick = CheckBoxReCalkFullClick
- end
- object CheckBoxClrEEFULL: TCheckBox
- Left = 136
- Top = 176
- Width = 113
- Height = 17
- Hint = 'Erase all blocks EEFULL'
- Caption = 'Clear EEFULL'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- OnClick = CheckBoxClrEEFULLClick
- end
- object CheckBoxClrEELITE: TCheckBox
- Left = 136
- Top = 192
- Width = 113
- Height = 17
- Hint = 'Erase all blocks EELITE'
- Caption = 'Clear EELITE'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 5
- OnClick = CheckBoxClrEELITEClick
- end
- object CheckBoxRdFF: TCheckBox
- Left = 136
- Top = 208
- Width = 129
- Height = 17
- Hint = 'Read FullFlash 32mb to file.'
- Caption = 'Read FullFlash'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 11
- OnClick = CheckBoxRdFFClick
- end
- object CheckBoxClrBcor: TCheckBox
- Left = 136
- Top = 224
- Width = 113
- Height = 17
- Hint = 'Prepare BCORE for Freeze'
- Caption = 'Clear BCORE'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 7
- OnClick = CheckBoxClrBcorClick
- end
- object CheckBoxRdCFI: TCheckBox
- Left = 240
- Top = 256
- Width = 81
- Height = 17
- Caption = 'Read CFI'
- TabOrder = 17
- Visible = False
- end
- object CheckSaveInfo: TCheckBox
- Left = 8
- Top = 264
- Width = 65
- Height = 17
- Caption = 'Save Info'
- TabOrder = 18
- Visible = False
- end
- object CheckBoxTest: TCheckBox
- Left = 256
- Top = 224
- Width = 49
- Height = 17
- Caption = 'Test'
- TabOrder = 20
- Visible = False
- end
- end
- end
- object TabSheet1: TTabSheet
- Caption = 'EEP512x'
- ImageIndex = 5
- object Panel3: TPanel
- Left = 0
- Top = 0
- Width = 326
- Height = 336
- Align = alClient
- BevelOuter = bvLowered
- TabOrder = 0
- object Label7: TLabel
- Left = 32
- Top = 72
- Width = 248
- Height = 26
- Caption =
- '1. Propper fill fields in section "Codes": ' +
- ' IMEI, ESN, SKEY, HWID'
- end
- object Label12: TLabel
- Left = 32
- Top = 264
- Width = 254
- Height = 39
- Caption =
- '"Master codes" implemented are unofficial! Without blocks 512x Y' +
- 'ou can kill phone permanently or lose some features! :)'
- WordWrap = True
- end
- object ButtonXBI: TButton
- Left = 56
- Top = 88
- Width = 217
- Height = 25
- Hint =
- 'Преобразование файла ФуллФлэш в XBI ' +
- 'или UserSwup файл.'
- Caption = 'Conversion FullFlash in XBI or UserSwup'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- OnClick = ButtonXBIClick
- end
- object ButtonRecalkFF: TButton
- Left = 112
- Top = 224
- Width = 97
- Height = 25
- Hint =
- 'Пересчитать все ключи в FullFlash файле' +
- ' по данным из вкладки "Коды" и сохра' +
- 'нить в новый файл.'
- Caption = 'Recalk FullFlash'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- OnClick = ButtonRecalkFFClick
- end
- end
- end
- object TabSheet6: TTabSheet
- Caption = 'Камера'
- ImageIndex = 6
- object Panel8: TPanel
- Left = 0
- Top = 0
- Width = 326
- Height = 336
- Align = alClient
- BevelOuter = bvLowered
- TabOrder = 0
- object Label5: TLabel
- Left = 64
- Top = 312
- Width = 179
- Height = 13
- Caption = 'Beta function! Ждите новых версий!'
- end
- object GroupBox4: TGroupBox
- Left = 44
- Top = 12
- Width = 217
- Height = 261
- Caption = 'Camera Parameters'
- TabOrder = 0
- object CamWhiteBalance: TRadioGroup
- Left = 8
- Top = 16
- Width = 105
- Height = 65
- Hint = 'Тип настройки'
- Caption = 'White Balance'
- ItemIndex = 2
- Items.Strings = (
- 'Auto'
- 'Indoor'
- 'Outdoor')
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- end
- object CamCompressionRate: TRadioGroup
- Left = 8
- Top = 80
- Width = 105
- Height = 65
- Hint = 'Сжатие'
- Caption = 'Compression Rate'
- ItemIndex = 0
- Items.Strings = (
- 'Low'
- 'Medium'
- 'High')
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- end
- object CamZoomFactor: TRadioGroup
- Left = 120
- Top = 128
- Width = 89
- Height = 97
- Hint = 'Увеличение (окно)'
- Caption = 'Zoom Factor'
- ItemIndex = 0
- Items.Strings = (
- 'x1'
- 'x2'
- 'x3'
- 'x4'
- 'x5')
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- end
- object CamColorMode: TRadioGroup
- Left = 120
- Top = 16
- Width = 89
- Height = 65
- Hint = 'Тип цвета'
- Caption = 'Color Mode'
- ItemIndex = 0
- Items.Strings = (
- 'Standard'
- 'Sepia'
- 'GreyScale')
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- end
- object CamFlashCondition: TCheckBox
- Left = 120
- Top = 96
- Width = 92
- Height = 17
- Caption = 'Flash Condition'
- TabOrder = 4
- end
- object CameraPicResolution: TRadioGroup
- Left = 8
- Top = 144
- Width = 105
- Height = 81
- Hint = 'Размер картинки кадра (Jpeg)'
- Caption = 'Jpeg Resolution'
- ItemIndex = 0
- Items.Strings = (
- '1:1'
- '1:2'
- '1:4'
- '1:8')
- ParentShowHint = False
- ShowHint = True
- TabOrder = 5
- end
- object GroupBox2: TGroupBox
- Left = 8
- Top = 224
- Width = 201
- Height = 33
- Hint = 'Яркость'
- Caption = 'Brightness'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 6
- object LabelBrightness: TLabel
- Left = 176
- Top = 13
- Width = 12
- Height = 13
- Caption = '50'
- end
- object ScrollBarBrigh: TScrollBar
- Left = 8
- Top = 15
- Width = 161
- Height = 10
- LargeChange = 10
- PageSize = 0
- Position = 50
- TabOrder = 0
- OnChange = ScrollBarBrighChange
- end
- end
- end
- object ButtonStartCamera: TButton
- Left = 44
- Top = 280
- Width = 75
- Height = 25
- Caption = 'Start'
- TabOrder = 1
- OnClick = ButtonGetCamClick
- end
- object ButtonShowFormCam: TButton
- Left = 124
- Top = 280
- Width = 29
- Height = 25
- Hint = 'Show windows camera'
- Caption = '#'
- Enabled = False
- TabOrder = 2
- OnClick = ButtonShowFormCamClick
- end
- object SpinEditTO: TSpinEdit
- Left = 208
- Top = 282
- Width = 53
- Height = 22
- Hint = 'Пауза (примерно в 0.1сек)'
- Increment = 10
- MaxValue = 864000
- MinValue = 0
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- Value = 10
- end
- end
- end
- end
- object StatusBar: TStatusBar
- Left = 0
- Top = 374
- Width = 606
- Height = 19
- Panels = <
- item
- Text = 'Com?'
- Width = 36
- end
- item
- Text = '?'
- Width = 210
- end
- item
- Text = '?'
- Width = 350
- end>
- SimplePanel = False
- end
- object MemoInfo: TMemo
- Left = 334
- Top = 0
- Width = 272
- Height = 364
- Align = alRight
- ScrollBars = ssBoth
- TabOrder = 2
- end
- object ProgressBar: TProgressBar
- Left = 0
- Top = 364
- Width = 606
- Height = 10
- Align = alBottom
- Min = 0
- Max = 100
- TabOrder = 3
- end
- object SaveDialog: TSaveDialog
- Left = 296
- Top = 96
- end
- object OpenDialog: TOpenDialog
- Left = 300
- Top = 32
- end
- object Timer500: TTimer
- Tag = 1
- Enabled = False
- Interval = 200
- OnTimer = Timer500Timer
- Left = 292
- Top = 128
- end
- end
复制代码
[ 本帖最后由 regspy 于 2005-9-25 21:27 编辑 ] |
|