, hoe controleer de X, y - is in een veelhoek, punten. Het is duidelijk dat de oplossing met inbegrip van de controle van de lijnen elkaar kruisen, hoeveel keer, door het punt X en Y aan de rand van het scherm,,, ik heb nooit geprobeerd de juiste code te lezen, begrijpt het concept van, ik weet alleen dat het lijkt te werken.,,, de functie PtInPoly (totaal Points: array van TPoint; X, y: het gehele getal): booleaanse;,, var, graaf,,,,,, I, J, ik de gehele getal;:,,,,, gevolg: = niet, graaf: = lengte (punten);,, J.: = Count-1;,, i = 0 voor te Count-1 doen beginnen, en als (Points[I].Y < = Y) en (y < Points[J].Y) of de,, (Points[J].Y < = Y) en (y < Points[I].Y)), en dan beginnen, als (X < (Points[j].X - Points[i].X) * (y - Points[i].Y) /,,, (Points[j].Y - Points[i].Y) + Points[i].X) dan het resultaat: = niet;,, einde;,,, J.: = I;,,,,,,,,,