Создание, Очистка, Уничтожение Форм

@Visilnik · Регистрация: 08.09.2016

Author24 — интернет-сервис помощи студентам

Всем снова Здравствуйте! Спасибо Всем кто ответил в предыдущих моих темах!
Снова Возникли вопросы:
1. Как сделать так чтобы по нажатию кнопки (пример: отмена) сбросились все действия на форме, или форма пересоздалась в исходное состояние?
2.После закрытия формы 1 на форме 2 сделать типа реконекта ADOQuery?

@krapotkin · 17.11.2016, 19:23

формы по умолчанию в делфи ставятся в автосоздание
Ctrl+F11 -- Forms -- Auto Create
реально это неправильно. Нужно их оттуда убирать

форму нужно создавать когда на нужна и разрушать после использования

кнопки OK/Отмена на Form2 должны иметь заполненное свойство ModalResult

Delphi

uses ....,Form2;
 
procedure TForm1.b1Click(...);
var f:TForm2;
begin
  f:=TForm2.Create(nil);
try
  // тут заполнить данными форму например
  f.edit1.text:='111';
  if form2.ShowModal=mrOk then
  begin
     // тут прочитать данные из формы например
    ssss:=f.edit1.text;
  end;
finally
  // уничтожить форму
  f.free;
end;
end;

Добавлено через 2 минуты
если это надо сделать на этой же форме, пишите специальный метод и вызывайте его по нажатию кнопки

"типа реконнект":
AdoQuery1.Close;
AdoQuery1.Open;

@Visilnik · 22.11.2016, 13:02 **[ТС]**

"форму нужно создавать когда она нужна и разрушать после использования"
Т.е. при создании описать все компоненты которые на ней находятся, с их позициями и значениями?

@krapotkin · 22.11.2016, 15:30

это из другой оперы
дизайнер создает дизайн автомобиля, а не пилит его напильником

вы создаете дизайн формы, но не нужно ее создавать при старте приложения
про автосоздание перечитайте #2

@Visilnik · 23.11.2016, 07:50 **[ТС]**

Что то не пойму как её вызвать. Вылетает ошибка. Вот код:

Delphi

......
implementation
 
{$R *.fmx}
 
uses Unit1, Unit2, Unit3, Unit4, Unit5, Unit6, Unit10;
 
procedure TForm8.Button1Click(Sender: TObject);
var  Form10:TForm10;
begin
....
 
 
  Form10:=TForm10.Create(self);
  Form10.Show;
  
 
end;

@krapotkin · 23.11.2016, 08:05

а где ошибка? догадаться?
а что, show от showModal ничем на глазок не отличается?

@Visilnik · 23.11.2016, 08:34 **[ТС]**

По нажатию кнопки (Вход) на Форме (Вход в программу) должна открыться форма10 (Электронный перечень материалов).

@krapotkin · 23.11.2016, 15:57

текст ошибки вижу,
и в какой строке она ?

а у тен ти фи ка ци я

@Visilnik · 24.11.2016, 08:47 **[ТС]**

В этой строке то же ошибка

.
Походу разобрался, убрал из var form10:tform10 всё заработало ))))
Только теперь я так понял такое не пройдёт. Допустим Form5 в ней строка обращения к form10 (form10.edit1.text:='ляля') ((

@krapotkin · 24.11.2016, 09:28

надеюсь Var From10 убрано из файла form10.pas а не из процедуры?

а насчет остального - не должно быть у form5 обращения к form10 если form5 ее не создает сама
данные не должны лежать на формах
формы - это интерфейс. отображение данных, работа с пользователем, запись в данные
но никаких данных на форме не должно быть...

@Visilnik · 24.11.2016, 12:05 **[ТС]**

Да, был невнимателен. Буду пересматривать концепцию создания своего приложения.
Спасибо Вам за помощь.

Создание, Очистка, Уничтожение Форм

Решение

Решение

@Visilnik 0 / 0 / 1 Регистрация: 08.09.2016 Сообщений: 38
		1
	Создание, Очистка, Уничтожение Форм 17.11.2016, 10:08. Показов 2492. Ответов 10 Метки нет (Все метки) Всем снова Здравствуйте! Спасибо Всем кто ответил в предыдущих моих темах! Снова Возникли вопросы: 1. Как сделать так чтобы по нажатию кнопки (пример: отмена) сбросились все действия на форме, или форма пересоздалась в исходное состояние? 2.После закрытия формы 1 на форме 2 сделать типа реконекта ADOQuery? 0

@Visilnik 0 / 0 / 1 Регистрация: 08.09.2016 Сообщений: 38
	22.11.2016, 13:02 [ТС]	3
	"форму нужно создавать когда она нужна и разрушать после использования" Т.е. при создании описать все компоненты которые на ней находятся, с их позициями и значениями? 0

@krapotkin 5860 / 4588 / 1448 Регистрация: 14.04.2014 Сообщений: 20,352 Записей в блоге: 20
	22.11.2016, 15:30	4
	это из другой оперы дизайнер создает дизайн автомобиля, а не пилит его напильником вы создаете дизайн формы, но не нужно ее создавать при старте приложения про автосоздание перечитайте #2 1

@krapotkin 5860 / 4588 / 1448 Регистрация: 14.04.2014 Сообщений: 20,352 Записей в блоге: 20
	23.11.2016, 08:05	6
	а где ошибка? догадаться? а что, show от showModal ничем на глазок не отличается? 0

@Visilnik 0 / 0 / 1 Регистрация: 08.09.2016 Сообщений: 38
	23.11.2016, 08:34 [ТС]	7
	По нажатию кнопки (Вход) на Форме (Вход в программу) должна открыться форма10 (Электронный перечень материалов). Миниатюры 0

@krapotkin 5860 / 4588 / 1448 Регистрация: 14.04.2014 Сообщений: 20,352 Записей в блоге: 20
	23.11.2016, 15:57	8
	Сообщение было отмечено Visilnik как решение Решение текст ошибки вижу, и в какой строке она ? а у тен ти фи ка ци я 1

@Visilnik 0 / 0 / 1 Регистрация: 08.09.2016 Сообщений: 38
	24.11.2016, 08:47 [ТС]	9
	В этой строке то же ошибка . Походу разобрался, убрал из var form10:tform10 всё заработало )))) Только теперь я так понял такое не пройдёт. Допустим Form5 в ней строка обращения к form10 (form10.edit1.text:='ляля') (( 0

@krapotkin 5860 / 4588 / 1448 Регистрация: 14.04.2014 Сообщений: 20,352 Записей в блоге: 20
	24.11.2016, 09:28	10
	Сообщение было отмечено Visilnik как решение Решение надеюсь Var From10 убрано из файла form10.pas а не из процедуры? а насчет остального - не должно быть у form5 обращения к form10 если form5 ее не создает сама данные не должны лежать на формах формы - это интерфейс. отображение данных, работа с пользователем, запись в данные но никаких данных на форме не должно быть... 1

@Visilnik 0 / 0 / 1 Регистрация: 08.09.2016 Сообщений: 38
	24.11.2016, 12:05 [ТС]	11
	Да, был невнимателен. Буду пересматривать концепцию создания своего приложения. Спасибо Вам за помощь. 0