Програмно нажать Кнопку (Button)

@FIL · Регистрация: 19.09.2012

Author24 — интернет-сервис помощи студентам

Надо с помощью кода нажать Кнопку (создать видимость нажатия). Как это реализовать?

@DaMortum · 31.10.2012, 20:37

Вызвать процедуру, назначенную кнопке на событие OnClick.

@FIL · 31.10.2012, 20:47 **[ТС]**

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

Вызвать процедуру, назначенную кнопке на событие OnClick.

На мониторе Кнопка должна визуально нажаться.

@HanDi · 31.10.2012, 20:48

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

На мониторе Кнопка должна визуально нажаться.

Это как? Ты наверное сам не понял, что написал

@FIL · 31.10.2012, 20:56 **[ТС]**

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

Это как?

Так как ты мышкой нажимаешь, только без мышки. Что тут непонятного.

@strainik · 31.10.2012, 20:58

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

Так как ты мышкой нажимаешь, только без мышки. Что тут непонятного.

button1.click и еще че-ни6удь сделать, чтоб нажатие сымитировать) например enabled:=false; sleep 100 enabled:=true;

@ZLO1988 · 31.10.2012, 21:58

Может чел хочет сказать что при наведении мышки кнопка делала вид что нажата ?

@droider · 31.10.2012, 22:26

Вот, что он хочет сказать

Delphi

procedure TForm1.Button1KeyPress(Sender: TObject; var Key: Char);
begin
if key =#13 then Button1.Click; //нажатие кнопки по клавише Enter
end;
 
procedure TForm1.Button1Click(Sender: TObject);
begin
Button1.Perform( BM_SETSTATE, 1, 0 ); //визуализация нажатия кнопки
end;
 
end.

Для эффекта "отжатия" кнопки посылай сообщение BM_SETSTATE вида

Delphi

1	Button1.Perform( BM_SETSTATE, 0, 0 );

@FIL · 31.10.2012, 22:41 **[ТС]**

Алилуйя!

Меня не только поняли, но и дали правильный ответ.

Спасибо, droider.

@droider · 31.10.2012, 22:50

Не за что. Успехов

@FIL Модератор 3490 / 2613 / 741 Регистрация: 19.09.2012 Сообщений: 7,974
		1
	Програмно нажать Кнопку (Button) 31.10.2012, 20:30. Показов 14240. Ответов 9 Метки нет (Все метки) Надо с помощью кода нажать Кнопку (создать видимость нажатия). Как это реализовать? 0

@DaMortum 249 / 154 / 31 Регистрация: 07.10.2012 Сообщений: 401
	31.10.2012, 20:37	2
	Вызвать процедуру, назначенную кнопке на событие OnClick. 0

@FIL Модератор 3490 / 2613 / 741 Регистрация: 19.09.2012 Сообщений: 7,974
	31.10.2012, 20:47 [ТС]	3
	Сообщение от DaMortum Вызвать процедуру, назначенную кнопке на событие OnClick. На мониторе Кнопка должна визуально нажаться. 0

@HanDi 898 / 345 / 65 Регистрация: 11.02.2012 Сообщений: 1,502
	31.10.2012, 20:48	4
	Сообщение от gorfil На мониторе Кнопка должна визуально нажаться. Это как? Ты наверное сам не понял, что написал 0

@FIL Модератор 3490 / 2613 / 741 Регистрация: 19.09.2012 Сообщений: 7,974
	31.10.2012, 20:56 [ТС]	5
	Сообщение от HanDi Это как? Так как ты мышкой нажимаешь, только без мышки. Что тут непонятного. 0

@strainik 0 / 0 / 0 Регистрация: 18.12.2011 Сообщений: 74
	31.10.2012, 20:58	6
	Сообщение от gorfil Так как ты мышкой нажимаешь, только без мышки. Что тут непонятного. button1.click и еще че-ни6удь сделать, чтоб нажатие сымитировать) например enabled:=false; sleep 100 enabled:=true; 0

@ZLO1988 35 / 21 / 40 Регистрация: 25.02.2012 Сообщений: 170
	31.10.2012, 21:58	7
	Может чел хочет сказать что при наведении мышки кнопка делала вид что нажата ? 0

@FIL Модератор 3490 / 2613 / 741 Регистрация: 19.09.2012 Сообщений: 7,974
	31.10.2012, 22:41 [ТС]	9
	Алилуйя! Меня не только поняли, но и дали правильный ответ. Спасибо, droider. 0

@droider 4912 / 2781 / 853 Регистрация: 04.10.2012 Сообщений: 10,121
	31.10.2012, 22:50	10
	Не за что. Успехов 0