Thank you very much for the code!! I added some new features, like user-defined number of sides for the polygon and colors.<br><a href="http://files.getdropbox.com/u/1118452/Screenshot.png">http://files.getdropbox.com/u/1118452/Screenshot.png</a><br>
<br>I want to ask something about the colors :<br><br>Is it possible to fill an array with colors using a loop? For example<br><br>I have this array ---> color array [1..20] of TfpgColor<br><br>I want to replace this:<br>
<br><i>Color[1]:=TfpgColor($000000); //Black<br>Color[2]:=TfpgColor($0000FF);  //Blue<br>Color[3]:=TfpgColor($FF0000); //Red<br>Color[4]:=TfpgColor($FFFF00);//Yellow<br>Color[5]:=TfpgColor($00FFFF);//Aqua<br>Color[6]:=TfpgColor($008000);//Green<br>
Color[7]:=TfpgColor($808080);//Gray</i><br>.<br>.<br>.<br>.<br><br>With a loop<br><br><br>Thank you<br><br><br><br><div class="gmail_quote">2009/6/24 Graeme Geldenhuys <span dir="ltr"><<a href="mailto:graemeg@opensoft.homeip.net" target="_blank">graemeg@opensoft.homeip.net</a>></span><br>

<blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;"><div>kota kota wrote:<br>
> ok here is an example,<br>
> (look the red letters)<br>
><br>
<br>
</div>As an alternative, I quickly converted the triangle painting into a<br>
component, which produces an OnProgress event. I then added a<br>
ProgressBar to the main form which indicates the progress of the<br>
calculation before the next paint occurs.<br>
<br>
Here is a screenshot, showing the previous paint and it's busy<br>
calculating the new triangles.<br>
<br>
<a href="http://opensoft.homeip.net/%7Egraemeg/generate_triangles.png" target="_blank">http://opensoft.homeip.net/~graemeg/generate_triangles.png</a><br>
<br>
I also attached the new code for you.<br>
<br>
<br>
Regards,<br>
  - Graeme -<br>
<br>
_______________________________________________________<br>
<div>fpGUI - a cross-platform GUI toolkit using Free Pascal<br>
</div><div><div></div><div><a href="http://opensoft.homeip.net/fpgui/" target="_blank">http://opensoft.homeip.net/fpgui/</a><br>
<br>
</div></div><br>_______________________________________________<br>
fpc-pascal maillist  -  <a href="mailto:fpc-pascal@lists.freepascal.org" target="_blank">fpc-pascal@lists.freepascal.org</a><br>
<a href="http://lists.freepascal.org/mailman/listinfo/fpc-pascal" target="_blank">http://lists.freepascal.org/mailman/listinfo/fpc-pascal</a><br></blockquote></div><br>