Source position: lcltaskdialog.pas line 404
var DefaultTaskDialog: TTaskDialogEx = (DialogIcon: tiInformation; FooterIcon: tfiWarning);