TAnimateGetName
type
TAnimateGetName =
procedure
(Const Animation:
TTeeAnimation
; Out S: String)
of object
;
Unit
TeeAnimateEditor