uapimoduleform.dfm

Delphi函数工厂。。。。。。。。。。。。。

inherited ApiModuleForm: TApiModuleForm
  Left = 219
  Top = 169
  Width = 718
  Height = 502
  ActiveControl = edtSearch
  BorderStyle = bsSizeable
  OldCreateOrder = True
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object Splitter1: TSplitter [0]
    Left = 231
    Top = 33
    Width = 3
    Height = 435
    Cursor = crHSplit
    Beveled = True
  end
  inherited btnClose: TButton
    Left = 630
    Top = 440
  end
  inherited btnHelp: TButton
    Top = 440
  end
  object dbmFullName: TDBMemo
    Left = 96
    Top = 84
    Width = 521
    Height = 69
    DataField = 'FullName'
    DataSource = DataSource2
    ScrollBars = ssBoth
    TabOrder = 2
    Visible = False
  end
  object dbchnt: TDBCheckBox
    Left = 336
    Top = 160
    Width = 97
    Height = 17
    Caption = 'dbchnt'
    DataField = 'winNT'
    DataSource = DataSource1
    TabOrder = 3
    ValueChecked = 'True'
    ValueUnchecked = 'False'
    Visible = False
  end
  object dbch95: TDBCheckBox
    Left = 224
    Top = 160
    Width = 97
    Height = 17
    Caption = 'dbch95'
    DataField = 'win95'
    DataSource = DataSource1
    TabOrder = 4
    ValueChecked = 'True'
    ValueUnchecked = 'False'
    Visible = False
  end
  object dbmparameter: TDBMemo
    Left = 216
    Top = 328
    Width = 185
    Height = 49
    DataField = #21442#25968#34920
    DataSource = DataSource1
    ScrollBars = ssBoth
    TabOrder = 5
    Visible = False
  end
  object dbmother: TDBMemo
    Left = 216
    Top = 280
    Width = 185
    Height = 49
    DataField = #20854#23427
    DataSource = DataSource1
    ScrollBars = ssBoth
    TabOrder = 6
    Visible = False
  end
  object dbmreturn: TDBMemo
    Left = 216
    Top = 232
    Width = 185
    Height = 49
    DataField = #36820#22238#20540
    DataSource = DataSource1
    ScrollBars = ssBoth
    TabOrder = 7
    Visible = False
  end
  object dbmexplain: TDBMemo
    Left = 216
    Top = 184
    Width = 185
    Height = 49
    DataField = #35828#26126
    DataSource = DataSource1
    ScrollBars = ssBoth
    TabOrder = 8
    Visible = False
  end
  object mmShowdata: TMemo
    Left = 234
    Top = 33
    Width = 476
    Height = 435
    Align = alClient
    ReadOnly = True
    ScrollBars = ssVertical
    TabOrder = 9
  end
  object lbShowname: TListBox
    Left = 0
    Top = 33
    Width = 231
    Height = 435
    Align = alLeft
    ItemHeight = 12
    TabOrder = 10
    OnClick = lbShownameClick
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 710
    Height = 33
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 11
    object Label1: TLabel
      Left = 9
      Top = 12
      Width = 24
      Height = 12
      Caption = #36755#20837
    end
    object sbSearch: TSpeedButton
      Left = 301
      Top = 5
      Width = 24
      Height = 24
      Flat = True
      Glyph.Data = {
        0E060000424D0E06000000000000360000002800000016000000160000000100
        180000000000D805000000000000000000000000000000000000FFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFF
        0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000000000
        000000000000000000000000FFFFFFFFFFFFFFFFFF0000CE009AFF0000CE0000
        00FFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FF0000FF00
        00FF0000FF0000FF0000FF00009C00310000000000000000CE63CFFF6300FF00
        00CE000000FFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFF00000000653100653100
        8200FF6531FF6531FF6531FF6531FF6531FF00009C00310000CE63CFFF6300FF
        0000CE000000FFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFF009A31009A3163CF31
        009A31009A3100820000820000000000000000000000000000000063CFFF6300
        FF0000CE000000FFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF009A31009A3163FF
        3163FF3163CF31009A31009A314A4D4ACE9A31CE9A31CE9A31CE9A319C653100
        00000000CE000000000000FFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF009A319C
        FFCE63FF3163FF3163CF31009A314A4D4A848684FFCF9CFFCF31FFCF31CE9A31
        CE9A319C65310000009C0031000000FFFFFFFFFFFFFFFFFF0000FFFFFF009A31
        9CFFCE9CFFCE9CFFCE63FF3163CF31009A314A4D4AFFCF9CFFFFCEFFFF9CFFFF
        9CFFCF31CE9A31CE9A31000000FF00009C0031000000FFFFFFFFFFFF0000FFFF
        FF009A31FFFBFF9CFFCE63FF3163CF31009A310082004A4D4AFFCF9CFFFBFFFF
        FFCEFFFF9CFFFF9CFFCF31CE9A31000000FF00009C0031000000FFFFFFFFFFFF
        0000FFFFFF009A319CFFCE9CFFCE63CF31009A31008200FF9A004A4D4AFFCF9C
        FFFBFFFFFBFFFFFFCEFFFF9CFFCF31CE9A31000000FF00009C0031000000FFFF
        FFFFFFFF0000FFFFFF009A31009A31009A31009A31009A31FFCF31FF9A004A4D
        4A848684FFCF9CFFFBFFFFFBFFFFFFCEFFCF9C848684000000FF00009C003100
        0000FFFFFFFFFFFF0000FFFFFFFF6531FFFFCEFFFFCEFFFF31FFCF31FFCF31FF
        9A00FF9A004A4D4A848684FFCF9CFFCF9CFFCF9C848684000000FF6531FF0000
        9C0031000000FFFFFFFFFFFF0000FFFFFFFF6531FFFFCEFFFF31FF9A00008200
        FF9A00FFCF31FF9A009C9A004A4D4A4A4D4A4A4D4A4A4D4A4A4D4AFF6531FF65
        31FF00009C0031000000FFFFFFFFFFFF0000FFFFFFFF6531FFFFCEFF9A000065
        31009A31008200008200FF9A00FF9A00FF9A00FF9A00FF6531FF9A00FF6531FF
        9A00FF6531FF00009C0031000000FFFFFFFFFFFF0000FFFFFFFFFFFFFF653100
        9A3163FF3163CF31009A31008200FF6531FF9A00FF9A00FF9A00FF9A00FF6531
        FF9A00FF6531FF9A00FF0000000000FFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
        006531FFFBFF9CFFCE9CFFCE63CF31009A31008200FF6531FF9A00FF9A00FF9A
        00FF9A00FF6531FF9A00FF65319C0031000000FFFFFFFFFFFFFFFFFF0000FFFF
        FFFFFFFFFFFFFF006531FFFBFF9CFFCE63FF3163CF3100820000820000820000
        8200008200FF6531FF9A009C9A00FF6531000000FFFFFFFFFFFFFFFFFFFFFFFF
        0000FFFFFFFFFFFFFFFFFFFFFFFF006531FFFBFFFFFBFF9CFFCE9CFFCE63FF31
        63FF3163CF31009A310082009C9A00FF6531000000FFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF006531006531FFFBFFFFFB
        FFFFFBFF9CFF9C9CFF9C9CFF9C008200FF6531FF6531FFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00
        6531006531006531006531006531006531FF6531FFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000}
      OnClick = sbSearchClick
    end
    object rgSearchtype: TRadioGroup
      Left = 336
      Top = -4
      Width = 217
      Height = 32
      Columns = 2
      ItemIndex = 0
      Items.Strings = (
        #21069#31471#19968#33268
        #20219#24847#21305#37197)
      TabOrder = 0
      OnClick = rgSearchtypeClick
    end
    object edtSearch: TEdit
      Left = 40
      Top = 6
      Width = 257
      Height = 20
      TabOrder = 1
      OnChange = edtSearchChange
      OnKeyPress = edtSearchKeyPress
    end
  end
  object DataSource1: TDataSource
    DataSet = daoqApi
    Left = 400
    Top = 72
  end
  object daoqApi: TADOQuery
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Se' +
      'ttings\oiwin\'#26700#38754'\'#27169#22359#23436#25972#21253'(2003-04-28'#20462#25913')\db1.mdb;Persist Security Inf' +
      'o=False'
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from apifun'
      'ORDER by  '#20989#25968)
    Left = 368
    Top = 72
    object daoqApiDSDesigner: TWideStringField
      FieldName = #20989#25968
      Size = 40
    end
    object daoqApiDSDesigner2: TMemoField
      FieldName = #20363#31243
      BlobType = ftMemo
    end
    object daoqApiDSDesigner3: TWideStringField
      FieldName = #21035#21517
      Size = 40
    end
    object daoqApiDSDesigner4: TWideStringField
      FieldName = #24211#21517
      Size = 30
    end
    object daoqApiwin95: TBooleanField
      FieldName = 'win95'
    end
    object daoqApiwinNT: TBooleanField
      FieldName = 'winNT'
    end
    object daoqApiDSDesigner5: TMemoField
      FieldName = #35828#26126
      BlobType = ftMemo
    end
    object daoqApiDSDesigner6: TMemoField
      FieldName = #36820#22238#20540
      BlobType = ftMemo
    end
    object daoqApiDSDesigner7: TMemoField
      FieldName = #20854#23427
      BlobType = ftMemo
    end
    object daoqApiDSDesigner8: TMemoField
      FieldName = #21442#25968#34920
      BlobType = ftMemo
    end
  end
  object daoqApifunname: TADOQuery
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Se' +
      'ttings\oiwin\'#26700#38754'\'#27169#22359#23436#25972#21253'(2003-04-28'#20462#25913')\db1.mdb;Persist Security Inf' +
      'o=False'
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select FullName from funclass')
    Left = 368
    Top = 112
  end
  object DataSource2: TDataSource
    DataSet = daoqApifunname
    Left = 400
    Top = 112
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 100
    OnTimer = Timer1Timer
    Left = 576
    Top = 8
  end
end