?? umadoperation.dfm
字號:
inherited MADOperation: TMADOperation
Left = 344
Top = 217
inherited ClientDataSet: TClientDataSet
Active = True
end
inherited DataSet: TSmartQuery
SQLInsert.Strings = (
'INSERT INTO RALF.OPERATION'
' (CODE, PINYIN, CHARGE, CAPTION, OPERATIONCATALOGID)'
'VALUES'
' (:CODE, :PINYIN, :CHARGE, :CAPTION, :OPERATIONCATALOGID)')
SQLDelete.Strings = (
'DELETE FROM RALF.OPERATION'
'WHERE'
' OPERATIONID = :OPERATIONID')
SQLUpdate.Strings = (
'UPDATE RALF.OPERATION'
'SET'
' CODE = :CODE,'
' PINYIN = :PINYIN,'
' CHARGE = :CHARGE,'
' CAPTION = :CAPTION,'
' OPERATIONCATALOGID = :OPERATIONCATALOGID'
'WHERE'
' OPERATIONID = :OLD_OPERATIONID')
SQLRefresh.Strings = (
'WHERE'
' OPERATIONID = :OPERATIONID')
SQLLock.Strings = (
'SELECT * FROM RALF.OPERATION'
'WHERE'
' OPERATIONID = :OPERATIONID'
'FOR UPDATE NOWAIT')
SQL.Strings = (
'SELECT * FROM RALF.OPERATION')
Active = True
object DataSetOPERATIONID: TFloatField
DisplayLabel = #32534#21495
FieldName = 'OPERATIONID'
ReadOnly = True
end
object DataSetCODE: TStringField
DisplayLabel = #32534#30721
FieldName = 'CODE'
Required = True
Size = 32
end
object DataSetPINYIN: TStringField
DisplayLabel = #25340#38899
FieldName = 'PINYIN'
Required = True
Size = 32
end
object DataSetCHARGE: TFloatField
DisplayLabel = #37329#39069
FieldName = 'CHARGE'
Required = True
end
object DataSetCAPTION: TStringField
DisplayLabel = #21517#31216
FieldName = 'CAPTION'
Required = True
Size = 32
end
object DataSetOPERATIONCATALOGID: TFloatField
DisplayLabel = #25163#26415#20998#31867
FieldName = 'OPERATIONCATALOGID'
Required = True
end
end
end
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -