Source position: IBXCustomIBLocalDBSupport.pas line 78
type TOnGetSharedDataDir = procedure(
Sender: TObject;
var SharedDataDir: string
) of object;