Unit1.dfm
上传用户:rick3344
上传日期:2013-02-03
资源大小:225k
文件大小:4k
源码类别:

源码/资料

开发平台:

WINDOWS

  1. object Form1: TForm1
  2.   Left = 192
  3.   Top = 107
  4.   Width = 259
  5.   Height = 313
  6.   BorderIcons = [biSystemMenu, biMinimize]
  7.   Caption = #26684#24335#21270#24207#21015#21495#29983#25104#22120
  8.   Color = clMoneyGreen
  9.   Font.Charset = DEFAULT_CHARSET
  10.   Font.Color = clWindowText
  11.   Font.Height = -11
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Style = []
  14.   OldCreateOrder = False
  15.   PixelsPerInch = 96
  16.   TextHeight = 13
  17.   object Label1: TLabel
  18.     Left = 8
  19.     Top = 56
  20.     Width = 56
  21.     Height = 16
  22.     Caption = 'SN String'
  23.     Font.Charset = DEFAULT_CHARSET
  24.     Font.Color = clGray
  25.     Font.Height = -13
  26.     Font.Name = 'MS Sans Serif'
  27.     Font.Style = []
  28.     ParentFont = False
  29.   end
  30.   object Label2: TLabel
  31.     Left = 8
  32.     Top = 88
  33.     Width = 86
  34.     Height = 16
  35.     Caption = 'Serial Number'
  36.     Font.Charset = DEFAULT_CHARSET
  37.     Font.Color = clGray
  38.     Font.Height = -13
  39.     Font.Name = 'MS Sans Serif'
  40.     Font.Style = []
  41.     ParentFont = False
  42.   end
  43.   object Label3: TLabel
  44.     Left = 8
  45.     Top = 144
  46.     Width = 70
  47.     Height = 16
  48.     Caption = 'Mask String'
  49.     Font.Charset = DEFAULT_CHARSET
  50.     Font.Color = clGray
  51.     Font.Height = -13
  52.     Font.Name = 'MS Sans Serif'
  53.     Font.Style = []
  54.     ParentFont = False
  55.   end
  56.   object Button1: TButton
  57.     Left = 32
  58.     Top = 16
  59.     Width = 75
  60.     Height = 25
  61.     Caption = 'Get SN'
  62.     TabOrder = 0
  63.     Visible = False
  64.     OnClick = Button1Click
  65.   end
  66.   object Edit1: TEdit
  67.     Left = 32
  68.     Top = 112
  69.     Width = 41
  70.     Height = 21
  71.     Color = clGradientActiveCaption
  72.     Font.Charset = ANSI_CHARSET
  73.     Font.Color = clWindowText
  74.     Font.Height = -13
  75.     Font.Name = #23435#20307
  76.     Font.Style = []
  77.     ParentFont = False
  78.     TabOrder = 1
  79.   end
  80.   object Edit2: TEdit
  81.     Left = 80
  82.     Top = 112
  83.     Width = 41
  84.     Height = 21
  85.     Color = clGradientActiveCaption
  86.     Font.Charset = ANSI_CHARSET
  87.     Font.Color = clWindowText
  88.     Font.Height = -13
  89.     Font.Name = #23435#20307
  90.     Font.Style = []
  91.     ParentFont = False
  92.     TabOrder = 2
  93.   end
  94.   object Edit3: TEdit
  95.     Left = 128
  96.     Top = 112
  97.     Width = 41
  98.     Height = 21
  99.     Color = clGradientActiveCaption
  100.     Font.Charset = ANSI_CHARSET
  101.     Font.Color = clWindowText
  102.     Font.Height = -13
  103.     Font.Name = #23435#20307
  104.     Font.Style = []
  105.     ParentFont = False
  106.     TabOrder = 3
  107.   end
  108.   object Edit4: TEdit
  109.     Left = 176
  110.     Top = 112
  111.     Width = 41
  112.     Height = 21
  113.     Color = clGradientActiveCaption
  114.     Font.Charset = ANSI_CHARSET
  115.     Font.Color = clWindowText
  116.     Font.Height = -13
  117.     Font.Name = #23435#20307
  118.     Font.Style = []
  119.     ParentFont = False
  120.     TabOrder = 4
  121.   end
  122.   object Edit5: TEdit
  123.     Left = 72
  124.     Top = 56
  125.     Width = 145
  126.     Height = 21
  127.     Color = clSkyBlue
  128.     Font.Charset = ANSI_CHARSET
  129.     Font.Color = clWindowText
  130.     Font.Height = -13
  131.     Font.Name = #23435#20307
  132.     Font.Style = []
  133.     ParentFont = False
  134.     ReadOnly = True
  135.     TabOrder = 5
  136.   end
  137.   object Button2: TButton
  138.     Left = 112
  139.     Top = 16
  140.     Width = 105
  141.     Height = 25
  142.     Caption = #29983#25104#24207#21015#21495
  143.     TabOrder = 6
  144.     OnClick = Button2Click
  145.   end
  146.   object ComboBox1: TComboBox
  147.     Left = 32
  148.     Top = 168
  149.     Width = 201
  150.     Height = 21
  151.     Color = clSkyBlue
  152.     ItemHeight = 13
  153.     TabOrder = 7
  154.     Items.Strings = (
  155.       '####9999##99#9##'
  156.       '##99##99##99##99'
  157.       'a9##a#9#########'
  158.       '9999999999999999'
  159.       'AAAAAAAAAAAAAAAA'
  160.       'aaaaaaaaaaaaaaaa'
  161.       '################'
  162.       'AAaaAA99AA##AA99'
  163.       'ZZZZ####ZZZZ2222')
  164.   end
  165.   object Memo1: TMemo
  166.     Left = 8
  167.     Top = 200
  168.     Width = 233
  169.     Height = 81
  170.     Lines.Strings = (
  171.       #20320#21487#20197#20351#29992'Mask String '#21253#21547'A,a,9,#'
  172.       #30340#23383#31526#32452#21512#12290
  173.       'A'#34920#31034#35813#20301#23545#24212#30340#23383#31526#20026#22823#20889#23383#27597'(A'
  174.       '..Z)'
  175.       'a'#34920#31034#35813#20301#23545#24212#30340#23383#31526#20026#23567#20889#23383#27597'(a.'
  176.       '.z)'
  177.       '9'#34920#31034#35813#20301#23545#24212#30340#23383#31526#20026#25968#23383'(0..9)'
  178.       '#'#34920#31034#20219#24847#30340#23383#27597#21644#25968#23383'(A..Z,a..z,0..'
  179.       '9)'
  180.       #38750'A,a,9,#'#31561#23383#31526#31561#20215#20110'#')
  181.     ScrollBars = ssVertical
  182.     TabOrder = 8
  183.   end
  184. end