Оффтоп:
Цитата:
|
Сообщение от son_yaa
...почему закрывается моя форма при открытии Exel?
Код:
procedure TForm26.suiButton22Click(Sender: TObject);
... |
Оу, какие же циклопические портянки создаются, Дарвин, со своей теорией природной простоты отдыхает: форма26 и баттонка22нажалась,- была у меня когда-то, давно сборка одна, с номерами кнопок аж больше 101-го, но форм всёж было намного меньше :-)
Потеме:
Видимо в таком куске ответ
Код:
...
if Application.MessageBox('Вы уверены?'+#13+'Сделать расчет для Бухгалтера?',
'Расчет Полиграфия',MB_OKCANCEL)=1 then
Close;
... очевидно ведь, закрывается форма а не диалог - он уже закрыт, раз результат вернулся