Mega Code Archive

 
Categories / Delphi / Graphic
 

How to Signed Volume in 2D

Title: How to Signed Volume in 2D unction Signed(x1, y1, x2, y2, Px, Py: Double): Double; begin Result := (x2 - x1) * (py - y1) - (px - x1) * (y2 - y1); end; (* End Of Signed *)