开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Delphi控件源码 > 查看源码
Am_Ygxzs.~dfm
资源名称：挡案管理系统.rar　[点击查看]
上传用户：szruida
上传日期：2007-06-01
资源大小：6518k
文件大小：5k
源码类别：

Delphi控件源码

开发平台：

Delphi

Am_Ygxzs.~dfm：源码内容
  1. object Am_Ygxz: TAm_Ygxz
  2.   Left = 199
  3.   Top = 107
  4.   Width = 544
  5.   Height = 375
  6.   BorderIcons = [biSystemMenu]
  7.   Caption = #21592#24037#36873#25321
  8.   Color = clBtnFace
  9.   Font.Charset = ANSI_CHARSET
  10.   Font.Color = clWindowText
  11.   Font.Height = -12
  12.   Font.Name = #23435#20307
  13.   Font.Style = []
  14.   Icon.Data = {
  15.     0000010001002020040000000000E80200001600000028000000200000004000
  16.     0000010004000000000000020000000000000000000000000000000000000000
  17.     000000008000008000000080800080000000800080008080000080808000C0C0
  18.     C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
  19.     0000000000000000000000000000000000000000000000000000000000000000
  20.     000000000000000000000000000000EEEEEEE0006EEE003DD000DD00DD00E6EE
  21.     EEE60EE0E6E0E0B503305DD055006E6EEE60EEE06E0EE00B3B3770500000E6E6
  22.     E60EEEE0000EE00BB33770000000006E606EEE077700E083B38F700000000000
  23.     06EEE0777770073B38FF7000000000000E6E0777777008B38FF8700000000000
  24.     0600777777000833F7700000000000000007777000000073FFFFFFFF70000000
  25.     00077777777777078FFFFFFFF000000000000777777777708FFFFFFF80000000
  26.     00000777777777708FFFFF700000000000000777777770078FFFFFFF80000000
  27.     00000777777777708FFFFFF000000000000077777777777088FFFFFFFF000000
  28.     000777777777770008FFFFFFF000000000077777777777770FFFCCFF00000000
  29.     00000777777077707FFF70070000000000000777770077078FFFF88800000000
  30.     000000077770007B38FFFFFF700000000000000777770078308F0F0F37000000
  31.     000000077777707B0B33B3B38B0000000000000777770078B8BBBB3BBB000000
  32.     000000000000007B8BBBBBBBB00000000000000000000078B8BBBBBB00000000
  33.     000000000000000B8BBBBB000000000000000000000000000000000000000000
  34.     000000000000000000000000000000000000000000000000000000000000FFFF
  35.     FFFFFFFFFFFFFFFFFFFFC000000000000000000000030000000F0000003FC000
  36.     003FF000003FF0000007F0000003F8000003E0000003E0000003C0000003C000
  37.     0001800000010000000300000007000000070000000700000003000000010000
  38.     00018000000180000003C0000007C000000FE000003FF0007FFFFC00FFFF}
  39.   OldCreateOrder = False
  40.   Position = poScreenCenter
  41.   Scaled = False
  42.   OnClose = FormClose
  43.   OnCreate = FormCreate
  44.   PixelsPerInch = 96
  45.   TextHeight = 12
  46.   object Panel1: TPanel
  47.     Left = 0
  48.     Top = 0
  49.     Width = 536
  50.     Height = 312
  51.     Align = alTop
  52.     BevelInner = bvRaised
  53.     BevelOuter = bvLowered
  54.     TabOrder = 0
  55.     object DBGridEh1: TDBGridEh
  56.       Left = 2
  57.       Top = 2
  58.       Width = 532
  59.       Height = 308
  60.       Align = alClient
  61.       DataSource = DataSource1
  62.       FooterColor = clWindow
  63.       FooterFont.Charset = ANSI_CHARSET
  64.       FooterFont.Color = clWindowText
  65.       FooterFont.Height = -12
  66.       FooterFont.Name = #23435#20307
  67.       FooterFont.Style = []
  68.       ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
  69.       TabOrder = 0
  70.       TitleFont.Charset = ANSI_CHARSET
  71.       TitleFont.Color = clWindowText
  72.       TitleFont.Height = -12
  73.       TitleFont.Name = #23435#20307
  74.       TitleFont.Style = []
  75.       OnDblClick = DBGridEh1DblClick
  76.       Columns = <
  77.         item
  78.           EditButtons = <>
  79.           FieldName = 'bm_dm'
  80.           Footers = <>
  81.           Title.Caption = #37096#38376#20195#30721
  82.         end
  83.         item
  84.           EditButtons = <>
  85.           FieldName = 'bm_mc'
  86.           Footers = <>
  87.           Title.Caption = #37096#38376#21517#31216
  88.         end
  89.         item
  90.           EditButtons = <>
  91.           FieldName = 'yg_dm'
  92.           Footers = <>
  93.           Title.Caption = #21592#24037#20195#30721
  94.         end
  95.         item
  96.           EditButtons = <>
  97.           FieldName = 'Yg_xm'
  98.           Footers = <>
  99.           Title.Caption = #21592#24037#22995#21517
  100.         end>
  101.     end
  102.   end
  103.   object Panel2: TPanel
  104.     Left = 0
  105.     Top = 312
  106.     Width = 536
  107.     Height = 36
  108.     Align = alClient
  109.     BevelInner = bvRaised
  110.     BevelOuter = bvLowered
  111.     TabOrder = 1
  112.     object SpeedButton1: TSpeedButton
  113.       Left = 346
  114.       Top = 3
  115.       Width = 57
  116.       Height = 29
  117.       Caption = #26597#25214'(&S)'
  118.       Visible = False
  119.     end
  120.     object SpeedButton2: TSpeedButton
  121.       Left = 402
  122.       Top = 3
  123.       Width = 57
  124.       Height = 29
  125.       Caption = #30830#23450'(&O)'
  126.       OnClick = SpeedButton2Click
  127.     end
  128.     object SpeedButton3: TSpeedButton
  129.       Left = 458
  130.       Top = 3
  131.       Width = 57
  132.       Height = 29
  133.       Caption = #36864#20986'(&X)'
  134.       OnClick = SpeedButton3Click
  135.     end
  136.   end
  137.   object DataSource1: TDataSource
  138.     DataSet = DM.v_yggl
  139.     Left = 8
  140.     Top = 256
  141.   end
  142.   object ClientDataSet1: TClientDataSet
  143.     Aggregates = <>
  144.     CommandText = 'select * from xt_user'
  145.     Params = <>
  146.     ProviderName = 'Provider1'
  147.     RemoteServer = ljsz.Socket1
  148.     Left = 48
  149.     Top = 256
  150.   end
  151. end