(高手指教)mapx+delphi 画点和连线问题

<P>procedure TForm1.Button1Click(Sender: TObject);<BR>var<BR>x1,y1,x2,y2:integer;    // x1,y1,x2,y2分别为（x1,y1）（x2,y2）两点的坐标<BR>begin<BR> x1:=strtoint(edit1.text);<BR>   y1:=strtoint(edit1.text);<BR>    x2:=strtoint(edit1.text);<BR>     y2:=strtoint(edit1.text);<BR>     //下面是要在地图map1上以红色小圆点的形式标出（x1,y1)(x2,y2)两点，并把这两点用红色线段连接起来，请高手帮忙！！！</P>
<P>end;<BR> 我看了map的deom，但没看懂，其内容如下，希望指教，最后能直接把源码加到上面的程序段中</P>

<P>创建点用CreateSymbol，</P>
<P>创建线用CreateLine</P>
<P>看看mapx中这个函数的帮助</P>