Ergebnis der Suchanfrage

• Forum: Programmieren allgemein

  Re: Kleine Kreise in einem Kreis darstellen

   
    by LH_Freak, 11. Feb 2007
  Weiß nich obs jemanden interessiert, aber ich hab das ganze mal so modifiziert dass es wirklich aussieht wie beim firefox, also dass sich nicht die kreise drehen sondern nur die farben sich verändern...ziemlich cooler effekt...
  
  var
  r1: single = 1;
  r2: single = 10;
  n: integer = 8;
  x, y: integer;
  col1,col2,col,steps: integer;
  
  procedure TForm1.FormPaint(Sender: TObject);