FORTRAN图形界面

第十二章FORTRAN图形用户界面的设计图形界面的设计QuickWin绘图应用对话框的设计一、图形界面的设计1．QuickWin应用程序的创建过程在MicrosoftFortranPowerStation中调用QuickWin库来创建QuickWin应用程序。2．QuickWin窗口的特征与控制窗口特征控制窗口的函数3．响应鼠标事件(1)基于事件的函数。当鼠标事件发生时调用应用程序预先定义的回调函数；(2)中断函数。将程序挂起等候用户鼠标事件输入。二、QuickWin绘图应用1.图形库函数MSFLIB2.QuickWin绘图坐标系视口坐标原点左手坐标系3.基本绘图函数例：绘制正弦曲线USEMSFLIBINTEGER(2)resultINTEGER(4)colorTYPE(xycoord)XYresult=INITIALIZEFONTS()!初始化前景result=SETFONT('Arial''h18w10i')!设置前景字体color=SETCOLORRGB(#0000ff)!设置当前绘图颜色为红色CALLSETVIEWORG(200,200,XY)!改变视口坐标原点位置CALLMOVETO(INT2(-50),INT2(0),XY)!移动到指定位置result=LINETO(INT2(400),INT2(0))!绘制直线CALLMOVETO(INT2(-10),INT2(5),XY)CALLOUTGTEXT(0)!输出字符DOx=0,360,3y=-SIN(x/180*3.141593)*100result=SETPIXELRGB(INT2(x),INT2(y),#ffffff)!指定像素点色值ENDDOEND（1）视口的设置将视口坐标原点移动到指定的物理点：CALLSETVIEWORG（x，y，origin）其中x、y均为INTEGER（2）型输入变量，表示视口新原点的物理坐标。origin为派生类型XYCOORD。（2）图形位置函数位置移动：CALLMOVETO（x，y，origin）（3）颜色函数图形色值设定：result=SETCOLORRGB（color）参数color、函数返回值result为INTEGER（4）型。RGB色彩在其每一个色值中，三原色各表示成2位16进制数字。从右往坐依次为红、绿、蓝；数字越大，所对应的颜色强度越强。（4）图元绘制函数从当前位置向指定位置画一条直线：res=LINETO（x，y）其中函数返回值res为INTEGER（2）型（5）区域填充函数三原色填充:result=FLOODFILLRGB（color）（6）像素函数指定像素点色值res=SETPIXELRGB（x，y，color）（7）文本函数字体初始化：res=INITIALIZEFONTS()设置字体：res=SETFONT（options）options为描述字体特征的字符，如res=SETFONT（’h18w10’）设定字符高度为18，宽度为10，其单位是像素。图形文本输出：CALLOUTGTEXT（text），其中text为字符型变量或常量。三、对话框的设计设计对话框分两步进行：(1)确定对话框的外观及其所包含的有关控件的属性；与对话框有关的文件：.RCRESOURCE.FDRESOURCE.H(2)编写相应的程序，以接受和响应用户的输入，激活有关控件。