Hi hab mal ne ganz Simple.

Wie wiederhole ich einen Button.Click 5 mal im Abstand von 5 Sekunden denn ich mit einem anderen Button ausführe?

Verwende einen Timer, den du per Buttonklick strtest und rufe darin die Click-Methode des anderen Buttons auf.

und mit einer verzögerung z.B. Sleep

Zitat von fuknersascha:

und mit einer verzögerung z.B. Sleep

Nein, mit einem Timer (TTimer)

Hi,

probier mal 'Button.OnClick(self)' - sollte funktionieren. Für die 5 Sekunden eventuell Timer nehmen!

Viel Glück!
Elicia

Kann man das nicht irgendwie so Realisieren??

zusammenfalten · markieren

Delphi-Quellcode:

procedure TForm1.Button6Click(Sender: TObject);
var x :integer;
begin
   while x:=1 < 5 do
   begin
    Sleep(1000);
    Button2.Click;
    Button3.Click;
    inc(x);
  end;
 end;

Also wenn dann schon "for x:=1 to 4 do"

Aber dann wartet der User ja 4 Sekunden und kann nix machen.

Nimm doch einen Timer

Hallo Sascha,

bevor du weiter programmierst: Wenn du Code für ein ButtonClick-Event geschrieben hast und diesen Code auch von anderen Stellen aus aufrufen möchtest, dann empfiehlt es sich spätestens jetzt diesen Code in eine eigene Prozedur auszulagern.

Die Entscheidung zwischen Sleep() und einem Timer hängt auch davon ab, ob die Zeit möglichst exakt eingehalten werden muss, in welchem Verhältnis die Wartezeit zur Ausführungszeit deines Codes steht und ob der Benutzer zwischenzeitlich überhaupt eine andere Aktion anstoßen darf.

Grüße vom marabu

habs

zusammenfalten · markieren

Delphi-Quellcode:

procedure TForm1.Button6Click(Sender: TObject);
begin
 Memo1.Clear;
 NMHTTP1.get('http://de.finance.yahoo.com/waehrungsrechner');
 a:= NMHTTP1.Body;
   while x < 5 do
    begin
     Button2Click(Sender);
     Button3Click(Sender);
     x:=x+1;
     Sleep(2000);
    end;
end;

Hallo Sascha,

sag mal, bist Du resistent gegen Beratung?

Zitat von sirius:

Also wenn dann schon "for x:=1 to 4 do"

Aber dann wartet der User ja 4 Sekunden und kann nix machen.

Nimm doch einen Timer

Durch die for-Schleife sparst Du Dir zwei Anweisungen. Außerdem fehlt bei Dir die Initialisierung von x. Und den Timer haben mehrere vorgeschlagen; das hat doch seinen Grund!!! Jürgen