Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.11.25;
Скачать: [xml.tar.bz2];

Вниз

Как удалить форму   Найти похожие ветки 

 
SKIPtr   (2007-11-01 21:53) [0]

Я создаю дополнительную форму if not Assigned(Form2) then   Form2 := TForm2.Create
После работы удаляю форму через OnClose где Action := caFree
Вторично эту форму я уже создать не могу а ндо Подскажите как это сделать


 
Reindeer Moss Eater ©   (2007-11-01 22:01) [1]

через OnClose где Action := caFree

Это не приводит к тому, что Form2 становится not Assigned


 
SKIPtr   (2007-11-01 22:52) [2]

В книгах пишут что caFree освобождает память. Мне надо освобождать другим методом?


 
Джо ©   (2007-11-01 22:54) [3]

> [2] SKIPtr   (01.11.07 22:52)
> В книгах пишут что caFree освобождает память. Мне надо освобождать
> другим методом?

Она освобождает память, занятую экземпляром объекта, а вовсем не присваивает переменной значение nil (переменных может быть сколько угодно и Free о них ничего не знает).


 
Плохиш ©   (2007-11-01 22:54) [4]


> SKIPtr   (01.11.07 22:52) [2]

Какая связь между "памятью" и переменной, хранящей какой-то адрес?


 
Anatoly Podgoretsky ©   (2007-11-01 23:12) [5]


> Мне надо освобождать другим методом?

Не освобождать другим методом, а создавать другим методом.
Для анализа надо восспользоваться массивом Screen.Forms


 
orinoko   (2007-11-02 14:44) [6]

в OnClose надо написать

...
Action:=caFree;
Form2:=nil;
end;


 
Leonid Troyanovsky ©   (2007-11-02 17:03) [7]


> orinoko   (02.11.07 14:44) [6]

> в OnClose надо написать
..
> Form2:=nil;

Отнюдь.
Проблема не с уничтожением,
просто, с консерваторией что-то неладно.

RTFM [5]

--
Regards, LVT.


 
Ega23 ©   (2007-11-02 17:13) [8]

if not Assigned(Form2) then   Form2 := TForm2.Create

..........
Form2.Free
Form2 := nil;



 
Leonid Troyanovsky ©   (2007-11-02 17:35) [9]


> Ega23 ©   (02.11.07 17:13) [8]

> Form2.Free
> Form2 := nil;

Это - на троечку, для любителей поисков среди 15 длл и 100 серверов.
RTFM.

--
Regards, LVT.


 
SKIPtr   (2007-11-03 08:55) [10]


> Anatoly Podgoretsky ©   (01.11.07 23:12) [5]

Спасибо так эта проблема решаема

хотя и  >orinoko   (02.11.07 14:44) [6]
тоже подставляется Я думал как сделать при закрытии nil даже пробывал
Action:=caFree;
Free

происходит ошибка  


> Ega23 ©   (02.11.07 17:13) [8]

Как произойдет освобождение при закрытии формы


 
Kolan ©   (2007-11-03 09:50) [11]

> Какая связь между «памятью» и переменной, хранящей какой-
> то адрес?

Какая разница между реальным домом и его адресом в адресной книге?

Делая Free ты сносишь дом, но ведь адрес все равно остаётся в книге, поэтому чтобы небыл недорозумение его надо из книги вычеркнуть, то есть сделать := nil.


 
Плохиш ©   (2007-11-03 12:50) [12]


> Kolan ©   (03.11.07 09:50) [11]

Это ты мне расказываешь? Можешь не топтать кнопки...


 
SKIPtr   (2007-11-03 20:00) [13]

Если бы еще топали по существу а то много пустых ответов


 
Leonid Troyanovsky ©   (2007-11-03 21:17) [14]


> SKIPtr   (03.11.07 20:00) [13]

> Если бы еще топали по существу а то много пустых ответов

В ходе этого обсуждения многие имели возможность
извлечь для себя что-то существенное.
И необязательно для тебя ;)

--
Regards, LVT.


 
Kolan ©   (2007-11-03 21:31) [15]

> Это ты мне расказываешь?

А не не тебе, афтару ессно&#133


 
SKIPtr   (2007-11-04 08:58) [16]

Ну нельзя без межсабойчиков хотя ответы были остаётся выбрать подходящий

//Зачем адрес который не куда не ведет



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

Форум: "Начинающим";
Текущий архив: 2007.11.25;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.47 MB
Время: 0.044 c
2-1194082503
WFS
2007-11-03 12:35
2007.11.25
Как узнать яркость пикселя?


4-1178613598
Iv_
2007-05-08 12:39
2007.11.25
Регион, процедура прорисовки окна


4-1179066601
Хан
2007-05-13 18:30
2007.11.25
Как перехватить события копирования, удаления, перемешения файлов


2-1194265838
WFS
2007-11-05 15:30
2007.11.25
Как проверить наличие файла?


2-1193925089
Darvin
2007-11-01 16:51
2007.11.25
Скроллинг в DrawGrid





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский