uvmadgsick.dfm

Software Requirements1. Delphi 6 SP22. Oracle 8i R33. Raize 3.0.94. ExpressQuantumGrid 4.505. Expres

inherited VMADGSick: TVMADGSick
  Width = 663
  Height = 404
  inherited RzPanel1: TRzPanel
    Width = 663
    Height = 404
    inherited RzBackground1: TRzBackground
      Width = 663
      Height = 404
    end
    inherited RzPanel2: TRzPanel
      Width = 663
      Height = 404
      inherited Grid: TcxGrid
        Width = 663
        Height = 404
        inherited GridDBTableView: TcxGridDBTableView
          DataController.Filter.Criteria = {FFFFFFFF0000000000}
          object GridDBTableViewSICKID: TcxGridDBColumn
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'SICKID'
          end
          object GridDBTableViewCODE: TcxGridDBColumn
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            SortOrder = soAscending
            Width = 100
            DataBinding.FieldName = 'CODE'
          end
          object GridDBTableViewCNAME: TcxGridDBColumn
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'CNAME'
          end
          object GridDBTableViewSEX: TcxGridDBColumn
            PropertiesClassName = 'TcxCheckComboBoxProperties'
            Properties.Delimiter = ';'
            Properties.EmptySelectionText = 'None selected'
            Properties.Items = <
              item
                Description = #30007
              end
              item
                Description = #22899
              end>
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'SEX'
          end
          object GridDBTableViewBIRTHDAY: TcxGridDBColumn
            PropertiesClassName = 'TcxDateEditProperties'
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'BIRTHDAY'
          end
          object GridDBTableViewPROFESSIONID: TcxGridDBColumn
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.KeyFieldNames = 'PROFESSIONID'
            Properties.ListColumns = <
              item
                FieldName = 'CAPTION'
              end>
            Properties.ListSource = ProfessionID
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'PROFESSIONID'
          end
          object GridDBTableViewWEDLOCKID: TcxGridDBColumn
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.KeyFieldNames = 'WEDLOCKID'
            Properties.ListColumns = <
              item
                FieldName = 'CAPTION'
              end>
            Properties.ListSource = WedlockID
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'WEDLOCKID'
          end
          object GridDBTableViewNATIVEPLACEID: TcxGridDBColumn
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.KeyFieldNames = 'NATIVEPLACEID'
            Properties.ListColumns = <
              item
                FieldName = 'CAPTION'
              end>
            Properties.ListSource = NativePlaceID
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'NATIVEPLACEID'
          end
          object GridDBTableViewNATIONID: TcxGridDBColumn
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.KeyFieldNames = 'NATIONID'
            Properties.ListColumns = <
              item
                FieldName = 'CAPTION'
              end>
            Properties.ListSource = NationID
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'NATIONID'
          end
          object GridDBTableViewPAYMENTMETHODID: TcxGridDBColumn
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.KeyFieldNames = 'PAYMENTMETHODID'
            Properties.ListColumns = <
              item
                FieldName = 'CAPTION'
              end>
            Properties.ListSource = PaymentMethodID
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'PAYMENTMETHODID'
          end
          object GridDBTableViewCREATED: TcxGridDBColumn
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'CREATED'
          end
          object GridDBTableViewUPDATED: TcxGridDBColumn
            Visible = False
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'UPDATED'
          end
          object GridDBTableViewISVALID: TcxGridDBColumn
            PropertiesClassName = 'TcxCheckBoxProperties'
            Properties.DisplayUnchecked = 'False'
            Properties.ValueChecked = 1
            Properties.ValueUnchecked = 0
            Visible = False
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'ISVALID'
          end
          object GridDBTableViewTOLLSTATIONID: TcxGridDBColumn
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.KeyFieldNames = 'TOLLSTATIONID'
            Properties.ListColumns = <
              item
                FieldName = 'CAPTION'
              end>
            Properties.ListSource = TollStationID
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'TOLLSTATIONID'
          end
          object GridDBTableViewISACTIVE: TcxGridDBColumn
            PropertiesClassName = 'TcxCheckBoxProperties'
            Properties.DisplayUnchecked = 'False'
            Properties.ValueChecked = 1
            Properties.ValueUnchecked = 0
            Visible = False
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'ISACTIVE'
          end
          object GridDBTableViewCREATEBY: TcxGridDBColumn
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.KeyFieldNames = 'EMPLOYEEID'
            Properties.ListColumns = <
              item
                FieldName = 'CNAME'
              end>
            Properties.ListSource = CreateBy
            Visible = False
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'CREATEBY'
          end
          object GridDBTableViewUPDATEBY: TcxGridDBColumn
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.KeyFieldNames = 'EMPLOYEEID'
            Properties.ListColumns = <
              item
                FieldName = 'CNAME'
              end>
            Properties.ListSource = UpdateBy
            Visible = False
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'UPDATEBY'
          end
          object GridDBTableViewST: TcxGridDBColumn
            Visible = False
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'ST'
          end
          object GridDBTableViewISARREARAGE: TcxGridDBColumn
            PropertiesClassName = 'TcxCheckBoxProperties'
            Properties.DisplayUnchecked = 'False'
            Properties.ValueChecked = 1
            Properties.ValueUnchecked = 0
            Visible = False
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'ISARREARAGE'
          end
          object GridDBTableViewDEPARTMENT: TcxGridDBColumn
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'DEPARTMENT'
          end
        end
      end
    end
  end
  inherited ComponentPrinter: TdxComponentPrinter
    PreviewOptions.PreviewBoundsRect = {00000000000000002003000058020000}
  end
  inherited DataSource: TDataSource
    DataSet = MADSick.ClientDataSet
  end
  object CreateBy: TDataSource
    DataSet = MADEmployee.ClientDataSet
    Left = 56
    Top = 88
  end
  object PaymentMethodID: TDataSource
    DataSet = MADPaymentMethod.ClientDataSet
    Left = 128
    Top = 88
  end
  object NationID: TDataSource
    DataSet = MADNation.ClientDataSet
    Left = 168
    Top = 88
  end
  object NativePlaceID: TDataSource
    DataSet = MADNativePlace.ClientDataSet
    Left = 208
    Top = 88
  end
  object ProfessionID: TDataSource
    DataSet = MADProfession.ClientDataSet
    Left = 248
    Top = 88
  end
  object WedlockID: TDataSource
    DataSet = MADWedlock.ClientDataSet
    Left = 288
    Top = 88
  end
  object UpdateBy: TDataSource
    DataSet = MADEmployee.ClientDataSet
    Left = 32
    Top = 128
  end
  object TollStationID: TDataSource
    DataSet = MADTollStation.ClientDataSet
    Left = 104
    Top = 128
  end
end