Graph单元的用法

记得初始化

procedure Arc (坐标X,坐标Y;Integer;开始角度,结束角度,半径; Word);
备注:画弧

procedure Bar(坐标x1,坐标y1,坐标x2,坐标y2: Integer);
备注:画一个已填充的正方形

procedure Bar3D(坐标x1,坐标y1,坐标x2,坐标y2:Integer;高:Word;有没有顶:Boolean);
备注:画立方体

procedure Circle(坐标X,坐标Y:Integer;半径:Word);
备注:画圆

procedure ClearDevice;
备注:把指示器移到(0,0),用背景颜色去清屏,准备输出

procedure ClearViewPort;
备注:把填充颜色变为背景色,把指示器移到(0,0)

procedure CloseGraph
备注:关掉图象(garph)模式

procedure DetectGraph(var 驱动器,模式:Integer);
备注:检查硬件和找出用哪个驱动器和模式

procedure DrawPoly(点数: Word; var 坐标:PolyPoints);
备注:画多边形

procedure Ellipse(坐标X,坐标Y:Integer;开始角度,结束角度:Word;半径1,半径2:Word);
备注:画椭圆

procedure FillEllipse(坐标X,坐标Y:Integer;半径1,半径2: Word);
备注:画一个已填充的椭圆

procedure FillPoly(点数: Word; var 坐标:PolyPoints);
备注:画一个已填充的多边形

procedure FloodFill(坐标X,坐标Y:Integer;边界颜色: Word);
备注:填充一个边界的区域

procedure GetArcCoords(var 记录变量: ArcCoordsType);
备注:得到上一次画弧时的开始坐标,结束坐标和圆心坐标

procedure GetAspectRatio(var 比例X,比例Y:Word);
备注:得到屏幕高宽的比例

function GetBkColor: Word;
备注:返回当前的背景颜色

function GetColor: Word;
备注:得到当前的画图颜色

function GetDefaultPalette(var 记录变量: PaletteType);
备注:得到默认的颜色记录

function GetDriverName: string;
备注:得到驱动器的名字

procedure GetFillPattern(var 记录变量: FillPatternType);
备注:得到填充的模式

procedure GetFillSettings(var 记录变量: FillSettingsType);
备注:得到填充的设置

function GetGraphMode: Integer;
备注:得到图形的模式

procedure GetImage(坐标x1,坐标y1,坐标x2,坐标y2:Integer;var 位图:pointer);
备注:把一个指定区域里的一小片图象保存在缓冲器里

procedure GetLineSettings(var 记录变量: LineSettingsType);
备注:得到线的设置

function GetMaxColor: Word;
备注:得到最大的颜色

function GetMaxMode: Integer;
备注:得到最大的模式

function GetMaxX: Integer;
备注:得到最大的X坐标

function GetMaxY: Integer;
备注:得到最大的Y坐标

function GetModeName(模式序号: Integer): string;
备注:得到模式名

procedure GetModeRange(图象驱动:Integer; var 最小模式,最大模式:Integer);
备注:得到模式范围

procedure GetPalette(var 记录变量: PaletteType);
备注:得到当前的颜色记录

function GetPaletteSize: Integer;
备注:得到屏幕中颜色记录的尺寸

function GetPixel(坐标X,坐标Y: Integer): Word;
备注:得到(X,Y)的颜色

procedure GetTextSettings(var 记录变量: TextSettingsType);
备注:得到文字设置

procedure GetViewSettings(var ViewPort: ViewPortType);
备注:得到显示设置

function GetX: Integer;
备注:得到当前指示器的X坐标

function GetY: Integer;
备注:得到当前指示器的Y坐标

2006-11-1 20:49 回复

overture_wy
18位粉丝
2楼

procedure GraphDefaults;
备注:把graph的所有设置变为原始状态

function GraphErrorMsg(错误号: Integer): string;
备注:返回指定错误号的信息

function GraphResult: Integer;
备注:返回最后一次画图时的错误号

function ImageSize(坐标x1,坐标y1,坐标x2,坐标y2:坐标Integer):坐标Word;
备注:返回一片区域储存所许的字节数

procedure InitGraph(var 驱动器:Integer;var 模式:Integer;到驱动器的路径:string);
备注:graph初始化

procedure Line(坐标x1,坐标y1,坐标x2,坐标y2:Integer);
备注:画线

procedure LineRel(坐标Dx,坐标Dy:Integer);
备注:画一条到指示器的线,坐标是对于指示器为(0,0)来说的

procedure LineTo(坐标X,坐标Y:Integer);
备注:画一条到指示器的线

procedure MoveRel(坐标Dx,坐标Dy: Integer);
备注:把指示器依到(Dx,Dy),坐标是对于指示器为(0,0)来说的

procedure MoveTo(坐标X,坐标Y: Integer);
备注:把指示器依到(x,y)

procedure OutText(字符串: string);
备注:在指示器位置上输出字符串

procedure OutTextXY(坐标X,坐标Y: Integer;字符串: string);
备注:在(x,y)位置输出字符串

procedure PieSlice(坐标X,坐标Y:Integer;开始角度,结束角度,半径:Word);
备注:画一个已填充的扇形

procedure PutImage(坐标X,坐标Y:Integer;var 位图:pointer;BitBlt:Word);
备注:把一个图象显示到显示器上,BitBlt处可为NormalPut,XORPut或者NotPut

procedure PutPixel(坐标X,坐标Y: Integer;颜色: Word);
备注:在(X,Y)上显示一个1*1的正方形

procedure Rectangle(坐标x1,坐标y1,坐标x2,坐标y2: Integer);
备注:画正方形

procedure RestoreCrtMode;
备注:恢复到刚初始化时的状态

