object FViewAlbumEdit: TFViewAlbumEdit
  Left = 0
  Top = 0
  Width = 593
  Height = 480
  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.album.form.lbId'
    Transparent = False
  end
  object WebLabel3: TWebLabel
    Left = 24
    Top = 187
    Width = 31
    Height = 13
    Caption = 'Name:'
    ElementID = 'view.album.form.lbName'
    Transparent = False
  end
  object WebLabel2: TWebLabel
    Left = 24
    Top = 214
    Width = 30
    Height = 13
    Caption = 'Artist:'
    ElementID = 'view.album.form.lbArtist'
    Transparent = False
  end
  object WebLabel4: TWebLabel
    Left = 20
    Top = 238
    Width = 35
    Height = 13
    Caption = 'Tracks:'
    ElementID = 'view.album.form.lbTracks'
    Transparent = False
  end
  object btCancel: TWebButton
    Left = 126
    Top = 422
    Width = 96
    Height = 25
    Color = clNone
    Caption = 'Cancel'
    ElementID = 'view.album.form.btBack'
    OnClick = btCancelClick
  end
  object btSave: TWebButton
    Left = 24
    Top = 422
    Width = 96
    Height = 25
    Color = clNone
    Caption = 'Save'
    ElementID = 'view.album.form.btSave'
    TabOrder = 1
    OnClick = btSaveClick
  end
  object btDelete: TWebButton
    Left = 305
    Top = 422
    Width = 96
    Height = 25
    Color = clNone
    Caption = 'Delete'
    ElementID = 'view.album.form.btDelete'
    TabOrder = 2
    OnClick = btDeleteClick
  end
  object edName: TWebDBEdit
    Left = 61
    Top = 184
    Width = 180
    Height = 21
    ElementID = 'view.album.form.edName'
    TabOrder = 3
    Text = 'edName'
    DataField = 'Name'
    DataSource = dsAlbum
  end
  object edId: TWebDBEdit
    Left = 61
    Top = 157
    Width = 92
    Height = 21
    ElementID = 'view.album.form.edId'
    Enabled = False
    TabOrder = 4
    Text = 'edId'
    DataField = 'Id'
    DataSource = dsAlbum
  end
  object cbArtist: TWebComboBox
    Left = 61
    Top = 211
    Width = 181
    Height = 21
    ElementID = 'view.album.form.cbArtist'
    TabOrder = 5
    ItemIndex = -1
  end
  object tblTracks: TWebDBTableControl
    Left = 61
    Top = 238
    Width = 340
    Height = 152
    ElementClassName = 'table-responsive'
    ElementId = 'view.album.form.tblTracks'
    BorderColor = clSilver
    ElementTableClassName = 'table table-striped table-bordered table-hover'
    Columns = <>
    DataSource = dsTracks
  end
  object pnlMessage: TWebPanel
    Left = 296
    Top = 113
    Width = 273
    Height = 60
    ElementID = 'view.album.form.message'
    BorderColor = clSilver
    BorderStyle = bsSingle
    object lbMessage: TWebLabel
      Left = 16
      Top = 24
      Width = 42
      Height = 13
      Caption = 'Message'
      ElementID = 'view.album.form.message.label'
    end
    object WebButton1: TWebButton
      Left = 248
      Top = 11
      Width = 22
      Height = 25
      Color = clNone
      Caption = 'x'
      ElementID = 'view.album.form.message.button'
      OnClick = WebButton1Click
    end
  end
  object dsAlbum: TWebDataSource
    DataSet = AlbumDataset
    Left = 184
    Top = 56
  end
  object AlbumDataset: TXDataWebDataSet
    AfterApplyUpdates = AlbumDatasetAfterApplyUpdates
    EntitySetName = 'Album'
    Connection = DMConnection.ApiConnection
    SubpropsDepth = 1
    Left = 184
    Top = 8
    object AlbumDatasetId: TIntegerField
      FieldName = 'Id'
    end
    object AlbumDatasetName: TStringField
      FieldName = 'Name'
      Size = 255
    end
    object AlbumDatasetArtist: TVariantField
      FieldName = 'Artist'
    end
    object AlbumDatasetTracks: TXDataWebDatasetField
      FieldName = 'Tracks'
      ReadOnly = True
    end
  end
  object ArtistDataset: TXDataWebDataSet
    AfterOpen = ArtistDatasetAfterOpen
    EntitySetName = 'Artist'
    Connection = DMConnection.ApiConnection
    Left = 288
    Top = 8
    object ArtistDatasetId: TIntegerField
      FieldName = 'Id'
    end
    object ArtistDatasetName: TStringField
      FieldName = 'Name'
      Size = 255
    end
  end
  object TracksDataset: TXDataWebDataSet
    EntitySetName = 'Track'
    Connection = DMConnection.ApiConnection
    Left = 376
    Top = 8
    object TracksDatasetId: TIntegerField
      FieldName = 'Id'
    end
    object TracksDatasetName: TStringField
      FieldName = 'Name'
      Size = 255
    end
    object TracksDatasetComposer: TStringField
      FieldName = 'Composer'
      Size = 255
    end
    object TracksDatasetMilliseconds: TIntegerField
      FieldName = 'Milliseconds'
    end
    object TracksDatasetGenreName: TStringField
      FieldName = 'Genre.Name'
      Size = 255
    end
  end
  object dsTracks: TWebDataSource
    DataSet = TracksDataset
    Left = 376
    Top = 56
  end
  object XDataClientAlbumGet: TXDataWebClient
    Connection = DMConnection.ApiConnection
    OnLoad = XDataClientAlbumGetLoad
    Left = 56
    Top = 8
  end
  object XDataClientAlbumDelete: TXDataWebClient
    Connection = DMConnection.ApiConnection
    OnLoad = XDataClientAlbumDeleteLoad
    OnError = XDataClientAlbumDeleteError
    Left = 56
    Top = 56
  end
end
