[elfer]

Есть кнопка 1, по нажатию на эту кнопку выполняются действия. Я установил кнопку 2. Как сделать чтоб по нажатию на кнопку 2, выполнялись действия кнопки 1.

[BloodFooria]

В Object Inspector во второй вкладке в OnClick поставить Button1Click.

[elfer]

Если точно то мне надо по окончанию времени нажималась кнопка

[Karsh]

Сообщение от elfer

Если точно то мне надо по окончанию времени нажималась кнопка

На счет этого не понял. Вам нужно, чтобы после нажатия на 2 кнопку была задержка на нек. время, после кот. нажималась бы кнопка 1?

А "нажимать" кнопку можно вызвав ее процедуру:

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage('ok');
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  Button1Click(Self);
end;

или эмулировать нажатие на нее мышки:

Код:

procedure TForm1.Button3Click(Sender: TObject);
begin
  Button1.Perform(WM_LBUTTONDOWN, 0, 0);
  Button1.Perform(WM_LBUTTONUP, 0, 0);
end;

[Ferra]

Сообщение от elfer

Если точно то мне надо по окончанию времени нажималась кнопка

окончания времени чего?

Если стоит таймер, либо каким-то другим образом идёт отсчёт времени, то

Код:

Button1Click(Self);

подойдёт как нельзя лучше. Думаю альтернативные способы тут не нужны, так что используй именно этот.

[AleD]

ёмаё, чо мутить то, есть же процедура у кнопок Click

Код:

Button1.Click;