float_hex.dfm

在进行嵌入式程序设计时

object Form1: TForm1
  Left = 248
  Top = 205
  Width = 658
  Height = 357
  Caption = '浮点数和十六进制数的转换'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 120
  TextHeight = 16
  object GroupBox1: TGroupBox
    Left = 8
    Top = 16
    Width = 233
    Height = 289
    Caption = '单精度浮点数'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -18
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object Edit1: TEdit
      Left = 16
      Top = 48
      Width = 193
      Height = 34
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -23
      Font.Name = 'Times New Roman'
      Font.Style = []
      ImeName = '拼音加加集合版'
      ParentFont = False
      TabOrder = 0
      Text = '34.526'
    end
    object Button1: TButton
      Left = 16
      Top = 232
      Width = 193
      Height = 41
      Caption = ' 转    换'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -27
      Font.Name = '隶书'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = Button1Click
    end
  end
  object GroupBox2: TGroupBox
    Left = 256
    Top = 16
    Width = 385
    Height = 289
    Caption = '十六进制数'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -18
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    object Label1: TLabel
      Left = 16
      Top = 52
      Width = 200
      Height = 20
      Caption = '第1字节(尾数b07-b00)'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -20
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 16
      Top = 97
      Width = 200
      Height = 20
      Caption = '第2字节(尾数b15-b08)'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -20
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 16
      Top = 142
      Width = 200
      Height = 20
      Caption = '第3字节(尾数b23-b16)'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -20
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 16
      Top = 187
      Width = 200
      Height = 20
      Caption = '第4字节 (数符和阶码)'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -20
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 240
      Top = 28
      Width = 110
      Height = 20
      Caption = 'DEC     HEX'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -20
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Edit2: TEdit
      Left = 224
      Top = 51
      Width = 65
      Height = 26
      ImeName = '拼音加加集合版'
      TabOrder = 0
      Text = '00'
    end
    object Edit3: TEdit
      Left = 224
      Top = 96
      Width = 65
      Height = 26
      ImeName = '拼音加加集合版'
      TabOrder = 1
      Text = '00'
    end
    object Edit4: TEdit
      Left = 224
      Top = 141
      Width = 65
      Height = 26
      ImeName = '拼音加加集合版'
      TabOrder = 2
      Text = '00'
    end
    object Edit5: TEdit
      Left = 224
      Top = 186
      Width = 65
      Height = 26
      ImeName = '拼音加加集合版'
      TabOrder = 3
      Text = '00'
    end
    object Button2: TButton
      Left = 96
      Top = 232
      Width = 201
      Height = 41
      Caption = '转    换'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -27
      Font.Name = '隶书'
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      OnClick = Button2Click
    end
    object Edit6: TEdit
      Left = 304
      Top = 51
      Width = 65
      Height = 26
      ImeName = '拼音加加集合版'
      TabOrder = 5
      Text = '00'
    end
    object Edit7: TEdit
      Left = 304
      Top = 96
      Width = 65
      Height = 26
      ImeName = '拼音加加集合版'
      TabOrder = 6
      Text = '00'
    end
    object Edit8: TEdit
      Left = 304
      Top = 141
      Width = 65
      Height = 26
      ImeName = '拼音加加集合版'
      TabOrder = 7
      Text = '00'
    end
    object Edit9: TEdit
      Left = 304
      Top = 186
      Width = 65
      Height = 26
      ImeName = '拼音加加集合版'
      TabOrder = 8
      Text = '00'
    end
  end
end