uprstorage.~dfm

来自「DELPHI编程入门篇.从基础入手,浅显易懂,一定物有所值.」· ~DFM 代码 · 共 264 行

object frmprstorage: Tfrmprstorage
  Left = 231
  Top = 250
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = #21830#21697#24211#23384
  ClientHeight = 417
  ClientWidth = 660
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object SpeedButton1: TSpeedButton
    Left = 408
    Top = 385
    Width = 75
    Height = 25
    Caption = #26597#35810
    Glyph.Data = {
      36040000424D3604000000000000360000002800000010000000100000000100
      2000000000000004000000000000000000000000000000000000FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF0000000000BDBDBD0000000000FF00FF00FF00
      FF00FF00FF00FF00FF000000000000000000FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF000000000000000000000000007B7B7B00FF00
      FF00FF00FF007B7B7B000000000000000000FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00000000000000000000000000000000000000
      000000000000000000000000000000000000FF00FF00FF00FF00FF00FF000000
      000000000000000000000000000000000000BDBDBD0000000000000000000000
      0000BDBDBD00000000000000000000000000FF00FF00FF00FF00FF00FF000000
      0000FF00FF000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000FF00FF00FF00FF00FF00FF000000
      0000FF00FF00FF00FF00FF00FF00FF00FF00000000000000000000000000FF00
      FF00000000000000000000000000FF00FF00FF00FF00FF00FF00FF00FF000000
      0000FF000000FF000000FF000000FF000000FF0000000000000000000000FF00
      0000FF0000000000000000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF000000FF00FF00FF00FF00FF00FF00FF00FF000000000000000000FF00
      FF00FF00FF000000000000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF00
      0000FF000000FF000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF000000BDBDBD00FF000000BDBDBD00FF000000FF000000BDBDBD00FF00
      0000BDBDBD00FF000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF00
      0000FF000000FF000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00}
    OnClick = SpeedButton1Click
  end
  object SpeedButton2: TSpeedButton
    Left = 494
    Top = 385
    Width = 75
    Height = 25
    Caption = #25171#21360
    Glyph.Data = {
      36040000424D3604000000000000360000002800000010000000100000000100
      2000000000000004000000000000000000000000000000000000FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000FF00FF00FF00FF00FF00FF00FF00FF000000
      0000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF0000000000FF00FF0000000000FF00FF00FF00FF00000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000FF00FF0000000000FF00FF0000000000FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF0000FFFF0000FFFF0000FF
      FF00FF00FF00FF00FF00000000000000000000000000FF00FF0000000000FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF007B7B7B007B7B7B007B7B
      7B00FF00FF00FF00FF0000000000FF00FF0000000000FF00FF00000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000FF00FF00FF00FF000000000000000000FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF0000000000FF00FF0000000000FF00FF0000000000FF00FF000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000FF00FF0000000000FF00FF000000000000000000FF00FF00FF00
      FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
      FF00FFFFFF0000000000FF00FF0000000000FF00FF0000000000FF00FF00FF00
      FF00FF00FF0000000000FFFFFF00000000000000000000000000000000000000
      0000FFFFFF0000000000000000000000000000000000FF00FF00FF00FF00FF00
      FF00FF00FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
      FF00FFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF0000000000FFFFFF000000000000000000000000000000
      000000000000FFFFFF0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
      FF00FFFFFF00FFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00000000000000000000000000000000000000
      000000000000000000000000000000000000FF00FF00FF00FF00}
    OnClick = SpeedButton2Click
  end
  object SpeedButton3: TSpeedButton
    Left = 580
    Top = 385
    Width = 75
    Height = 25
    Caption = #20851#38381
    Glyph.Data = {
      36040000424D3604000000000000360000002800000010000000100000000100
      2000000000000004000000000000000000000000000000000000FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF0000000000FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF007B7B7B007B7B00007B7B
      000000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF007B7B7B007B7B00007B7B
      00007B7B00007B7B000000000000FF00FF00FF00FF00FF00FF00000000000000
      0000000000000000000000000000FF00FF00FF00FF007B7B7B007B7B00007B7B
      00007B7B00007B7B00007B7B00007B7B00000000000000000000FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF007B7B7B007B7B00007B7B
      00007B7B00007B7B00007B7B00007B7B000000000000FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF007B7B7B007B7B7B007B7B7B007B7B00007B7B
      00007B7B00007B7B00007B7B00007B7B000000000000FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF007B7B7B007B7B7B007B7B7B007B7B00007B7B
      00007B7B00007B7B00007B7B00007B7B000000000000FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF000000FF007B7B7B007B7B7B007B7B7B007B7B00007B7B
      7B007B7B00007B7B00007B7B00007B7B000000000000FF00FF00FF00FF00FF00
      FF0000007B0000007B000000FF000000FF007B7B7B007B7B7B007B7B00007B7B
      7B007B7B00007B7B00007B7B00007B7B000000000000FF00FF00FF00FF00FF00
      FF000000FF000000FF000000FF000000FF000000FF007B7B7B007B7B00007B7B
      00007B7B00007B7B00007B7B00007B7B000000000000FF00FF00FF00FF00FF00
      FF000000FF000000FF000000FF000000FF007B7B7B007B7B7B007B7B00007B7B
      00007B7B00007B7B00007B7B00007B7B000000000000FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF000000FF007B7B7B007B7B7B007B7B7B007B7B00007B7B
      00007B7B00007B7B00007B7B00007B7B000000000000FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF007B7B7B007B7B7B007B7B7B00FFFF00007B7B
      00007B7B00007B7B00007B7B00007B7B000000000000FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF007B7B7B007B7B7B007B7B7B007B7B7B007B7B
      7B00FFFF00007B7B00007B7B00007B7B000000000000FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF007B7B7B007B7B7B007B7B7B007B7B7B007B7B
      7B007B7B7B007B7B7B00FFFF00007B7B000000000000FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF007B7B7B007B7B7B007B7B7B007B7B7B007B7B
      7B007B7B7B007B7B7B007B7B7B007B7B7B0000000000FF00FF00}
    OnClick = SpeedButton3Click
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 660
    Height = 35
    Align = alTop
    TabOrder = 0
    object Label1: TLabel
      Left = 8
      Top = 11
      Width = 42
      Height = 13
      Caption = #20998#24215#65306
    end
    object Label2: TLabel
      Left = 150
      Top = 11
      Width = 42
      Height = 13
      Caption = #37096#31867#65306
    end
    object Label3: TLabel
      Left = 293
      Top = 11
      Width = 70
      Height = 13
      Caption = #21830#21697#32534#21495#65306
    end
    object Label4: TLabel
      Left = 469
      Top = 11
      Width = 70
      Height = 13
      Caption = #21830#21697#21517#31216#65306
    end
    object ComboBox1: TComboBox
      Left = 43
      Top = 7
      Width = 95
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 0
      Text = #20840#37096#20998#24215
      Items.Strings = (
        #20840#37096#20998#24215)
    end
    object ComboBox2: TComboBox
      Left = 186
      Top = 7
      Width = 95
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 1
      Text = #20840#37096#37096#31867
      Items.Strings = (
        #20840#37096#37096#31867)
    end
    object Edit1: TEdit
      Left = 356
      Top = 7
      Width = 100
      Height = 21
      TabOrder = 2
    end
    object Edit2: TEdit
      Left = 532
      Top = 7
      Width = 121
      Height = 21
      TabOrder = 3
    end
  end
  object StringGrid1: TStringGrid
    Left = 0
    Top = 36
    Width = 657
    Height = 341
    DefaultColWidth = 100
    DefaultRowHeight = 20
    FixedCols = 0
    RowCount = 2
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing]
    TabOrder = 1
    ColWidths = (
      100
      150
      100
      100
      100)
  end
  object ADOQuery1: TADOQuery
    Connection = DataModule2.filialeConnect
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from prstore')
    Left = 226
    Top = 96
  end
  object RvProject1: TRvProject
    ProjectFile = 'D:\work\new\Prstorage.rav'
    Left = 164
    Top = 128
  end
  object storageConnection1: TRvDataSetConnection
    RuntimeVisibility = rtDeveloper
    DataSet = ADOQuery1
    Left = 292
    Top = 144
  end
end