Create a new property that after a certain time closes the message screen and return a default option (if the user does not select any option).
Example:
:
:
With TAdvInputTaskDialog.Create(Nil) do
Begin
//time in seconds
AutoCloseTimer:=20;
//option to select after time above
AutoCloseSelectedOption:=cbNo;
// activate AutoClose (Default = False for compatibility)
AutoCloseEnabled:=True;
//Optional message for autoclose (not visible if is blank)
AutoCloseMessage:='This screen will be closed in %s seconds';
//Should update the message above during the timing?
AutoCloseUpdateMessage:=True;
:
:
CommonButtons:=[cbYes,cbNo];
Result:=Execute;
End;
:
: