regspy 发表于 2005-9-25 12:11:05

[协作]x65PapuaUtils V 0592 E化不完全版本 & 汉

x65PapuaUtils V 059b2 E化不完全版本 & 汉化


部分E化资源来自 038D

是038D里的E化最全了




object FormMain: TFormMain
Left = 283
Top = 105
BorderIcons =
BorderStyle = bsSingle
Caption = 'x65..x75 PapuaUtils v0.5.9 beta2 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 =
          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 bootto "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 toBFB 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 fromBFB 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 =
          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 =
          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 =
          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 =
          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 =
          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 =
          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 inFlash 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 =
          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 =
          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 =
          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 =
          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 =
          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 formatFFS_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 =
          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 =
          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 =
          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 =
            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 =
            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 writtingOTP zone inFlash (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 IMEIfrom 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 =
          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 =
          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 =
          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 losesome 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 编辑 ]

magicalgun 发表于 2005-9-25 14:41:22

我还是帮顶吧,头晕

regspy 发表于 2005-9-25 21:30:10

头晕啊,噩文。。。。。

有在线翻译的地方吗?

wslh 发表于 2005-11-10 16:47:01

同感呀。不过肯定是要顶的。

boo666 发表于 2005-11-13 19:28:01

ddddddddddddddddddd
页: [1]
查看完整版本: [协作]x65PapuaUtils V 0592 E化不完全版本 & 汉化