delphi圆角窗体

delphi圆角窗体
delphi圆角窗体

采用API画圆角的窗体!

圆角窗体一(四角都是圆角的)采用CreateRoundRectRgn,SetWindowRgn函数就可实现!函数参数如下:

函数一:

int SetWindowRgn;(HWND hWnd, HRGN hRgn, BOOL bRedraw)

参数

hWnd

[在] 对窗户区域将被设定的窗户的柄。

hRgn

[在] 对一个区域的柄。功能将窗户的窗户区域设定为这一个区域。

如果 hRgn 是无效力的,功能将窗户区域设定为零。

bRedraw

[在] 叙述系统是否在设定窗户区域之后重划窗户。如果 bRedraw 是真实的,系统这么做; 另外,它不。

典型地, 你设定 bRedraw 到真实的如果窗户是看得见的。

返回值

如果功能成功,回返价值是非零。

如果功能失败,回返价值是零。

函数二:

HRGN CreateRoundRectRgn(int nLeftRect, int nTopRect, int nRightRect, int nBottomRect, int nWidthEllipse, int nHeightEllipse);

参数表参数类型及说明:

X1,Y1 Long,矩形左上角的X,Y坐标

X2,Y2 Long,矩形右下角的X,Y坐标

X3 Long,圆角椭圆的宽。其范围从0(没有圆角)到矩形宽(全圆)

Y3 Long,圆角椭圆的高。其范围从0(没有圆角)到矩形高(全圆)

画一个圆角窗体就用以上两个函数,实例:

SetWindowRgn(handle, CreateRoundRectRgn(0, 0, self.Width, self.Height, 16, 16), True); //即可画一个圆角窗体

圆角窗体二(指点画窗体的某一只角为圆角):

采用函数:CreateRoundRectRgn SetwindowRgn ,CreateRectRgn CombineRgn

前面两个函数上面已经介绍,看看下面的两个参数吧!

函数三

