Вниз
Скачать: CL | DM;

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

← →
diks ©   (2003-01-16 14:36) [0]

Люди помогите есть pnel1 на ней текст как сдеоать чтобы при наведении на panel1 текст менял цвет?


← →
gsu ©   (2003-01-16 14:37) [1]

OnMouseMove + Font.Color:=clBlue


← →
Skier ©   (2003-01-16 14:39) [2]

>diks
Лови сообщения
CM_MOUSEENTER и
CM_MOUSELEAVE


← →
diks ©   (2003-01-16 16:59) [3]

Люди можно поподробнее!
А *OnMouseMove + Font.Color:=clBlue* ни фига не работает ему + не нравится


← →
gsu ©   (2003-01-16 17:11) [4]

А куда ты их суешь и кому ?


← →
diks ©   (2003-01-16 17:17) [5]

панели под код
Вот так
procedure TForm1.Panel1Click(Sender: TObject);
begin
winexec("c:\program files\ge_setup.exe", SW_show);
OnMouseMove + Font.Color:=clBlue;
end;

end.


← →
Smithson ©   (2003-01-16 17:20) [6]

Га-га-га


← →
авыыав   (2003-01-16 17:21) [7]

если твоя панель, то пиши так:
procedure TForm1.Panel1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
Panel1.Font.Color:=clBlue;
end;


← →
авыыав   (2003-01-16 17:22) [8]

>> Smithson ©
Было время я и 2+2 не знал, а сколько ща знаю - песчинка


← →
Smithson ©   (2003-01-16 17:35) [9]

May be. После двух часов оптимизации SQL показалось смешным.


← →
gsu ©   (2003-01-16 17:38) [10]

(-:|~


← →
diks ©   (2003-01-16 17:47) [11]

Ни фига не работает ему вот это не нравится :procedure TForm1.Panel1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);


← →
gsu ©   (2003-01-16 17:51) [12]

1. кликни на панели
2. открой инспектора
3. перейди на закладку Events
4. нажми 2 раза на onmousemove
5. вставь туда Panel1.Font.Color:=clBlue;
6. купи книгу по D
7. Учись учиться


← →
Smithson ©   (2003-01-16 17:56) [13]

Подписываюсь под каждым словом. Под пунктом 7 - два раза!


← →
Roma ©   (2003-01-16 21:12) [14]

Пункт 7 - это правильно. Но вот цвет текста на панели навсегда останется clBlue. Надо все таки ловить CM_MOUSEENTER, CM_MOUSELEAVE (см. Skier © (16.01.03 14:39))...

PS: Либо автор вопроса прикалывается, либо одно из двух...



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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.014 c
3-86665
XAPAKTEP
2003-01-08 14:46
2003.01.27
Индексация БД


8-86974
AlexT1000
2002-10-11 14:15
2003.01.27
Графические фильтры!


3-86643
E_dimon
2003-01-03 22:49
2003.01.27
TUtil32.dll Исправление ошибок-Paradox


3-86710
Aleksandr
2003-01-09 13:39
2003.01.27
Как создать убывающую индексацию для ClientDataSet?


14-87059
Supreme
2003-01-05 17:20
2003.01.27
Помогите пожалуйста решить такую короткую задачу по Perl




   Наверх