uyg.dfm
上传用户:jiete_yjc
上传日期:2010-02-11
资源大小:422k
文件大小:17k
源码类别:

医药行业

开发平台:

Delphi

  1. object fyg: Tfyg
  2.   Left = 234
  3.   Top = 180
  4.   Width = 544
  5.   Height = 372
  6.   Caption = #22522#26412#20449#24687
  7.   Color = clInactiveCaptionText
  8.   Ctl3D = False
  9.   Font.Charset = DEFAULT_CHARSET
  10.   Font.Color = clWindowText
  11.   Font.Height = -11
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Style = []
  14.   FormStyle = fsMDIChild
  15.   OldCreateOrder = False
  16.   Position = poDefault
  17.   Visible = True
  18.   OnClose = FormClose
  19.   PixelsPerInch = 96
  20.   TextHeight = 13
  21.   object PageControl1: TPageControl
  22.     Left = 0
  23.     Top = 0
  24.     Width = 536
  25.     Height = 297
  26.     ActivePage = TabSheet1
  27.     Align = alTop
  28.     HotTrack = True
  29.     Images = adodm.ImageList1
  30.     MultiLine = True
  31.     RaggedRight = True
  32.     Style = tsFlatButtons
  33.     TabHeight = 50
  34.     TabIndex = 0
  35.     TabOrder = 0
  36.     object TabSheet1: TTabSheet
  37.       Caption = #21592#24037#20449#24687
  38.       ImageIndex = 12
  39.       OnShow = TabSheet1Show
  40.       object DBGridEh1: TDBGridEh
  41.         Left = 0
  42.         Top = 0
  43.         Width = 528
  44.         Height = 237
  45.         Align = alClient
  46.         AllowedOperations = [alopInsertEh, alopUpdateEh, alopDeleteEh]
  47.         Ctl3D = False
  48.         DataSource = adodm.dsyg
  49.         Flat = True
  50.         FooterColor = clWindow
  51.         FooterFont.Charset = DEFAULT_CHARSET
  52.         FooterFont.Color = clWindowText
  53.         FooterFont.Height = -11
  54.         FooterFont.Name = 'MS Sans Serif'
  55.         FooterFont.Style = []
  56.         FooterRowCount = 1
  57.         FrozenCols = 2
  58.         ParentCtl3D = False
  59.         RowHeight = 20
  60.         RowSizingAllowed = True
  61.         SumList.Active = True
  62.         TabOrder = 0
  63.         TitleFont.Charset = DEFAULT_CHARSET
  64.         TitleFont.Color = clWindowText
  65.         TitleFont.Height = -11
  66.         TitleFont.Name = 'MS Sans Serif'
  67.         TitleFont.Style = []
  68.         OnKeyDown = DBGridEh1KeyDown
  69.         Columns = <
  70.           item
  71.             AutoFitColWidth = False
  72.             EditButtons = <>
  73.             FieldName = #21592#24037#32534#21495
  74.             Footer.Value = #21592#24037#20154#25968':'
  75.             Footer.ValueType = fvtStaticText
  76.             Footers = <>
  77.             Width = 68
  78.           end
  79.           item
  80.             AutoFitColWidth = False
  81.             EditButtons = <>
  82.             FieldName = #22995#21517
  83.             Footer.FieldName = 'ygid'
  84.             Footer.ValueType = fvtCount
  85.             Footers = <>
  86.           end
  87.           item
  88.             AutoFitColWidth = False
  89.             EditButtons = <>
  90.             FieldName = #31616#30721
  91.             Footers = <>
  92.           end
  93.           item
  94.             AutoDropDown = True
  95.             AutoFitColWidth = False
  96.             EditButtons = <>
  97.             FieldName = #24615#21035
  98.             Footers = <>
  99.             KeyList.Strings = (
  100.               #30007
  101.               #22899)
  102.             PickList.Strings = (
  103.               #30007
  104.               #22899)
  105.             Width = 36
  106.           end
  107.           item
  108.             AutoFitColWidth = False
  109.             EditButtons = <>
  110.             FieldName = #24180#40836
  111.             Footers = <>
  112.           end
  113.           item
  114.             AutoDropDown = True
  115.             AutoFitColWidth = False
  116.             DropDownShowTitles = True
  117.             DropDownSizing = True
  118.             DropDownSpecRow.CellsText = '<Null>;<Null>'
  119.             DropDownWidth = 200
  120.             EditButtons = <>
  121.             FieldName = #37096#38376#21517#31216
  122.             Footers = <>
  123.             LookupDisplayFields = #31616#30721';'#37096#38376#21517#31216
  124.             Width = 102
  125.           end
  126.           item
  127.             AutoDropDown = True
  128.             AutoFitColWidth = False
  129.             EditButtons = <>
  130.             FieldName = #32844#21153
  131.             Footers = <>
  132.             KeyList.Strings = (
  133.               #33829#19994#21592
  134.               #25910#27454#21592
  135.               #32463#29702
  136.               #20250#35745
  137.               #37319#36141#21592
  138.               #20854#23427#20154#21592)
  139.             PickList.Strings = (
  140.               #33829#19994#21592
  141.               #25910#27454#21592
  142.               #32463#29702
  143.               #20250#35745
  144.               #37319#36141#21592
  145.               #20854#23427#20154#21592)
  146.           end
  147.           item
  148.             AutoDropDown = True
  149.             AutoFitColWidth = False
  150.             EditButtons = <>
  151.             FieldName = #38599#20323#26085#26399
  152.             Footers = <>
  153.           end
  154.           item
  155.             AutoDropDown = True
  156.             AutoFitColWidth = False
  157.             EditButtons = <>
  158.             FieldName = #23398#21382
  159.             Footers = <>
  160.             KeyList.Strings = (
  161.               #39640#20013#20197#19979
  162.               #39640#20013'/'#20013#19987
  163.               #19987#31185
  164.               #26412#31185
  165.               #30805#22763
  166.               #30805#22763#20197#19978)
  167.             PickList.Strings = (
  168.               #39640#20013#20197#19979
  169.               #39640#20013'/'#20013#19987
  170.               #19987#31185
  171.               #26412#31185
  172.               #30805#22763
  173.               #30805#22763#20197#19978)
  174.           end
  175.           item
  176.             AutoFitColWidth = False
  177.             EditButtons = <>
  178.             FieldName = #20303#22336
  179.             Footers = <>
  180.             Width = 137
  181.           end
  182.           item
  183.             AutoFitColWidth = False
  184.             EditButtons = <>
  185.             FieldName = #36523#20221#35777#21495
  186.             Footers = <>
  187.           end
  188.           item
  189.             AutoFitColWidth = False
  190.             EditButtons = <>
  191.             FieldName = #32852#31995#26041#24335
  192.             Footers = <>
  193.             Width = 140
  194.           end
  195.           item
  196.             AutoFitColWidth = False
  197.             EditButtons = <>
  198.             FieldName = #22791#27880
  199.             Footers = <>
  200.             Width = 192
  201.           end>
  202.       end
  203.     end
  204.     object TabSheet2: TTabSheet
  205.       Caption = #37096#38376#20449#24687
  206.       ImageIndex = 14
  207.       OnShow = TabSheet2Show
  208.       object DBGridEh2: TDBGridEh
  209.         Left = 0
  210.         Top = 0
  211.         Width = 528
  212.         Height = 237
  213.         Align = alClient
  214.         AllowedOperations = [alopInsertEh, alopUpdateEh, alopDeleteEh]
  215.         DataSource = adodm.dsbm
  216.         Flat = True
  217.         FooterColor = clWindow
  218.         FooterFont.Charset = DEFAULT_CHARSET
  219.         FooterFont.Color = clWindowText
  220.         FooterFont.Height = -11
  221.         FooterFont.Name = 'MS Sans Serif'
  222.         FooterFont.Style = []
  223.         FooterRowCount = 1
  224.         SumList.Active = True
  225.         TabOrder = 0
  226.         TitleFont.Charset = DEFAULT_CHARSET
  227.         TitleFont.Color = clWindowText
  228.         TitleFont.Height = -11
  229.         TitleFont.Name = 'MS Sans Serif'
  230.         TitleFont.Style = []
  231.         OnKeyDown = DBGridEh2KeyDown
  232.         Columns = <
  233.           item
  234.             AutoFitColWidth = False
  235.             EditButtons = <>
  236.             FieldName = #37096#38376#32534#21495
  237.             Footer.Value = #37096#38376#20010#25968#65306
  238.             Footer.ValueType = fvtStaticText
  239.             Footers = <>
  240.             Width = 135
  241.           end
  242.           item
  243.             AutoFitColWidth = False
  244.             EditButtons = <>
  245.             FieldName = #37096#38376#21517#31216
  246.             Footer.FieldName = #37096#38376#21517#31216
  247.             Footer.ValueType = fvtCount
  248.             Footers = <>
  249.             Width = 187
  250.           end
  251.           item
  252.             AutoFitColWidth = False
  253.             EditButtons = <>
  254.             FieldName = #31616#30721
  255.             Footers = <>
  256.             Width = 173
  257.           end>
  258.       end
  259.     end
  260.     object TabSheet3: TTabSheet
  261.       Caption = #24448#26469#21333#20301
  262.       ImageIndex = 11
  263.       OnShow = TabSheet3Show
  264.       object DBGridEh3: TDBGridEh
  265.         Left = 0
  266.         Top = 0
  267.         Width = 528
  268.         Height = 237
  269.         Align = alClient
  270.         AllowedOperations = [alopInsertEh, alopUpdateEh, alopDeleteEh]
  271.         DataSource = adodm.dsdw
  272.         Flat = True
  273.         FooterColor = clWindow
  274.         FooterFont.Charset = DEFAULT_CHARSET
  275.         FooterFont.Color = clWindowText
  276.         FooterFont.Height = -11
  277.         FooterFont.Name = 'MS Sans Serif'
  278.         FooterFont.Style = []
  279.         FooterRowCount = 1
  280.         FrozenCols = 4
  281.         SumList.Active = True
  282.         TabOrder = 0
  283.         TitleFont.Charset = DEFAULT_CHARSET
  284.         TitleFont.Color = clWindowText
  285.         TitleFont.Height = -11
  286.         TitleFont.Name = 'MS Sans Serif'
  287.         TitleFont.Style = []
  288.         OnKeyDown = DBGridEh3KeyDown
  289.         Columns = <
  290.           item
  291.             AutoFitColWidth = False
  292.             EditButtons = <>
  293.             FieldName = #21517#31216
  294.             Footer.Value = #21333#20301#20010#25968
  295.             Footer.ValueType = fvtStaticText
  296.             Footers = <>
  297.             Width = 99
  298.           end
  299.           item
  300.             AutoFitColWidth = False
  301.             EditButtons = <>
  302.             FieldName = #31616#30721
  303.             Footer.FieldName = 'clientid'
  304.             Footer.ValueType = fvtCount
  305.             Footers = <>
  306.             Width = 83
  307.           end
  308.           item
  309.             AutoDropDown = True
  310.             AutoFitColWidth = False
  311.             DropDownSpecRow.ShowIfNotInKeyList = False
  312.             EditButtons = <>
  313.             FieldName = #31867#22411
  314.             Footers = <>
  315.             PickList.Strings = (
  316.               #20379#24212#21830
  317.               #22823#25209#37327#23458#25143
  318.               #36830#38145#33647#24215)
  319.             Width = 74
  320.           end
  321.           item
  322.             AutoDropDown = True
  323.             AutoFitColWidth = False
  324.             DblClickNextVal = True
  325.             DropDownSpecRow.ShowIfNotInKeyList = False
  326.             EditButtons = <>
  327.             FieldName = #20986#20837
  328.             Footers = <>
  329.             KeyList.Strings = (
  330.               '0'
  331.               '1'
  332.               '2')
  333.             PickList.Strings = (
  334.               #20986#24211
  335.               #20837#24211
  336.               #26377#20986#26377#20837)
  337.           end
  338.           item
  339.             AutoFitColWidth = False
  340.             EditButtons = <>
  341.             FieldName = #27861#20154
  342.             Footers = <>
  343.           end
  344.           item
  345.             AutoFitColWidth = False
  346.             EditButtons = <>
  347.             FieldName = #32852#31995#20154
  348.             Footers = <>
  349.           end
  350.           item
  351.             AutoFitColWidth = False
  352.             EditButtons = <>
  353.             FieldName = #30005#35805
  354.             Footers = <>
  355.           end
  356.           item
  357.             AutoFitColWidth = False
  358.             EditButtons = <>
  359.             FieldName = #22320#22336
  360.             Footers = <>
  361.             Width = 126
  362.           end
  363.           item
  364.             AutoFitColWidth = False
  365.             EditButtons = <>
  366.             FieldName = #22791#27880
  367.             Footers = <>
  368.             Width = 121
  369.           end>
  370.       end
  371.     end
  372.   end
  373.   object BitBtn6: TBitBtn
  374.     Left = 350
  375.     Top = 312
  376.     Width = 75
  377.     Height = 25
  378.     Caption = #25171#21360'(&P)'
  379.     TabOrder = 1
  380.     OnClick = BitBtn6Click
  381.     Glyph.Data = {
  382.       96090000424D9609000000000000360000002800000028000000140000000100
  383.       1800000000006009000000000000000000000000000000000000FF00FFFF00FF
  384.       FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
  385.       FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
  386.       00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
  387.       FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0000000000000000
  388.       0000000000000000000000000000000000000000000000000000000000000000
  389.       0000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF000000000000000000000000
  390.       000000000000000000000000000000000000000000000000000000000000FF00
  391.       FFFF00FFFF00FFFF00FFFF00FF848484FFFFFFF7F7F7DEDEDEDEDEDECECECECE
  392.       CECECECECEADB5ADADB5ADADB5ADADB5ADADB5AD0000005A5A5A000000FF00FF
  393.       FF00FFFF00FFFF00FF848484FFFFFFF7F7F7DEDEDEDEDEDECECECECECECECECE
  394.       CEADB5ADADB5ADADB5ADADB5ADADB5AD0000005A5A5A000000FF00FFFF00FFFF
  395.       00FFFF00FF848484FFFFFFF7F7F7DEDEDEDEDEDECECECECECECECECECEADB5AD
  396.       ADB5ADADB5ADADB5ADADB5AD0000005A5A5A5A5A5A000000FF00FFFF00FFFF00
  397.       FF848484FFFFFFF7F7F7DEDEDEDEDEDECECECECECECECECECEADB5ADADB5ADAD
  398.       B5ADADB5ADADB5AD0000005A5A5A5A5A5A000000FF00FFFF00FF000000000000
  399.       0000000000000000000000000000000000000000000000000000000000000000
  400.       000000000000000000005A5A5A5A5A5A000000FF00FF00000000000000000000
  401.       0000000000000000000000000000000000000000000000000000000000000000
  402.       0000000000005A5A5A5A5A5A000000FF00FF848484FFFFFFF7F7F7F7F7F7DEDE
  403.       DEDEDEDECECECECECECECECECE00FF0000FF0000FF0000FF00CECECECECECE00
  404.       00000000005A5A5A000000FF00FF848484FFFFFFF7F7F7F7F7F7DEDEDEDEDEDE
  405.       CECECECECECECECECEF7F7F7F7F7F7F7F7F7F7F7F7CECECECECECE0000000000
  406.       005A5A5A000000FF00FF848484FFFFFFFFFFFFF7F7F7F7F7F7DEDEDEDEDEDECE
  407.       CECECECECE007B00007B00007B00007B00CECECECECECE000000848484000000
  408.       000000FF00FF848484FFFFFFFFFFFFF7F7F7F7F7F7DEDEDEDEDEDECECECECECE
  409.       CE848484848484848484848484CECECECECECE000000848484000000000000FF
  410.       00FF848484FFFFFFFFFFFFFFFFFFF7F7F7F7F7F7DEDEDEDEDEDECECECECECECE
  411.       CECECECECECECECECECECECECECECE000000848484848484000000FF00FF8484
  412.       84FFFFFFFFFFFFFFFFFFF7F7F7F7F7F7DEDEDEDEDEDECECECECECECECECECECE
  413.       CECECECECECECECECECECE000000848484848484000000FF00FF848484848484
  414.       8484848484848484848484848484848484848484848484848484848484848484
  415.       8484848484848400000084848484848484848400000084848484848484848484
  416.       8484848484848484848484848484848484848484848484848484848484848484
  417.       848484000000848484848484848484000000848484FFFFFFFFFFFFFFFFFFF7F7
  418.       F7F7F7F7F7F7F7DEDEDEDEDEDEDEDEDECECECECECECECECECECECECE00000084
  419.       8484000000848484848484000000848484FFFFFFFFFFFFFFFFFFF7F7F7F7F7F7
  420.       F7F7F7DEDEDEDEDEDEDEDEDECECECECECECECECECECECECE0000008484840000
  421.       00848484848484000000FF00FF84848484848484848484848484848484848484
  422.       8484848484848484848484848484848484848484848484000000848484000000
  423.       848484000000FF00FF8484848484848484848484848484848484848484848484
  424.       8484848484848484848484848484848484848400000084848400000084848400
  425.       0000FF00FFFF00FFFF00FF848484FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  426.       FFFFFFFFFFFFFFFFFFFFFFFF000000848484000000848484000000000000FF00
  427.       FFFF00FFFF00FF848484FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  428.       FFFFFFFFFFFFFFFF000000848484000000848484000000000000FF00FFFF00FF
  429.       FF00FF848484CECECEFFFFFFCE3100CE3100CE3100CE3100CE3100CE3100CE31
  430.       00FFFFFF000000848484848484000000848484000000FF00FFFF00FFFF00FF84
  431.       8484CECECEFFFFFF636363636363636363636363636363636363636363FFFFFF
  432.       000000848484848484000000848484000000FF00FFFF00FFFF00FFFF00FF8484
  433.       84FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCECECE00
  434.       0000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FF848484FFFFFF
  435.       FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCECECE0000000000
  436.       00000000000000FF00FFFF00FFFF00FFFF00FFFF00FF848484CECECEFFFFFFFF
  437.       3129FF3129FF3129FF3129FF3129FF3129FF3129FFFFFF000000FF00FFFF00FF
  438.       FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF848484CECECEFFFFFF6363636363
  439.       63636363636363636363636363636363FFFFFF000000FF00FFFF00FFFF00FFFF
  440.       00FFFF00FFFF00FFFF00FFFF00FFFF00FF848484FFFFFFFFFFFFFFFFFFFFFFFF
  441.       FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCECECE000000FF00FFFF00FFFF00FFFF00
  442.       FFFF00FFFF00FFFF00FFFF00FF848484FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  443.       FFFFFFFFFFFFFFFFFFFFFFCECECE000000FF00FFFF00FFFF00FFFF00FFFF00FF
  444.       FF00FFFF00FFFF00FF848484CECECEFFFFFFFF6329FF6329FF6329FF6329FF63
  445.       29FF6329FF6329FFFFFF000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
  446.       00FFFF00FF848484CECECEFFFFFF848484848484848484848484848484848484
  447.       848484FFFFFF000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
  448.       FFFF00FF848484CECECEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  449.       FFFFCECECE000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
  450.       848484CECECEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCECE
  451.       CE000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF84
  452.       8484848484848484848484848484848484848484848484848484848484848484
  453.       FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF8484848484
  454.       84848484848484848484848484848484848484848484848484848484FF00FFFF
  455.       00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
  456.       FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
  457.       FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
  458.       00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
  459.     NumGlyphs = 2
  460.   end
  461.   object BitBtn7: TBitBtn
  462.     Left = 445
  463.     Top = 312
  464.     Width = 75
  465.     Height = 25
  466.     Caption = #36864#20986'(Esc)'
  467.     TabOrder = 2
  468.     OnClick = BitBtn7Click
  469.     Kind = bkIgnore
  470.   end
  471.   object PrintDBGridEh1: TPrintDBGridEh
  472.     Options = []
  473.     Page.BottomMargin = 2
  474.     Page.LeftMargin = 2
  475.     Page.RightMargin = 2
  476.     Page.TopMargin = 2
  477.     PageFooter.Font.Charset = DEFAULT_CHARSET
  478.     PageFooter.Font.Color = clWindowText
  479.     PageFooter.Font.Height = -11
  480.     PageFooter.Font.Name = 'MS Sans Serif'
  481.     PageFooter.Font.Style = []
  482.     PageHeader.Font.Charset = DEFAULT_CHARSET
  483.     PageHeader.Font.Color = clWindowText
  484.     PageHeader.Font.Height = -11
  485.     PageHeader.Font.Name = 'MS Sans Serif'
  486.     PageHeader.Font.Style = []
  487.     PrintFontName = #23435#20307
  488.     Units = MM
  489.     Left = 160
  490.     Top = 96
  491.   end
  492. end