Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.09.29;
Скачать: CL | DM;

Вниз

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;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.014 c
1-96174
саф
2003-09-16 10:02
2003.09.29
Склеить несколько файлов разных расширений в один


14-96433
Mr@MsGuns
2003-09-09 21:26
2003.09.29
Я вот чего хотел бы знать...


3-96103
Burn
2003-09-09 00:56
2003.09.29
Локальные БД


8-96307
a72
2003-06-02 14:41
2003.09.29
Компоненты для векторной графики


1-96167
fartuna
2003-09-16 11:58
2003.09.29
JEDI VCL 2.10 for D5-D7