home *** CD-ROM | disk | FTP | other *** search
- object feditcd: Tfeditcd
- Left = 605
- Top = 167
- Width = 601
- Height = 515
- Caption = 'CD Informaion'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -15
- Font.Name = 'Arial'
- Font.Style = []
- OldCreateOrder = True
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 120
- TextHeight = 17
- object CtrlGrid1: TCtrlGrid
- Left = 10
- Top = 74
- Width = 569
- Height = 349
- Align = alClient
- ColCount = 4
- DefaultColWidth = 100
- DefaultRowHeight = 20
- FixedCols = 0
- RowCount = 2
- GridLineWidth = 0
- Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goDrawFocusSelected, goColSizing]
- TabOrder = 0
- ColTitles.Strings = (
- 'track title'
- 'track info'
- 'time'
- 'size')
- RowTitles.Strings = (
- 'track title'
- '')
- ColWidths = (
- 155
- 148
- 74
- 100)
- end
- object Edit1: TEdit
- Left = 432
- Top = 168
- Width = 121
- Height = 25
- TabOrder = 1
- Text = 'Edit1'
- OnKeyPress = Edit1KeyPress
- end
- object Panel1: TPanel
- Left = 0
- Top = 423
- Width = 593
- Height = 60
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 2
- object StatusBar1: TStatusBar
- Left = 0
- Top = 39
- Width = 593
- Height = 21
- Panels = <
- item
- Text = 'discid:'
- Width = 120
- end
- item
- Text = 'tracks:'
- Width = 100
- end
- item
- Text = 'cddbserver: cddb.intnl.com'
- Width = 50
- end>
- SimplePanel = False
- end
- object btnsave: TButton
- Left = 8
- Top = 8
- Width = 75
- Height = 25
- Caption = 'save'
- Enabled = False
- TabOrder = 1
- OnClick = btnsaveClick
- end
- object btncancel: TButton
- Left = 88
- Top = 8
- Width = 75
- Height = 25
- Caption = 'close'
- TabOrder = 2
- OnClick = btncancelClick
- end
- end
- object Panel2: TPanel
- Left = 0
- Top = 74
- Width = 10
- Height = 349
- Align = alLeft
- BevelOuter = bvNone
- TabOrder = 3
- end
- object Panel3: TPanel
- Left = 579
- Top = 74
- Width = 14
- Height = 349
- Align = alRight
- BevelOuter = bvNone
- TabOrder = 4
- end
- object Panel4: TPanel
- Left = 0
- Top = 0
- Width = 593
- Height = 74
- Align = alTop
- BevelOuter = bvNone
- TabOrder = 5
- object Label1: TLabel
- Left = 10
- Top = 8
- Width = 61
- Height = 17
- Caption = 'DISC title'
- end
- object Label6: TLabel
- Left = 10
- Top = 40
- Width = 40
- Height = 17
- Caption = 'Genre'
- end
- object editdisctitle: TEdit
- Left = 104
- Top = 8
- Width = 201
- Height = 25
- MaxLength = 79
- TabOrder = 0
- Text = 'editdisctitle'
- OnKeyPress = Edit1KeyPress
- end
- object ComboGenre: TComboBox
- Left = 104
- Top = 40
- Width = 201
- Height = 25
- Style = csDropDownList
- ItemHeight = 17
- Items.Strings = (
- '2byte'
- 'blues'
- 'classical'
- 'country'
- 'data'
- 'folk'
- 'jazz'
- 'misc'
- 'newage'
- 'reggae'
- 'rock'
- 'soundtrack')
- TabOrder = 1
- OnExit = ComboGenreExit
- end
- end
- end
-