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???
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!!!