u_pmsd.dfm

这是一个非常使用的DELPHI源码的例子,用的是SQL数据库和DELPHI企业版

object Frm_PMSd: TFrm_PMSd
  Left = 193
  Top = 200
  BorderStyle = bsNone
  ClientHeight = 144
  ClientWidth = 568
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poOwnerFormCenter
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 568
    Height = 144
    Align = alClient
    Color = clMoneyGreen
    TabOrder = 0
    object Label1: TLabel
      Left = 180
      Top = 10
      Width = 215
      Height = 41
      AutoSize = False
      Caption = #23631#24149#38145#23450
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -24
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Image1: TImage
      Left = 72
      Top = 12
      Width = 37
      Height = 37
      Picture.Data = {
        07544269746D617036080000424D360800000000000036040000280000002000
        000020000000010008000000000000040000C40E0000C40E0000000100000001
        0000FFFFFF000A9AC800019DCA00029ACE00019ECE0001A0D10005A5D300069E
        CE000184BD0001ADD90000B0DC0008AFE00004BFE80006B3D80005A6C2000084
        BE00029BC600059FD30000A5D50000B0DA00028CC0000576B8000091C200028A
        C300058EC5000591BF00038AB300018FBE000080BF000086C000068BBA000089
        BE000197CB000294CA000A8CC5002C93CD004DA2CE005799B9003291CA003391
        D0002E9FDB000F9FD7000271A7000589C000019ACB00148BC4006AB7EA009BC4
        F400B3C7EB0091B9ED0091D7FF004CB9E9001F638B000696CE00078BBF0031B0
        DE0086CEFD00ABD6FF00C4DCFE00D4DFFD00CBDCFB00C4E7FF0082C8F2004670
        8E00125F85000F678C000F8ABC000494CB000390C800007DB6007ACAFA00B1D7
        FD00BADBFE00A1DDFF0069D3FA003994B40010608500106489000D87BF000191
        C6003895CD008ACDF90097D4FF009ED1FC0094CEFD00A2D0FD0083DAFF0057C9
        F700125D830012618600106389000683BC000493CA000076B3009BD6FF008ACE
        FE003B62870012628A00115F84000579B2000287BF000186BF00A3D6FF0096D1
        FF0092D1FE0099D2FF0065A4CE00125E8300007AB400017FBA0096D8FF002E92
        AB00135D81000F668B00008DCA000085C900007ABD003CC2F6007AD3FF0054D5
        FF001DAFDF000D678C00106FA1001B6E93000E689B0048C8F3006ACFFA007731
        23007854310063624F0069CAD50065CAE2008CCAF500BCD4F30093747500B65A
        3100AE481600CC772600CA7B2300C36D1F00E0B07F00E5E9C300E0F1D600EDF7
        E200F4F1DC00C5835800B84C0600BB651C000F5E8500145C8100CE845200BB53
        1400CA6A1B00E38F3400EA861F00DF6E0E00E1894900F7D2A300FFFDCB00FEF2
        C500C3641B00E3802100D15F07001260850011618700DFB08F00C2682A00C15E
        0A00D17E2500D78C3400DB862D00D16E1E00B4542500D8A07700FDE4B700FFF5
        C800F9EABF00C7755300BB5A1F00D86A1D00A15F1D00C9722100CE7D2900D181
        2B00D98C3300D27A2600BE5A1600C7794700E8BB8E00C36A4800C24E1700E597
        3A00DA892F009E813A00C66F3200B9500300C8762500CE7B2600D6893100DA8F
        3500D37D2800BE672700DD943900986C3000D3905900C5732D00BC5F1000CB75
        2300D5852D00DA903700DD923600CD742000D5862C00D0601700BC600F00C572
        2100D4842E00D0782400C25E0D00C4661300D5832C00D3852F00E1750F00AD76
        1800B8551D00BD550700CD792600D3832C00DC8E3700D6862F00D47F2700D178
        1F00D16A1000B84F1300BD520400CC782400CE782300CF7A2500DA8A3100C965
        1400C35A0A009B4A2100B46C3C00BB570800C15A0D00C1590B00C35B0800AD5B
        2D00955C3D00AB653F00A15E3900A3613700B3C7EB00CBDCFB00D4DF04000300
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        00000000000000000000F7F9F9F9F2F2FAFBFBFA000000000000000000000000
        0000000000000000F2E092F3F3F4DBDBF5F5F6BAF7F800000000000000000000
        00000000000000E9EAEAA0EBECECEDDCEEC0DCD9EFF0F1000000000000000000
        000000000000E0E1CE938BE2C8E3C6E4CAD2B8E5E6E7E8B40000000000000000
        0000000000BBC9D693D7CFC5D8B8D1D9DADBDCC7C6DDDEDF0000000000000000
        0000000000CCCDCE8BCFC5D0D1D2D3A0A6B2B5D4D1B8D5CB0000000000000000
        00000000008CC2C3C4C4C5C6C7C8BABBBCADC998BFCABECB0000000000000000
        0000000000009692B5B6B7B8B9BABBBC9FB0BDBEBFC097C10000000000000000
        000000000000A5A6A7A8A9AAABACADAEAFB0B1B299B3B4000000000000000000
        00000000000000969798999A9B9C9D9E9E9F96A0A1A20000000094A3A4000000
        00000000000000008788898A8B8C8D8E8F909192930000009470589500000000
        0000000000000000007F80813F2582838485867F000000590000000000000000
        0000000000000000007A7B7C740B7D7D757E2434000000000000000000000000
        00000000000000000072737421757638574A777800007971795A6B0000000000
        00000000000000006C6D5D4E3368666769696E4A6F0000000000706271710000
        000000000000006364652A2651666768676869326A00000000000000626B0000
        000000000000005B5C4F5D50545E5F5F383854322E6000616200000000000000
        000000000000004E434F45505152535354555556574B000058595A0000000000
        00000000000000424344452346324748483C3A494A4B000000004C4D00000000
        000000000000001E033508363738393A3B3C3B3D3E3F00000000004041000000
        000000000000002B2C03211F2D2E2F3030312F32333400000000000000000000
        00000000000000001F2011212223242425262728292A00000000000000000000
        000000000000000015160711051718191A1B171C1D1E00000000000000000000
        0000000000000000000F10111205120913131302140000000000000000000000
        000000000000000000000802090A090B0C0C0D0E000000000000000000000000
        0000000000000000000000010203040506070000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000}
      Transparent = True
    end
    object Edit1: TEdit
      Left = 20
      Top = 58
      Width = 527
      Height = 37
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -24
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      PasswordChar = '*'
      TabOrder = 0
      Text = 'Edit1'
      OnKeyPress = Edit1KeyPress
    end
  end
end