Получилось.
Цитата:
if MessageDlg('Вы действительно ходите закрыть?',mtInformation,[mbYes, mbNo],0) = mrYes then
CanClose := True
else
CanClose := False;
|
но когда выскакивает это сообщение оно прерывает выполнение процедуры
пока его не закроешь
Мне очень нужно чтоб оно не прерывало