在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:第二个点的行坐标和列坐标 *注意:没有返回值