Forum: Sonstige Fragen zu Delphi
Delphi
by bitsetter,
2. Feb 2007
Ich habe vorgeschlagen bei der 2. Schleife 1 dazu zu addieren, dann wird aus 500 501.
vx:= 1000 div ((k-41)*2)+ 1;
Bei mir hatte sich dann jedenfalls die Geschwindigkeit geändert, zumindest wenn ich mehrmals D gedrückt hatte.
Sonst hat der Timer immer nur den Intervall 500 oder 999999.
Einen Breakpoint setzt man für den Debugger, damit kann man dann die Variablen auslesen. Ansonsten setze...
Forum: Sonstige Fragen zu Delphi
Delphi
by bitsetter,
2. Feb 2007
begin
for j:=1to 40 do begin
vx:= 1000 div ((41-j)*2);
end; //VX:=500;1. Mal 500
VX:=999999 ;
for k:=42to 81 do begin
vx:= 1000 div ((k-41)*2);//versuch mal mit vx:= 1000 div ((k-41)*2)+ 1
end; //VX:=500;//2. Mal 500
if rechtsklick then begin
for i := 81 downto 2 do begin