Форум: "Основная";
Текущий архив: 2003.09.29;
Скачать: [xml.tar.bz2];

Вниз

Key Down   Найти похожие ветки 

← →
Opera   (2003-09-17 01:48) [0]

Помогите пишу:
if Key = VK_DOWN then
begin
if Form1.Panel1.Font.Color=clBlue then
begin
Deselect;
Form1.Panel2.Font.Color:=clBlue
end;
if Form1.Panel2.Font.Color=clBlue then
begin
Deselect;
Form1.Panel3.Font.Color:=clBlue

по нажатию у меня получается и Panel2 и Panel3 становятся синими помогите как сделать чтобы по нажатию происходило 1 условие (синяя становилась панель2), а уже после второго нажатия панель3! На deselect у меня все панели становятся белыми!

---

← →
_Dllma   (2003-09-17 02:08) [1]

Перепиши первое условие так:

if (Form1.Panel1.Font.Color=clBlue) then
begin
deselect;
Form1.Panel2.Font.Color:=clBlue;
exit;
end;


---

← →
Opera   (2003-09-17 02:48) [2]

Спасибо все работает!

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.09.29;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.01 c