机械专业英文文献TGSS50型水平刮板输送机.docx
- 文档编号:29556219
- 上传时间:2023-07-24
- 格式:DOCX
- 页数:13
- 大小:27.89KB
机械专业英文文献TGSS50型水平刮板输送机.docx
《机械专业英文文献TGSS50型水平刮板输送机.docx》由会员分享,可在线阅读,更多相关《机械专业英文文献TGSS50型水平刮板输送机.docx(13页珍藏版)》请在冰豆网上搜索。
机械专业英文文献TGSS50型水平刮板输送机
毕业设计(论文)外文资料翻译
题目:
TGSS-50型水平刮板输送机
-机头段设计
院系名称:
专业班级:
学生姓名:
学号:
指导教师:
教师职称:
起止日期:
地点:
附件:
1.外文资料翻译译文;2.外文原文。
指导教师评语:
签名:
年月日
Endshortcutmenu事件
快捷菜单出现后被击活。
用法:
Object.Activate()
Object:
Document对象
对象表达式,其结果为有效的容器对象,此处必须为文档对象(document)。
说明:
当模式对话框显示时不会触发任何事件。
参见:
方法,属性和事件:
BeginShortcutMenuDefault
BeginShortcutMenuEdit
BeginShortcutMenuGrip
BeginShortcutMenuOsnap
BeginRightClick
Activex和VBA开发指导:
“使用事件”
UsingProgrammingLanguagesotherthanVBA
例程:
PrivateSubAcadDocument_Activate()
’本例演示快捷菜单事件的图形
’当用户关闭快捷菜单图形时,此事件被击活
’激活示例程序:
将鼠标放在快捷菜单活动的区域上,单击右键
’等待快捷菜单被打开,然后再关闭
MsgBox"您刚才激活了一个图形!
"
EndSub
LayoutSwitched事件
用户转换一个不同的排列之后被激活
用法:
object.LayoutSwitched(LayoutName)
object:
Document对象
对象表达式,其结果为有效的容器对象,此处必须为文档对象(document)。
说明:
当模式对话框显示时不会触发任何事件。
参见:
方法,属性和事件:
WindowChanged
WindowMovedOrResized
Activex和VBA开发指导:
“使用事件”
UsingProgrammingLanguagesotherthanVBA
例程:
PrivateSubAcadDocument_LayoutSwitched(ByValLayoutNameasString)
’演示排列转换事件的图形
’当用户用了不同的排列时被激活
’激活示例程序:
打开图形并改变排列
’例如:
转换一个图形从模式到排列
’排列图表的多样性,我们可以选择自己需要的
MsgBox"您刚才激活了一个图形!
"
EndSub
LISPCancelled事件
当LISP表达的评估被取消时被激活
用法:
object.LISPCancelled()
object:
Application对象,Document对象
对象表达式,其结果为有效的容器对象,此处必须为应用程序对象(application)或文档对象(document)。
说明:
当模式对话框显示时不会触发任何事件。
参见:
方法,属性和事件:
BeginLISP
EndLISP
Activex和VBA开发指导:
“使用事件”
UsingProgrammingLanguagesotherthanVBA
例程:
PrivateSubAcadDocument_LispCancelled()
’本例演示LISP取消的图形
'LISP表达的评估取消时被激活
’激活示例程序:
操作LISP表达和取消LISP的评估在它完成之前
MsgBox"您刚才激活了一个图形!
"
EndSub
Modified事件
当对象和集合被修改时被激活。
用法:
object.Modified(Entity)
object:
AllDrawingobjects,Block,Blocks,Dictionary,Dictionaries,DimStyle,DimStyles,Group,Groups,Hyperlink,Hyperlinks,Layer,Layers,Layout,Layouts,Linetype,Linetypes,ModelSpace,PaperSpace,PlotConfiguration,PlotConfigurations,RegisteredApplication,RegisteredApplications,SelectionSet,SelectionSets,TextStyle,TextStyles,UCS,UCSs,View,Views,Viewport,Viewports,XRecord
对象表达式,其结果为有效的容器对象。
说明:
当模式对话框显示时不会触发任何事件。
参见:
方法,属性和事件:
ObjectAdded
ObjectErased
Activex和VBA开发指导:
“使用事件”
UsingProgrammingLanguagesotherthanVBA
例程:
PublicwithEventsPlaneasAcadLWPolyline'UsewithModifiedEventExample
SubExampleModified()
’在模式状态下本例创造了lightweightpolyline和涉及Polyline的使用在不同的场合建立相互的修改事件
’在修改事件中本例修改新的对象,激活代码
’修改对象激活事件
’提示:
本事件代码将要被激活
’在们移动或重新修改背景之前,线不会变为蓝色当本例的信件箱被展现时
MsgBox"您刚才激活了一个图形!
"
EndSub
EndShortcutMenuevent
Triggeredaftertheshortcutmenuappears.
SeeAlso|Example
Signature
object.EndShortcutMenu(ShortcutMenu)
Object
Documentobject
anobjectexpressionthatevaluatestoavalidcontainerobject.Inthiscase,theonlyvalidcontainerisadocument.
ShortcutMenu
PopupMenuobject;input/outputfromthehandler
theshortcutmenuthathasbeendisplayed.
Remarks
Usethiseventtoperformanycleanupworkontheshortcutmenu.
Noeventswillbefiredwhileamodaldialogisbeingdisplayed.
SeeAlso
Methods,Properties,andEvents:
BeginShortcutMenuDefault
BeginShortcutMenuEdit
BeginShortcutMenuGrip
BeginShortcutMenuOsnap
BeginRightClick
ActiveXandVBADeveloper'sGuide:
"UseEvents"
Example
PrivateSubAcadDocument_EndShortcutMenu(ShortcutMenuasAutoCAD.IAcadPopupMenu)
‘ThisexampleinterceptsadrawingEndShortcutMenuevent.
'
‘Thiseventistriggeredwhentheuserclosesadrawingshortcutmenu.
'
‘Totriggerthisexampleevent:
Rightclickthemouseintheworkingareaofadrawing,
‘Waitfortheshortcutmenutobedisplayedandthendismisstheshortcutmenu
MsgBox"Ashortcutmenuwasjustclosed!
"
EndSub
LayoutSwitchedevent
Triggeredaftertheuserswitchestoadifferentlayout.
SeeAlso|Example
Signature
object.LayoutSwitched(LayoutName)
Object
Documentobject
anobjectexpressionthatevaluatestoavalidcontainerobject.Inthiscase,theonlyvalidcontainerisadocument.
LayoutName
String;inputtothehandler
thenameofthelayouttheuserhasswitchedto.
Remarks
Noeventswillbefiredwhileamodaldialogisbeingdisplayed.
SeeAlso
Methods,Properties,andEvents:
WindowChanged
WindowMovedOrResized
ActiveXandVBADeveloper'sGuide:
"UseEvents"
Example
PrivateSubAcadDocument_LayoutSwitched(ByValLayoutNameasString)
‘ThisexampleinterceptsadrawingLayoutSwitchedevent.
'
‘Thiseventistriggeredwhentheuserswitchestoadifferent
‘Drawinglayoutview.
'
‘Totriggerthisexampleevent:
Openadrawingandchangeitslayoutview
'
‘Forexample:
SwitchthedrawingfromModelviewtoLayout1view
‘Usethe"LayoutName"variabletodeterminethewhichlayoutviewwechangedto
MsgBox"Thedrawinglayoutwasjustchangedto:
"&LayoutName
EndSub
LISPCancelledevent
TriggeredwhentheevaluationofaLISPexpressioniscancelled.
SeeAlso|Example
Signature
object.LISPCancelled()
Object
Applicationobject,Documentobject
anobjectexpressionthatevaluatestoavalidcontainerobject.Inthiscase,theonlyvalidcontainersaretheapplicationandadocument.
Remarks
Noeventswillbefiredwhileamodaldialogisbeingdisplayed.
SeeAlso
Methods,Properties,andEvents:
BeginLISP
EndLISP
ActiveXandVBADeveloper'sGuide:
"UseEvents
Example
PrivateSubAcadDocument_LispCancelled()
‘ThisexampleinterceptsadrawingLispCancelledevent.
'
‘ThiseventistriggeredwhentheevaluationofaLISPexpressioniscancelled.
'
‘Totriggerthisexampleevent:
RunaLISPexpressionand
‘CanceltheLISPevaluationbeforeitfinishes
MsgBox"ALISPevaluationwasjustcancelled."
EndSub
Modifiedevent
Triggeredwhenanobjectorcollectioninthedrawinghasbeenmodified.
SeeAlso|Example
Signature
Object.Modified(Entity)
Object
AllDrawingobjects,Block,Blocks,Dictionary,Dictionaries,DimStyle,DimStyles,Group,Groups,Hyperlink,Hyperlinks,Layer,Layers,Layout,Layouts,Linetype,Linetypes,ModelSpace,PaperSpace,PlotConfiguration,PlotConfigurations,RegisteredApplication,RegisteredApplications,SelectionSet,SelectionSets,TextStyle,TextStyles,UCS,UCSs,View,Views,Viewport,Viewports,XRecord
Anobjectexpressionthatevaluatestoavalidcontainerobject.
Entity
ADrawingObject
Theobjectinthedrawingthatismodifiedcanbeanyoneofthedrawingobjects.
Remarks
Thiseventwillbetriggeredwhenevertheobjectismodified.Modificationincludeswheneverthevalueofapropertyisset,evenifthenewvalueisequaltothecurrentvalue.
WhencodinginVBA,youmustprovideaneventhandlerforallobjectsenabledfortheModifiedevent.Ifyoudonotprovideahandler,VBAmayterminateunexpectedly.
Noeventswillbefiredwhileamodaldialogisbeingdisplayed.
SeeAlso
Methods,Properties,andEvents:
ObjectAdded
ObjectErased
ActiveXandVBADeveloper'sGuide:
"UseEvents"
Example
PublicwithEventsPlaneasAcadLWPolyline'UsewithModifiedEventExample
SubExampleModified()
‘Thisexamplecreatesalightweightplotlineinmodelspaceand
‘ReferencesthePlotlineusingthepublicvariable(Plane)which
‘IssetuptointerceptModifiedevents.
'
‘Thisexamplethenmodifiesthenewobject,triggeringthecode
‘IntheModifiedevent.
Dimpoints(0To9)AsDouble
‘Definethe2Dplotlinepoints
Points(0)=1:
points
(1)=1
Points
(2)=1:
points(3)=2
Points(4)=2:
points(5)=2
Points(6)=3:
points(7)=2
Points(8)=4:
points(9)=4
‘CreatealightweightPlotlineobjectinmodelspace
'
‘*Note:
WearereturningthenewPlotlineobjectintoaModule
‘Levelvariable.Thisallowsustointercepteventsassociated
‘Withthatparticularobject.
SetPlane=ThisDrawing.ModelSpace.AddLightWeightPolyline(points)
ThisDrawing.Application.ZoomAll
‘Modifyobjecttotriggerevent.
'
‘*Note:
TheeventcodeforthePlotlinemodificationwillbetriggered
‘Beforewemoveforwardandrefreshtheview,sothelinewillnot
‘Appearbluewhentheeventmessageboxisdisplayed.
DimcolorAsAcadAcCmColor
Setcolor=AcadApplication.GetInterfaceObject("AutoCAD.AcCmColor.16")
Callcolor.SetRGB(80,100,and244)
PLine.TrueColor=color
ThisDrawing.RegenacAllViewports
EndSub
PrivateSubPLine_Modified(ByValpObjectAsAutoCAD.IAcadObject)
‘Thisexampleinterceptsanobject'sModifiedevent.
'
‘Thiseventistriggeredwhenanobjectsupportingthiseventismodified.
'
‘Totriggerthiscode:
Modifyanobjectconnectedtothisevent
‘*Note:
Byconnected,wemeantheobjectsetuptointercepteventsusing
‘TheVBAwithEventsstatement
‘Usethe"object"variabletodeterminewhichobjectwasmodified
Skybox"YoujustmodifiedanobjectwithanIDof:
"&pObject.ObjectID
EndSub
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 机械 专业 英文 文献 TGSS50 水平 输送