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

[DANIЯR]

Всем привет!!!
У меня такая проблемка, нужно 1 выстрелом убить 2х зайцев
вот у меня есть Button1 и Button2 но мне нужно сделать так чтобы 1 кнопкой можно было одновременно нажимать 2, я для этого сделал Button3 но не знаю какой нужно прописать код для этого.

[Stilet]

procedure TForm1.Button3Click(Sender: TObject);
begin
Button1.Click;Button2.Click;
end;

[DANIЯR]

Спасибо!!!! поду проверять!!!!

[artemavd]

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

[DANIЯR]

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

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

Ну, обьяснять долго.

Я чет не нашел здесь кнопку стобы говорить спасибо, или повысить репутацию. код работает

[DANIЯR]

Еще один вопрос, можно сделать так:
Допустим я пишу чтонибуть в Edit1 а Edit2 автоматом копировала с Edit1?
Кто поможет тому скажу зачем мне это надо...

[Proof]

procedure TForm1.Edit1Change(Sender: TObject);
begin
edit2.Text:=edit1.Text;
end;

[DANIЯR]

Спасибо МАN!!!!

[Elm0]

Кто поможет тому скажу зачем мне это надо...

мдаааааа.......еще "бе бе бе " надо было добавить=)