感谢世外苏子恒同学提供
 
一、调用单元
例:uses graph;
 
二、初始化
例:initgraph(var graphdriver,graphmode:integer; const pathtodriver:string);
初始化图形包,draphdriver,draphmode为整形变量,pathtodriver为字符串变量;graphdriver为图形驱动器,graphmode为图形模式,pathtodriver是BGI文件夹路径
 
三、画直线I
例:line(x1,y1,x2,y2:integer);
二点确定一条直线
 
四、画直线II
例:lineto(x,y:integer);
从当前点向目标点(x,y)画直线
 
五、画圆
例:circle(x,y:integer;radius:word);
画一个以(x,y)为圆心,radius为半径的圆
 
六、画圆弧
例:arc(x,y:integer;stangle,endangel,radius:word);
画一个以(x,y)为中心,radius为半径,stangle和endangle为始角和终角的圆弧,角度沿逆时针方向,单位是度,0度指向东
 
七、画椭圆(弧)
例:ellipse(x,y:integer;stangle,endangel,xradius,yradius:word);
画一个以(x,y)为中心,xradius和yradius为半径,stangle和endangle为始角和终角的椭圆弧,角度沿逆时针方向,单位是度,0度指向东
 
八、设置颜色
例:setcolor(color:word);
设置线的颜色,也可以写成setcolor(red);
 
九、退出
例:closegraph;
退出图形模式
 
样例程序:
uses graph,crt;
var
 gm,gd,x,y,sx,sy,r,i:integer;
begin
  cursoroff;
  randomize;
  initgraph(gm,gd, ' '); //初始化图形界面
  r:=50;           //设置圆的半径
  x:=50;          //设置圆的初始坐标
  y:=50;
  sx:=10;        //设置圆每次移动的距离,相当于速度
  sy:=10;
  for i:=1 to 50 do begin
    circle(x,y,r); //在图形界面上画圆
    writeln('x:':5,x:5,'y:':5,y:5,'r:':5,r:5); //在文本界面上输出圆圈的坐标及半径
    delay(50);
    cleardevice;   //cleardevice:相当于图形界面的clrscr
    x:=x+sx;
    y:=y+sy;       //屏幕分辨率:1024*768
    if (x>=1024-r) or (x<=r) then sx:=-sx;
    if (y>=768-r) or (y<=r) then sy:=-sy;
  end;
  closegraph;     //关闭图形界面
end.

Graph单元的更多相关文章

  1. 分布式图数据库 Nebula Graph 中的集群快照实践

    1 概述 1.1 需求背景 图数据库 Nebula Graph 在生产环境中将拥有庞大的数据量和高频率的业务处理,在实际的运行中将不可避免的发生人为的.硬件或业务处理错误的问题,某些严重错误将导致集群 ...

  2. 分布式图数据库 Nebula Graph 的 Index 实践

    导读 索引是数据库系统中不可或缺的一个功能,数据库索引好比是书的目录,能加快数据库的查询速度,其实质是数据库管理系统中一个排序的数据结构.不同的数据库系统有不同的排序结构,目前常见的索引实现类型如 B ...

  3. Pascal语言(存档)

    数据类型 标准函数 运算符和表达式 输入语句 输出语句 if语句 case语句 for语句 while语句 repeat语句 函数与过程 形参与实参 全局变量与局部变量 数组 字符串 枚举 子界 集合 ...

  4. Nebula 基于 ElasticSearch 的全文搜索引擎的文本搜索

    本文首发于 Nebula Graph 公众号 NebulaGraphCommunity,Follow 看大厂图数据库技术实践. 1 背景 Nebula 2.0 中已经支持了基于外部全文搜索引擎的文本查 ...

  5. 使用Graph工具观察FFT波形

    2014年8月1日,经过很长时间的上网查阅资料,走了很多弯路,终于可以成功使用Graph工具仿真波形了,虽然这个的确很简单,但是经过自己摸索出来的,兴奋之情难于言表. 明天就是七夕了,刚和女朋友分手的 ...

  6. Tensorflow学习笔记2:About Session, Graph, Operation and Tensor

    简介 上一篇笔记:Tensorflow学习笔记1:Get Started 我们谈到Tensorflow是基于图(Graph)的计算系统.而图的节点则是由操作(Operation)来构成的,而图的各个节 ...

  7. Graph Databases—The NOSQL Phenomenon阅读笔记

    本章内容着重对了NOSQL和RDBMS(关系型数据库管理系统)的不同,以及其各自背后设计时考虑的因素.然后接下来,着重讲述了NOSQL的4种分类方法.下面我们将对重要知识点进行汇总. 1.We def ...

  8. 【转】使用Boost Graph library(二)

    原文转自:http://shanzhizi.blog.51cto.com/5066308/942972 让我们从一个新的图的开始,定义一些属性,然后加入一些带属性的顶点和边.我们将给出所有的代码,这样 ...

  9. 从Random Walk谈到Bacterial foraging optimization algorithm(BFOA),再谈到Ramdom Walk Graph Segmentation图分割算法

    1. 从细菌的趋化性谈起 0x1:物质化学浓度梯度 类似于概率分布中概率密度的概念.在溶液中存在不同的浓度区域. 如放一颗糖在水盆里,糖慢慢溶于水,糖附近的水含糖量比远离糖的水含糖量要高,也就是糖附近 ...

