Как проипсать событие?

[Sanek777]

Как сделать так чтобы при нажатие Labla событие нажатия SpeedButton принимало событие нажатия Button. Я пробовал в нажатии Labla писать: SpeedButton1.OnClick := Button1.Click - это не прокатывает в компиляторе. Помогите!!!

[Longedok]

Нужно в обработчике события Label1.OnClick написать:

SpeedButton1.OnClick := Button1.OnClick;

(то есть не Click, а OnClick)

[Dj_smart]

Можно пойти другим путём.
Зведи перемунную Sp:boolean;
На Onclick лайбела:

Sp:=true;

И в онклик speedbutton:

if sp then begin
  butto1.click;
  exit; 
end else begin
  //... делаешь чё надо
end;

И дело в шляпе...

[puporev]

procedure TForm1.Label1Click(Sender: TObject);
begin
SpeedButton1.Click;
end;