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

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

Как определить равенсво двух обьектов тип Tpicture?


TeNY ©   (2004-10-15 13:30:00) 

Как определить равенсво двух обьектов тип Tpicture?
Сравнение типа

var pict1,pict2:tpicture;
begin
tpict1:=tpicture.create;
tpict2:=tpicture.create;
tpict1:=image1.picture;
tpict2.assign(pict1);
if Pict1=Pict2 then  showmessage('Picture идентичны ...')

всегда выдает False но ведь обьекты равны?


Ozone   (2004-10-15 13:57:00) [1]

http://www.delphimaster.ru/cgi-bin/forum.pl?id=1095095132&n=7


TeNY   (2004-10-15 13:54:00) [2]


> yuramag ©   (15.10.04 13:43) [1]
> Когда пишешь Pict1=Pict2 проверяются только ссылки,
> а они естественно разные!!!

а как проверить сами обьекты?


TeNY   (2004-10-15 13:53:00) [3]

извинясь букву t перед pict1 и pict2 случайно напечатал.НО вопрс остается


yuramag   (2004-10-15 13:43:00) [4]

Когда пишешь Pict1=Pict2 проверяются только ссылки,
а они естественно разные!!!


Наверх

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