www.pudn.com > SingleNumber.rar > Unit4.dfm

object Form4: TForm4 
  Left = 421 
  Top = 223 
  Width = 345 
  Height = 247 
  BorderIcons = [biSystemMenu, biMinimize] 
  Caption = #25490#34892#27036 
  Color = clGradientActiveCaption 
  Font.Charset = DEFAULT_CHARSET 
  Font.Color = clWindowText 
  Font.Height = -11 
  Font.Name = 'MS Sans Serif' 
  Font.Style = [] 
  Icon.Data = { 
    0000010001002020100000000000E80200001600000028000000200000004000 
    0000010004000000000080020000000000000000000000000000000000000000 
    000000008000008000000080800080000000800080008080000080808000C0C0 
    C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFF 
    FFFFFF88FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDD8FFFFFFFFFFFFFFFFFFFFFFF 
    FFFFF8DDDFFFFFFFFFFFFFFFFFFFFFFFFFFFFD8DD8FF8FFFFFFFFFFDDDDDFFFF 
    FFFFFFFFDDFF8D8FFFFFFFDDDDDDFFFFFFFFFFFFDDFFFFDDFFFFF8DDDD8FFFDD 
    D8FFFFFF8D8FFFFDDFFFFDDDDFFFFFDDDDDDDDDDDDDDD8FFDDFFDDD8FFFFFFFD 
    D8888DDDDDDD8FFFFDD8DD8FFFFFFFF8D8FFFFFFF8DFFFFFF8DDD8FFFFFFFFFF 
    DDFFFFDFF8D8FFFFFFDD8FFFFFFF88FF8DFFFDDFFFD8FFFFFFDD8FFFFFFFDDDD 
    DD8FF8FFFFDDFFFFFDDDDFFFFFFF88DDDDDDDD88FFDDFFFF8D8DD8FFFFFFFFFF 
    F8D888DDDDDDDD8FD8F8D8FFFFFFFFFFFFD8FFFDFFDDD8FDDFFFDDFFFFFFFFFF 
    FFDDFFDDFFDDFFF8FFFFDDFFFFFFFFFFFFDDFFD8FF8D888FFFFFDD8FFFFFFFFF 
    FFDDFFFFFF8DDFD8FFFFDDFFFFFFFFF8FF8DDDDD88DDDFFDDDDDD8FFFFFFFFFF 
    D8FFFFF8DDD8FFF8DDDDDDDDD8FFFFFF8D8FFFFFFFFFFFFFDDFFF8DDDDDFFFFF 
    F8D8FFFFFFFFFFFFFDDFFFFFFFFFFFFFFF8DDDDDD88FFFFFFDD8FFFFFFFFFFFF 
    FFFDDDDDDDDDDFFFFFDDFFFFFFFFFFFFFFFFDDFFF88D8FFFFFDD8FFFFFFFFFFF 
    FFFF8DDFFFFFFFFFFF8DDFFFFFFFFFFFFFFFFDD8FFFFFFFFFFFDD8FFFFFFFFFF 
    FFFFFDD8FFFFFFFFFFFDD8FFFFFFFFFFFFFFFD8FFFFFFFFFFFF8FFFFFFFFFFFF 
    FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000 
    0000000000000000000000000000000000000000000000000000000000000000 
    0000000000000000000000000000000000000000000000000000000000000000 
    0000000000000000000000000000000000000000000000000000000000000000 
    000000000000000000000000000000000000000000000000000000000000} 
  OldCreateOrder = False 
  OnCreate = FormCreate 
  PixelsPerInch = 96 
  TextHeight = 13 
  object DBGrid1: TDBGrid 
    Left = 0 
    Top = 0 
    Width = 337 
    Height = 169 
    DataSource = DataSource1 
    ReadOnly = True 
    TabOrder = 0 
    TitleFont.Charset = DEFAULT_CHARSET 
    TitleFont.Color = clWindowText 
    TitleFont.Height = -11 
    TitleFont.Name = 'MS Sans Serif' 
    TitleFont.Style = [] 
    Columns = < 
      item 
        Expanded = False 
        FieldName = 'Randnum' 
        Width = 60 
        Visible = True 
      end 
      item 
        Expanded = False 
        FieldName = 'Name' 
        Width = 60 
        Visible = True 
      end 
      item 
        Expanded = False 
        FieldName = 'Time' 
        Width = 60 
        Visible = True 
      end 
      item 
        Expanded = False 
        FieldName = 'Rank' 
        Width = 60 
        Visible = True 
      end 
      item 
        Expanded = False 
        FieldName = 'Date' 
        Width = 70 
        Visible = True 
      end> 
  end 
  object Button1: TButton 
    Left = 64 
    Top = 184 
    Width = 41 
    Height = 25 
    Caption = #26032#20154 
    TabOrder = 1 
    OnClick = Button1Click 
  end 
  object Button2: TButton 
    Left = 152 
    Top = 184 
    Width = 41 
    Height = 25 
    Caption = #22823#20384 
    TabOrder = 2 
    OnClick = Button2Click 
  end 
  object Button3: TButton 
    Left = 240 
    Top = 184 
    Width = 41 
    Height = 25 
    Caption = #22823#24072 
    TabOrder = 3 
    OnClick = Button3Click 
  end 
  object Edit1: TEdit 
    Left = 32 
    Top = 184 
    Width = 25 
    Height = 21 
    TabOrder = 4 
    Text = #26032#20154 
    Visible = False 
  end 
  object Edit2: TEdit 
    Left = 120 
    Top = 184 
    Width = 25 
    Height = 21 
    TabOrder = 5 
    Text = #22823#20384 
    Visible = False 
  end 
  object Edit3: TEdit 
    Left = 208 
    Top = 184 
    Width = 25 
    Height = 21 
    TabOrder = 6 
    Text = #22823#24072 
    Visible = False 
  end 
  object DataSource1: TDataSource 
    DataSet = ADOQuery1 
    Left = 104 
    Top = 80 
  end 
  object ADOQuery1: TADOQuery 
    Connection = Form1.ADOConnection1 
    Parameters = <> 
    SQL.Strings = ( 
      'select * from hot order by Time') 
    Left = 144 
    Top = 80 
  end 
end