Source position: lr_desgn.pas line 113
type TViewAction = procedure(
View: TFrView;
Data: PtrInt
) of object;