Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Про указатели и вообще я чето не пойму!


say ©   (2002-05-02 01:03:00) 

Мастера!!! Я чето не понял следующего
(помогите пожалуйста)

var F:^TForm;
s:string;

New(F);
F^:=TForm.Create(Application);
F.Caption:="rrrrrr"; // проходит
s:=F.Caption; // проходит
F^.Free; // проходит

а вто если заменить:
F^.Free; на F.Free; // глючит со страшной силой!!!!

ПОЧЕМУ!? ПОЧЕМУ!? ПОЧЕМУ!?


Aleks1   (2002-05-03 04:08:00) [1]

Переменные типа F : TObject Всегда являются уже указателями на соответсвующий объект. "Кнопки или еще чего" тут будут теми же указателями.


sssss   (2002-05-03 02:44:00) [2]

СПАСИБО за ответы!!!!!!!!!!!!
Объясняю!!! Я вот сам не могу понять. ПОЧЕМУ?

-> kull это просто пример можно хоть какой тип. (но только
объект). А вот если надо неизвестное кол-во кнопок или еще
чего? как быть - конечно самое простое - список TList где
элементы pointer"ы и т.д.

-> Andrus вот и я не пойму!!! ПОЧЕМУ (поэтому и большими буквами)
ведь если сделать Integer(F) и Integer(F^) это совсем разные
значения!

-> Doom ПОЧЕМУ повезло? F (4 байта) - указывает на другие 4 байта
которые уже указывают непосредственно тип и от которых идут
некие смещения по полям. Почему тогда проходит F.Caption?

-> Malder Спасибо за напоминание про Dispose() но я как раз его
и не забываю делать, но мемогу понять почему и F.Caption и
F^.Caption одно и тоже.

Кстати я сам всегда делаю F^.Caption и F^.Free (только хочется понять что за фигня!!!). Если Дельфа просто облегчает таким образом работу то возникает вопрос а почему именно Free не проходит


Malder   (2002-05-02 13:35:00) [3]

say, непонятно почему проходит F.Caption:="rrrrrr"
И совершенно понятно почему начинает на F.Free глючить. F - это же указатель, а не объект, и у него нету деструктора Destroy (который вызывается методом Free). Я вот другого не понимаю. Почему вообзе компилятор Delphi допускает конструкцию типа на F.Free, s:=F.Caption, F.Caption:="rrrrrr" ?!

P.S. В конце не забывай освобождать место, выделенное New(F) процедурой Dispose(F)...


Doom   (2002-05-02 12:10:00) [4]


> F.Caption:="rrrrrr"; // проходит

чисто случайно проходит.

> s:=F.Caption; // проходит

тут тебе тоже повезло

> F^.Free; // проходит
>
> а вто если заменить:

а не надо заменять

А что непонятно?


Andrus   (2002-05-02 11:44:00) [5]


> var F:^TForm;
> s:string;
>
> New(F);
> F^:=TForm.Create(Application);
> F.Caption:="rrrrrr"; // проходит
> s:=F.Caption; // проходит
> F^.Free; // проходит

var F:TForm;//это уже указатель на TForm
s:string;

//New(F); ???????????????
F:=TForm.Create(Application);
F.Caption:="rrrrrr"; // проходит
s:=F.Caption; // проходит
F.Free; // проходит



kull   (2002-05-02 01:23:00) [6]

А зачем F:^TForm ?
Достаточно - F:TForm;


Наверх

Титульная страница Поиск, карта сайта Написать письмо