w_main.~dfm

自己使用BCB写的 一个随机抽取 电话号码 的 小程序 呵呵 简单了些

object Form_main: TForm_main
  Left = 8
  Top = 100
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = #31069#24744#20013#22870#65281#65281#65281
  ClientHeight = 551
  ClientWidth = 781
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -88
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 120
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 781
    Height = 551
    Align = alClient
    TabOrder = 0
    object Panel2: TPanel
      Left = 90
      Top = 90
      Width = 601
      Height = 371
      Align = alClient
      BevelOuter = bvNone
      TabOrder = 0
      object Button: TButton
        Left = 0
        Top = 289
        Width = 601
        Height = 79
        Caption = #24320#22987
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -56
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 0
        OnClick = ButtonClick
      end
      object RichEdit1: TRichEdit
        Left = 0
        Top = 89
        Width = 601
        Height = 199
        TabStop = False
        Align = alTop
        Enabled = False
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -56
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 1
      end
      object RichEdit2: TRichEdit
        Left = 0
        Top = 0
        Width = 601
        Height = 89
        TabStop = False
        Align = alTop
        Alignment = taCenter
        Enabled = False
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -56
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 2
      end
    end
    object Panel3: TPanel
      Left = 1
      Top = 1
      Width = 779
      Height = 89
      Align = alTop
      BevelOuter = bvNone
      TabOrder = 1
      object Image_top: TImage
        Left = 0
        Top = 0
        Width = 779
        Height = 89
        Align = alClient
      end
    end
    object Panel4: TPanel
      Left = 1
      Top = 461
      Width = 779
      Height = 89
      Align = alBottom
      BevelOuter = bvNone
      TabOrder = 2
      object Image_bottom: TImage
        Left = 0
        Top = 0
        Width = 779
        Height = 89
        Align = alClient
      end
    end
    object Panel5: TPanel
      Left = 1
      Top = 90
      Width = 89
      Height = 371
      Align = alLeft
      BevelOuter = bvNone
      TabOrder = 3
      object Image_left: TImage
        Left = 0
        Top = 0
        Width = 89
        Height = 371
        Align = alClient
      end
    end
    object Panel6: TPanel
      Left = 691
      Top = 90
      Width = 89
      Height = 371
      Align = alRight
      BevelOuter = bvNone
      TabOrder = 4
      object Image_right: TImage
        Left = 0
        Top = 0
        Width = 89
        Height = 371
        Align = alClient
      end
    end
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 5
    OnTimer = Timer1Timer
    Left = 859
    Top = 590
  end
end