две формы

Вопросы программирования и использования среды Lazarus.

Модератор: Модераторы

Ответить
Аватара пользователя
aRix
новенький
Сообщения: 26
Зарегистрирован: 05.04.2007 17:16:33
Контактная информация:

две формы

Сообщение aRix »

Есть две формы form1 и form2 в разделе uses 1-ой формы записано uses unit2. При нажатии на кнопку на форме1 вызывается форма2. Как сделать так, чтобы при закрытии второй формы вызывался метод первой формы.???
serg_iv
постоялец
Сообщения: 276
Зарегистрирован: 15.10.2005 18:45:46
Откуда: Миасс

Сообщение serg_iv »

OnClose?
Аватара пользователя
aRix
новенький
Сообщения: 26
Зарегистрирован: 05.04.2007 17:16:33
Контактная информация:

Сообщение aRix »

Чего OnClose? Я же не могу из OnClose второй формы вызвать метод первой формы, потому что UNIT1 отсутствует в разделе uses модуля unit2 и поэтому из unit2 не видно методов первой формы. При попытке добавить в uses вылетает сообщение о закольцовке, типо uses1 использует uses2, а uses2 использует uses1. В Delphi я как-то с такими проблемами не сталкивался.
Аватара пользователя
Attid
долгожитель
Сообщения: 2589
Зарегистрирован: 27.10.2006 17:29:15
Откуда: 44°32′23.63″N 41°2′25.2″E
Контактная информация:

Сообщение Attid »

можешь , только правельно расположить юзезы,
а не сталкивался наверно по той причине что в делфе пользовался автоматическим добавлением.

немножко не понятно что имеется ввиду под "при закрытии"
это перед или после закрытия ? если после то в 1 юните

if showmodal = mrOK then
"метод первой формы"

если перед то в юнит1

Код: Выделить всё

implementation
uses unit2;

в юнит 2

Код: Выделить всё

interface
uses , , , 
  unit1; 

и можно юзать OnClose
Аватара пользователя
aRix
новенький
Сообщения: 26
Зарегистрирован: 05.04.2007 17:16:33
Контактная информация:

Сообщение aRix »

Работает! надо просто было разместить uses после implementation. Спасибо большое
Ответить