| [Overview][Constants][Types][Classes][Procedures and functions][Variables][Index] | 
Event that occurs w
Source position: classesh.inc line 1426
| type TFindAncestorEvent = procedure( | 
| Writer: TWriter; | 
| Component: TComponent; | 
| const Name: string; | 
| var Ancestor: TComponent; | 
| var RootAncestor: TComponent | 
| ) of object; |