umasterdetail.dfm

ODAC 6 最新版的﹐網上找了好久才找到﹐不太好找啊﹐大家一起共享

      Width = 422
      Height = 89
      Cursor = crAuto
      Anchors = [akLeft, akTop, akRight]
      IW50Hint = False
      ParentShowHint = False
      ShowHint = True
      ZIndex = 0
      RenderSize = False
      BorderColors.Color = clNone
      BorderColors.Light = clNone
      BorderColors.Dark = clNone
      BGColor = clSkyBlue
      BorderSize = 1
      BorderStyle = tfDefault
      CellPadding = 0
      CellSpacing = 0
      Font.Color = clNone
      Font.FontName = 'Verdana'
      Font.Size = 10
      Font.Style = []
      FrameBuffer = 40
      Lines = tlAll
      UseFrame = True
      UseSize = True
      ScrollToCurrentRow = False
      Columns = <>
      DataSource = dsMaster
      FooterRowCount = 0
      FriendlyName = 'IWDBGrid1'
      FromStart = True
      HighlightColor = clNone
      HighlightRows = True
      Options = [dgIndicator, dgShowTitles]
      RefreshMode = rmAutomatic
      RowLimit = 0
      RollOver = False
      RowClick = False
      RollOverColor = clNone
      RowHeaderColor = 12876667
      RowAlternateColor = clNone
      RowCurrentColor = clMoneyGreen
      TabOrder = 27
    end
    object IWRegion4: TIWRegion
      Left = 144
      Top = 8
      Width = 422
      Height = 65
      Cursor = crAuto
      TabOrder = 0
      Anchors = [akLeft, akTop, akRight]
      BorderOptions.NumericWidth = 1
      BorderOptions.BorderWidth = cbwNumeric
      BorderOptions.Style = cbsSolid
      BorderOptions.Color = clNone
      Color = clNone
      ParentShowHint = False
      ShowHint = True
      ZIndex = 1000
      object meMaster: TIWMemo
        Left = 1
        Top = 1
        Width = 420
        Height = 63
        Cursor = crAuto
        Align = alClient
        IW50Hint = False
        ParentShowHint = False
        ShowHint = True
        ZIndex = 0
        RenderSize = True
        BGColor = clNone
        Editable = True
        Font.Color = clNone
        Font.Size = 10
        Font.Style = []
        ScriptEvents = <>
        InvisibleBorder = False
        HorizScrollBar = False
        VertScrollBar = True
        Required = False
        TabOrder = 16
        FriendlyName = 'meMaster'
      end
    end
  end
  object IWRegion3: TIWRegion [9]
    Left = 16
    Top = 382
    Width = 577
    Height = 174
    Cursor = crAuto
    TabOrder = 2
    Anchors = [akLeft, akTop, akRight, akBottom]
    BorderOptions.NumericWidth = 1
    BorderOptions.BorderWidth = cbwNumeric
    BorderOptions.Style = cbsSolid
    BorderOptions.Color = clNone
    Color = clWebBLACK
    ParentShowHint = False
    ShowHint = True
    ZIndex = 1000
    DesignSize = (
      577
      174)
    object IWRectangle3: TIWRectangle
      Left = 1
      Top = 1
      Width = 575
      Height = 172
      Cursor = crAuto
      Anchors = [akLeft, akTop, akRight, akBottom]
      IW50Hint = False
      ParentShowHint = False
      ShowHint = True
      ZIndex = -1
      RenderSize = True
      Font.Color = clNone
      Font.Size = 10
      Font.Style = []
      BorderOptions.Color = clNone
      BorderOptions.Width = 0
      FriendlyName = 'IWRectangle3'
      Color = 14811135
      Alignment = taLeftJustify
      VAlign = vaMiddle
    end
    object IWLabel4: TIWLabel
      Left = 8
      Top = 7
      Width = 55
      Height = 18
      Cursor = crAuto
      IW50Hint = False
      ParentShowHint = False
      ShowHint = True
      ZIndex = 0
      RenderSize = False
      Alignment = taLeftJustify
      BGColor = clNone
      Font.Color = clNone
      Font.FontName = 'Verdana'
      Font.Size = 12
      Font.Style = [fsBold]
      NoWrap = False
      FriendlyName = 'IWLabel4'
      Caption = 'Detail'
      RawText = False
    end
    object IWLabel3: TIWLabel
      Left = 8
      Top = 33
      Width = 93
      Height = 16
      Cursor = crAuto
      IW50Hint = False
      ParentShowHint = False
      ShowHint = True
      ZIndex = 0
      RenderSize = False
      Alignment = taLeftJustify
      BGColor = clNone
      Font.Color = clNone
      Font.FontName = 'Verdana'
      Font.Size = 10
      Font.Style = [fsBold]
      NoWrap = False
      FriendlyName = 'IWLabel3'
      Caption = 'DetailFields'
      RawText = False
    end
    object edDetailFields: TIWEdit
      Left = 8
      Top = 52
      Width = 121
      Height = 21
      Cursor = crAuto
      IW50Hint = False
      ParentShowHint = False
      ShowHint = True
      ZIndex = 0
      RenderSize = True
      Alignment = taLeftJustify
      BGColor = clNone
      FocusColor = clNone
      DoSubmitValidation = True
      Editable = True
      NonEditableAsLabel = True
      Font.Color = clNone
      Font.Size = 10
      Font.Style = []
      FriendlyName = 'edDetailFields'
      MaxLength = 0
      ReadOnly = False
      Required = False
      ScriptEvents = <>
      TabOrder = 10
      PasswordPrompt = False
      Text = 'edDetailFields'
    end
    object IWDBGrid2: TIWDBGrid
      Left = 144
      Top = 81
      Width = 422
      Height = 85
      Cursor = crAuto
      Anchors = [akLeft, akTop, akRight, akBottom]
      IW50Hint = False
      ParentShowHint = False
      ShowHint = True
      ZIndex = 0
      RenderSize = False
      BorderColors.Color = clNone
      BorderColors.Light = clNone
      BorderColors.Dark = clNone
      BGColor = clSkyBlue
      BorderSize = 1
      BorderStyle = tfDefault
      CellPadding = 0
      CellSpacing = 0
      Font.Color = clNone
      Font.FontName = 'Verdana'
      Font.Size = 10
      Font.Style = []
      FrameBuffer = 40
      Lines = tlAll
      UseFrame = True
      UseSize = True
      ScrollToCurrentRow = False
      Columns = <>
      DataSource = dsDetail
      FooterRowCount = 0
      FriendlyName = 'IWDBGrid2'
      FromStart = True
      HighlightColor = clNone
      HighlightRows = True
      Options = [dgIndicator, dgShowTitles]
      RefreshMode = rmAutomatic
      RowLimit = 0
      RollOver = False
      RowClick = False
      RollOverColor = clNone
      RowHeaderColor = 12876667
      RowAlternateColor = clNone
      RowCurrentColor = clMoneyGreen
      TabOrder = 29
    end
    object IWRegion5: TIWRegion
      Left = 144
      Top = 8
      Width = 422
      Height = 65
      Cursor = crAuto
      TabOrder = 0
      Anchors = [akLeft, akTop, akRight]
      BorderOptions.NumericWidth = 1
      BorderOptions.BorderWidth = cbwNumeric
      BorderOptions.Style = cbsSolid
      BorderOptions.Color = clNone
      Color = clNone
      ParentShowHint = False
      ShowHint = True
      ZIndex = 1000
      object meDetail: TIWMemo
        Left = 1
        Top = 1
        Width = 420
        Height = 63
        Cursor = crAuto
        Align = alClient
        IW50Hint = False
        ParentShowHint = False
        ShowHint = True
        ZIndex = 0
        RenderSize = True
        BGColor = clNone
        Editable = True
        Font.Color = clNone
        Font.Size = 10
        Font.Style = []
        ScriptEvents = <>
        InvisibleBorder = False
        HorizScrollBar = False
        VertScrollBar = True
        Required = False
        TabOrder = 21
        FriendlyName = 'meDetail'
      end
    end
  end
  inherited rgConnection: TIWRegion
    Width = 577
    inherited IWRectangle4: TIWRectangle
      Width = 575
    end
    inherited btConnect: TIWButton
      TabOrder = 4
    end
    inherited btDisconnect: TIWButton
      TabOrder = 5
    end
  end
  object quMaster: TOraQuery
    FetchAll = True
    Left = 192
    Top = 239
  end
  object quDetail: TOraQuery
    MasterSource = dsMaster
    FetchAll = True
    Left = 128
    Top = 407
  end
  object dsMaster: TOraDataSource
    DataSet = quMaster
    Left = 224
    Top = 239
  end
  object dsDetail: TOraDataSource
    DataSet = quDetail
    Left = 160
    Top = 407
  end
end