已经知道一条直线上的两点P1和P2(类型:TPOINT)和直线外一点P3(类型:TPOINT)求P3关于P1、P2所在直线的对称点。最好给出函数。

解决方案 »

  1.   

    这是一个easy的数学问题 想知道找我[email protected]
      

  2.   

    function GetMirrorPoint(p1,p2,p3:TPoint)
      

  3.   

    to submarine81 
    有详细函数吗?还有最好有一个影试程序?
      

  4.   

    function GetMirrorPoint(p1,p2,p3:TPoint):TPoint;
    begin
      result.X:=p1.X-p3.X+p2.X;
      result.Y:=p1.Y-p3.Y+p2.Y;
    end;
    试试看,没准儿行
      

  5.   

    function GetMirrorPoint(p1,p2,p3:TPoint):TPoint;
    begin
      result.X:=p1.X-p3.X+p2.X;
      result.Y:=p1.Y-p3.Y+p2.Y;
    end;
    试试看,没准儿可以