| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Наследование Self
Dmitrich © (2005-10-21 01:08:00)Доброе суток, Мастера. Подскажить, как наследовать Self?
Например я хочу создать новую форму из собственной формы:
..
var
Form: TForm2;
..
procedure MyProc;
begin
..
form:=tform2.Create(self); // Почему он не видет Self и как это исправить
form.Show;
..
end;
ЮЮ (2005-10-21 09:48:00) [1]К тому же, вызвав MyProc дважды, поимеешь две разные формы и лишь одну переменную Form для доступа
evvcom (2005-10-21 08:43:00) [2]Self - это неявно определенная переменная внутри методов класса, указывающая на экземпляр (объект) данного (дочернего) класса. В твоем случае MyProc - обычная процедура, в контексте которой Self не определена. Зачем тебе в данном случае Self? Напиши
form:=TForm2.Create(Application);, разве это не устроит?
Джо (2005-10-21 01:16:00) [3]То, что ты пишешь, никакого отношения к наследованию не имеет.
| |
