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