Создание форм и оператор Assigned

@KDE2inFreeBSD · Регистрация: 19.01.2013

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

пытался сделать как описано тут, а получилось как на картинке
Причем если делаю просто вызов формы как. Form№.show и убераю ее из Available (доступных) форм проекта, ставя их в Auto-create (автосоздаваемые), все работает. Но забирает много памяти, из-за чего иногда программа вылетает с ошибкой out of memory

@KDE2inFreeBSD · 30.05.2013, 09:11 **[ТС]**

обычные математические алгоритмы вычисления больших чисел с проверкой на простоту. БД не используется.
в каждой форме свой алгоритм. на 1 форме они все связанны, для вызова. А так как они появляются сразу все 8 и в каждом начинает запускать алгоритм при form.create мне надо убрать их из авто-создаваемых. Для того чтобы память не улетала, на расчеты которые не вызывались

@Alex_pac · 30.05.2013, 09:30

обычные математические алгоритмы вычисления больших чисел с проверкой на простоту

типа храните на форме все простые числа вселенной?
может для этого использовать БД раз объемы на столько высоки?

@KDE2inFreeBSD · 30.05.2013, 09:36 **[ТС]**

Я в БД вообще ничего не понимаю.

@volvo · 30.05.2013, 09:54

KDE2inFreeBSD, не особо-то и получается воспроизвести твою проблему. Если форма создается в первый раз - то переменная Form6 = nil, это гарантируется, так как она глобальная. Тут проблем не будет, проверка вернет правильный результат. Если форма закрывается, а позже еще раз открывается - то тут опять же 2 варианта: первый - без изменения OnClose, всё будет как по маслу, по умолчанию форма не удаляется из памяти, а просто скрывается. Второй: чтобы она реально удалилась - надо

Delphi
1
2
3
4
procedure TForm6.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Action := caFree; // Сделать вот это
end;

, вот только тогда будет вышеописанная проблема. Которая решается добавлением обработчика OnDestroy:

Delphi
1
2
3
4
procedure TForm6.FormDestroy(Sender: TObject);
begin
  Form6 := nil;
end;

, теперь форма может быть создана, разрушена, и опять создана неоднократно.

@Ev1l · 30.05.2013, 14:41

Не по теме:

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

@NotBeginner · 30.05.2013, 15:27

Сообщение от Alex_pac

если в 100% случаях то вы - параноик

если не удалять то засоряем память

Добавлено через 1 минуту
Use Free to destroy an object. Free automatically calls the destructor if the object reference is not nil. Any object instantiated at run time that does not have an owner should be destroyed by a call to Free, so that it can be properly disposed of and its memory released. Unlike Destroy, Free is successful even if the object is nil; if the object was never initialized, Free would not result in an error.
вот что нам говорит embracodero

Новые блоги и статьи Все статьи Все блоги /
Саморегулирующийся социальный контракт для сервера cross-section. Hrethgir 14.08.2026 С кодом конечно таких глубоких размышлений пока не было, впрочем я уже привык к алгоритмизации. Суть предмета записи: снова в диалоге с нейросетью (я взял пока себе ник для учётки админа - Rector). . . .	Часы электронные Uhbif79 12.08.2026 Выкладываю программу часов. Программа позволяет: 1. Использовать системное время и дату, 2. Есть возможность вводить время и дату вручную. 3. Реализованы 2 будильника: начало и конец рабочего дня. . . .	Часы с будильником на основе класса QLCDNumber Uhbif79 12.08.2026 Всем добрый день, выкладываю программу часов с будильником на основе класса QLCDNumber. Здесь я пробовал самостоятельно создавал классы, впервые столкнулся с видимостью переменной одного класса из. . .	Установка MinGW GCC 16.2 и CMake 8Observer8 10.08.2026 VK Видео: https:/ / vkvideo. ru/ video-240781534_456239017 YouTube: eY5-5PyI9NM Текстовая версия
Неделя из жизни имитационной модели склада: мои кривые руки растут, откуда надо anaschu 10.08.2026 Неделя из жизни имитационной модели склада: как я почти написал неправильную логику и что с этим делать Работаю сейчас над учебно-рабочим проектом: строю в AnyLogic имитационную модель процессов. . .	Калькулятор для расчета родства russiannick 07.08.2026 1. Задача: Создать калькулятор для расчета родства. Родственных связей существует 8 ступеней, такие как: p - отец P - мать q - муж Q - жена b - брат B - сестра s - сын S - дочь	Мир по моей воле kumehtar 07.08.2026 Когда-то кажется, что всё просто. Ты весь такой светлый. Причиняешь добро. Борешься за справедливость в этом тёмном мире. Потом начинаешь замечать одну неприятную вещь. Почти каждый хороший. . .	Кредитный калькулятор Maks 05.08.2026 Решение задачи по прикладной информатике средствами 1С. Задача: Напишите приложение-калькулятор, которое помогает рассчитывать параметры кредита для аннуитетного и дифференцированного видов. . .

@KDE2inFreeBSD 3 / 3 / 1 Регистрация: 19.01.2013 Сообщений: 113

	Создание форм и оператор Assigned 29.05.2013, 17:38. Показов 5294. Ответов 25 Метки нет (Все метки) пытался сделать как описано тут, а получилось как на картинке Причем если делаю просто вызов формы как. Form№.show и убераю ее из Available (доступных) форм проекта, ставя их в Auto-create (автосоздаваемые), все работает. Но забирает много памяти, из-за чего иногда программа вылетает с ошибкой out of memory Миниатюры 0

@KDE2inFreeBSD 3 / 3 / 1 Регистрация: 19.01.2013 Сообщений: 113
	30.05.2013, 09:11 [ТС]
	обычные математические алгоритмы вычисления больших чисел с проверкой на простоту. БД не используется. в каждой форме свой алгоритм. на 1 форме они все связанны, для вызова. А так как они появляются сразу все 8 и в каждом начинает запускать алгоритм при form.create мне надо убрать их из авто-создаваемых. Для того чтобы память не улетала, на расчеты которые не вызывались 0

@KDE2inFreeBSD 3 / 3 / 1 Регистрация: 19.01.2013 Сообщений: 113
	30.05.2013, 09:36 [ТС]
	Я в БД вообще ничего не понимаю. 0

@Ev1l
	30.05.2013, 14:41
	Не по теме: тоже сталкивался с такой проблеммой при попытке создать разрушенную форму ловил ошибку, теперь буду знать как правильно делать. 0