Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.03.05;
Скачать: CL | DM;

Вниз

Что-то с памятью моей стало! Assigned ли?   Найти похожие ветки 

 
WebErr ©   (2004-02-24 16:16) [0]

В общем так:

{$B-}
if Assigned(AddMedicsForm) and (TComponent(AddMedicsForm.Owner) = AOwner) then
begin
AddMedicsForm.Show;
if AddMedicsForm.WindowState = wsMinimized then
AddMedicsForm.WindowState := wsNormal;
end else
begin
AddMedicsForm := TAddMedicsForm.Create(AOwner);
AddMedicsForm.FormCreate(AOwner);
end;

в строке 2 сразу (но не всегда!) выдаёт EAccesViolation, сразу на проверке условия на Owner! К чему это он, и как от этого избавиться?


 
Anatoly Podgoretsky ©   (2004-02-24 16:19) [1]

Или он Assigned или выставлены соответсвующий флаги обработки комплексных выражений


 
WebErr ©   (2004-02-24 16:23) [2]

[1] Странный ответ, так {$B-} же!


 
WebErr ©   (2004-02-24 16:42) [3]

А, всё, понял! Так оно и есть! Теперь даже работает! Спасибо! Просто при высвобождении памяти, Дель не всегда обнуляет указатель. Я второй раз открывал окно и происходило выполнение запретного условия Assigned(AddMedicsForm). Решилось всё очень просто:

procedure TAddMedicsForm.FormDestroy(Sender: TObject);
begin
AddMedicsForm := nil;
end;


 
Anatoly Podgoretsky ©   (2004-02-24 16:51) [4]

WebErr © (24.02.04 16:23) [2]
Нет не странный, он был бы странным если бы ты это указал в вопроса, а так абсолютно нормальны, это вопрос странный с неполными данными.

Дельфи никогда не обнуляет указатели на объекты, поскольку она про все их них не знает и не знает самого главного когда обнулять!

С учетом уточнения у тебя остается первый вариант оно Assigned можешь теперь в этом не сомневаться. А вот сделать не Assigned твоя забота.


 
Skier ©   (2004-02-24 16:53) [5]

>WebErr
Есть ещё флажок csDestroying в свойстве ComponentState.
Иногда бывает весьма полезен...


 
MBo ©   (2004-02-24 17:11) [6]

>Skier
???


 
Skier ©   (2004-02-24 17:21) [7]

А не надо обращаться к полям компонента когда сам компонент
"is about to be destroyed."


 
WebErr ©   (2004-02-24 17:27) [8]

Чтобы всё на свете знать надо в Форум забредать! Спасибо всем!)



Страницы: 1 вся ветка

Текущий архив: 2004.03.05;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.013 c
11-12305
SPeller
2003-06-21 05:17
2004.03.05
Ура! У меня 1000 !!!


3-12294
VLAD-MAL
2004-02-09 14:16
2004.03.05
Поддержка GUID в InterBase/FireBird


1-12408
WebErr
2004-02-24 16:16
2004.03.05
Что-то с памятью моей стало! Assigned ли?


1-12337
LaidBack
2004-02-25 14:56
2004.03.05
Как расположить панель выше главного меню?


14-12532
strannik_
2004-02-12 12:00
2004.03.05
snif