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

Вниз

Закрытие формы   Найти похожие ветки 

 
Hadroran   (2008-02-18 15:03) [0]

Привет всем.
Есть форма Form1 на ней панель и две кнопки. По нажатию на первую кнопку есть код

with TForm2.Create(Application) do
 begin
   Parent:=Panel1;
   Show;
 end;

По нажатию второй пытаемся закрыть эту вторую форму.

 Form2.Close;

Результат - ошибка. Что не так делаю. Спасибо.+


 
Palladin ©   (2008-02-18 15:05) [1]


>    Parent:=Panel1;

кто тебя такому плохому научил?


 
Сергей М. ©   (2008-02-18 15:06) [2]


> Что не так делаю


Обращаешься к мусору)


 
Hadroran   (2008-02-18 15:07) [3]


> кто тебя такому плохому научил?

Хелп. :-(


 
Palladin ©   (2008-02-18 15:08) [4]

чего обманываешь то... не может хелп такому плохому научить...


 
Palladin ©   (2008-02-18 15:09) [5]

ну да дело все равно не в этом... form2 это чего по твоему?


 
Hadroran   (2008-02-18 15:10) [6]

форма


 
Palladin ©   (2008-02-18 15:12) [7]

это, в первую очередь, переменная, которая содержит какое либо значение, в случае объекта класса (а форма является объектом класса) этим значением является указатель. ты это значние инициализировал прежде обращатся к нему?


 
Washington ©   (2008-02-18 15:12) [8]

А чё ей в панели делать?


 
Hadroran   (2008-02-18 15:15) [9]

Не инициализировал... Боюсь дальше спрашивать...


> Washington ©   (18.02.08 15:12) [8]
> А чё ей в панели делать?

Вот показали так :-)


 
Hadroran   (2008-02-18 15:21) [10]


> Palladin ©   (18.02.08 15:12) [7]

помоги плиз.


 
Семеныч   (2008-02-18 15:33) [11]

> Hadroran

Первая кнопка:

if Form2 = nil then
begin
 Form2 := TForm2.Create(Application);
 try
   Form2.Parent := Panel1;
   Form2.Show;
 except
   FreeAndNil(Form2);
   raise;
 end;
end;


Вторая кнопка:
FreeAndNil(Form2);


 
Семеныч   (2008-02-18 15:39) [12]

> Hadroran   (18.02.08 15:15) [9]

> Вот показали так :-)

Самая большая ошибка начинающих программистов - это бездумное (один-в-один) использование примеров кода, которые им показывают.

В каждом примере, который Вам кто-то показал, обязательно надо досконально разобраться, чтобы стала понятна каждая буква в нем. А после этого надо подумать и, если требуется, то переделать этот пример так, чтобы он перестал быть ПРИМЕРОМ и стал рабочим кодом ВАШЕЙ программы.

Только так. Иначе будете ловить баги мешками.


 
Washington ©   (2008-02-18 15:44) [13]


> Семеныч   (18.02.08 15:39) [12]

+1. Выяснил на горьком опыте )


 
Anatoly Podgoretsky ©   (2008-02-18 15:46) [14]


> Хелп. :-(

Не надо бочку катить на хелп, дело не в бобине.


 
{RASkov} ©   (2008-02-18 15:55) [15]

> [12] Семеныч   (18.02.08 15:39)
> В каждом примере, который Вам кто-то показал, обязательно
> надо досконально разобраться, чтобы стала понятна каждая
> буква в нем. А после этого надо подумать и, если требуется,
> то переделать этот пример так, чтобы он перестал быть ПРИМЕРОМ
> и стал рабочим кодом ВАШЕЙ программы.

+5



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

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

Наверх





Память: 0.47 MB
Время: 0.006 c
15-1202242276
Kerk
2008-02-05 23:11
2008.03.16
Персональная страница Google


15-1202475008
korstin
2008-02-08 15:50
2008.03.16
Киноманам посвящается )))


2-1203394543
Skyle
2008-02-19 07:15
2008.03.16
Различия VarCast varCurrency -> varSingle, varCurrency->varDouble


15-1202484636
Cyrax
2008-02-08 18:30
2008.03.16
Рейтинг (популярность) сотовых телефонов...


2-1203017485
F@T@L_Err0r
2008-02-14 22:31
2008.03.16
Ping





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский