delphi编写的关于线段求交点的算法和窗体程序,可以自由绘制线段