随机推荐

  1. VaildForm 自定义提示消息

    ValidForm插件提供了7种提示效果,其中有四种自定义效果,具体访问地址:http://validform.rjboy.cn/demo.html 个人偏爱其中两种,即 l 提示效果四:[自定义提示 ...

  2. JavaWeb chapter 2 Servlet

    1.  什么是Servlet: Servlet是运行于Web容器中,按照其自身规范编写的Java应用程序. Servlet是用Java语言编写的,它是一个Java类,因而Servlet遵守所有Java ...

  3. Rhel6-cacti+nagios+ganglia(apache)配置文档

    (lamp平台) 系统环境: rhel6 x86_64 iptables and selinux disabled 主机: 192.168.122.119 server19.example.com 1 ...

  4. Array 、 Dictionary 、 Object 3大数据结构 以及 for ... in for each的研究

    Array:存储方式-------索引存储 (要求key是大于等于0的整数) Dictionary.Object:存储方式---------索引存储 区别:可以说它们的 key 都 对应 各自的引用, ...

  5. VS2012 快捷键

    注释: Ctrl+K+C 反注释: Ctrl+K+U 折叠代码: Ctrl+M+O   展开代码: Ctrl+M+L 在文件中查找: Ctrl+Shift+F 选 EntireSolution 删除行 ...

  6. iOS移动下上传图片失败解决 (上传多图,带其他参数)

    项目中有一个主要的功能,就是上传图片,结结果移动真的是很奇怪,WiFi,联通,电信都没有问题的情况下,居然在移动下不行,真的是很头疼.不过好在最后是解决了 项目的网络请求我是采用ASIHttpRequ ...

  7. Python开发入门与实战11-单元测试

    11. 单元测试 本章节我们来讲讲django工程中如何实现单元测试,单元测试如何编写以及在可持续项目中单元测试的重要性. 下面是单元测试的定义: 单元测试是开发者编写的一小段代码,用于检验被测代码的 ...

  8. python3 reqeuests给OSC全站用户刷积分

    严格来讲是给在OSC上贡献过内容的OSC用户刷积分. OSC很多操作都需要消耗积分,很多人给OSC贡献了内容, 但是却没有人点赞,所以有些人在OSC混了很多年也没有积分. 本文中使用到的工具有gifc ...

  9. androidTV第一次创建(转:支持原创)

    转载地址:http://blog.csdn.net/aa2967277/article/details/50617677 AndroidTV应用开发简介 目前,网上还没有对AndroidTV的足够的介 ...

  10. 【winform 学习】登录

    一直都是做asp.net,没有做过winform项目,新建个项目后,就啥不会了,不知道从何下手. 简单的登录项目也不会,画了个登录界面后,就遇到了,跳入主界面后,怎样将登录界面关闭的问题. 在网上找到 ...