Visual Basic

[Ilja]

У меня вот 2 вопроса:

1)Как сделать так штобы таймер запускался по нажатии кнопки?

2)Как сделать так штобы этот самый таймер сам щёлкал мышью?

Даже не спрашивайте зачем мне это надо....

[Ilja]

Так ну первый вопрос я решил.

А вот второй остаётся открыт.

[Xcom]

:) Думаю раз бейсик основан на эвентах, значит подобие:

Sub Moi_Timer()

Command1_Click()

End Sub

вроде, точно непомню. :)

Надо попробовать, должно сработать.

[Naima]

xCom

привет ! а по моему это решение - есть просто запуском процедуры обработки щелчка мыши. тоесть выполняется без клика. Боюсь что у товарища Ilya немного другая проблема :).... когдато давно , когда я был еще студентом, один препод заставлял писать программу которая имитирует клик

[man2D]

Ilja

По какому объекту он должен кликать?

[Xcom]

Naima

Привет! :) Думаю что и click несложно набацать ну в примере:

Private Sub objekt_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

пишется текст что хатим зделать при нажатии на обекте!!!! :)

End Sub

Private Sub objekt_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

пишется текст что хатим зделать при отпуске бутона на обекте!!!!

End Sub

Ну дабл click, или Right, Left бутон, похожим макаром. :)

[man2D]

Xcom

Это ты к чему? Вопрос-то по-другому немножко звучал. :)

[KDima]

Ой...

Была у меня одна прога...

Для эмуляции кликов (обычных, левой кнопкой, правой)

Найду - напишу.

Вот вспомнил кое - что:

Делается всё это добро при помощи Api функции:

Public Declare Sub mouse_event Lib "user32" Alias "mouse_event" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)

Изменено 3 апреля, 2004 пользователем KDima

[Naima]

Вот ! согласен с KDima , там оно как то через API функции делается, у меня тож гдето было , надо поискать ... :)

[Гость weiter]

напишите процедуру выполнения API!!! Делов-то....