Тема: Как сделать подпункты MainMenu активными?
Показать сообщение отдельно
  #2  
Старый 30.01.2012, 10:19
icWasya icWasya вне форума
Местный
  
Регистрация: 09.11.2010
Сообщения: 499
Репутация: 10
По умолчанию Что не так реализовано в части кода?
Убрать Close
Код:
procedure TForm3.Button1Click(Sender: TObject);
begin
Form3.ModalResult:=mrOK;
//Close;
end;
Ответить с цитированием