📄 unit1.dfm
字号:
Caption = 'SubAddress'
end
object Label35: TLabel
Left = 80
Top = 24
Width = 38
Height = 13
Caption = 'Address'
end
object Label36: TLabel
Left = 152
Top = 24
Width = 27
Height = 13
Caption = 'Value'
end
object Label37: TLabel
Left = 144
Top = 48
Width = 33
Height = 25
AutoSize = False
Color = clSkyBlue
ParentColor = False
end
object Label38: TLabel
Left = 184
Top = 48
Width = 33
Height = 25
AutoSize = False
Color = clSkyBlue
ParentColor = False
end
object Edit80: TEdit
Left = 16
Top = 48
Width = 41
Height = 21
TabOrder = 0
end
object Edit81: TEdit
Left = 80
Top = 48
Width = 25
Height = 21
TabOrder = 1
end
object Edit82: TEdit
Left = 112
Top = 48
Width = 25
Height = 21
TabOrder = 2
end
object Button16: TButton
Left = 240
Top = 48
Width = 57
Height = 25
Caption = 'Read'
TabOrder = 3
end
end
object StringGrid3: TStringGrid
Left = 344
Top = 8
Width = 409
Height = 393
ColCount = 16
RowCount = 128
ScrollBars = ssVertical
TabOrder = 2
OnDrawCell = StringGrid1DrawCell
ColWidths = (
64
23
21
20
21
21
18
22
20
21
21
19
20
18
20
22)
RowHeights = (
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24)
end
end
object TabSheet6: TTabSheet
Caption = 'Setting'
ImageIndex = 5
OnContextPopup = TabSheet6ContextPopup
DesignSize = (
745
493)
object RichEdit1: TRichEdit
Left = 368
Top = 8
Width = 401
Height = 445
Anchors = [akLeft, akBottom]
HideSelection = False
HideScrollBars = False
Lines.Strings = (
'')
ScrollBars = ssVertical
TabOrder = 0
end
object Button7: TButton
Left = 424
Top = 460
Width = 81
Height = 25
Caption = 'Clear'
TabOrder = 1
OnClick = Button7Click
end
object Button8: TButton
Left = 600
Top = 460
Width = 81
Height = 25
Caption = 'Debug Enable'
TabOrder = 2
OnClick = Button8Click
end
object Panel50: TPanel
Left = 16
Top = 8
Width = 321
Height = 153
TabOrder = 3
object Label1: TLabel
Left = 96
Top = 56
Width = 16
Height = 13
Alignment = taCenter
AutoSize = False
Color = clWhite
ParentColor = False
end
object Label3: TLabel
Left = 16
Top = 8
Width = 65
Height = 13
Caption = 'Set SCL CLK'
end
object Label5: TLabel
Left = 112
Top = 56
Width = 16
Height = 13
Alignment = taCenter
AutoSize = False
Caption = 'us'
Color = clBtnFace
ParentColor = False
end
object Label4: TLabel
Left = 24
Top = 80
Width = 96
Height = 13
Caption = 'Set Cmd Delay Time'
end
object Label2: TLabel
Left = 96
Top = 132
Width = 16
Height = 13
Alignment = taCenter
AutoSize = False
Color = clWhite
ParentColor = False
end
object Label6: TLabel
Left = 112
Top = 132
Width = 16
Height = 13
Alignment = taCenter
AutoSize = False
Caption = 'ms'
Color = clBtnFace
ParentColor = False
end
object ScrollBar1: TScrollBar
Left = 16
Top = 32
Width = 185
Height = 16
PageSize = 0
Position = 30
TabOrder = 0
OnScroll = ScrollBar1Scroll
end
object ScrollBar2: TScrollBar
Left = 16
Top = 105
Width = 185
Height = 16
PageSize = 0
Position = 50
TabOrder = 1
OnScroll = ScrollBar2Scroll
end
object ComboBox1: TComboBox
Left = 224
Top = 32
Width = 89
Height = 21
ItemHeight = 13
TabOrder = 2
Text = 'Parelle Port'
Items.Strings = (
'LT0'
'LT1'
'LT2')
end
end
object Panel51: TPanel
Left = 16
Top = 176
Width = 329
Height = 105
TabOrder = 4
object ComboBox2: TComboBox
Left = 216
Top = 32
Width = 89
Height = 21
ItemHeight = 13
TabOrder = 0
Text = 'COM Port'
Items.Strings = (
'COM1'
'COM2'
'COM3'
'COM4')
end
object Button21: TButton
Left = 16
Top = 24
Width = 73
Height = 17
Caption = 'COM Setting'
TabOrder = 1
end
object Button22: TButton
Left = 16
Top = 72
Width = 73
Height = 17
Caption = 'COM ON/OFF'
TabOrder = 2
end
end
object Button23: TButton
Left = 32
Top = 312
Width = 57
Height = 25
Caption = 'RS232'
TabOrder = 5
end
object Button24: TButton
Left = 104
Top = 312
Width = 49
Height = 25
Caption = 'DDC'
TabOrder = 6
end
end
object TabSheet7: TTabSheet
Caption = 'Help'
ImageIndex = 6
OnContextPopup = TabSheet7ContextPopup
object RichEdit2: TRichEdit
Left = 0
Top = 8
Width = 777
Height = 481
Color = clBtnFace
Lines.Strings = (
' ' +
' **********************************'
' ' +
' * SZ Development *'
' ' +
' * ' +
'*'
' ' +
' * 2006.06.06 *'
' ' +
' * ' +
'*'
' ' +
' * Version: V001 *'
' ' +
' **********************************'
''
''
'IIC_Debug_Protocal:'
''
'Byte'#9'0'#9'1'#9'2'#9'3'#9'4'#9'5'#9'6'#9'7'#9'8'#9'9'#9'10'#9'11'#9'12'#9'13'#9
'Data'#9'0x51'#9'0x8b'#9'Cmd'#9'AddH'#9'AddL'#9'Data0'#9'Data1'#9'Data2'#9'Data3'#9'Data4'#9'Data5' +
#9'Data6'#9'Data7'#9'CheckSum'
#9
''
'Byte[1]=0x8b:'
#9#9'At f/w, MAX_RX_BUFFER_NUMBER=Byte[1]&0x0f)+3'
'Byte[2]=Cmd:'
#9'24C32,24C16:'
#9#9'0xEE: Save Data0~Data7 To Eeprom address Byte[3]<<8|Byte[4] (' +
'AddH|AddL)'
#9#9'0xEF: Read Data0~Data7 From Eeprom address Byte[3]<<8|Byte[4]' +
' (AddH|AddL)'
#9
#9'Tuner:'
#9#9'DE: Write Tuner data to AddH,AddL'
#9#9'DF: Read Tuner data from AddH,AddL'
''
#9'Audio:'
' CE: Write Audio data to AddH,Add' +
'L'
#9#9'CF: Read Audio data from AddH,AddL'
''
' Video:'
' BE: Write Video data to AddH,Add' +
'L'
#9#9'BF: Read Video data from AddH,AddL'
''
#9'Scaler:'
' AE: Write Scaler data to AddH,Ad' +
'dL'
#9#9'AF: Read Scaler data from AddH,AddL'
''
#9'Debug:'
#9#9'9E: IIC Debug Enable'
#9#9'9F: IIC Debug Disable'
''
' Read DDC:'
' 8E:Read DDC Data'
'')
ReadOnly = True
ScrollBars = ssBoth
TabOrder = 0
end
end
object TabSheet8: TTabSheet
Caption = 'EEPROM'
ImageIndex = 7
OnShow = TabSheet8Show
object Label75: TLabel
Left = 120
Top = 472
Width = 65
Height = 13
AutoSize = False
Caption = 'Page : 00'
Color = clAqua
ParentColor = False
end
object Button27: TButton
Left = 496
Top = 184
Width = 75
Height = 25
Caption = 'Read'
TabOrder = 0
OnClick = Button27Click
end
object Button28: TButton
Left = 496
Top = 224
Width = 75
Height = 25
Caption = 'Write'
TabOrder = 1
end
object PageControl3: TPageControl
Left = 0
Top = 0
Width = 441
Height = 457
ActivePage = TabSheet11
TabIndex = 0
TabOrder = 2
object TabSheet11: TTabSheet
Caption = 'Tab1'
object StringGrid4: TStringGrid
Left = 8
Top = 4
Width = 425
Height = 429
Color = clBtnFace
ColCount = 17
RowCount = 257
ScrollBars = ssVertical
TabOrder = 0
OnDrawCell = StringGrid4DrawCell
ColWidths = (
64
23
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -