[fpc-pascal] gtk+ linux-windows

[kota kota]

Thank you very much for the code!! I added some new features, like
user-defined number of sides for the polygon and colors.
http://files.getdropbox.com/u/1118452/Screenshot.png

I want to ask something about the colors :

Is it possible to fill an array with colors using a loop? For example

I have this array ---> color array [1..20] of TfpgColor

I want to replace this:

*Color[1]:=TfpgColor($000000); //Black
Color[2]:=TfpgColor($0000FF);  //Blue
Color[3]:=TfpgColor($FF0000); //Red
Color[4]:=TfpgColor($FFFF00);//Yellow
Color[5]:=TfpgColor($00FFFF);//Aqua
Color[6]:=TfpgColor($008000);//Green
Color[7]:=TfpgColor($808080);//Gray*
.
.
.
.

With a loop


Thank you



2009/6/24 Graeme Geldenhuys <graemeg at opensoft.homeip.net>

> kota kota wrote:
> > ok here is an example,
> > (look the red letters)
> >
>
> As an alternative, I quickly converted the triangle painting into a
> component, which produces an OnProgress event. I then added a
> ProgressBar to the main form which indicates the progress of the
> calculation before the next paint occurs.
>
> Here is a screenshot, showing the previous paint and it's busy
> calculating the new triangles.
>
> http://opensoft.homeip.net/~graemeg/generate_triangles.png<http://opensoft.homeip.net/%7Egraemeg/generate_triangles.png>
>
> I also attached the new code for you.
>
>
> Regards,
>  - Graeme -
>
> _______________________________________________________
> fpGUI - a cross-platform GUI toolkit using Free Pascal
> http://opensoft.homeip.net/fpgui/
>
>
> _______________________________________________
> fpc-pascal maillist  -  fpc-pascal at lists.freepascal.org
> http://lists.freepascal.org/mailman/listinfo/fpc-pascal
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.freepascal.org/pipermail/fpc-pascal/attachments/20090625/7ae6e6a0/attachment.html>