svn/view/Unit11.dfm

object AdminFile: TAdminFile
  Left = 0
  Top = 0
  Width = 481
  Height = 692
  RenderInvisibleControls = True
  AllowPageAccess = True
  ConnectionMode = cmAny
  OnCreate = IWAppFormCreate
  OnDestroy = IWAppFormDestroy
  Background.Fixed = False
  LayoutMgr = IWTemplateProcessorHTML1
  HandleTabs = False
  LeftToRight = True
  LockUntilLoaded = True
  LockOnSubmit = True
  ShowHint = True
  XPTheme = True
  DesignLeft = 8
  DesignTop = 8
  object IWGrid1: TIWGrid
    Left = 63
    Top = 413
    Width = 300
    Height = 150
    BorderColors.Color = clNone
    BorderColors.Light = clNone
    BorderColors.Dark = clNone
    BGColor = clNone
    BorderSize = 1
    BorderStyle = tfDefault
    Caption = 'IWGrid1'
    CellPadding = 0
    CellSpacing = 0
    Font.Color = clNone
    Font.Size = 10
    Font.Style = []
    FrameBuffer = 40
    Lines = tlAll
    UseFrame = False
    UseSize = True
    OnRender = IWGrid1Render
    FriendlyName = 'IWGrid1'
    ColumnCount = 5
    OnCellClick = IWGrid1CellClick
    RowCount = 1
    ShowEmptyCells = True
    ShowInvisibleRows = True
    ScrollToCurrentRow = False
  end
  object IWButton2: TIWButton
    Left = 369
    Top = 472
    Width = 75
    Height = 25
    Caption = 'IWButton2'
    Color = clBtnFace
    Font.Color = clNone
    Font.Size = 10
    Font.Style = []
    FriendlyName = 'IWButton2'
    TabOrder = 8
    OnClick = IWButton2Click
  end
  object IWFileUploader1: TIWFileUploader
    Left = 29
    Top = 503
    Width = 400
    Height = 60
    TabOrder = 9
    TextStrings.DragText = 'Drop files here to upload'
    TextStrings.UploadButtonText = 'Upload a file'
    TextStrings.CancelButtonText = 'Cancel'
    TextStrings.UploadErrorText = 'Upload failed'
    TextStrings.MultipleFileDropNotAllowedText = 'You may only drop a single file'
    TextStrings.OfTotalText = 'of'
    TextStrings.RemoveButtonText = 'Remove'
    TextStrings.TypeErrorText = 
      '{file} has an invalid extension. Only {extensions} files are all' +
      'owed.'
    TextStrings.SizeErrorText = '{file} is too large, maximum file size is {sizeLimit}.'
    TextStrings.MinSizeErrorText = '{file} is too small, minimum file size is {minSizeLimit}.'
    TextStrings.EmptyErrorText = '{file} is empty, please select files again without it.'
    TextStrings.NoFilesErrorText = 'No files to upload.'
    TextStrings.OnLeaveWarningText = 
      'The files are being uploaded, if you leave now the upload will b' +
      'e cancelled.'
    Style.ButtonOptions.Alignment = taCenter
    Style.ButtonOptions.Font.Color = clWebWHITE
    Style.ButtonOptions.Font.FontFamily = 'Arial, Sans-Serif, Verdana'
    Style.ButtonOptions.Font.Size = 10
    Style.ButtonOptions.Font.Style = []
    Style.ButtonOptions.FromColor = clWebMAROON
    Style.ButtonOptions.ToColor = clWebMAROON
    Style.ButtonOptions.Height = 30
    Style.ButtonOptions.Width = 200
    Style.ButtonHoverOptions.Alignment = taCenter
    Style.ButtonHoverOptions.Font.Color = clWebWHITE
    Style.ButtonHoverOptions.Font.FontFamily = 'Arial, Sans-Serif, Verdana'
    Style.ButtonHoverOptions.Font.Size = 10
    Style.ButtonHoverOptions.Font.Style = []
    Style.ButtonHoverOptions.FromColor = 214
    Style.ButtonHoverOptions.ToColor = 214
    Style.ListOptions.Alignment = taLeftJustify
    Style.ListOptions.Font.Color = clWebBLACK
    Style.ListOptions.Font.FontFamily = 'Arial, Sans-Serif, Verdana'
    Style.ListOptions.Font.Size = 10
    Style.ListOptions.Font.Style = []
    Style.ListOptions.FromColor = clWebGOLD
    Style.ListOptions.ToColor = clWebGOLD
    Style.ListOptions.Height = 30
    Style.ListOptions.Width = 0
    Style.ListSuccessOptions.Alignment = taLeftJustify
    Style.ListSuccessOptions.Font.Color = clWebWHITE
    Style.ListSuccessOptions.Font.FontFamily = 'Arial, Sans-Serif, Verdana'
    Style.ListSuccessOptions.Font.Size = 10
    Style.ListSuccessOptions.Font.Style = []
    Style.ListSuccessOptions.FromColor = clWebFORESTGREEN
    Style.ListSuccessOptions.ToColor = clWebFORESTGREEN
    Style.ListErrorOptions.Alignment = taLeftJustify
    Style.ListErrorOptions.Font.Color = clWebWHITE
    Style.ListErrorOptions.Font.FontFamily = 'Arial, Sans-Serif, Verdana'
    Style.ListErrorOptions.Font.Size = 10
    Style.ListErrorOptions.Font.Style = []
    Style.ListErrorOptions.FromColor = clWebRED
    Style.ListErrorOptions.ToColor = clWebRED
    Style.DropAreaOptions.Alignment = taCenter
    Style.DropAreaOptions.Font.Color = clWebWHITE
    Style.DropAreaOptions.Font.FontFamily = 'Arial, Sans-Serif, Verdana'
    Style.DropAreaOptions.Font.Size = 10
    Style.DropAreaOptions.Font.Style = []
    Style.DropAreaOptions.FromColor = clWebDARKORANGE
    Style.DropAreaOptions.ToColor = clWebDARKORANGE
    Style.DropAreaOptions.Height = 60
    Style.DropAreaOptions.Width = 0
    Style.DropAreaActiveOptions.Alignment = taCenter
    Style.DropAreaActiveOptions.Font.Color = clWebWHITE
    Style.DropAreaActiveOptions.Font.FontFamily = 'Arial, Sans-Serif, Verdana'
    Style.DropAreaActiveOptions.Font.Size = 10
    Style.DropAreaActiveOptions.Font.Style = []
    Style.DropAreaActiveOptions.FromColor = clWebLIMEGREEN
    Style.DropAreaActiveOptions.ToColor = clWebLIMEGREEN
    Style.DropAreaActiveOptions.Height = 60
    Style.DropAreaActiveOptions.Width = 0
    AutoUpload = False
    CssClasses.Strings = (
      'button='
      'button-hover='
      'drop-area='
      'drop-area-active='
      'drop-area-disabled='
      'list='
      'upload-spinner='
      'progress-bar='
      'upload-file='
      'upload-size='
      'upload-listItem='
      'upload-cancel='
      'upload-success='
      'upload-fail='
      'success-icon='
      'fail-icon=')
    FriendlyName = 'IWFileUploader1'
    Font.Color = clNone
    Font.Size = 10
    Font.Style = []
  end
  object IWDBGrid1: TIWDBGrid
    Left = 93
    Top = 521
    Width = 300
    Height = 150
    BorderColors.Color = clNone
    BorderColors.Light = clNone
    BorderColors.Dark = clNone
    BGColor = clNone
    BorderSize = 1
    BorderStyle = tfDefault
    Caption = #25215#35469#24453#12385#12524#12467#12540#12489
    CellPadding = 0
    CellSpacing = 0
    Font.Color = clNone
    Font.Size = 10
    Font.Style = []
    FrameBuffer = 40
    Lines = tlAll
    UseFrame = True
    UseSize = True
    ScrollToCurrentRow = False
    Columns = <>
    DataSource = DataSource1
    FooterRowCount = 0
    FriendlyName = 'IWDBGrid1'
    FromStart = True
    HighlightColor = clNone
    HighlightRows = False
    Options = [dgShowTitles]
    RefreshMode = rmAutomatic
    RowLimit = 0
    RollOver = False
    RowClick = False
    RollOverColor = clNone
    RowHeaderColor = clNone
    RowAlternateColor = clNone
    RowCurrentColor = clNone
    TabOrder = -1
  end
  object IWRegion1: TIWRegion
    Left = 1
    Top = 1
    Width = 428
    Height = 397
    RenderInvisibleControls = True
    BorderOptions.NumericWidth = 1
    BorderOptions.BorderWidth = cbwNumeric
    BorderOptions.Style = cbsSolid
    BorderOptions.Color = clNone
    object IWDBText1: TIWDBText
      Left = 148
      Top = 17
      Width = 121
      Height = 121
      ConvertSpaces = False
      DataField = 'COMMENT'
      DataSource = DataModule3.view
      FriendlyName = 'IWDBText1'
      Font.Color = clNone
      Font.Size = 10
      Font.Style = []
      RawText = False
      UseFrame = False
      WantReturns = True
    end
    object IWDBNavigator1: TIWDBNavigator
      Left = 43
      Top = 327
      Width = 300
      Height = 28
      Confirmations.Delete = 'Are you sure you want to delete this record?'
      Confirmations.Post = 'Are you sure you want to update this record?'
      Confirmations.Cancel = 'Are you sure you want to cancel your changes to this record?'
      DataSource = DataModule3.view
      FriendlyName = 'IWDBNavigator1'
      ImageHeight = 24
      ImageWidth = 24
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbDelete, nbEdit, nbPost, nbCancel, nbRefresh]
      Orientation = orHorizontal
      OnEdit = IWDBNavigator1Edit
      OnInsert = IWDBNavigator1Insert
      OnDelete = IWDBNavigator1Delete
      OnPost = IWDBNavigator1Post
      OnBeforeAction = IWDBNavigator1BeforeAction
    end
    object IWDBEdit6: TIWDBEdit
      Left = 80
      Top = 225
      Width = 121
      Height = 21
      Font.Color = clNone
      Font.Size = 10
      Font.Style = []
      FriendlyName = 'IWDBEdit6'
      SubmitOnAsyncEvent = True
      TabOrder = 0
      AutoEditable = False
      DataField = 'WEIGHT'
      PasswordPrompt = False
      DataSource = DataModule3.view
    end
    object IWDBEdit5: TIWDBEdit
      Left = 80
      Top = 184
      Width = 121
      Height = 21
      Font.Color = clNone
      Font.Size = 10
      Font.Style = []
      FriendlyName = 'IWDBEdit5'
      MaxLength = 80
      SubmitOnAsyncEvent = True
      TabOrder = 2
      AutoEditable = False
      DataField = 'PRICE'
      PasswordPrompt = False
      DataSource = DataModule3.view
    end
    object IWDBEdit4: TIWDBEdit
      Left = 284
      Top = 300
      Width = 121
      Height = 21
      Font.Color = clNone
      Font.Size = 10
      Font.Style = []
      FriendlyName = 'IWDBEdit4'
      SubmitOnAsyncEvent = True
      TabOrder = 4
      AutoEditable = False
      DataField = 'STOCK'
      PasswordPrompt = False
      DataSource = DataModule3.view
    end
    object IWDBEdit3: TIWDBEdit
      Left = 284
      Top = 263
      Width = 121
      Height = 21
      Font.Color = clNone
      Font.Size = 10
      Font.Style = []
      FriendlyName = 'IWDBEdit3'
      MaxLength = 80
      SubmitOnAsyncEvent = True
      TabOrder = 5
      AutoEditable = False
      DataField = 'CATEGORY'
      PasswordPrompt = False
      DataSource = DataModule3.view
    end
    object IWDBEdit2: TIWDBEdit
      Left = 284
      Top = 225
      Width = 121
      Height = 21
      Font.Color = clNone
      Font.Size = 10
      Font.Style = []
      FriendlyName = 'IWDBEdit2'
      MaxLength = 480
      SubmitOnAsyncEvent = True
      TabOrder = 6
      AutoEditable = False
      DataField = 'MAKER'
      PasswordPrompt = False
      DataSource = DataModule3.view
    end
    object IWDBEdit1: TIWDBEdit
      Left = 284
      Top = 184
      Width = 121
      Height = 21
      Font.Color = clNone
      Font.Size = 10
      Font.Style = []
      FriendlyName = 'IWDBEdit1'
      MaxLength = 480
      SubmitOnAsyncEvent = True
      TabOrder = 7
      AutoEditable = False
      DataField = 'NAME'
      PasswordPrompt = False
      DataSource = DataModule3.view
    end
    object IWButton1: TIWButton
      Left = 284
      Top = 145
      Width = 59
      Height = 25
      Caption = #35501#12415#36796#12415
      Color = clBtnFace
      Font.Color = clNone
      Font.Size = 10
      Font.Style = []
      FriendlyName = 'IWButton1'
      TabOrder = 3
      OnClick = IWButton1Click
    end
    object IWLabel1: TIWLabel
      Left = 220
      Top = 189
      Width = 49
      Height = 16
      Font.Color = clNone
      Font.Size = 10
      Font.Style = []
      HasTabOrder = False
      FriendlyName = 'IWLabel1'
      Caption = #21830#21697#21517
    end
    object IWLabel2: TIWLabel
      Left = 220
      Top = 230
      Width = 66
      Height = 16
      Font.Color = clNone
      Font.Size = 10
      Font.Style = []
      HasTabOrder = False
      FriendlyName = 'IWLabel2'
      Caption = #12513#12540#12459#12540#21517
    end
    object IWLabel3: TIWLabel
      Left = 220
      Top = 263
      Width = 47
      Height = 16
      Font.Color = clNone
      Font.Size = 10
      Font.Style = []
      HasTabOrder = False
      FriendlyName = 'IWLabel3'
      Caption = #12459#12486#12468#12522
    end
    object IWLabel4: TIWLabel
      Left = 220
      Top = 305
      Width = 49
      Height = 16
      Font.Color = clNone
      Font.Size = 10
      Font.Style = []
      HasTabOrder = False
      FriendlyName = 'IWLabel4'
      Caption = #22312#24235#25968
    end
    object IWLabel5: TIWLabel
      Left = 16
      Top = 192
      Width = 33
      Height = 16
      Font.Color = clNone
      Font.Size = 10
      Font.Style = []
      HasTabOrder = False
      FriendlyName = 'IWLabel5'
      Caption = #20516#27573
    end
    object IWLabel6: TIWLabel
      Left = 16
      Top = 230
      Width = 66
      Height = 16
      Font.Color = clNone
      Font.Size = 10
      Font.Style = []
      HasTabOrder = False
      FriendlyName = 'IWLabel6'
      Caption = #21830#21697#37325#37327
    end
    object IWImage1: TIWImage
      Left = 296
      Top = 17
      Width = 96
      Height = 64
      RenderSize = False
      StyleRenderOptions.RenderSize = False
      BorderOptions.Width = 0
      TabOrder = -1
      UseSize = False
      FriendlyName = 'IWImage1'
      TransparentColor = clNone
      JpegOptions.CompressionQuality = 90
      JpegOptions.Performance = jpBestSpeed
      JpegOptions.ProgressiveEncoding = False
      JpegOptions.Smoothing = True
    end
    object IWButton3: TIWButton
      Left = 360
      Top = 145
      Width = 45
      Height = 25
      Caption = #21066#38500
      Color = clBtnFace
      Font.Color = clNone
      Font.Size = 10
      Font.Style = []
      FriendlyName = 'IWButton3'
      TabOrder = 10
      OnClick = IWButton3Click
    end
    object IWDBCheckBox1: TIWDBCheckBox
      Left = 80
      Top = 280
      Width = 121
      Height = 21
      Caption = #12450#12463#12486#12451#12502
      Editable = True
      Font.Color = clNone
      Font.Size = 10
      Font.Style = []
      SubmitOnAsyncEvent = True
      Style = stNormal
      TabOrder = 11
      AutoEditable = False
      DataField = 'ACTIVATE'
      DataSource = DataModule3.view
      FriendlyName = 'IWDBCheckBox1'
      ValueChecked = 'true'
      ValueUnchecked = 'false'
    end
  end
  object IWTemplateProcessorHTML1: TIWTemplateProcessorHTML
    TagType = ttIntraWeb
    Templates.Default = 'adminfile.htm'
    Left = 288
    Top = 432
  end
  object FileOpenDialog1: TFileOpenDialog
    FavoriteLinks = <>
    FileTypes = <>
    Options = []
    Left = 337
    Top = 113
  end
  object FDQuery1: TFDQuery
    Connection = DataModule3.FDConnection1
    SQL.Strings = (
      'select * from item_Data where agree = false;')
    Left = 424
    Top = 600
  end
  object DataSource1: TDataSource
    DataSet = FDQuery1
    Left = 368
    Top = 600
  end
end