Рисунок в смсле кнопки, на нем лейбл. как зделать чтооб лейбл передавал собитие OnClick?
кажеться било какое-то свойство..
Для: Oneekz
1. Куда передавал ?
2. У лейбла как и у всвех TControl есть событие клик.
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;
вирішив:
aClick((a0 as TObject));
a0-імя малюнка-кнопки
Для просмотра полной версии этой страницы, пожалуйста,
пройдите по ссылке.