TSetNameEvent

Occurs when the reader needs to set a component's name.

Declaration

type TSetNameEvent = procedure(

Reader: TReader;

Component: TComponent;

var Name: String

) of object;