• Курсы Академии Кодебай, стартующие в мае - июне, от команды The Codeby

    1. Цифровая криминалистика и реагирование на инциденты
    2. ОС Linux (DFIR) Старт: 16 мая
    3. Анализ фишинговых атак Старт: 16 мая Устройства для тестирования на проникновение Старт: 16 мая

    Скидки до 10%

    Полный список ближайших курсов ...

Передача Обрабртчика Собития на фон

  • Автор темы Oneekz
  • Дата начала
Статус
Закрыто для дальнейших ответов.
O

Oneekz

Рисунок в смсле кнопки, на нем лейбл. как зделать чтооб лейбл передавал собитие OnClick?
кажеться било какое-то свойство..
 
R

root

Для: Oneekz
1. Куда передавал ?
2. У лейбла как и у всвех TControl есть событие клик.
 
O

Oneekz

procedure TForm1.aClick(Sender: TObject);
begin
if lq.Caption='' then exit;

(Sender as TJvImage).State:=stDown;
delay(level*300);
(Sender as TJvImage).State:=stDefault;
if Question[k].right=ansId[StrToInt(copy((Sender as TComponent).Name,2,1))]
then Right else alert('Wrong(((');
end;

ето OnClick на TJvImage. Их несколько.
а Label поверх каждой. и вибрать ему OnCLick не вимдет из-за (Sender as TJvImage).State:=stDown;
 
O

Oneekz

вирішив:
aClick((a0 as TObject));

a0-імя малюнка-кнопки
 
Статус
Закрыто для дальнейших ответов.
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!