Source position: HTMLUn2.pas line 443
type TObjectClickEvent = procedure(
Sender: TObject;
Obj: TObject;
const OnClick: ThtString
) of object;