Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Что заначит св-во Tag ;у формы прочитав Help ни чё не понял. [D5, D6, Win95/98]

iNew © (2002-09-11 18:08:00)
Например, что означает: if Assigned(TMonDirThread(fMonDirMain.Tag)) then TMonDirThread(fMonDirMain.Tag).Terminate;
fMonDirMain.Tag := 0;

Кадастрат (2002-09-11 18:45:00) [1]
Ну, запишешь ты туда нуль, ну потеряешь ссылку на нить, а удалять ее кто будет?

Cobalt (2002-09-11 18:21:00) [2]
В данном случае там хранился класс типа TMonDirThread

andy_prokofiev (2002-09-11 18:21:00) [3]
Есть, видимо, форма fMonDirMain. У нее при создании было заполнено свойство Tag, причем это ссылка на какой-то процесс типа TMonDirThread.

if Assigned(TMonDirThread(fMonDirMain.Tag))then
{ fMonDirMain.Tag приводится к типу TMonDirThread и проверяется, не равен ли он nil}
TMonDirThread(fMonDirMain.Tag).Terminate;
{ fMonDirMain.Tag приводится к типу TMonDirThread и этот процесс закрывается}
fMonDirMain.Tag := 0; { чистится ссылка на уже удаленный процесс}

iNew (2002-09-11 18:21:00) [4]
А почему просто не написать 0(нуль)

Умиленный кадастрат (2002-09-11 18:20:00) [5]
2 Дак что означает та строчка?
Хрен ее знает, откуда ты выдрал там и спроси.
Наверное, там просто проверяется, если объект, ссылка на который лежит в .Tag существует, то к нему следует применить метод Terminate. А судя по названию, объект этот производный от TThread.

MBo (2002-09-11 18:18:00) [6]
в данном случае в Tag хранится указатель на объект типа TMonDirThread, приведенный к типу Integer. Раз он нулевой, то объект не сопоставлен (nil)

iNew (2002-09-11 18:15:00) [7]
Дак что означает та строчка?

iNew (2002-09-11 18:14:00) [8]
В моем случае св-во Tag=0

Song (2002-09-11 18:13:00) [9]
Tag это любое число типа Integer, где Вы можете хранить всё что Вам вздумается.

andy_prokofiev (2002-09-11 18:12:00) [10]
Кто-то пишет в св-во Tag указатель
Form1.Tag := Integer(Pointer(Button1));

Наверх

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