Delphi 2017 R3 Today

var FormMain: TFormMain;