Source position: interfacebase.pp line 227
var QuestionDialogFunction: TQuestionDialogFunction = Nil;