title: Looping TGauge with timer
body: <p>I want to replace my progress bar with gauge. Here is version on progress bar:</p>
  
  <pre><code>procedure TForm1.tmr1Timer(sender: TObject);
  begin
    pb0.Position := (pb0.Position + 1) mod pb0.Max;
  end;
  </code></pre>
  
  <p>And this is on gauge</p>
  
  <pre><code>procedure TForm1.tmr1Timer(sender: TObject);
  begin
    gauge.MinValue := 0;
    gauge.MaxValue := 100;
    gauge.Progress := gauge.Progress + 1;
  end;
  </code></pre>
  
  <p>How to make it start over every time it reach 100 ?
  As i tried with button to test, i can not make it looping just like on progress bar.</p>
  
  <pre><code>procedure TForm1.btn6Click(sender: TObject);
  begin
    tmr1.Enabled := not tmr1.Enabled;
    begin
      gauge.Progress := 0;
      tmr1.Enabled := True
    end;
    if Form1.gauge.Progress = 100 then // is this correct ?
    // what to do to make it looping ?
  end;
  </code></pre>
  
  <p>How to make same the function on gauge as replacement for progress bar + timer above?</p>