在HDevelop中
dev_open_window (0, 0, 512, 512, 'black', WindowHandle)
dev_set_draw ('margin')
draw_line (WindowHandle, Row12, Column12, Row21, Column21)
disp_line (WindowHandle, Row12, Column12, Row21, Column21)
*在指定窗口:画一条直线
*参数2和参数3：第一个点的行坐标和列坐标
*参数4和参数5：第二个点的行坐标和列坐标
*注意：没有返回值
