Текущий архив: 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.026 c
