bottomview.~dfm

求是科技出版的《Delphi串口通信工程开发实例导航》所有的源代码。是一本很好的书。拿出来与大家共享。

object frmBottom: TfrmBottom
  Left = 0
  Top = 0
  Width = 320
  Height = 240
  TabOrder = 0
  object palStatus: TPanel
    Left = 0
    Top = 0
    Width = 320
    Height = 33
    Align = alTop
    Alignment = taLeftJustify
    Caption = #24403#21069#29366#24577
    TabOrder = 0
    object labLastTime: TLabel
      Left = 248
      Top = 1
      Width = 71
      Height = 31
      Align = alRight
      Alignment = taCenter
      AutoSize = False
      Caption = 'labLastTime'
      Layout = tlCenter
    end
    object Image1: TImage
      Left = 216
      Top = 1
      Width = 32
      Height = 31
      Align = alRight
      Picture.Data = {
        055449636F6E0000010002002020100000000000E80200002600000010101000
        00000000280100000E0300002800000020000000400000000100040000000000
        8002000000000000000000000000000000000000000000000000800000800000
        0080800080000000800080008080000080808000C0C0C0000000FF0000FF0000
        00FFFF00FF000000FF00FF00FFFF0000FFFFFF00000000000000000000000000
        0000000000000000000000000000000000000000000000001000000000000010
        0000000000000000010099999990010000000000000000000099000000099000
        00000000000000009900FFFFFFF00990000000000000000990FFFFF0FFFFF099
        00000000000000990FF0FFF0FFFD7F099000000000000090FFFFFFF0FFD7FFF0
        900000000000090FFFFFFFFFFFD7FFFF090000000000090F0FFFFFFFFD7FFF0F
        09000000000090FFFFFFFFFFFD7FFFFFF0900000000090FFFFFFFFFFD7FFFFFF
        F0900000000090FFFFFFFFF0D7FFFFFFF0900000000090F000FFFF0007FFF000
        F0900000000090FFFFFFF007007FFFFFF0900000000090FFFFFF007FF007FFFF
        F0900000000090FFFFF007FFFF007FFFF09000000000090F0FFFFFFFFFF0070F
        090000000000090FFFFFFFFFFFFF007F0900000000000090FFFFFFF0FFFFFFF0
        90000000000000990FF0FFF0FFF0FF09900000000000000990FFFFF0FFFFF099
        00000000000000009900FFFFFFF0099000000000000000000099000000099000
        0000000000000000000099999990000000000000000000000000000000000000
        0000000000000000000011999110000000000000000000000000199999100000
        0000000000000000000019999910000000000000000000000000019991000000
        0000000000000000000000000000000000000000FFFFFFFFFF7FFDFFFE3018FF
        FF0001FFFF0001FFFE0000FFFC00007FF800003FF800003FF000001FF000001F
        E000000FE000000FE000000FE000000FE000000FE000000FE000000FF000001F
        F000001FF800003FF800003FFC00007FFE0000FFFF0001FFFFC007FFFFF01FFF
        FFE00FFFFFE00FFFFFE00FFFFFF01FFFFFF83FFF280000001000000020000000
        0100040000000000C00000000000000000000000000000000000000000000000
        00008000008000000080800080000000800080008080000080808000C0C0C000
        0000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0000000000
        0000000000000000000000000000099999000000000990F0FD9900000009FFF0
        F7F9000000900FFFD7F09000009FFFF07FFF900000900F0007009000009FF007
        007F900000900FFFF00090000009F0F0F0F90000000990F0F099000000000999
        99000000000000000000000000000019900000000000000000000000F7DF0000
        F01F0000E00F0000C0070000C007000080030000800300008003000080030000
        80030000C0070000C0070000E00F0000F83F0000F83F0000FC7F0000}
    end
  end
  object lstLog: TListView
    Left = 0
    Top = 33
    Width = 320
    Height = 207
    Align = alClient
    BevelEdges = [beLeft, beRight, beBottom]
    BevelOuter = bvNone
    BevelKind = bkFlat
    BorderStyle = bsNone
    Columns = <
      item
        AutoSize = True
      end>
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    Items.Data = {1D0000000100000000000000FFFFFFFFFFFFFFFF000000000000000000}
    ReadOnly = True
    RowSelect = True
    ParentFont = False
    ShowColumnHeaders = False
    ShowWorkAreas = True
    TabOrder = 1
    ViewStyle = vsReport
  end
end