Declare Function CreateRectRgn Lib "gdi32" (ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long

[说明]

创建一个由点X1,Y1和X2,Y2描述的矩形区域

[参数表]

X1,Y1 ---------- Long,矩形左上角X,Y坐标

X2,Y2 ---------- Long,矩形右下角X,Y坐标

[返回值]

Long,执行成功为区域句柄,失败则为零

函数二

Declare Function CombineRgn Lib "gdi32" (ByVal hDestRgn As Long, ByVal hSrcRgn1 As Long, ByVal hSrcRgn2 As Long, ByVal nCombineMode As Long) As Long

[说明]

将两个区域组合为一个新区域

[参数表]

hDestRgn ------- Long,包含组合结果的区域句柄

hSrcRgn1 ------- Long,源区域1

hSrcRgn2 ------- Long,源区域2

nCombineMode --- Long,组合两区域的方法。可设为下述常数

RGN_AND

hDestRgn被设置为两个源区域的交集(集合中的交集)

RGN_COPY

hDestRgn被设置为hSrcRgn1的拷贝

RGN_DIFF

hDestRgn被设置为hSrcRgn1与hSrcRgn2相减后的区域(集合中的差集)

RGN_OR hDestRgn被设置为两个区域的并集(集合中的并集)

RGN_XOR

hDestRgn被设置为两个区域的异或操作后的区域(集合中的异或操作)

[返回值]

Long,下列常数之一:

COMPLEXREGION:区域有互相交叠的边界

SIMPLEREGION:区域边界没有互相交叠

NULLREGION:区域为空

ERRORAPI:不能创建组合区域

实例:

var

Reg1,Reg2: THandle;

begin

Reg1 := CreateRoundRectRgn(0, 0, self.Width, self.Width, 16, 16); //在窗体指定的位置上创建一个圆角句型区域

Reg2 := CreateRectRgn(20, 20, self.Width, self.Width); //在窗体指定的位置上创建一个矩形区域

CombineRgn(Reg1, Reg1, Reg2, RGN_OR); //将Reg1,Reg2两个区域进行合并,Reg1得到Reg1,reg2的集合并集!

SetwindowRgn(handle, Reg1, True); //将以上创建的区域设定成窗体的区域

end;

以上代码是将一个窗体的上面两只角画成圆角,窗体下面的两只角还是直角!

椭圆工具、矩形与圆角矩形工具

椭圆工具、矩形与圆角矩形工具 (P39――P46) 晓港湾小学边永明一、教学内容分析 《椭圆工具、矩形与圆角矩形工具》是广州市小学信息技术课本第一册的内容。本节课主要是让学生认识并正确地使用“画图”程序的基本绘图工具:椭圆工具、矩形与圆角矩形工具;以及配合直线、曲线等其他工具画出一些图形或创作画。这节课是WINDOWS“画图”中学习基本工具使用的一节课。为学生后继的学习打下基础,并让学生从学习中培养自主学习的意识和审美、综合运用和创新的能力。 二、学习者分析 本节课的教学对象是四年级的学生,学生对鼠标的操作较为熟悉,但如何运用鼠标进行画画操作,还有待提高,存在一定的困难。 学生对画图很感兴趣,很乐于学习,自学探究的能力也逐步提高。 学生对作业管理系统较为熟悉,能熟练掌握作业系统的相关操作。 三、教学目标 1、知识与技能 (1)掌握“椭圆”、“矩形”与“圆角矩形”工具的使用。 (2)初步掌握“椭圆”、“矩形”与“圆角矩形”工具的三种样式的使用。 (3)运用“椭圆”、“矩形”与“圆角矩形”工具创作图画。 2、过程与方法 通过使用“画图”软件的画画——系列学习实践活动,掌握使用“椭圆”、“矩形”与“圆角矩形”工具画画的基本方法。 3、情感态度与价值观 (1)提高观察能力,学会审美,学会用语言表达自己的创作意念,以及中肯地评价、学习别人的长处。 (2)提高探索学习的能力和自我学习的能力,为今后学习计算机的其他绘图软件打下良好的基础。 四、教学重点: 掌握“椭圆”、“矩形”与“圆角矩形”工具三种样式。 五、教学难点: 正确定位椭圆。

六、教学方法 按照新课程的教学理念,结合教材创设学习情境,让学生通过“观察——发现——讨论——应用”教学环节,引导学生主动地发现问题、分析问题和解决问题,特别注重知识的内化过程,强调“在学中做”与“在做中学”,从而掌握基本绘图工具的使用方法。培养学生认真观察和审美能力,树立学习的信心,发挥团结协作的集体精神。 七、教学过程设计

带有标题边框的窗体

package windoweffect; import java.awt.BorderLayout; import java.awt.Color; import javax.swing.BorderFactory; import javax.swing.JFrame; import javax.swing.JPanel; import javax.swing.border.Border; import javax.swing.border.EtchedBorder; import javax.swing.border.TitledBorder; public class WindowWithTitleBorder { /** * @param args */ public static void main(String[] args) { // TODO Auto-generated method stub DemoWindow6 dw = new DemoWindow6("带有标题边框的窗体"); dw.setBounds(dw.getToolkit().getScreenSize().width / 3, dw.getToolkit() .getScreenSize().height / 3, dw.getToolkit().getScreenSize().width / 3, dw.getToolkit() .getScreenSize().height / 3); dw.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE); dw.setVisible(true); } }

的窗体上添加1个名称为Image为Form1标题为“图片练习”的窗体上添加1个名称为Image1

基本题(1) 【解题思路】按照题目要求,通过图像框的Name、Width、Height题Picture属性设置图像框,Stretch属性用于设置图像框中的图形能自动放大或缩小以与图像框的大小相适应。 【操作步骤】 步骤1:建立界面,并设置控件的属性。程序中涉及的控件及属性见表3.127。 表3.127 步骤2:调试并运行程序,关闭程序后按题目要求存盘。 基本题(2) 【解题思路】在Command1_Click事件过程中,通过列表框的AddItem和RemoveItem方法将选中的列表项内容复制到已有列表项的尾部;在Command2_Click事件过程中,通过列表框的RemoveItem方法将选中的列表项内容删除。 【操作步骤】 步骤1:建立界面,并设置控件的属性。程序中用到的控件及属性见表3.128。 表3.128 步骤2:编写程序代码。 参考答案 Private Sub Command1_Click() List1.AddItem List1.Text List1.RemoveItem List1.ListIndex End Sub Private Sub Command2_Click() List1.RemoveItem List1.ListIndex End Sub步骤3:调试并运行程序,关闭程序后按题目要求存盘。 简单题(1) 【解题思路】在计时器的Timer事件过程中,通过设置标签的Left属性值使其在原有基础上

加100来实现自左向右移动的功能。在"开始"按钮的单击事件过程中应启动计时器,禁用"移动"按钮,并改变其标题为"暂停"。在"退出"按钮的单击事件过程中要通过End语句停止程序。 【操作步骤】 步骤1:打开本题工程文件,并设置控件的属性。程序中涉及的控件及属性见表3.129。 步骤2:分析并编写程序代码。 程序提供代码 Dim flag As Integer Private Sub Form_Load() flag = 0 End Sub Private Sub Command1_Click() If Command1.Caption = "移动" Then 'Timer1.Enabled = ? Command1.Caption = "暂停" Else Timer1.Enabled = False Command1.Caption = "移动" End If End Sub Private Sub Command2_Click() End End Sub Private Sub Timer1_Timer() Select Case flag Case Is = 0 ''Label1.Left = Label1.Left ? 100 If Label1.Left + Label1.Width = Form1.Width Then flag = 1 Case Is = 1 'Label1.Left = Label1.Left ? 100 If Label1.Left = 0 Then flag = 0 End Select End Sub

为Form1、标题为“文本框练习”的窗体上添加1个名称为Text1的文本框

基本题(1) 【解题思路】MaxLength属性设置文本框中输入的字符串长度是否有限制。默认值为0,表示该单行文本框中字符串的长度只受操作系统内存的限制;若设置为大于0的数,则表示能够输入的最大字符数目。 【操作步骤】 步骤1:建立界面,并设置控件的属性。程序中用到的控件及属性见表3.162。 表3.162 步骤2:调试并运行程序,关闭程序后按题目要求存盘。 基本题(2) 【解题思路】按照题目要求设置标签和命令按钮的属性,在命令按钮的Click事件过程中,通过设置标签的FontSize属性值实现标签内容字体的放大和还原。 【操作步骤】 步骤1:建立界面,并设置控件的属性。程序中用到的控件及属性见表3.163和表3.164。 表3.163 表3.164 步骤2:编写程序代码。 参考答案 Private Sub Command1_Click() Label1.FontSize = Label1.FontSize + 2 End Sub Private Sub Command2_Click() Label1.FontSize = 12

End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 简单题(1) 【解题思路】在Cmd Click 事件过程中,通过Select Case语句判断选择命令按钮数组的Index属性值,Case 0表示单击"开始"按钮,计时器Timer1和"暂停"按钮的Enabled属性为True,状态变为可用,且如果Cmd(0)的Caption属性是"开始"按钮,那么Cmd(0)的Caption属性变为"继续",且Cmd(0)为不可用,单击"继续"按钮,则Timer1接着开始工作,"继续"按钮变为不可用,"暂停"按钮变为可用。同理Case 1表示单击"暂停"按钮,则Timer1停止工作,"暂停"按钮变为不可用,"继续"按钮变为可用;Case 2表示单击"结果"按钮,则结束程序运行。 Timer1 Timer 事件过程通过If判断语句,实现秒向分钟,分钟向小时的转换,并在三个文本框中显示出来。 【操作步骤】 步骤1:打开本题工程文件,画1个计时器timer1,设置计时器Interval属性为1000,Enabled属性设置为False。 步骤2:分析并编写程序代码。 程序提供代码 Dim t(3) As Integer Private Sub Cmd_Click(Index As Integer) ' Select Case ? Case 0 'Timer1.Enabled = ? Cmd(1).Enabled = True If Cmd(0).Caption = "开始" Then Cmd(0).Caption = "继续" End If 'Cmd(0).Enabled =? Case 1 Timer1.Enabled = False Cmd(0).Enabled = True Cmd(1).Enabled = False Case 2 End End Select End Sub Private Sub Timer1_Timer() t(3) = t(3) + 1 ' If t(3) = ? Then t(3) = 0 t(2) = t(2) + 1 If t(2) = 60 Then t(2) = 0

圆角矩形的画法

画圆角矩形使用的函数是CDC::RoundRect,有下面两种形式: BOOL RoundRect( int x1, int y1, int x2, int y2, int x3, int y3 ); BOOL RoundRect( LPCRECT lpRect, POINT point ); 参数: x1,y1:左上角坐标;x2,y2:右下角坐标,这个和普通矩形是一样的;x3:画圆角的那个椭圆的宽度,y3:画圆角的那个椭圆的高度。lpRect:对应x1、y1,x2,y2 point:x3,y3组成一个POINT 例子:在绘图客户区绘制一个圆角矩形,效果如下: void CMyView::OnDraw(CDC* pDC) { // create and select a solid blue brush CBrush brushBlue(RGB(0, 0, 255)); CBrush* pOldBrush = pDC->SelectObject(&brushBlue); // create and select a thick, black pen

CPen penBlack; penBlack.CreatePen(PS_SOLID, 3, RGB(0, 0, 0)); CPen* pOldPen = pDC->SelectObject(&penBlack); // get our client rectangle CRect rect; GetClientRect(rect); // 将矩形在上下、左右全部缩短20 rect.DeflateRect(20, 20); //画一个圆角矩形,使用笔和刷子 pDC->RoundRect(rect, CPoint(17, 17)); // put back the old objects pDC->SelectObject(pOldBrush); pDC->SelectObject(pOldPen); } _________________何凯

在Dreamweaver中利用div绘制带有圆角矩形边框的

在Dreamweaver中利用div绘制带有圆角矩 形边框的单选按钮组 最近很多朋友询问关于使用Dreamweaver进行表单制作过程中,如何让表单项在一个圆角的容器内,使整个页面看起来更加美观。今天就以单选按钮组为例,我们一起来试一下。 操作步骤: 1.打开Dreamweaver CS6,新建一个网页文件,并保存一下。 2.在页面中,使用“插入”>“表单”>“表单”命令。

3.将插入点定位到表单内,输入文字“1.您的性别?”,然后敲击键盘上的“Enter”键,另起一段。 4. 使用“插入”>“布局对象”>“Div标签”命令。 5.在ID文本框中输入这个div标签的ID名称“xb”,然后单击“确定”按钮。 此时在会在表单内出现一个黑色的虚线框。

6.将黑色虚线框中的文字删除后,使用“插入”>“表单”>“单选按钮组”命令。在弹出的对话框中做如下图所示的参数修改。 页面效果如下图所示: 相关代码如下图所示: 7.在代码视图中,将上图所示代码中第一个换行标签
,修改为水平线标签


,然后删除第二个
标签。效果如下图所示。 8.在代码视图中标签前输入如下所示的内容,带有/* */的注释文字部分可以不写。圆角的关键就是border-radius属性。 注意:IE9+、Firefox 4+、Chrome、Safari 5+ 以及Opera 支持border-radius 属性。#xb { border: 1px solid #999; border-radius:10px;/*控制当前div的圆角半径*/ padding:10px;/*控制内部填充边距*/ background-color:rgba( 240,165,119,0.1); /*控制背景颜色透明度*/ } 9.页面效果如下图所示,此时还看不到圆角存在,不要着急啊。 10.现在请打开“实时视图”按钮,则可以看到圆角了。

窗体练习

以教师表为窗体记录源: 1.将窗体的边框改为“对话框边框”,取消水平和垂直滚动条、记录选择器、 导航按钮和分隔线,窗体标题设置为“教师信息系统” 2.在窗体页眉节添加名称为bTitle,显示文本为“教师信息”的标签,要求 文字颜色为“棕色”(颜色代码:128),字体粗细为“加粗”,字号为30,左边距2cm,上边距1.5cm 3.在主体节添加名为TxtName的文本框,将其与教师姓名绑定,并以密码 的形式(“*”)显示 4.添加文本框:TxtGl,并让其显示教师的工龄,TxtBg,让其显示“学历” 5.添加组合框:CbZm,设置下拉列表中为“团员”、“党员”、“群众”、“其他” 6.按如下控件顺序设置Tab键次序: TxtName、TxtGl、TxtBg 、CbZm 以学生表为窗体记录源: 1.将窗体的边框样式改为“细边框”,窗体标题设置为“学生信息查询体统” 2.在窗体的页眉节区添加一个名为”bTitle”的标签,让其显示“学生信 息”,字号35,字体名称为“黑体”, 3.在主体节区添加一个选项组控件,命名为“opt”,选项组标签显示内容 为“团员否”,在选项组内放入两个选项按钮,分别命名为”opt1”、”opt2”,选项按钮标签显示内容为“团员”和“非团员”,值分别设置为-1和0,让其与“团员否”字段绑定,选项按钮标签名称分别为”bopt1”和”bopt2” 4.添加“选课成绩”子窗体,将子窗体的边框样式改为“细边框”,取消子 窗体的记录选择器、导航按钮 5.添加一个名为“CmdQuit”的退出命令按钮,按钮标题为“退出”,功能 是关闭窗体

6.在子窗体中添加“TxtAvg”的文本框,使其显示每个学生各门课程的平 均分,要求保留两位小数

网页交互设计中头像外框形状的识读性研究——以圆形、方形、圆角矩形为例

网页交互设计中头像外框形状的识读性研究——以圆形、方形、圆角矩形为例 本文从网络收集而来,上传到平台为了帮到更多的人,如果您需要使用本文档,请点击下载按钮下载本文档(有偿下载),另外祝您生活愉快,工作顺利,万事如意! 我们处在一个图像生成、流通和消耗急速膨胀的时代.相较于文字人们更爱看图片.文字是逻辑的理性的,需要集中注意力,而图片是直觉的情感的,识读接受的反应会更快. 大多数互联网社交场景中,图片在信息及情感传达速度上优于文字.头像作为互联网交互界面中用于身份信息识别的普遍方式,用户在进行身份识别时,脸部特征识别明显优于身体其他部位;在图像信息和文字信息混杂的情况下人脑率先甄别出图像信息,所以图像识别凭借最便于快速识别和记忆的优势从用户名、账号、邮箱等文字识别方式中突出重围. 1 圆形、矩形、圆角矩形外框在互联网界面设计中的应用及特点 随着人们审美意识的提高,用户界面的设计成为隐形的竞争力受到互联网公司的重视.头像作为交互界面中最重要的构成部分,牵一发而动全身.因此头像形状的选择,并不能为所欲为.它最先要考虑的是技术

上是否能够满足设计的需求,再进行对不同形状之于界面的用户识读体验、信息可达、审美需求等多要素之间关系的综合考量,作出适合于各界面内容和形式的头像外框形状的选择.随着Html5 和Css3 技术的越趋成熟,圆形、圆角图形的处理变得较为容易.圆形、圆角矩形头像在Path、新浪微博、、知乎等界面陆续出现,一时成为一种潮流,同矩形头像一起分别占据着各大交互界面中的重要位置. 截止目前,网页版头像是圆角矩形、手机界面则为圆形.微博网页和手机界面都是圆形.微信移动端朋友圈界面头像为方形,搜索界面则是圆角矩形….....这样看来:不同的软件;相同软件不同版本;甚至相同软件同个版本中的不同分页都还没有对头像轮廓形状进行统一,由此可见头像外框轮廓形状的选择是复杂的,多变的,不确定的.圆形、矩形、圆角矩形头像的外框是目前互联网主流界面中最主要、最普遍的头像形状.圆形是现实世界中最具美感的绝对对称图形.就圆形的表象特点而言,圆周由一条没有起讫的闭合曲线构成,周边没有节点和棱角,给人以灵动、匀称、平和、优美的直观感受.圆形头像除了带给人感性的外貌认识,在形式上向那些设计感十足的APP 靠拢,从而获得形式上较为统一的观感. 与圆形不同的是,由四条直线构成的矩形棱角分

无标题栏和边框的窗体

技巧1 无标题栏和边框的窗体 如果希望制作无标题栏和边框的窗体,那么可以使用API函数。 在VBE窗口中单击菜单“插入”→“用户窗体”,双击窗体,在其代码窗口中输入下面的代码: #001 Private Declare Function DrawMenuBar Lib "user32" (ByVal Hwnd As Long) As Long #002 Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal Hwnd As Long, ByVal nIndex As Long) As Long #003 Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal Hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long #004 Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long #005 Private Const GWL_STYLE As Long = (-16) #006 Private Const GWL_EXSTYLE = (-20) #007 Private Const WS_CAPTION As Long = &HC00000 #008 Private Const WS_EX_DLGMODALFRAME = &H1& #009 Private Sub UserForm_Initialize() #010 Dim IStyle As Long #011 Dim Hwnd As Long #012 If Val(Application.Version) < 9 Then #013 Hwnd = FindWindow("ThunderXFrame", Me.Caption) #014 Else #015 Hwnd = FindWindow("ThunderDFrame", Me.Caption) #016 End If #017 IStyle = GetWindowLong(Hwnd, GWL_STYLE) #018 IStyle = IStyle And Not WS_CAPTION

最新48取消窗体标题栏与边框汇总

48取消窗体标题栏与 边框

精品资料 取消窗体标题栏与边框 package com.swing05; import java.awt.EventQueue; import javax.swing.ImageIcon; import javax.swing.JFrame; import javax.swing.JLabel; import javax.swing.JPanel; import javax.swing.JTextArea; import javax.swing.JButton; import java.awt.event.ActionListener; import java.awt.event.ActionEvent; import java.awt.Color; public class CancelFrameTitleBorder extends JFrame { private JPanel contentPane; private JTextArea textArea; /** * Launch the application. */ public static void main(String[] args) { EventQueue.invokeLater(new Runnable() { public void run() { try { CancelFrameTitleBorder frame = new CancelFrameTitleBorder(); frame.setVisible(true); } catch (Exception e) { e.printStackTrace(); } } }); } /** * Create the frame. */ public CancelFrameTitleBorder() { // 设置背景色 getContentPane().setBackground(new Color(240, 255, 仅供学习与交流,如有侵权请联系网站删除谢谢2

为Form1、标题为“列表框练习”的窗体上添加1个名称为List的列表框

基础题(1) 【解题思路】Sorted属性用于设置列表框中的项目是否按字母表顺序排序。可能的取值如下: True:列表框中的项目按字母表顺序排序。 False:列表框中的项目不按字母表顺序排序。 注意:Sorted属性必须在设计时设置,在运行时为只读属性。 【操作步骤】 步骤1:按照题目要求建立窗体和控件,并设置控件的属性。程序中用到的控件及属性见表3.167。 表3.167 步骤2:调试并运行程序,关闭程序后按题目要求存盘。 基础题(2)【解题思路】按照题目要求设置标签和命令按钮的属性,在命令按钮的Click事件过程中,通过标签的FontSize 属性值的动态设置实现标签内容字体的缩小和还原。 【操作步骤】 步骤1:建立界面,并设置控件的属性。程序中用到的控件及属性见表3.168和表3.169。 表3.168 表3.169 步骤2:编写程序代码。 参考答案 Private Sub Command1_Click() Label1.FontSize = Label1.FontSize - 2 End Sub Private Sub Command2_Click() Label1.FontSize = 12

End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 简单题(1)【解题思路】根据题意,将考生文件夹下in3.dat文件中已按升序排列的30个整数读入一个维数组a中,同时运用Space函数和Str函数把这30个数值显示在Text1文本框内。在Cmd2 Click事件过程中,通过InputBox函数弹出输入对话框,接收用户输入的任意一个数,若接收的数为奇数,弹出"输入数为奇数,请重输!"提示重新输入。如果接收的偶数超出一维数组a的数值范围,Text2显示"已超出所给数值范围";否则,通过For循环语句和If判断语句在一维数组a中查找该数,若查找失败,则在Text2文本框内显示该数"不存在于数组中";否则显示该数在数组中的位置。 【操作步骤】 步骤1:打开本题工程文件,添加一个标签为"查找结果"的标签和一个初始内容为空的文本框。 步骤2:分析并编写程序代码。 程序提供代码 Option Base 1 Dim a(30) As Integer Private Sub Cmd1_Click() Open App.Path & "\in3.dat" For Input As #1 For m = 1 To 30 Input #1, a(m) Text1 = Text1 + Str(a(m)) + Space(2) Next m Close #1 End Sub Private Sub Cmd2_Click() Dim num As Integer, n As Integer num = InputBox("请输入待查找的数") ' If num / 2 ? Fix(num / 2) Then MsgBox "输入数为奇数,请重输!",, "检查" Exit Sub End If ' If num < a(1) ? num > a(30) Then Text2.Text = Str(num) + "已超出所给数值范围" Exit Sub End If For n = 1 To 30 ' If a(n)= ? Then Text2.Text = Str(num) + "是数组中的第" + Str(n) + "个值" Exit For End If Next n 'If n ? 30 Then Text2.Text = Str(num) + "不存在于数组中" End If End Sub 程序结束 参考答案 第1个?处填入:<> 第2个?处填入:Or 第3个?处填入:num

Photoshop的窗口由标题栏

Photoshop的窗口由标题栏、菜单栏、工具箱、工作窗口、控制面板、状态栏等六部分组成,如图2.1所示。 图2.1Photoshop5.5的窗口 工具箱中存放着各种编辑工具,使用方便。控制面板的主要作用是辅助工具栏,更改工具的设置。一些对图层、通道、历史纪录的操作也要在此完成。在菜单栏里的窗口选项中可以设置此栏中各项的显示与否,也可用鼠标拖动控制面板中的选项,按自己的习惯组合控制面板。状态栏则是用来显示当前图像的有关状态及一些简要说明和提示。 2.工具箱的使用 Photoshop的基本工具存放在工具箱中,一般置于Photoshop界面的左侧。当工具的图标右下角有一个小三角时,表示此工具图标中还隐藏了其他工具。用鼠标点中此图标不放,便可以打开隐藏的工具栏。点中隐藏的工具后,所选工具便会代替原先工具出现在工具栏里。当把鼠标停在某个工具上时,Photoshop会提示此工具的名称及快捷键。而在选定工具后可在右边的控制面板中的选项栏里修改工具的参数及设置(若屏幕上没有选项栏执行菜单【Window】\【Show Options】命令即可)。 工具的使用方法很灵活。这里先简单介绍几种重要工具的基本用法。 1)【选框】工具 【选框】工具是重要的选图工具,单击【选框】工具不放,会弹出如图所示的隐藏工具面板。选择工具共有上图所示五种工具,分别是【Rectangular Marquee Tool(M)】(矩形选框)工具,【Elliptical Marquee Tool(M)】(椭圆选框)工具,【Single Row Marquee Tool(M)】(单行选框)工具,【Single Column Marquee Tool(M)】(单列选框)工具,【Crop Tool(C)】(裁切)工具。【选框】工具用于在被编辑图像中选取一个工作区域。其中【Rectangular Marquee Tool(M)】(矩形选框)工具是用于选取一个任意矩形区域,【Elliptical Marquee Tool(M)】(椭圆选框)工具用于选取一个任意圆形或椭圆形区域,【Single Row Marquee Tool(M)】(单行选框)工具是用于选取图像中任一横行象素,【Single Column Marquee Tool(M)】(单列选框)工具用于选取图像中任一竖行象素,【Crop Tool(C)】(裁切)工具较特殊,用于裁切选框以外的部分,以重新设置图像大小。 2)【套索】工具

矩形、随圆、圆角矩形工具教学案例

矩形、椭圆、圆角矩形工具教案设计 教学内容 吉林美术出版社、吉林教育出版社联合出版《综合实践活动》小学五年级下册第一单元《用计算机画图》第五课《矩形、椭圆、圆角矩形工具》。 教材分析:本课主要是让学生掌握画规则图形需要的图形工具与Shift键配合使用,学会画规则图形,并能利用填充模式进行图形填充。 学情分析:对五年级的学生来说,本课内容很容易接受,主要是让他们多动手操作,使他们能够熟练掌握新知。 教学目标: 知识与技能:掌握画规则图形的方法,能画出规则图形,知道填充模式的表现形式,能选择自己需要的填充模式进行图形填充。 过程与方法:让学生自我展示、自我激励,体验成功,在不断尝试中激发求知欲,在不断摸索中获得、掌握知识,在评价交流中不断提高技巧技能。 情感、态度与价值观:培养学生自我探索、自主学习、自我创新、团体协作的能力和审美能力。在自主探究的过程中,培养一种敢于尝试,不怕失败的品质。 教学重点及解决措施: 1、画规则图形。解决措施:自我尝试,小组合作。 2、进行图形填充。解决措施:自我尝试,小组合作。

教学难点及解决措施:在画规则图形时,后松开Shift键。解决措施:多操作。 教法与学法: 情境教学法、实践操作法、小组合作交流探究法。 教学准备:教师准备教学课件。 教学设计: 一、师生谈话,导入新课 (一)画精确的圆 有个小朋友在利用椭圆工具进行画圆时总也画不好,谁能帮助他画好圆呢,大家一起尝试一下。 1、动手尝试画圆。 2、帮助没画好的同学。 3、演示操作并说出方法。 (二)画矩形和圆角矩形 有个小朋友想画正方形却怎么也画不出来,谁愿意帮助他?你们也来画一画。 1、动手尝试画矩形和圆角矩形 2、帮助没画好的同学 3、演示操作并说出方法。 (三)进行图形填充 有个小朋友在利用椭圆形工具和矩形工具绘画时,发现工具箱的下面出现了三个方框,他想知道这是什么,有什么用?谁来帮助他?

在Form1,标题为“显示记录”的窗体上画1个名称为Text1的文本框,其初始内容为空

基础题(1) 【操作步骤】 步骤1:新建一个窗体,在窗体上创建一个文本框控件。 步骤2:在属性窗口中,设置其Text属性为空。 步骤3:在文本框下方绘制一个命令按钮Command1。 步骤4:在属性窗口中,将Caption设置为"上一条记录"。 步骤5:复制命令按钮"上一条记录",在窗体的空白位置处粘贴对话框,单击"是"按钮,创建一个控件数组。 步骤6:再创建3个命令按钮. 步骤7:按照题目要求将复制的3个命令按钮的Caption分别设置为"下一条记录"、"第一条记录"和"最后一条记录",并将窗体的Caption设置为"显示记录"。 步骤8:选择"上一条记录"命令按钮,通过属性窗口设置Enable为False,选择"下一条记录"命令按钮,通过属性窗口设置Default为True.。 步骤9:将文件保存至考生文件夹下,且设置窗体文件名为sjt1.frm,工程文件名为sjt1.vbp。基础题(2) 【操作步骤】 步骤1:打开VB开发环境,新建一个窗体。 步骤2:在窗体中添加一个标签控件Lable1,在属性窗口中设置标签的Caption属性为"等级考试",然后设置其AutoSize属性为True,设置其BorderStyle属性为1。 步骤3:然后在窗体中添加一个计时器Timer1,设置其Interval属性为0,Enabled属性为True。步骤4:打开代码窗口,编写代码如下。 Private Sub Form_Load() Timer1.Interval = 1000 End Sub Private Sub Timer1_Timer() Label1.Visible = Not Label1.Visible End Sub 步骤5:运行程序,然后将文件保存至考生文件夹下,窗体文件名为sjt2.frm,工程文件名为sjt2.vbp。 简单题(1) 【操作步骤】 步骤1:打开本题工程文件。

窗口移动无边框各种方式

第一步: //先定义一个坐标点对象 mypoint private Point mypoint; 第二步:在窗体的点击事件中写 private void Form1_MouseDown(object sender, MouseEventArgs e) { //鼠标在窗体内按下时,自动记录鼠标的 x y 值,并将它们改为负数 mypoint = new Point(-e.X,-e.Y); } 第三步:在窗体的鼠标移动事件中写 private void Form1_MouseMove(object sender, MouseEventArgs e) { /* 鼠标在窗体内移动时,首先判断e.Button按下的是哪个鼠标按钮再判断 * 是否等于左键按下,MouseButtons.Left这句的意思是鼠标左 键按下状态 */ if (e.Button == MouseButtons.Left) { /*新建一个坐标点对象,它的坐标等于 (Control.MousePosition;) * 桌面上坐标的位置 */ Point myposition = Control.MousePosition; /* myposition.offset中的Offset是坐标平移的意思,现在将在窗体 * 内点击左键时产生的负数加进来,也就等于现在鼠标在桌面上的坐标 * 减去鼠标在窗体内的坐标位置,就等于现在窗体的位置 */ myposition.Offset(mypoint.X, mypoint.Y); /* this.DesktopLocation这句的意思是获取或设置窗体在桌

面上的位置 * 它的位置来自myposition */ this.DesktopLocation = myposition; } 其实这是个让人说过无数次的内容,但是最近在写一个测试小程序的时候发现了一个问题,今天没什么事做,就做个小的总结。 通过拖动窗体的客户区来移动一个窗体并不是很新鲜的内容,很多的程序都用到了这一点,尤其是一些可以换肤的程序。 这篇文章并不打算详细论述如何在C#下实现这一功能,因为它的代码实在是简单得不能再简单。这里简单说一下实现的原理: 首先说一个概念——窗体的客户区,窗体的客户区指的是一个窗体除了标题栏和边框以外的部分。 当我们的鼠标在窗体中移动的时候,会触发WM_NCHITTEST系统消息,MSDN中对这个消息的说明为:The WM_NCHITTEST message is sent to a window when the cursor moves, or when a mouse button is pressed or released. If the mouse is not captured, the message is sent to the window beneath the cursor. Otherwise, the message is posted to the window that has captured the mouse. (当光标移动或一个鼠标键被按下或释放时,WM_NCHITTEST消息会被发送到一个窗口中,如果光标没有被捕获,这个消息被送到光标下的窗口。否则这个消息被送到捕获了光标的窗口。) 这个消息被默认的(请注意是“默认的”)窗口过程(窗口过程这个概念后面再说)处理后,会根据触发这个消息时鼠标的位置返回一个值,例如当鼠标在窗口的标题栏上时,返回HTCAPTION;当鼠标在一个窗口的客户区中时,返回HTCLIENT;如果鼠标指向某个窗口的字窗口的“关闭”按钮或系统菜单(就是点击窗口图标后出现的那个菜单),就返回HTSYSMENU。 所以我们要做的就是骗!我们要欺骗Windows,当我们的鼠标在窗体的客户区中移动时,默认的窗口过程处理后会返回 HTCLIENT,Windows系统根据这个值进行相应的操作,把适当的消息插入到应用程序的消息队列(这个概念同样在后面讨论)中。这时如果我们做一些改变,人为地修改窗口过程的返回值,把HTCLIENT修改为HTCAPTION并返回给系统,系统就会认为鼠标这时在窗体的标题栏中,而拖动标题栏可以移动一个窗体,所以当我们在一个被这样修改后的应用程序的客户区按下鼠标并拖动时,Windows会认我们在拖动一个窗体的标题栏,于是它把一个移动窗体的消息插入到程序的消息队列中,再经过窗口过程的处理,就实现了我们需要的功能——拖动窗体的客户区移动窗体。

窗体选择题

1:在“窗体视图”中显示窗体时,窗体中没有记录选定器,应将窗体的“记录选定器”属性值设置为 A、是 B、否 C、有 D、无 2:如果在文本框内输入数据后,按Enter键或按Tab键,输入焦点可立即移至下一指定文本框,应设置的属性是______。 A、"制表位"属性 B、"Tab键索引"属性 C、"自动Tab键"属性 D、"Enter键行为"属性 3:在教师信息输入窗体中,为职称字段提供"教授"、"副教授"、"讲师"等选项供用户直接选择,最合适的控件是______。 A、标签 B、复选框 C、文本框 D、组合框 4:在学生表中用"照片"字段存放相片,当使用向导为该表创建窗体时,照片字段使用的默认控件是______。 A、图形 B、图像 C、绑定对象框 D、未绑定对象框 5:下列属性中,属于窗体的"数据"类属性的是______。 A、记录源 B、自动居中 C、获得焦点 D、记录选择器 6:在Access中为窗体上的控件设置Tab键的顺序,应选择"属性"对话框的 ______。 A、"格式"选项卡 B、"数据"选项卡 C、"事件"选项卡 D、"其他"选项卡

7:若在"销售总数"窗体中有"订货总数"文本框控件,能够正确引用控件值的是______。 A、Forms.[销售总数].[订货总数] B、Forms![销售总数].[订货总数] C、Forms.[销售总数]![订货总数]: D、Forms![销售总数]![订货总数] 8:主窗体和子窗体通常用于显示多个表或查询中的数据,这些表或查询中的数据一般应该具有的关系是______。 A、一对一 B、一对多 C、多对多 D、关联 9:能够接受数值型数据输入的窗体控件是______。 A、图形 B、文本框 C、标签 D、命令按钮 10:下列可用于创建窗体或修改窗体的视图是______。 A、设计视图 B、窗体视图 C、数据表视图 D、透视表视图 11:设计窗体时,可通过设置命令按钮的一个属性来指定按钮上要显示的文字,该属性是______。 A、名称 B、标题 C、格式: D、图像 12:在窗体设计时,要设置标签文字的显示格式应使用______。 A、格式工具栏 B、字段列表框 C、工具箱 D、窗体设计工具栏 13:下列关于窗体的叙述中,正确的是______。 A、窗体只能用作数据的输出界面 B、窗体可设计成切换面板形式,用以打开其他窗体 C、窗体只能用作数据的输入界面:

【PPT实用技巧】PPT怎么设计圆角正六边形图形

PPT怎么设计圆角正六边形图形 PPT怎么设计圆角正六边形图形?ppt中想要画正多边形该怎么绘制呢?下面我们就来看看ppt绘制正六边形的教程,很简单,需要的朋友可 以参考下 1、打开我们的PPT软件后,我们点击顶部的菜单栏,选择插入“插入”菜单,然后在子菜单中选择“形状”。

2、在形状中,我们选择“矩形:圆角”,然后在PPT中绘制一个圆角矩形,选中插入的圆角矩形,然后通过上面的控点,将圆角矩形的圆角拉倒最大。 3、我们将圆角已经拉至最大的圆角矩形复制出四个(正五边形复制四个)或五个(正五边形复制五个),然后将他们设置形状格式为“无线条”。

4、然后我们如果是想要绘制出正五边形,我们就将复制出的四个圆角 矩形,通过右键设置形状格式,分别将四个圆角矩形旋转72°、144°、216°和288°。 5、当然,我们如果是想要绘制出正六边形,我们就将复制出的五个圆 角矩形其中的四个,通过右键设置形状格式,分别将他们旋转60°、120°、240°和300°,而还剩一个复制出来的矩形不用做旋转操作,保持不变即可。

6、我们将旋转后的圆角矩形,按正五边形或正六边形的位置摆放好。我们可以借助PPT的辅助智能参考线和放大显示比例,来实现更精准的摆放。

7、摆好位置后,我们全选这些圆角矩形,然后在菜单栏会新出现一个 格式菜单,我们点击格式菜单下的“合并形状”中的“结合”,将这 些圆角矩形结合为一个整体。 8、如果,我们不想整个整体的正五边形或正六边形是空心的,我们可 以再次通过插入形状,插入一个正五边形或正六边形,覆盖住这个空心,最后再次执行“合并形状”中的“结合”,将两者结合为一个整体。到此,我们就顺利完成了一个圆角正五边形或正六边形的绘制了,通过设置其形状格式,我们可以为其添加其他填充和其他线条颜色。

名称为Op在Form1上画一个p1的图片框,然后建立一个主菜单,标题为“操作”,名称为OP,

基础题(1)【考点分析】本题考点有:菜单编辑器的使用(名称,标题,内缩符号)和图片框的Name属性和Print、Cls方法。 【解题思路】用菜单编辑器来设置菜单的名称,标题,内缩符号。另外,在图片框中显示"等级考试"的信息通过图片框的Print 方法实现,清除图片框信息通过图片框的Cls属性实现。 【操作步骤】 步骤1:建立界面,添加一个名称为P1的图片框,然后用菜单编辑器建立如下表3.226所示的菜单。 步骤2 参考答案 Private Sub Clea_Click() P1.Cls End Sub Private Sub Dis_Click() P1.Print "等级考试" End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 基础题(2)【考点分析】本题考点有:列表框的的Name、List、Text属性,AddItem方法和DblClick事件。 【解题思路】在列表框的DblClick事件中,通过AddItem方法将列表框中选中的文本添加到列表框中。 【操作步骤】 步骤1:建立界面,添加控件并设置控件的属性。程序中用到的控件及属性见表3.227。 步骤2:编写程序代码。 参考答案 Private Sub L1_DblClick() L1.AddItem L1.Text End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 简单题(1)【考点分析】本题考点有:文本框的Name属性,框架的Name、Caption属性,单选按钮的Name、Caption、Value属性,窗体的Click事件以及If判断语句。 【解题思路】在窗体上添加相应的控件并通过属性窗口设置其属性。通过If语句判断单选按钮的Value属性是否为True,即某个单选按钮是否被选中来显示标签的内容。一般地,我们认为Value属性是单选按钮的默认属性。 【操作步骤】 步骤1:打开本题工程文件,添加控件并设置控件的属性。程序中用到的控件及属性见表3.228和3.229。 表3.228 表3.229 步骤2:分析并编写程序代码。 程序提供代码 Private Sub Form_Click() '需要考生编写的内容

相关文档
最新文档