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

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

Мигающая панель, при передаче фокуса на Edit [D5, Win2k]


Hawk_Skywalker ©   (2002-05-30 15:02:00) 

Помогиту кто может !!!
Проблема такая : имеется Edit Panel и Timer нужно сделать
так чтобы при передаче фокуса Edit"у панель начала изменять свойъ
Visible с true на false и на оборот, вобщем мигать....
Как сделать ??? у меня неполучается ПОМОГИТЕ !!!!


VID   (2002-05-30 17:48:00) [1]

to song: ??? Так ведь в было написано: есть Panel, edit и timer. ну так timer для того, что бы мигало :) В принципе, вполне нормальная потребность, что бы что-то мигало, при focused какго-нить объекта. типа, что бы привлечь внимание и всё такое...


JC   (2002-05-30 16:08:00) [2]

Чем тебе предложение VID не нравится...
Без Timer"a можно и Sleep([пауза в милисекундах]) писать, только проверку на выход не забудь.


Cossys   (2002-05-30 16:07:00) [3]

Вон VID добавил, чем не устраивает - будет мигать :)


Hawk_Skywalker   (2002-05-30 16:01:00) [4]

Нет я чувствую меня не поняли!!!
Панель должна непросто исчезать при нажатии на Edit а мигать
с определенным интервалом(на то и таймер)
Есть идей сделать без таймера с удовольствием выслушаю ???


Song   (2002-05-30 15:51:00) [5]

2VID © (30.05.02 15:45)
При чём тут таймер? Свойство Enabled к исчезновению не приведёт.


VID   (2002-05-30 15:45:00) [6]

Procedure Edit1Enter(...);
begin
timer1.enabled:=true;
end;

procedure Edit1Exit(...);
begin
Timer1.enabled:=false;
end;

procedure Timer1Timer(...);
begin
Panel1.visible := not panel1.visible;
end;


Song   (2002-05-30 15:26:00) [7]

Procedure Edit1Enter(Sender:TObject);
Begin
With Panel1 Do Visible:=not Visible;
End;


Hawk_Skywalker   (2002-05-30 15:22:00) [8]

Edit находится не на панели а рядом с ней !!!


Cossys   (2002-05-30 15:14:00) [9]

Если не секрет - зачем, как Вы туда текст вводить будете?


Наверх

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