object FViewTrackEdit: TFViewTrackEdit
  Left = 0
  Top = 0
  Width = 593
  Height = 383
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  TabOrder = 1
  OnCreate = WebFormCreate
  object WebLabel1: TWebLabel
    Left = 24
    Top = 160
    Width = 14
    Height = 13
    Caption = 'Id:'
    ElementID = 'view.track.form.lbId'
    Transparent = False
  end
  object WebLabel3: TWebLabel
    Left = 24
    Top = 187
    Width = 31
    Height = 13
    Caption = 'Name:'
    ElementID = 'view.track.form.lbName'
    Transparent = False
  end
  object WebLabel2: TWebLabel
    Left = 24
    Top = 268
    Width = 33
    Height = 13
    Caption = 'Genre:'
    ElementID = 'view.track.form.lbGenre'
    Transparent = False
  end
  object WebLabel4: TWebLabel
    Left = 24
    Top = 214
    Width = 52
    Height = 13
    Caption = 'Composer:'
    ElementID = 'view.track.form.lbComposer'
    Transparent = False
  end
  object WebLabel5: TWebLabel
    Left = 24
    Top = 241
    Width = 59
    Height = 13
    Caption = 'Milliseconds:'
    ElementID = 'view.track.form.lbMilliseconds'
    Transparent = False
  end
  object btCancel: TWebButton
    Left = 126
    Top = 326
    Width = 96
    Height = 25
    Color = clNone
    Caption = 'Cancel'
    ElementID = 'view.track.form.btBack'
    OnClick = btCancelClick
  end
  object btSave: TWebButton
    Left = 24
    Top = 326
    Width = 96
    Height = 25
    Color = clNone
    Caption = 'Save'
    ElementID = 'view.track.form.btSave'
    TabOrder = 1
    OnClick = btSaveClick
  end
  object btDelete: TWebButton
    Left = 305
    Top = 326
    Width = 96
    Height = 25
    Color = clNone
    Caption = 'Delete'
    ElementID = 'view.track.form.btDelete'
    TabOrder = 2
    OnClick = btDeleteClick
  end
  object edName: TWebDBEdit
    Left = 89
    Top = 184
    Width = 180
    Height = 21
    ElementID = 'view.track.form.edName'
    TabOrder = 3
    Text = 'edName'
    DataField = 'Name'
    DataSource = dsTrack
  end
  object edId: TWebDBEdit
    Left = 89
    Top = 157
    Width = 92
    Height = 21
    ElementID = 'view.track.form.edId'
    Enabled = False
    TabOrder = 4
    Text = 'edId'
    DataField = 'Id'
    DataSource = dsTrack
  end
  object cbGenre: TWebComboBox
    Left = 88
    Top = 265
    Width = 181
    Height = 21
    ElementID = 'view.track.form.cbGenre'
    TabOrder = 5
    ItemIndex = -1
  end
  object edComposer: TWebDBEdit
    Left = 89
    Top = 211
    Width = 180
    Height = 21
    ElementID = 'view.track.form.edComposer'
    TabOrder = 6
    Text = 'edComposer'
    DataField = 'Composer'
    DataSource = dsTrack
  end
  object edMilliseconds: TWebDBEdit
    Left = 89
    Top = 238
    Width = 180
    Height = 21
    ElementID = 'view.track.form.edMilliseconds'
    TabOrder = 7
    Text = 'edMilliseconds'
    DataField = 'Milliseconds'
    DataSource = dsTrack
  end
  object pnlMessage: TWebPanel
    Left = 296
    Top = 113
    Width = 273
    Height = 60
    ElementID = 'view.track.form.message'
    BorderColor = clSilver
    BorderStyle = bsSingle
    object lbMessage: TWebLabel
      Left = 16
      Top = 24
      Width = 42
      Height = 13
      Caption = 'Message'
      ElementID = 'view.track.form.message.label'
    end
    object WebButton1: TWebButton
      Left = 248
      Top = 11
      Width = 22
      Height = 25
      Color = clNone
      Caption = 'x'
      ElementID = 'view.track.form.message.button'
      OnClick = WebButton1Click
    end
  end
  object dsTrack: TWebDataSource
    DataSet = TrackDataset
    Left = 152
    Top = 64
  end
  object TrackDataset: TXDataWebDataSet
    AfterApplyUpdates = TrackDatasetAfterApplyUpdates
    EntitySetName = 'Track'
    Connection = DMConnection.ApiConnection
    SubpropsDepth = 1
    Left = 152
    Top = 8
    object TrackDatasetId: TIntegerField
      FieldName = 'Id'
    end
    object TrackDatasetName: TStringField
      FieldName = 'Name'
      Size = 255
    end
    object TrackDatasetComposer: TStringField
      FieldName = 'Composer'
      Size = 255
    end
    object TrackDatasetMilliseconds: TIntegerField
      FieldName = 'Milliseconds'
    end
    object TrackDatasetGenre: TVariantField
      FieldName = 'Genre'
    end
  end
  object XDataClientTrackDelete: TXDataWebClient
    Connection = DMConnection.ApiConnection
    OnLoad = XDataClientTrackDeleteLoad
    OnError = XDataClientTrackDeleteError
    Left = 48
    Top = 64
  end
  object GenreDataset: TXDataWebDataSet
    AfterOpen = GenreDatasetAfterOpen
    EntitySetName = 'Genre'
    Connection = DMConnection.ApiConnection
    Left = 248
    Top = 8
    object GenreDatasetId: TIntegerField
      FieldName = 'Id'
    end
    object GenreDatasetName: TStringField
      FieldName = 'Name'
      Size = 255
    end
  end
  object XDataClientTrackGet: TXDataWebClient
    Connection = DMConnection.ApiConnection
    OnLoad = XDataClientTrackGetLoad
    Left = 48
    Top = 8
  end
end
