buy.dfm

这是一个DELPHI7应用案例开发篇有配套程序种子光盘

object frmBuy: TfrmBuy
  Left = 281
  Top = 156
  Width = 654
  Height = 447
  Caption = 'frmBuy'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -15
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 15
  object Splitter1: TSplitter
    Left = 0
    Top = 189
    Width = 646
    Height = 3
    Cursor = crVSplit
    Align = alTop
  end
  object Panel1: TPanel
    Left = 0
    Top = 192
    Width = 646
    Height = 228
    Align = alClient
    Caption = 'Panel1'
    TabOrder = 0
    object DBNavigator2: TDBNavigator
      Left = 1
      Top = 1
      Width = 644
      Height = 25
      DataSource = DataModule1.dsBuy1
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbDelete, nbRefresh]
      Align = alTop
      TabOrder = 0
    end
    object DBGrid2: TDBGrid
      Left = 1
      Top = 26
      Width = 644
      Height = 160
      Align = alClient
      DataSource = DataModule1.dsBuy1
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 1
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -15
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
    end
    object Panel3: TPanel
      Left = 1
      Top = 186
      Width = 644
      Height = 41
      Align = alBottom
      TabOrder = 2
      object Button1: TButton
        Left = 44
        Top = 12
        Width = 109
        Height = 25
        Caption = #22686#21152#36827#36135#35760#24405
        TabOrder = 0
        OnClick = Button1Click
      end
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 646
    Height = 189
    Align = alTop
    Caption = 'Panel2'
    TabOrder = 1
    object Splitter2: TSplitter
      Left = 457
      Top = 26
      Height = 162
      Align = alRight
    end
    object DBNavigator1: TDBNavigator
      Left = 1
      Top = 1
      Width = 644
      Height = 25
      DataSource = DataModule1.dsBuy2
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbDelete, nbRefresh]
      Align = alTop
      TabOrder = 0
    end
    object DBGrid1: TDBGrid
      Left = 1
      Top = 26
      Width = 456
      Height = 162
      Align = alClient
      DataSource = DataModule1.dsBuy2
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 1
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -15
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
    end
    object DBMemo1: TDBMemo
      Left = 460
      Top = 26
      Width = 185
      Height = 162
      Align = alRight
      DataField = 'Memoir'
      DataSource = DataModule1.dsBuy2
      TabOrder = 2
    end
  end
end