Как закрыть окно MessageDlg из другого меню?
Суть такая. появляется окно MessageDlg, у меня есть меню в трей иконке. Надо чтоб по клику по пункту этого меню закрыть окно MessageDlg. Или назначит на него ответ mbYes или mbNo
Код меню в трее:
procedure TForm2.N1Click(Sender: TObject); // трей меню
begin
start;
end;
Код окна:
if MessageDlg('Возобновить таймер?',
mtConfirmation, [mbYes, mbNo], 0) = mrYes
then