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