Показать сообщение отдельно
  #5  
Старый 26.01.2008, 03:12
Аватар для Electronic_Arts
Electronic_Arts Electronic_Arts вне форума
Местный
 
Регистрация: 13.07.2006
Адрес: на земле
Сообщения: 562
Версия Delphi: Delphi 11
Репутация: 18
Восклицание

почему не возвращеться в обычное состояние
Код:
if image3.Tag=3 then
begin
image3.Visible:=false;
image1.Visible:=true;
image1.Tag:=0;
image2.Tag:=0;
image3.Tag:=0;
end;
if image2.Tag=2 then
begin
image2.Visible:=false;
image3.Visible:=true;
image3.Tag:=3;
end;
if image1.Tag=1 then
begin
image1.Visible:=false;
image2.Visible:=true;
image2.Tag:=2;
end;
if image1.Tag=0 then
begin
image1.Visible:=true;
image1.Tag:=1;
end;
Ответить с цитированием