Wait(Time)?

[runger]

Hallo
hab einen Timer, der wird alle 2 sec durchlaufen. Darin steht ein delay, wie beschrieb, Hauptfenster ruckelt beim bewegen.

Rainer

[runger]

liegt das vielleicht am Timer?
Rainer

[runger]

Hallo,
es ist tatsächlich so: im Timer funktioniert das nicht. Weiss jemand warum?
Rainer

[glkgereon]

also, ich habs so gemacht (und es funzt):

Delphi-Quellcode:

procedure wait(zeit:integer);
var 
anfang, ende:integer;
begin
anfang:=time;//time ist die aktuelle systemzeit

repeat
Application.Processmessages;//damits eben NICHT einfriert
ende:=time; //zeit wird genommen
until millisecondabetween(anfang, ende)>=zeit; 
//millisecondsbetween, grosses rätsel, was tut die function?????
//richtig!!!!! millisekunden zwiuschen zwei daten / zeiten....

end;

//ja, und das wars auch schon

also, bei mir funzt es so (delphi 6)

[runger]

Hallo,
das glaub ich dir nicht. Dieser Code läuft so nicht. Was ist time?
Gettime oder was.
Rainer

[runger]

Hallo
das ist im Grunde genau der Code der im Timer nicht funktioniert!
Das Fenster friert ein, wenn man versucht es zu bewegen!
Rainer

[runger]

Hallo

millisecondsbetween gibts bei D7 (auch bei D6,D5,D2) nicht!

Rainer

[glkgereon]

nein, bei mir gibts ne function time, die eine TDateTime zurückgibt, die aktuelle Systemzeit.
gibts das bei dir nicht??? :shock:
dann is klar das dann mein prog am ... ist, aber versuch mal das zu ersetzen durch, ..., zb gettime, getsystime, was auch immer...

[glkgereon]

und: das fenster friert NICHT ein!!!
dafür is da ein APPLICATION.PROCESSMESSAGES; drin!!!