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