product.dfm

来自「Rave Report 查看器,格式转换器,Rave生成的Ndr中文会乱码,用这」· DFM 代码 · 共 105 行

object fmProduct: TfmProduct
  Left = 188
  Top = 113
  Width = 696
  Height = 538
  Caption = #20135#21697#36164#26009
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 688
    Height = 57
    Align = alTop
    Caption = 'Panel1'
    TabOrder = 0
    object Button1: TButton
      Left = 160
      Top = 16
      Width = 75
      Height = 25
      Caption = 'Button1'
      TabOrder = 0
      OnClick = Button1Click
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 394
    Width = 688
    Height = 110
    Align = alBottom
    Caption = 'Panel2'
    TabOrder = 1
    object Sourimg: TImage
      Left = 168
      Top = 16
      Width = 81
      Height = 81
      Stretch = True
    end
    object Image1: TImage
      Left = 528
      Top = 1
      Width = 159
      Height = 108
      Stretch = True
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 57
    Width = 688
    Height = 337
    Align = alClient
    Caption = 'Panel3'
    TabOrder = 2
    object ListView1: TListView
      Left = 1
      Top = 1
      Width = 686
      Height = 335
      Align = alClient
      Columns = <>
      LargeImages = ImageList1
      TabOrder = 0
      OnDblClick = ListView1DblClick
    end
  end
  object qProduct: TADOQuery
    Connection = dmquery.cn
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from [v - quote product]')
    Left = 80
    Top = 24
  end
  object ImageList1: TImageList
    Height = 100
    Width = 100
    Left = 424
    Top = 24
  end
  object ActionList1: TActionList
    Left = 512
    Top = 153
    object InitimgList: TAction
      Caption = #22270#20687#21516#27493
      OnExecute = InitimgListExecute
    end
  end
end