冲浪者局部放大后绘制的轮廓图的VB坐标定位

Computer Times 2008 No.6

59

部分放大后VB绘制的轮廓图到轮廓图的坐标定位

龚天宁，潘迪林，陈旭辉

（安徽科技大学计算机科学与工程学院，安徽淮南232001）

摘要: 鉴于使用VB调用Surfer软件提供的自动化界面，在绘制等高线图的过程中，需要调用外部控件来放大图片，并且无法找到坐标来获得三个图片中任何网格点的尺寸值. 一种使用VB的PaintPicture函数放大Surfer软件生成的轮廓图的方法，通过导入Surfer软件生成的grd文件以估计图片中任意点的网格点以获得三维图像的三维值. 点. 关键字: Surfer软件；自动化;等高线图坐标定位； VB嵌入式编程

0简介

Surfer软件是基于美国GoldenSave公司开发的Windows操作系统的二维和三维绘图软件. 它不仅提供了大量的网格化和插值算法，而且还具有强大的轮廓图和相应的三维图. 图形功能对于科技工作者，特别是地球科学家来说是必要的软件. 该软件提供了可嵌入的编程界面. Surfer服务器在后台运行，可以完全摆脱Surfer的主控制界面，并通过客户端程序界面中的VB嵌入式编程快速绘制轮廓图.

等高线图通常需要以两种方式处理: 局部放大并在特定点获取三维值. 加载AutoCAD

Voloview

过程如下:

确定是否创建了Surfer对象. 如果没有，请创建它. 完成后导入原始数据，并使用选定的算法对网格进行插值以生成GRD文件.

分析Surfer生成的grd文件，提取图片上网格的行和列数，网格坐标的最小x值和最大x值，网格坐标的最小Y值和最大Y值，以及所有网格的z值，它们存储在变量lOWS，cols，nmin，Hmax，Vmin，Vmax和数据数组中.

计算横坐标和纵坐标上等高线图的坐标轴上每个网格的跨度: Hdeta =（Hmax-Hmin）/（cols-1），Vdeta =（Vmax-VIIII），（行）-1 ）;计算在VB图片框架的x轴和y轴上每个网格的长度: SwPerGrid = Picture. ScaledWidth / cols，ShPerGrid =图片.

ScaleHeight /行.

Excel控件可以显示正确的图片

放大surfer怎么画等值线，缩小，移动等. Surfer导出的grd文件是等高线图中的网格点的三维值文件（x，y，z坐标值），该文件由选定的插值算法计算得出. 通过分析grd文件的三维值可以获取图片中的所有网格点. 但是，在使用外部控件放大等高线图之后，无法定位坐标，这成为获取特定点的三维值的障碍.

本文使用VB附带的PicturePicture方法编写图片放大功能，并同时计算放大域中的网格行数和列数以及放大域的起始网格位置，以便准确计算放大图片Grid坐标中某个点的网络，以确定其三维值.

如果用户需要放大图片的特定部分，则可以获取surfer怎么画等值线，转换或转换VB图片帧坐标系中缩放字段的开始和结束坐标（xl，y1），（x2，y2）. 在网格坐标系中分别为（Xlgrid，Yglid），（X29rid，Y29rid）的位置，转换公式: Xgrid = Int（x / SWPerGrid），Ygrid-rows-l-Int（y / ShPrGr）在网格中以及网格中的列数. 从数据数组中提取选择域中所有网格的z值;使用PaintPicture函数扩大选择域；重新计算Hilin，Vmin，SwPerGrid和ShPerGrid的值.

如果用户需要图片中某个点的三维值，则该点在VB图片框的坐标系中的位置将转换为其在网格坐标系中的位置（按上一个

1个具体过程

在作者参与的煤矿压力报警项目中，我需要打电话给Surfer绘制轮廓图. 绘制等高线图后，我需要根据客户的要求局部放大图片，还需要随时提供客户兴趣点的三维值. 这些工作的流向

转换公式）；通过Alonia痢疾车，这点的三个值是: X = Xgrid * Hdeta + Hmin，

Y = Ygrid * Vdeta + Vmin，Z =数据（Ygrid，Xgrid）.

中间圈. 只要您可以连接到Internet，用户就可以随时随地轻松，快速地实现MATLAB应用程序. 同时，用户无需掌握大量有关MATLAB编程的知识，只需根据提示输入一些实验参数，即可轻松进行实验仿真.

MATLAB的计算模式当然不可避免地具有B / S模式的缺点. 如果大量客户端同时向服务器发出请求，则客户端将不得不等待很长时间，服务器才能返回结果. 为了防止此类问题的发生，有必要提高服务器的计算能力，有时甚至有必要使用服务器集群来提高计算速度[4].

参考:

【1l何强，何颖. MATLAB扩展编程[M]. 清华大学出版社，2002. [212]

匿名. ＭＡＭＭＡＭＭＯ

WebServer: 对于UsherthMAllAB [R].

MathWorks. 1nc，1999.1.

【3】徐旺明. 基于MatlabWebServer的伪装图像处理仿真实验[J1. 信息

技术，2007.31（1o）: 13-16

i4]饶文bi等. 基于B / S模式和MATLAB的远程结构破坏智能识别技术.

吴江科技大学学报，信息与管理工程版，2004.26（4）: 18〜21

您

本文来自电脑杂谈，转载请注明本文网址：
https://www.pc-fly.com/a/ruanjian/article-254380-1.html