Oppervlakte graphic

• 

  Appie

  24-05-2001 20:14

  Wie kan mij vertellen hoe je een van een willekeurig opgegeven figuur (of getekend of aan de hand van coördinaten vastgelegd) de eigenschappen (oopervlakte, zwaartepunt etc.) kan bepalen??
• 

  Sven Glazenburg

  25-05-2001 08:59

  Oppervlakte:

  Hier kan ik je helaas geen formule voor geven..

  Zwaartepunt:

  X:Tel elke X van alle punten bij elkaar op en deel door het aantal punten.

  Y:Tel elke Y van alle punten bij elkaar op en deel door het aantal punten.

  Omtrek:

  Bereken voor elk lijnsegment de lengte van de lijn en tel die bij elkaar op:

  Lengte van een lijn: L=sqrt(sqr(X1-X2)+sqr(Y1-Y2))

  Ik hoop dat je hier wat aan hebt,

  Groeten,

  Sven Glazenburg
• 

  Lynx

  25-05-2001 20:49

  Niet makkelijk maar de oppervlakte zou ik wel weten. Volg de volgende stappen hiervoor.

  1. Maak het component TImage aan

  2. Maak de procedure aan

  3. Zet bij var een integer

  4. Zoek met getcolor de kleur van de eerste pixel op

  5. Als het anders is dan de achtergrondkleur tel dan 1 bij de integer op

  6. Doe dit ook met alle andere pixels

  7. De integer geeft de oppervlakte in pixels weer