unit1.dfm

16位与32位整数转换 整数正负反转 基偶数判断

object Form1: TForm1
  Left = 151
  Top = 130
  Width = 913
  Height = 619
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 320
    Top = 128
    Width = 201
    Height = 13
    AutoSize = False
    Caption = 'Label1'
  end
  object Label2: TLabel
    Left = 320
    Top = 144
    Width = 209
    Height = 13
    AutoSize = False
    Caption = 'Label2'
  end
  object Label3: TLabel
    Left = 320
    Top = 160
    Width = 217
    Height = 13
    AutoSize = False
    Caption = 'Label3'
  end
  object Button1: TButton
    Left = 400
    Top = 192
    Width = 75
    Height = 25
    Caption = 'Integer(X)'
    TabOrder = 0
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 400
    Top = 232
    Width = 75
    Height = 25
    Caption = 'Button2'
    TabOrder = 1
    OnClick = Button2Click
  end
  object Edit1: TEdit
    Left = 320
    Top = 80
    Width = 121
    Height = 21
    TabOrder = 2
    Text = '0'
  end
  object Edit2: TEdit
    Left = 320
    Top = 104
    Width = 121
    Height = 21
    TabOrder = 3
    Text = '0'
  end
  object Memo1: TMemo
    Left = 80
    Top = 16
    Width = 185
    Height = 169
    Lines.Strings = (
      'Memo1')
    TabOrder = 4
  end
  object Button3: TButton
    Left = 480
    Top = 192
    Width = 75
    Height = 25
    Caption = #28014#40670#30456#28187
    TabOrder = 5
    OnClick = Button3Click
  end
  object Button4: TButton
    Left = 480
    Top = 232
    Width = 75
    Height = 25
    Caption = #27491#36000#21453#36681
    TabOrder = 6
    OnClick = Button4Click
  end
  object Button5: TButton
    Left = 400
    Top = 264
    Width = 75
    Height = 25
    Caption = #22522#20598#25976#21028#26039
    TabOrder = 7
    OnClick = Button5Click
  end
  object Edit3: TEdit
    Left = 320
    Top = 24
    Width = 121
    Height = 21
    TabOrder = 8
    Text = '65536'
  end
  object Button6: TButton
    Left = 480
    Top = 264
    Width = 75
    Height = 25
    Caption = '32'#20301#20803#36681#25563
    TabOrder = 9
    OnClick = Button6Click
  end
  object janGrid1: TjanGrid
    Left = 16
    Top = 224
    Width = 353
    Height = 241
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 10
    A1Style = False
    KeyMappingsEnabled = True
    KeyMappings.RowInsert = 8237
    KeyMappings.RowDelete = 8238
    KeyMappings.ColumnInsert = 24621
    KeyMappings.ColumnDelete = 24622
    KeyMappings.PrintPreview = 16464
    KeyMappings.QueryDialog = 16465
    KeyMappings.FormuleDialog = 114
    KeyMappings.CellNamesDialog = 16462
    KeyMappings.SetHeader = 16456
    NumbersalRight = False
    BandsShow = False
    BandsColor = 16644814
    BandsInterval = 2
    HighlightURL = False
    AdvanceDirection = none
    NumberFormat = '%.2f'
    AutoCalculate = True
    ShowValues = False
    ColumnHeaders.Strings = (
      ''
      ''
      ''
      ''
      '')
    StartIndex = 0
    EndIndex = 0
    SortIndex = 0
    SortType = tstCharacter
    CaseSensitiv = False
    SortDirection = Ascending
    HowToSort = stRow
    ShowMessageOnError = False
    PrintOptions.Orientation = poPortrait
    PrintOptions.PageTitleMargin = 0
    PrintOptions.PageFooter = 'date|time|page'
    PrintOptions.HeaderSize = 10
    PrintOptions.FooterSize = 7
    PrintOptions.DateFormat = 'd-mmm-yyyy'
    PrintOptions.TimeFormat = 'h:nn am/pm'
    PrintOptions.Copies = 0
    PrintOptions.FromRow = 0
    PrintOptions.ToRow = 0
    PrintOptions.PreviewPage = 0
    PrintOptions.BorderStyle = bsNone
    PrintOptions.Leftpadding = 0
    PrintOptions.MarginBottom = 0
    PrintOptions.MarginLeft = 0
    PrintOptions.MarginTop = 0
    PrintOptions.MarginRight = 0
    AutoSizemargin = 0
    WordWrap = False
    FormuleMode = False
    ColWidths = (
      20
      64
      64
      64
      64)
  end
end