TTaskDialog

type TTaskDialog = record

public

  Title: string;

  Inst: string;

  Content: string;

  Buttons: string;

  Radios: string;

  Info: string;

  InfoExpanded: string;

  InfoCollapse: string;

  Footer: string;

  Verify: string;

  Selection: string;

  Query: string;

  RadioRes: Integer;

  SelectionRes: Integer;

  VerifyChecked: LongBool;

  Dialog: TTaskDialogImplementation;

  function Execute();

  procedure SetElementText();

end;