procedure Sector(坐标x,坐标y:Integer;开始角度,结束角度,半径X,半径Y:Word);
备注:画一个已填充的椭圆部分

procedure SetActivePage(Page: Word);
备注:设置当前画图所在的页

procedure SetAllPalette(var Palette);
备注:把所有颜色设置变为特定的

procedure SetBkColor(颜色: Word);
备注:设置背景颜色

procedure SetColor(颜色: Word);
备注:设置颜色

procedure SetFillPattern(记录变量: FillPatternType;颜色:Word);
备注:设置填充颜色模式

procedure SetFillStyle(模式: ord;颜色: Word);
备注:设置填充颜色风格

procedure SetLineStyle(线风格:Word;模式:Word;厚度:Word);
备注:设置线的风格

procedure SetPalette(颜色序号:Word;颜色:Shortint);
备注:设置调色版

procedure SetTextStyle(字体,方向:Word;大小:Word);
备注:设置文字风格

procedure SetVisualPage(Page: Word);
备注:设置当前显示的页

procedure SetWriteMode(写字模式: Integer);
备注:设置写字模式

function TextHeight(字符串: string): Word;
备注:文字的高

function TextWidth(TextString: string): Word;
备注:文字的宽

Graph单元的用法相关推荐

  1. boost::graph::distributed::hohberg_biconnected_components用法的测试程序

    boost::graph::distributed::hohberg_biconnected_components用法的测试程序 实现功能 C++实现代码 实现功能 boost::graph::dis ...

  2. boost::graph::distributed::distributed_queue用法的测试程序

    boost::graph::distributed::distributed_queue用法的测试程序 实现功能 C++实现代码 实现功能 boost::graph::distributed::dis ...

  3. vue中用table_Vue中table合并单元格用法

    地名 结果 人名 性别 {{item.name}} 已完成 未完成 {{item.groups[0].name}} {{item.groups[0].sex}} {{item.groups[son]. ...

  4. SAP EWM - 其他主数据 - 供应链单元

    SAP EWM - 其他主数据 - 供应链单元 https://mp.weixin.qq.com/s/s36ukFoAy_9FB1d3_lK7uQ 供应链单元用来代表实际物理地点或者组织元素并用来在E ...

  5. 汇编语言随笔(5)-and、or指令,串传送指令movsb、访问内存单元的方式及实验4,5(向内存传送数据)

    and.or指令 and指令,逻辑与指令,按位进行与运算:or指令,逻辑或指令,按位进行或运算.       如:mov al,01100011B               and al,00111 ...

  6. select,table,form

    首先来说select,select是下拉框,select下面有option标签. 通过document.getElementById我们便能拿到我们想要的select元素, 或者我们可以直接在内存中创 ...

  7. Jupyter notebook入门教程(下)

    Jupyter notebook的入门教程第二部分的英文原文出处: Getting started with the Jupyter notebook (part 2) 从之前介绍的教程第一部分中,我 ...

  8. 7系列mrcc xilinx_XILINX 7系列FPGA_时钟篇

    目录一览 0.转载说明 1.时钟结构简介 2.时钟区域简介 3.时钟操作法则 4.CMT简介 0.转载说明 FPGA开发,不知道所使用组件的特性,怎能开发出优秀的设计呢!!! 老早就想整理7系列FPG ...

  9. 可以批量转modis投影_SNAP批量处理Sentinel2数据

    Sentinel-2数据以其高时空分辨率获得了越来越多的应用,然而由于Sentinel-2数据空间分辨率高,光谱分辨率高,数据量也较Landsat数据大幅上升.好在ESA SNAP软件批处理功能也很强 ...

最新文章

  1. Logstash(四)插件Output详解
  2. 5.10 程序示例--模型选择-机器学习笔记-斯坦福吴恩达教授
  3. 神策与CDA,一次不平凡的约会
  4. 65.4. Other GUI - phpOraAdmin
  5. 程序员都该懂的 UML 规范!
  6. WebService处理Map
  7. 阿里研究院:解读互联网经济十大议题
  8. 和catch的区别_面试刷题2:Exception和Error的区别?
  9. php表单美化,使用css美化html表单控件详细示例(表单美化)_HTML/Xhtml_网页制作
  10. nginx url中带中文不能访问
  11. 进程管理API之pid_nr/pid_vnr/pid_nr_ns
  12. nvidia driveos(Drive AGX Orin板子P3710/P3663)单独烧录kernel
  13. 2019年9月19日好货十元内精选包邮
  14. 上海跃兔网络科技有限公司简介
  15. 2019年实体店怎么用小程序赚钱(上)
  16. 在计算机内部 g的asc,在计算机内部,大写字母“G”的ASCⅡ码为“1000111”,大写字母“K”的ASCⅡ码为()。...
  17. scanf%[^\n]的进一步研究
  18. python调用mysql数据库sql语句过长有问题吗_Python 连接Mysql数据库执行sql语句
  19. 【思维导图】探秘脑科学,科学家尚未打开的黑匣子!(一篇还不错的脑科学的科普文,涉及到多个层面,也比较浅显)
  20. 多组两两比较用什么检验方法_多组均数两两比较时,若不用q检验而用t检验,则:...

热门文章

  1. 惠普计划未来3年裁员2.46万人 年节省$18亿
  2. 我认为fedora是最好的Linux发行版
  3. golang优先级队列的实现
  4. 教育小程序能给机构带来什么招生优势?
  5. win10快捷键及管理用户
  6. 长期低头看书可能会导致颈椎病
  7. 【Web前端】设计模式、闭包
  8. 沈阳航空航天大学计算机考研817程序设计经验分享
  9. css-loader,less-loader,url-loader,babel-loader的安装及其配置
  10. 计算机系运动会横幅怎么写,运动会横幅标语大全