⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 uvmadgsick.dfm

📁 Software Requirements1. Delphi 6 SP22. Oracle 8i R33. Raize 3.0.94. ExpressQuantumGrid 4.505. Expres
💻 DFM
字号:
inherited VMADGSick: TVMADGSick
  Width = 702
  Height = 498
  inherited RzPanel1: TRzPanel
    Width = 702
    Height = 498
    inherited RzBackground1: TRzBackground
      Width = 702
      Height = 498
    end
    inherited RzPanel2: TRzPanel
      Width = 702
      Height = 498
      object Splitter1: TSplitter [0]
        Left = 313
        Top = 0
        Width = 4
        Height = 498
        Color = clAppWorkSpace
        ParentColor = False
      end
      inherited Grid: TcxGrid
        Width = 313
        Height = 498
        Align = alLeft
        inherited GridDBTableView: TcxGridDBTableView
          DataController.Filter.Criteria = {FFFFFFFF0000000000}
          object GridDBTableViewSICKID: TcxGridDBColumn
            DataBinding.FieldName = 'SICKID'
          end
          object GridDBTableViewBIRTHDAY: TcxGridDBColumn
            DataBinding.FieldName = 'BIRTHDAY'
          end
          object GridDBTableViewCNAME: TcxGridDBColumn
            SortOrder = soAscending
            DataBinding.FieldName = 'CNAME'
          end
          object GridDBTableViewCREATED: TcxGridDBColumn
            DataBinding.FieldName = 'CREATED'
          end
          object GridDBTableViewISVALID: TcxGridDBColumn
            DataBinding.FieldName = 'ISVALID'
          end
          object GridDBTableViewISACTIVE: TcxGridDBColumn
            DataBinding.FieldName = 'ISACTIVE'
          end
          object GridDBTableViewST: TcxGridDBColumn
            DataBinding.FieldName = 'ST'
          end
          object GridDBTableViewUPDATED: TcxGridDBColumn
            DataBinding.FieldName = 'UPDATED'
          end
          object GridDBTableViewPROFESSIONID: TcxGridDBColumn
            DataBinding.FieldName = 'PROFESSIONID'
          end
          object GridDBTableViewWEDLOCKID: TcxGridDBColumn
            DataBinding.FieldName = 'WEDLOCKID'
          end
          object GridDBTableViewNATIVEPLACEID: TcxGridDBColumn
            DataBinding.FieldName = 'NATIVEPLACEID'
          end
          object GridDBTableViewNATIONID: TcxGridDBColumn
            DataBinding.FieldName = 'NATIONID'
          end
          object GridDBTableViewPAYMENTMETHODID: TcxGridDBColumn
            DataBinding.FieldName = 'PAYMENTMETHODID'
          end
          object GridDBTableViewCREATEBY: TcxGridDBColumn
            DataBinding.FieldName = 'CREATEBY'
          end
          object GridDBTableViewUPDATEBY: TcxGridDBColumn
            DataBinding.FieldName = 'UPDATEBY'
          end
          object GridDBTableViewCODE: TcxGridDBColumn
            DataBinding.FieldName = 'CODE'
          end
          object GridDBTableViewISARREARAGE: TcxGridDBColumn
            DataBinding.FieldName = 'ISARREARAGE'
          end
          object GridDBTableViewSEX: TcxGridDBColumn
            PropertiesClassName = 'TcxCheckComboBoxProperties'
            Properties.Delimiter = ';'
            Properties.EmptySelectionText = 'None selected'
            Properties.Items = <
              item
                Description = #30007
              end
              item
                Description = #22899
              end>
            DataBinding.FieldName = 'SEX'
          end
          object GridDBTableViewTOLLSTATIONID: TcxGridDBColumn
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.KeyFieldNames = 'TOLLSTATIONID'
            Properties.ListColumns = <
              item
                FieldName = 'CAPTION'
              end>
            Properties.ListSource = TollStationID
            DataBinding.FieldName = 'TOLLSTATIONID'
          end
        end
      end
      object RzPanel3: TRzPanel
        Left = 317
        Top = 0
        Width = 385
        Height = 498
        Align = alClient
        BorderOuter = fsFlat
        TabOrder = 1
        object Splitter2: TSplitter
          Left = 1
          Top = 249
          Width = 383
          Height = 4
          Cursor = crVSplit
          Align = alTop
          Color = clInactiveCaption
          ParentColor = False
        end
        inline PagesViewRecipe: TAdapterDataPagesView
          Left = 1
          Top = 1
          Width = 383
          Height = 248
          Align = alTop
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          inherited RzPanel1: TRzPanel
            Width = 383
            Height = 248
            inherited RzBackground1: TRzBackground
              Width = 383
              Height = 248
            end
            inherited RzPanel2: TRzPanel
              Width = 383
              Height = 248
              inherited Pages: TRzPageControl
                Width = 381
                Height = 207
                FixedDimension = 0
              end
              inherited RzPanel3: TRzPanel
                Width = 381
              end
            end
          end
        end
        inline PagesViewReckoning: TAdapterDataPagesView
          Left = 1
          Top = 253
          Width = 383
          Height = 244
          Align = alClient
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
          inherited RzPanel1: TRzPanel
            Width = 383
            Height = 244
            inherited RzBackground1: TRzBackground
              Width = 383
              Height = 244
            end
            inherited RzPanel2: TRzPanel
              Width = 383
              Height = 244
              inherited Pages: TRzPageControl
                Width = 381
                Height = 203
                FixedDimension = 0
              end
              inherited RzPanel3: TRzPanel
                Width = 381
              end
            end
          end
        end
      end
    end
  end
  inherited FrameController: TRzFrameController
    Top = 8
  end
  inherited ComponentPrinter: TdxComponentPrinter
    PreviewOptions.PreviewBoundsRect = {00000000000000002003000058020000}
    Left = 48
    Top = 8
  end
  inherited DataSource: TDataSource
    DataSet = MADSick.ClientDataSet
    Left = 88
    Top = 8
  end
  object CreateBy: TDataSource
    DataSet = MADEmployee.ClientDataSet
    Left = 24
    Top = 96
  end
  object PaymentMethodID: TDataSource
    DataSet = MADPaymentMethod.ClientDataSet
    Left = 64
    Top = 128
  end
  object NationID: TDataSource
    DataSet = MADNation.ClientDataSet
    Left = 128
    Top = 128
  end
  object NativePlaceID: TDataSource
    DataSet = MADNativePlace.ClientDataSet
    Left = 96
    Top = 128
  end
  object ProfessionID: TDataSource
    DataSet = MADProfession.ClientDataSet
    Left = 96
    Top = 96
  end
  object WedlockID: TDataSource
    DataSet = MADWedlock.ClientDataSet
    Left = 128
    Top = 96
  end
  object UpdateBy: TDataSource
    DataSet = MADEmployee.ClientDataSet
    Left = 64
    Top = 96
  end
  object TollStationID: TDataSource
    DataSet = MADTollStation.ClientDataSet
    Left = 24
    Top = 128
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -