probleme de temps avec 3 click d'affiler

Question

Bonjour alors voila j'ai un code qui me permet de faire 3 click  d'affiler dans des diff&#233;rent endroit c'est a dire si je met 3 au nombre de click que doit faire le programme, le programme va cliker dans un  endroit puis dans lotre et ainsi de suite 3  fois de suite toute les 4 seconde si je met 4 dans le temps entre chaque click.

Le probleme c'est que si je met 3 au nombre de click et 4 au temps entre chaque ensemble de click, &#231;a ne respecte pas le temps, c'est &#224; dire que au lieu de faire toute les 4 seconde l'ensemble des click il le fait toute les 2seconde alors j'aimerai bien que vous puissiez m'aider voici le code :

procedure TForm4.Button4Click(Sender: TObject);
var
X, Y, I : Integer;
l : cardinal;
begin
l := StrToInt(Edit8.Text);
Timer1.Interval := l * 1000;
begin
For I := 1 to StrToInt(Edit7.Text) do begin
X := StrToInt(Edit1.Text);
Y := StrToInt(Edit2.Text);
               SetCursorPos(X, Y);
mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
Sleep(250);
mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0);
 begin


X := StrToInt(Edit3.Text);
Y := StrToInt(Edit4.Text);
               SetCursorPos(X, Y);
mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
Sleep(250);
mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0);
                               end;         begin
X := StrToInt(Edit5.Text);
Y := StrToInt(Edit6.Text);
               SetCursorPos(X, Y);
mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
Sleep(250);
mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0);
Sleep(2000);
Timer1.Enabled := True;
                   end;            end;    end;
end;

Je voudrai que le programme respecte le temps et que &#231;a se fasse toute les 4 seconde merci

maxioutils · Answer

En faite le programme click une fois dans chaque endroit,  alors la il va cliker une foi dans 3 endroit diff&#233;rent toute les 4 seconde.

Cirec · Answer

on en revient toujours au m&#234;me point 
apr&#232;s 40 messages tu pr&#233;sentes encore quasiment le m&#234;me code 
m&#234;me Delphiprog ta donner des conseils que tu n'as pas appliqu&#233;s
je t'ai fait une proposition tu l'as refuser libre &#224; toi 
mais je ne vais pas passer mon temps &#224; te r&#233;peter les m&#234;mes choses
pour r&#234;gler ton probl&#232;me &#231;a devrait prendre 30 minutes en comptant large 
maintenant la main reste tendu tu fais comme tu veux la balle est dans ton camp

@+
Cirec

maxioutils · Answer

mais je ne comprend pas je vous ecoute pourtant, j'ai fait ce que vous avez dis juste pour nommer les composant, je ne veux pas je m'y retrouve tr&#232;s bien sans.

Cirec · Answer

T&#234;tu et obstin&#233; voici ce qui te r&#233;sume
si tu refuses d'appliquer les principes de bases tu auras toujours des difficult&#233;s &#224; progresser, le jour ou tu devras reprendre un programme avec un vingtaine de composants non nomm&#233;s tu comprendras l'importance de la chose

@+
Cirec

maxioutils · Answer

ok 
Bon alors vous ne pouvez pas m'aider m'aider ?  stp

Cirec · Answer

si envoie moi ton code je te le corrige et on en parle plus
en plus tu pourras voir comment on fait

@+
Cirec

maxioutils · Answer

ok je tenvoi le code en entier mais par mp et aussi je n'ai pas nommer les composant je vais le faire plus tard d&#233;sol&#233; mais comment j'ai que 4 form pour linstant je tenvoi le code des 4

Probleme de temps avec 3 click d'affiler

7 réponses

Votre réponse

Discussions similaires