Как закрыть окно MessageDlg из другого меню?

Суть такая. появляется окно MessageDlg, у меня есть меню в трей иконке. Надо чтоб по клику по пункту этого меню закрыть окно MessageDlg. Или назначит на него ответ mbYes или mbNo

Код меню в трее:

procedure TForm2.N1Click(Sender: TObject); //  трей меню
begin
start;
end;

Код окна:

if MessageDlg('Возобновить таймер?',
    mtConfirmation, [mbYes, mbNo], 0) = mrYes
    then

Ответы (0 шт):