TFieldMap
pt
DoOnOpen
FindField
FieldByName
Create
Destroy
InitFields
LoadObject
GetFromField
GetFromDateTimeField