[XaKeR282]

как преобразовать дробное число в строку?

[PhoeniX]

FloatToStr?

[Konrad]

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

как преобразовать дробное число в строку?

Какер блин...

А гугль зачем?
А учебники делфи?
http://www.delphisources.ru/forum/showthread.php?t=6221
Прочитай хоть одну, и не будешь тогда задавать такие вопросы.

[440420789]

новую тему не стал создавать.
помогите пожалуйста, надо сделать программу которая имитирует нажатие левой кнопки мыши заданное количество раз. поставил курсор на нужное место, потом нажал enter, и программа начинает кликать(в секунду раз 10 надо чтобы кликала), а потом сама останавливалась.
я пробовал так:

Код:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
Application.ProcessMessages;
mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0);
end;

с интервалом таймера=100

она кликает, но я никак немогу её остановить(((
помогите...

[Pilot_Red]

Если это весь код процедуры, то не вариант сделать переменую счетчик, увеличивать ее на 1, до тех пор пока она не станет равно 10

типо того:

Код:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
i:=i+1;
if i<10 then
begin
mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
Application.ProcessMessages;
mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0);
end;
end;

[440420789]

да это весь код, но если делать как ты пишешь, то он же вообще не кликает(((((( надо как то задать количество кликов.

[Pilot_Red]

а ты где i обьявляешь в процедуре или в голове модуля.

[lmikle]

А у таймера св-во Enabled поставить в False слабо?

[440420789]

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

А у таймера св-во Enabled поставить в False слабо?

вот это весь мой код!!!!!!

Код:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
Application.ProcessMessages;
mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0);
end;

пробовал я там со счётчиками и со false ставил, и второй таймер пробывал подрубать, ну связать их через edit(через количество кликов) и через свойство интервал. например: если я ввожу в edit 100, то у первого таймера св-во интервал ставлю 100, а второго таймера ставлю 10000. и ещё во втрой таймер пишу остановить первый таймер(ну чтобы он перестал кликать).
ну ничего не получается, он кликает и кликает. его можно остановить только нажав на крестик

напишите пожалуйста как это делать? может у меня где то ошибка??