u_dm.dfm

来自「这是一个用条码录入的数据的进销存(只对成品)---做童装的」· DFM 代码 · 共 60 行

DFM
60
字号
object F_Dm: TF_Dm
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Left = 229
  Top = 152
  Height = 224
  Width = 325
  object DBcon: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initi' +
      'al Catalog=Biky'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    AfterConnect = DBconAfterConnect
    Left = 64
    Top = 16
  end
  object Temp: TADOQuery
    Active = True
    Connection = DBcon
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * From Icompanry')
    Left = 160
    Top = 16
  end
  object Ado_OperateLog: TADOQuery
    Connection = DBcon
    Parameters = <>
    Left = 64
    Top = 96
    object Ado_OperateLogUserid: TStringField
      DisplayLabel = #29992#25143#32534#21495
      FieldName = 'Userid'
      Size = 16
    end
    object Ado_OperateLogUsername: TStringField
      DisplayLabel = #29992#25143#21517#31216
      FieldName = 'Username'
      Size = 16
    end
    object Ado_OperateLogFormname: TStringField
      DisplayLabel = #31383#20307#21517#31216
      FieldName = 'Formname'
      Size = 30
    end
    object Ado_OperateLogOperate: TStringField
      DisplayLabel = #21160#20316
      FieldName = 'Operate'
      Size = 50
    end
    object Ado_OperateLogOperateDate: TDateTimeField
      DisplayLabel = #25805#20316#26102#38388
      FieldName = 'OperateDate'
    end
  end
end

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?