main.dfm

C++通讯录源代码

object FormMain: TFormMain
  Left = 310
  Top = 283
  BorderStyle = bsNone
  Caption = 'FormMain'
  ClientHeight = 213
  ClientWidth = 321
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object ShapeClient: TShape
    Left = 0
    Top = 0
    Width = 321
    Height = 213
    Align = alClient
    Brush.Color = 15856113
    Pen.Color = clGreen
  end
  object ImageTitle: TImage
    Left = 1
    Top = 1
    Width = 216
    Height = 18
    Stretch = True
    OnMouseDown = ImageTitleMouseDown
  end
  object Image1: TImage
    Left = 8
    Top = 24
    Width = 32
    Height = 32
    AutoSize = True
    Picture.Data = {
      055449636F6E0000010001002020040000000000E80200001600000028000000
      2000000040000000010004000000000000020000000000000000000000000000
      0000000000000000000080000080000000808000800000008000800080800000
      80808000C0C0C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000
      FFFFFF0000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000077777700000000000000
      00000000007788888870000000000000000000000788FFFFFF87077777700000
      00000000078FFFFFFFF80888888707777700000007800FFFFFFF08FFFF807888
      88770000000FFFFFFFFFFFFFFFF078FFFF887000008FFFFFFFFFFFFFFFF07FFF
      FFFF870008FFFFFFFFFFFFFFFFFF0FFFFFFFF87008FFFFFFFFFFFFFFFFFFF00F
      FF88F87008FFFFFFFFFFFFFFFFFFFFFFFF77887008FFFFF80FFFFFFFFFFFFFFF
      FF007870078FF8870FFFFFFFFFFFFFFFFFFF070000788770FFFFFFFFFFFFFFFF
      FFFFF0000807700FFFFFFF0FFFFFFFFFFFFFF00080800FFFFFFFF07FFFFFFFFF
      FFFFFF0007FFFFFFFFFFF07FFFFFFFFFFFFFF70007FFFFFFFFFFF077FFFFFFFF
      F0777000077FF07FFFFFF70077FFFFFFFF0000000007707FFFFF770000777777
      7700000000000007777700000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF03FFFFFC01FFFFF80081FFF
      0000083F0000000F000000078000000380000001000000000000000000000000
      0000000000000001800000038000000100000001000000010000000300000007
      8001001FE403C03FFE0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFF}
  end
  object ImageClose: TImage
    Tag = 103
    Left = 197
    Top = 4
    Width = 12
    Height = 12
    Hint = #20851#38381
    AutoSize = True
    ParentShowHint = False
    ShowHint = True
    Transparent = True
    OnClick = ImageSystemClick
  end
  object LabelTitle: TLabel
    Left = 22
    Top = 3
    Width = 39
    Height = 13
    Caption = 'MyApp'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clGreen
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
    OnMouseDown = ImageTitleMouseDown
  end
  object ImageSystem: TImage
    Tag = 100
    Left = 4
    Top = 4
    Width = 12
    Height = 12
    AutoSize = True
    Transparent = True
    OnClick = ImageSystemClick
    OnDblClick = ImageSystemDblClick
    OnMouseDown = ImageSystemMouseDown
  end
  object ImageMinimize: TImage
    Tag = 101
    Left = 171
    Top = 4
    Width = 12
    Height = 12
    Hint = #26368#23567#21270
    AutoSize = True
    ParentShowHint = False
    ShowHint = True
    Transparent = True
    OnClick = ImageSystemClick
  end
  object ImageZoom: TImage
    Tag = 102
    Left = 184
    Top = 4
    Width = 12
    Height = 12
    Hint = #19978#21367
    AutoSize = True
    ParentShowHint = False
    ShowHint = True
    Transparent = True
    OnClick = ImageSystemClick
  end
end