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

Вниз

Button, как определить какая кнопка активна в данный момент   Найти похожие ветки 

 
saint   (2004-09-03 15:01) [0]

Подскажите, вот у меня на форме есть с 10 кнопок, как определить на какой именно кнопке находится, курсор?


 
Плохиш ©   (2004-09-03 15:03) [1]

OnEnter


 
Семен Сорокин ©   (2004-09-03 15:07) [2]

ControlAtPos


 
saint   (2004-09-03 15:08) [3]

не совсем понял, т.е. мне что для каждой кнопки прописывать events? Или я что -то непонимаю?


 
Ega23 ©   (2004-09-03 15:08) [4]

procedure TFMain.AppEvents1Idle(Sender: TObject; var Done: Boolean);
var
i:Integer;
begin
for i:=0 to ControlCount-1 do
 begin
  if not (Controls[i] is TLabel) then Continue;
  if MouseInControl(TWinControl(Controls[i])) then
     TLabel(Controls[i]).Font.Color:=clBlue
  else
     TLabel(Controls[i]).Font.Color:=clBlack;
 end;
end;


 
saint   (2004-09-03 15:10) [5]

ок кажется понял, спасибо!



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

Текущий архив: 2004.09.19;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.054 c
1-1094132658
Соколов
2004-09-02 17:44
2004.09.19
Chart


4-1091433014
-c-st-s-
2004-08-02 11:50
2004.09.19
Информация о состоянии принтера


14-1093948712
VID
2004-08-31 14:38
2004.09.19
Регистрация: что для этого нужно ?


1-1093956323
Uran
2004-08-31 16:45
2004.09.19
Подскажите какие лучше использовать компоненты


14-1093937936
ИМХО
2004-08-31 11:38
2004.09.19
Мегаполисы