?? umadoperationcatalog.dfm
字號:
inherited MADOperationCatalog: TMADOperationCatalog
Left = 366
Top = 223
inherited ClientDataSet: TClientDataSet
Active = True
end
inherited DataSet: TSmartQuery
SQLInsert.Strings = (
'INSERT INTO RALF.OPERATIONCATALOG'
' (PARENTID, CODE, CHARGECATALOGCODE, PINYIN, CAPTION)'
'VALUES'
' (:PARENTID, :CODE, :CHARGECATALOGCODE, :PINYIN, :CAPTION)')
SQLDelete.Strings = (
'DELETE FROM RALF.OPERATIONCATALOG'
'WHERE'
' OPERATIONCATALOGID = :OPERATIONCATALOGID')
SQLUpdate.Strings = (
'UPDATE RALF.OPERATIONCATALOG'
'SET'
' PARENTID = :PARENTID,'
' CODE = :CODE,'
' CHARGECATALOGCODE = :CHARGECATALOGCODE,'
' PINYIN = :PINYIN,'
' CAPTION = :CAPTION'
'WHERE'
' OPERATIONCATALOGID = :OLD_OPERATIONCATALOGID')
SQLRefresh.Strings = (
'WHERE'
' OPERATIONCATALOGID = :OPERATIONCATALOGID')
SQLLock.Strings = (
'SELECT * FROM RALF.OPERATIONCATALOG'
'WHERE'
' OPERATIONCATALOGID = :OPERATIONCATALOGID'
'FOR UPDATE NOWAIT')
SQL.Strings = (
'SELECT * FROM RALF.OPERATIONCATALOG')
Active = True
object DataSetOPERATIONCATALOGID: TFloatField
DisplayLabel = #32534#21495
FieldName = 'OPERATIONCATALOGID'
ReadOnly = True
end
object DataSetPARENTID: TFloatField
FieldName = 'PARENTID'
end
object DataSetCODE: TStringField
DisplayLabel = #32534#30721
FieldName = 'CODE'
Required = True
Size = 16
end
object DataSetCHARGECATALOGCODE: TStringField
DisplayLabel = #25910#36153#39033#30446
FieldName = 'CHARGECATALOGCODE'
Required = True
Size = 8
end
object DataSetPINYIN: TStringField
DisplayLabel = #25340#38899
FieldName = 'PINYIN'
Required = True
Size = 32
end
object DataSetCAPTION: TStringField
DisplayLabel = #21517#31216
FieldName = 'CAPTION'
Required = True
Size = 32
end
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -