Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  Re: 3 Timer für eine gleichmäßige Beschleunigung

    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

  Re: 3 Timer für eine gleichmäßige Beschleunigung

    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