Ilja Posted March 20, 2004 Report Share Posted March 20, 2004 У меня вот 2 вопроса: 1)Как сделать так штобы таймер запускался по нажатии кнопки? 2)Как сделать так штобы этот самый таймер сам щёлкал мышью? Даже не спрашивайте зачем мне это надо.... Link to comment Share on other sites More sharing options...
Ilja Posted March 20, 2004 Author Report Share Posted March 20, 2004 Так ну первый вопрос я решил. А вот второй остаётся открыт. Link to comment Share on other sites More sharing options...
Xcom Posted April 1, 2004 Report Share Posted April 1, 2004 :) Думаю раз бейсик основан на эвентах, значит подобие: Sub Moi_Timer() Command1_Click() End Sub вроде, точно непомню. :) Надо попробовать, должно сработать. Link to comment Share on other sites More sharing options...
Naima Posted April 1, 2004 Report Share Posted April 1, 2004 xCom привет ! а по моему это решение - есть просто запуском процедуры обработки щелчка мыши. тоесть выполняется без клика. Боюсь что у товарища Ilya немного другая проблема :).... когдато давно , когда я был еще студентом, один препод заставлял писать программу которая имитирует клик Link to comment Share on other sites More sharing options...
man2D Posted April 1, 2004 Report Share Posted April 1, 2004 Ilja По какому объекту он должен кликать? Link to comment Share on other sites More sharing options...
Xcom Posted April 2, 2004 Report Share Posted April 2, 2004 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 бутон, похожим макаром. :) Link to comment Share on other sites More sharing options...
man2D Posted April 2, 2004 Report Share Posted April 2, 2004 Xcom Это ты к чему? Вопрос-то по-другому немножко звучал. :) Link to comment Share on other sites More sharing options...
KDima Posted April 3, 2004 Report Share Posted April 3, 2004 (edited) Ой... Была у меня одна прога... Для эмуляции кликов (обычных, левой кнопкой, правой) Найду - напишу. Вот вспомнил кое - что: Делается всё это добро при помощи 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) Edited April 3, 2004 by KDima Link to comment Share on other sites More sharing options...
Naima Posted April 5, 2004 Report Share Posted April 5, 2004 Вот ! согласен с KDima , там оно как то через API функции делается, у меня тож гдето было , надо поискать ... :) Link to comment Share on other sites More sharing options...
Guest weiter Posted April 10, 2004 Report Share Posted April 10, 2004 напишите процедуру выполнения API!!! Делов-то.... Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now