Delphi解释

Delphi解释
Delphi解释

一、知识点

001.Object Pascal中赋值号用:=表示。

002.后缀为.dfm的文件称窗体文件,查看窗体文件的方法:右击窗体-View as Text。

003.后缀为.dpr的文件称项目文件,查看项目文件的方法:Project-View Source。

004.后缀为.pas的文件称单元文件,查看单元文件的方法:双击窗体。

005.{$R *.res} 表示将后缀为.res的文件即资源文件,连接到.exe文件中。

006.Object Pascal字符集,是指在Object Pascal代码中可以使用的符号。为ASCII字符集。007.Object Pascal保留字,是指在Object Pascal中预定义的具有特定含义和用途的字符串。008.标识符,是以字母或下划线开始的字母、数字、下划线序列。

009.在一行中为多个变量声明同一类型的方法是:变量之间,用逗号分隔。如:x, y, z : Real; 010.Object Pascal中一个代码语句以分号结束。

011.集合类型是一群相同类型元素的组合。元素可为枚举类型、字符型、布尔型以及它们的子界和整型子界。

012.Object Pascal保留字共有65个。

013.Div运算,只对整数进行运算,除数不能为0,商保留整数。

014.Mod运算,只对整数进行运算,除数不能为0,结果为余数。

015.Delphi语句分为两类:说明语句和可执行语句。

016.xor运算即异或运算,两个操作数的值不同时,结果为true。

017.Delphi语句中的说明语句,如:Type、Var、Const 等,仅在编译期间起作用。018.Delphi语句中的可执行语句,在运行后依次执行。

0019.Delphi提供了一套强大的对异常情况进行处理的机制。巧妙地利用,可使程序更为强健。

020.单元全局变量,在单元区的implementation 之后声明,本单元内部有效。

021.VCL通常用于编写Windows应用程序。CLX用于编写跨平台应用程序。

022.VCL与CLX的共同祖先是TComponent。

023.变量的作用域即变量的有效范围。

024.指定主窗体的步骤为Project - options - Forms - MainForm - ok

025.设置应用程序图标的步骤:Project - options - Applications - Load Icon - ok

026.设置应用程序标题的步骤:Project - options - Applications - Title - ok

027.控件即运行时可见的组件。

028.ADO 对微软产品Access、SQL Server 等很友好,广泛用于C/S即客户/服务器数据库开发。

029.ADO是一系列使应用程序具有访问数据库能力的数据对象。

030.Object Pascal是强类型语言,其编译器可检查赋给变量或属性的值类型是否正确。031.控件的外观属性包括:Width、Height、Left、Top 等

032.在Button等控件的Caption属性中定义“快捷键”即字母下有下划线。

033.菜单中加“分割线”的步骤:添加菜单命令、改其Caption属性为减号。

034.设置“子菜单”的步骤:双击MainMenu1图标选中菜单命令,右击-Create Submenu。035.画布对象,系统提供的绘图平台,TCanvas类对象,主要属性:Pen、Brush、Font 等。036.Result是函数内置变量,它和函数值同类型,在函数中给Result赋值,这个值就是函数值。

037.自定义过程或函数应用的三个步骤是定义、声明、调用。

038.表,一张二维表格。字段,表中一列。记录,表中一行。

039.MCI是英文Media Control Interface的缩写,意思是:媒体控件接口。

040.SDI是英文Single Document Interface的缩写,意思是:单文档程序界面。

041.MDI是英文Multiple Document Interface的缩写,意思是:多文档程序界面。

042.BDE是英文Borland Database Engine的缩写,意思是:Borland数据库引擎。

043.DLL是英文Dynamic Link Library的缩写,意思是:动态链接库。

044.OOP是英文Object Oriented Programming,的缩写,意思是:面向对象的程序设计。045.ADO是英文ActiveX Data Object的缩写,意思是:ActiveX数据对象,是微软公司的产品。

046.VCL是英文Visual Component Library的缩写,意思是:可视组件库。

047.CLX源于英文Component Library for Cross Platform 意思是:交叉平台控件库。

048.SQL是英文Structured Query Language的缩写,意思是:结构化查询语言。

049.API是英文Application Programming Interface的缩写,意思是:应用编程接口。

050.IDE是英文Integrated Development Environment的缩写,意思是集成开发环境。

051.DLL是英文Dynamic Link Libraries的缩写,意思是:动态链接库。

052.Delphi是美国Borland公司出品的面向对象开发软件包。

053.局部变量,在过程或函数区段的begin 之前声明,在该过程或函数内部有效。

054.全局变量,在单元区的implementation 之前声明,在本项目内各单元有效。

055.数据模块是用来放置数据库控件的窗体,使用户界面与数据库组件分离便于管理维护。056.控件的字母“快捷键”的作用是在运行中,按Alt+字母,如同单击相应控件。

057.数据库由若干表组成。在Delphi中,dBASE、FoxPro、Paradox这三种数据对应于一个目录。

058.菜单项中使用ShortCut属性设置“热键”。

059.项目文件中Application.Initialize; 语句的含义是应用程序初始化。

060.项目文件中Application.CreateForm(TForm1,Form1);语句的含义是应用程序创建窗体Form1。

061.项目文件中Application.Run; 语句的含义是运行应用程序。

062.通常每个窗体对应的单元文件都有一个和它同名的窗体文件。

063.程序设计经历了面向计算机编程、面向人编程、结构化程序设计、面向对象程序设计4个阶段。

064.面向对象程序设计中类和对象的3大特点:继承性、封装性、多态性。

065.面向对象程序设计的3个基本步骤:添加组件、更改属性、添加代码。

066.举出Object Pascal中5种数据类型,如:整型,字符型,字符串型,实型,布尔型。

067.Object Pascal中4个布尔运算符有:not,and,or,xor。

068.QReport控件页提供4类控件:模板类控件、显示一般内容的控件、显示数据库内容的控件、其他控件。

069.程序的3种基本结构分为:顺序结构、分支结构、循环结构。

070.Delphi自创的3个主要文件及扩展名:项目文件.DPR、单元文件.PAS、窗体文件.DFM 。

071.举出Object Pascal中5种集合元素的数据类型,如:整形、布尔型、字符型、枚举型和子界型。

072.Object Pascal中6个算术运算符有:+,-,*,/,Div,Mod

073.Delphi是Borland公司开发的可视化软件开发系统,采用Object Pascal语言。

074.Delphi7的集成开发环境包括主窗口、窗体设计器、代码编辑器、对象观察器、对象树浏览器。

075.在Object Pascal中,函数首部以保留字function开始,过程首部以保留字procedure 开始。

076.SpeedButton控件通过GroupIndex和Down属性的设置可保持被选中状态。

077.字体对话框的OnApply事件,可以使字体对话框中包含一个Apply按钮。

078.复选框的checked属性决定复选框是否被选中。

079.要使某个命令按钮不起作用,应将该按钮的Enabled属性设置为False。

080.要让某个菜单命令在运行时不可见,设计时,应将该菜单命令的Visible属性的值设置为False。

081.菜单命令的Checked属性为True时,菜单命令的前面有“√”符号。

082.菜单项或菜单命令前上的图片,可设置Bitmap属性实现,也可以通过Imagelist控件实现。

083.通过设置工具按钮的MenuItem属性或Onclick事件可与菜单实现代码共享。

084.要改变工具栏或状态栏的默认位置,可以通过设置该控件的Align属性来实现。

085.Delphi支持位图(.bmp)、图标(.ico)、图元(.wmf)三种文件格式。

086.Canvas对象是一个用于绘图的区域,在这个区域上,程序可实现各种绘图功能。

087.Delphi中Canvas对象功能强大,但不能单独使用,须依赖具体对象实体才有意义。

088.在Delphi7中绘制一段圆弧用Arc方法,其参数类型为整型。

089.在Delphi7中移动画笔用Moveto方法,其参数类型为整型。

090.TPen称画笔对象,可用来在画布上绘线段,其颜色和宽度分别在Color和width属性中定义。

091.Delphi7所提供的MediaPlayer可以播放W A V、MP3、A VI、MID等文件。

092.Delphi7所提供的MediaPlayer控件位于控件面板的System选项卡中。

093.MediaPlayer控件的Error属性值为整型,设备有错时返回错误码,无错时返回0。094.Animate控件可以使用两种不同的资源:一种为A VI文件另外一种为Window内部动画。095.在TDBGrid中,每一列代表数据表的一个字段,每一行代表数据的一个记录。

096.MediaPlayer控件的Previous方法的功能是使媒体“回退”。

097.数据库系统主要由数据库管理系统、数据库应用程序和数据库三个部分组成。

098.DataBase Desktop是数据库管理工具,用以建立或修改数据库表的结构,完成数据的输入。

099.Delphi管理BDE别名的工具有:BDE Administrator、Database Desktop和SQL Explore。100.Delphi中对数据库的访问和显示是通过BDE、Data Control、Data Access控件来实现的。101.BDE的中文含义是数据库引擎,它是数据库应用中的一种连接方法。

102.对象是类的实例,也是类的变量,Delphi中,TObject是所有类的祖先。

103.一个Delphi应用程序必有一个项目文件和至少一个单元文件。

104.一个窗体一定对应一个单元,一个单元不一定对应一个窗体。

105.一个窗体文件一定对应一个同名的单元文件。

106.Delphi 规定,字符串内,单引号用两个单引号表示。

107.Delphi代码中,一行内,“//”之后的内容为注释内容。

108.Delphi代码中,大括号内的内容为注释内容。

109.用户开发程序时可使用F12在窗体和编辑器窗口之间来回切换。

110.用户开发程序时可使用Ctrl+Shift+U或Ctrl+Shift+I左右移动选中的代码。

111.声明一个常量后,在程序中不可以改变这个常量的值。

112.在设计阶段Object Inspector中显示的属性不是被选组件的全部属性。

113.按住Shift键,同时单击Components Palette上的组件图标,可在窗体内放置多个同类组

件。

114.事件响应过程中不添加任何代码时,保存或编译该项目时,该过程将被自动清除。115.大多数组件的属性可以在运行时改变,而且,有些只能在运行时刻改变。

116.Delphi项目中创建的窗体及其组件的基本信息保存在一个扩展名为.dfm的窗体文件中。117.Delphi的保留字,不能作为自定义标识符。

118.Delphi定义的数据类型中,整型、实型、字符型、字符串型和布尔型都是标谁数据类型。119.Delphi定义的数据类型中,整型、字符型、布尔型、枚举型和子界型属于顺序类型。120.Delphi代码中,Case语句中的“表达式”可以为任意返回值为顺序类型的表达式。121.ParamByName方法是一个函数,使用参数名为SQL参数赋值。

122.静态SQL语句在程序设计时已固定下来,不包含任何参数和变量。

123.SQL语句中包含参数称为动态SQL语句。Params属性,为动态SQL语句中的参数赋值。124.Params属性设计时不可用,是动态建立的,是一个数组,下标从0开始。

125.SQL语句中通配符是百分号。SQL语句中的参数前面要使用冒号标识。

126.TQuery控件通过在SQL语句中使用Join连接词,一次可以访问多个表。

127.FieldByName方法通过字段名访问字段。

128.TQuery控件的SQL属性用于指定SQL语句。

129.程序链接时将函数库中的代码拷贝到可执行文件中,叫静态链接。

130.使用ShowModal方法打开的窗口必须关闭自己才能回到上一层窗口。

131.在Delphi中可用BDE控件建立与数据库的联系。

132.Delphi提供的数据访问控件放置在Data Access选项卡上。

133.ExecSQL方法执行不需要返回值的SQL语句,如Insert、Update、Delete、Create Table 等。

134.CheckBox控件的State属性有三种取值,分别代表三种状态:选中、未选中和灰色。135.窗体的ShowModal方法用于以模式对话框方式显示窗体对象。

136.Delphi标准驱动程序Standard是适用于Paradox、dBASE、Access、FoxPro及文本数据库。

137.FieldValues属性使用字段名访问字段。

138.TQuery控件的事件,分Before、After和On开头,分别表示在一种情形之前、之后及正在发生。

139.Paradox数据库表文件的扩展名是.DB。

140.Access数据库文件的扩展名是.MDB。

141.所有可视化的VCL控件都是从TControl基类派生而来的。

142.Result保留字在Delphi中用来专指函数返回值。

143.过程或函数的参数位于括号里面,参数之间以分号分隔。

144.类型说明部分以保留字type开始。

145.类型的名称以字母T开始,并非必须,是Delphi的惯例,以便区别类型名和标识符。146.递归调用,是指函数A调用函数B,而函数B又调用函数A的情况。

147.枚举型数据的括号中,每一值对应一个整形数,最左边一个对应0。

148.在Delphi中#表示ASCII码的字符转换,#10、#13相当于VB中的chr(10) 、chr(13)。149.MyString: string[15]; 变量MyName被说明成为最多可以包含15个字符。

150.MyString: string;变量MyName最多可以包含255个字符。

151.标识符的有效长度为255个字符,不区分大小写,可以用来标识常量、变量、程序、函数等。

152.在Database Desktop中,用Ctrl+Delete删除字段。

153.复合语句由begin开始,end结尾,内含若干语句以分号隔开。

154.文件是同一类型元素的有序集合,是内存与外设间传输数据的渠道。

155.Delphi支持三种文件类型,即:文本文件、记录文件、无类型文件。

156.Timer控件的Interval属性用来设置两个OnTimer事件的间隔,单位为毫秒。

157.Timer控件的Interval属性设置为0相当于关闭计时器,最大允许值是32767。

158.Handle译作句柄,是标识资源(或项目)的唯一标识符。是一个数据。

159.窗口句柄是Windows为窗口提供的标识符,用来控制窗口的状态与操作。

160.BitBtn控件的ModelResult属性用来设置内置返回功能。

161.BitBtn控件的Kind属性用来设置按钮的样式。

162.锁定控件位置,选择主菜单Edit,Lock Controls。解锁只需再次选择。

163.记录类型是由异类元素组成的集合。是一个对象的属性集合。

164.用LoadFromFile从文件中获取SQL语句,会清掉原来的SQL语句。

165.用Assign方法获取SQL语句,会清掉原来的SQL语句。

166.访问SQL参数,可ParamByName函数按名称、Params属性按序号、ParamValues属性按名称访问。

167.执行SQL语句前,先调用Prepare不是必须的,但能改善应用程序的性能。

168.运行期执行SQL语句,SELECT语句用Open方法,其他不返回结果的SQL语句用ExecSQL方法。

169.纯常量是一种预先定义的标识符,其值在定义后永远不会改变。例如:const MaxValue = 237;

170.同一个枚举元素不能出现在多个枚举类型中。

171.EXIT语句的功能是退出当前的代码块。

172.调用过程或函数使用的参数称为实参,被调用过程或函数使用的参数称为形参。

173.方法是在一个对象上执行指定操作的过程或函数。

174.加速键、快捷键、加速字符都是指输入时&后跟字符,显示为有下划线的字符。

175.TComponent类是TPersistent类的下一级继承者,它是VCL中所有构件的祖先类。176.TWinControl和TGraphicControl类都是TControl类的子类。

177.TWinControl的子类如TButton、TEdit、TListBox等,有自己的句柄,能接受焦点,占用Windows资源。

178.TGraphicControl的子类如TLabel和TSpeedButton等,没有窗口句柄,不接受焦点,不占Windows资源。

179.在对象观察器上,鼠标右击,选择Stay On Top命令。对象观察器将一直可见。

180.{$R *.dfm}表示把*.dfm代表Delphi窗体文件链接到可执行文件中,*表示与当前单元文件同名。

181.组件是编程者可重复使用,扩展名.ocx或.dll的二进制文件,有公开的属性、事件、方法。182.InsertNewLineAfter方法在指定的菜单项之后插入一个分隔线。

183.ToolBar的Indent属性用于指定工具栏上最右边—个按钮和组件离工具栏的左边界之间的距离。

https://www.360docs.net/doc/d111520171.html,bel的FocusControl属性用来指定关联组件。按下Label的加速字符,焦点移到关联组件。

185.ToolBar的EdgeBorders属性指定工具栏的哪一侧有边框。

186.ToolBar的EdgeBorders属性是一个集,合包含下列元素:ebLeft、ebTop、ebRight和ebBottom。

187.ToolBar的HotImages属性用于指定ImageList,鼠标指向按钮时,ImageList中的图像代

替原图像。

188.Panel的BevelInner为bvLowered且BevelOuter为bvRaised时Panel控件的边线为凸起线。

189.Table控件的Filter属性的值是一个字符串。该字符串为空串时,表示全部记录。190.动态链接库编译过的可执行代码模块,文件后缀.DLL,可被应用程序或其他DLL调用。191.窗体的FormStyle属性设置成fsMDIForm是MDI父窗体,设置成fsMDIChild是MDI 子窗体。

192.每个MDI应用程序都有一个MDI父窗体,且只能有一个父窗体,父窗体必须是主窗体。193.SQL-select语句中使用 as <中文>方式,DBGrid控件中可实现中文列头。

194.通常一个文件夹中只建一个项目,可用文件夹名反映项目名。

195.项目文件默认名称是project1.dpr,编译后的.exe文件的主文件名可以更改。

196.单元文件主文件名应与窗体的Name属性相近。如Name为MainForm,单元文件可为Main.pas。

197.可通过双击文件夹中的项目文件图标,进入IDE界面修改项目。

198.RichEdit控件通过方法Lines.LoadFromFile和Lines.SaveToFile可以方便地存取RIT文件。199.对话框分为两类:“有模式”和“无模式”对话框。

200.显示模式对话框时必须关闭模式对话框,才能将输入焦点转移其他窗口。

201.无模式对话框允许用户在对话框与别的应用之间的其他窗口进行切换。

202.ImeName属性是输入法名称。Ime是输入方法编辑器(input method editor)的意思。203.Delphi中Parent是直接包含本对象的容器对象。Owner既是指本对象的所有者。

204.Sender可以称为触发这个事件的组件。Self是指当前代码所属的类别。

205.Object Pascal语言提供了repeat、while和for三种循环语句。

206.Object Pascal语言提供了if和case两种分支语句。

207.单文档窗体中调用另一窗体可通过Show或ShowModal两个方法来实现。

208.组成图像颜色的RGB三基色的取值范围是0至255。

209.单元文件中程序最后一行的end后是“.”,而不是“;”号。

210.在Delphi中,浮点数声明用Real,而不用Float。

211.代码编辑时按Ctrl+Shift+↑或Ctrl+Shift+↓可在过程申明与具体实现部分之间来回切换。

212.编辑时按住Ctrl键,鼠标移到变量、函数或过程名上,会出现下划线。单击可链接到最初定义处。

213.窗体设计时按Esc键,系统将自动选择组件所在的容器。

214.Paradox数据表输入日期型数据时,要按“yyyy-mm-dd”的形式进行输入。

215.窗体的AlphaBlend属性为true时,AlphaBlendV alue属性值决定窗体的透明程度。216.Edit控件的PasswordChar属性设置为“*”时,输入内容显示为“*”。

217.标签的AutoSize属性为true且WordWrap属性为true时,标签在垂直方向上变化大小,适应文本。

218.窗体的WindowState属性为wsMaximized时,窗体以最大化方式运行。

219.Delphi中子面板Panels的序号是从0开始的。如:Panels[0]代表第一个子面板。

220.查API函数帮助信息,可打开Win32.hlp,在Delphl的安装光盘上可找到Win32.hlp。221.状态栏的SimplePanel为True时,状态栏将只有一个窗格,信息由SimpleText属性指定。222.PageControl的TabPosition属性为tpBottom时,标签在底部显示。

223.代码编辑器中,在一个控件名后输入一个“.”,会弹出与该控件对应的属性、方法及事件供选择。

224.Kylix是Delphi的Linux版本,Kylix与Delphi7使用相同的CLX组件库。

235.CLX组件库中的大部分名称及功能与VCL组件库一一对应。

226.用VCL组件库开发的Windows平台应用程序,很难或无法移植到Linux平台上。227.Delphi7与Delphi6中增加了CLX组件库,使用CLX组件库可以直接开发跨平台应用程序。

228.跨平台应用程序可在Windows平台上运行,经Kylix重新编译后,可以直接在Linux平台上运行。

229.{$R *.xfm}表示编译器调用的CLX窗体文件的扩展名为.xfm。

230.{$R *.dfm}表示编译器调用的VCL窗体文件的扩展名为.dfm。

231.选择菜单File-New-CLX Application 将新建立一个跨平台应用程序。

232.选择菜单File-New-Application 将新建立一个Windows平台应用程序。

233.StringGrid组件位于Additional页面,其Cells属性是一个二维数组。

234.Sender对象是Delphi定义的全局对象,表示当前获得输入焦点的对象。

235.对象中使用弹出菜单的关键是在对象的PopupMenu属性中设置该弹出菜单的名字。236.ToolBar组件位于组件面板Win32页面,通过鼠标右击工具栏并选择“Add”来添加多个按钮。

237.如果一个窗体中有多个ToolBar组件,则应该将这些ToolBar组件放置在一个CoolBar 组件中。

238.ToolBar放到CoolBar中的方法是在CoolBar中添加TCoolBand,用Contrl属性与ToolBar 关联。

239.PageControl组件位于组件面板Win32页面,通过鼠标右击,选择“New Page”来建立新页面。

240.TabControl组件位于组件面板Win32页面,通过设置Tabs属性建立多个页面。

241.TabControl组件用TabIndex属性值决定选择了哪一个页面。第一个页面的TabIndex属性值为0。

242.StatusBar位于Win32页面。右击-“Panels Editor”,单击“Add New”钮,添加子面板。

二、Delphi词汇

00.Align 排列,属性名。

01.Try-Finally-End 异常处理,语句名。

02.Case-Of-End 多分支选择,语句名。

03.StrToDate() 字符串型转换到日期型,函数名。

04.procedure 过程,保留字名。

05.ShowMessage() 消息框,过程名。

06.LoadFromFile() 从文件中装载,方法名。

07.IntToStr() 整型转换到字符串型,函数名。

08.StrToFloat()字符串型转换到实型,函数名。

09.function 函数,保留字名。

10.Query 查询,控件名。

11.OpenPictureDialog 打开图片对话框,控件名。

12.SavePictureDialog 保存图片对话框,控件名。

13.Length() 返回字符串中字符数,函数名。

14.PopupMenu 快捷菜单,控件名。

15.ColorDialog 颜色对话框,控件名。

16.UpperCase() 把字符串中字母大写,函数名。

17.SaveToFile()保存到文件,方法名。

18.ListBox 列表框,控件名。

19.BitBtn 位图按钮,控件名。

20.Image 图像,控件名。

https://www.360docs.net/doc/d111520171.html,boBox 组合框,控件名。

22.Repeat-Until 循环,语句名。

23.While-Do 循环,语句名。

24.Draw 绘图,方法名。

25.OpenDialog 打开对话框,控件名。

26.PageControl 页面控制,控件名。

27.FontDialog 字体对话框,控件名。

28.ImageList 图像列表框,控件名。

29.Caption 标题,属性名。

30.MainMenu 主菜单,控件名。

31.Canvas 画布,对象名。

32.CopyMode 复制模式,属性名。

33.Ellips 画椭圆,方法名。

34.Try-Except-End 异常处理,语句名。

https://www.360docs.net/doc/d111520171.html,bel 标签框,控件名。

36.Edit 编辑框,控件名。

37.Memo 备注框,控件名。

38.Color 颜色,属性名。

39.Click 单击,事件名。

40.Enabled 启用,属性名。

41.Change 改变,事件名。

42.KeyPress 键按下,事件名。

43.Clear 清除,方法名。

44.Clipboard 剪贴板,对象名。

45.RadioButton 单选按钮,控件名。

46.Items 条目,属性名。

47.GroupBox 群组框,控件名。

48.checkBox 复选按钮,控件名。

49.RadioGroup 单选按钮组件,控件名。

50.ScrollBar 滚动条,控件名。

51.ScrollBars 滚动条,属性名。

52.Max 最大值,属性名。

53.Min 最小值,属性名。

54.Position 位置值,属性名。

55.Interval 时间间隔,属性名。

56.PaintBox 绘图板,控件名。

57.ReadOnly 只读,属性名。

58.SpeedButton 加速按钮,控件名。

59.BitBtn 位图按钮,控件名。

60.Style 风格,属性名。

61.Font 字体,属性名。

62.StatusBar 状态栏,控件名。

63.ToolBar 工具栏,控件名。

64.Application 应用程序,对象名。

65.Initialize 初始化,方法名。

66.Run 运行,方法名。

67.MediaPlayer 多媒体控件,控件名。

68.Animate 动画,控件名。

69.String 字符串,数据类型名。

70.Integer 整数,数据类型名。

71.Hint 提示,属性名。

72.Text 文本,属性名。

73.Create 创建,事件名。

74.Close 关闭,方法名。

75.Width 宽度,属性名。

76.Height 高度,属性名。

77.State 状态,属性名。

78.ActionList 事件列表,控件名。

79.Shape 几何图形,控件名。

80.ProgressBar 进度条,控件名。

81.DateSource 数据源,控件名。

82.Brush 画刷,对象名。

83.FileListBox 文件列表框,控件名。

84.DirectoryListBox 目录列表框,控件名。

85.DriveComboBox 驱动器组合框,控件名。

86.FilterComboBox 过滤器组合框,控件名。

87.DBNavigator 导航器,控件名。

88.clRed 红色,常数名。

89.ssVertical 垂直滚动条,常数名。

90.ssHorizontal 水平滚动条,常数名。

91.fsMDIForm MDI父窗体,常数名。

92.fsMDIChild MDI子窗体,常数名。

93.WordWrap 自动换行,属性名。

94.ClientWidth 净宽度,属性名。

95.AutoSize 自动大小,属性名。

96.Boolean 布尔,数据类型名。

97.TColor 颜色,数据类型名。

98.Real 实型,数据类型名。

99.TObject 对象,数据类型名。

三、按行解释代码

procedure TForm1.FormPaint(Sender: TObject); //Form1的OnPaint事件过程

var //变量声明保留字

x,y:integer; //声明x,y为整型

begin //过程开始

y:=0; //y赋值0

while y

begin //本while语句循环体的开始

x:=0; //x赋值0

while X

begin //本while语句循环体的开始

ImageList1.Draw(Canvas,x,y,ImageList1.tag);

//在Form1的x,y处画ImageList1的第ImageList1.tag幅图像

x:=x+ImageList1.Width; //x加上ImageList1.Width再赋值给x

end; //本while语句循环体的结束

y:=y+ImageList1.Height; //y加上ImageList1.Height再赋值给y

end; //本while语句循环体的结束

end; //过程结束

procedure TForm1.Button1Click(Sender: TObject); //Form1中Button1的OnClick事件过程var //变量声明保留字

n1,n2 : real; //声明n1,n2为实型

mark: boolean; //声明mark为布尔型

begin //过程开始

n1:=0; //n1赋值0

n2:=0; //n2赋值0

mark:=False; //mark赋值False

Checking(Edit1.Text ,n1, mark);//调用过程Checking

if not mark then //如果mark为假则执行下行

exit; //退出本过程

Checking(Edit2.Text ,n2, mark);//调用过程Checking

if not mark then //如果mark为假则执行下行

exit; //退出本过程

Edit3.Text :=FloatToStr(n1+n2);//n1+n2的和转换为字符串型赋值给Edit3.Text

end; //过程结束

procedure TForm1.Button1Click(Sender: TObject); //Form1中Button1的OnClick事件过程var //变量声明保留字

vst: string; //声明vst为字符串型

i:integer; //声明i为整型

begin //过程开始

if ListBox1.Items.Count=0 then //当ListBox1.Items.Count=0为真时,执行下行

exit; //退出过程

for i:=0 to ListBox1.Items.Count-1 do // for循环语句

if ListBox1.Selected[i] then //当ListBox1.Selected[i]为真时,执行下行

begin //复合语句开始

vst:=ListBox1.Items[ListBox1.ItemIndex];

//vst赋值ListBox1中第ListBox1.ItemIndex条内容

ListBox2.Items.Add(vst); //在ListBox2中添加内容为vst的条目

ListBox1.Items.Delete(i);//在ListBox1中删除第i条条目

exit;//退出过程

end; //复合语句结束

end; //过程结束

Delphi函数清单

[标准函数和过程] 首部 procedure Abort;$[SysUtils 功能引起放弃的意外处理。 说明不显示任何错误信息。 首部 function Abs(N: ): ;$[System 功能返回参数N的绝对值。 说明函数结果与参数有相同类型,参数可以是整型也可以是浮点型。 ## Abs(-12) = 12;Abs(-12.03) = 12.03 首部 procedure AddExitProc(Proc: TProcedure);$[SysUtils 功能将旧版本某一过程添加到当前版本运行的库的结束过程表中。 说明只能向下兼容,不能用在当前使用版本的 首部 function Addr(X): Pointer;$[System 功能返回指定对象的内存地址。 说明地址运算符 @ 可以产生与Addr相同的结果。 首部 procedure AddTerminateProc(TermProc: TTerminateProc);$[SysUtils 功能将一过程添加到运行时库的终止过程表中。 说明 Delphi 在程序结束时将终止该程序的全部进程,可以终止的进程都放在终止过程表中,程序通过结束终止过程表所有的进程来实现终止全部进程的目的。 首部 function AdjustLineBreaks(const S: string): string;$[SysUtils 功能将给定字符串的行分隔符调整为Cr/Lf序列。 说明 首部 function AllocMem(Size: Cardinal): Pointer;$[SysUtils 功能在堆栈上分配给定大小为 Size字节的块,即在内存里开辟Size 大小的空间。 说明 Cardinal 0..4294967295 32位无符号整数 首部 function AnsiCompareFileName(const S1, S2: string): Integer;$[SysUtils 功能比较两个文件名的大小。不区分大小写。 说明条件返回值 S1 > S2 | > 0 S1 < S2 | < 0 S1 = S2 | = 0 首部 function AnsiCompareStr(const S1, S2: string): Integer;$[SysUtils 功能比较两个字符串的大小。要区分大小写。 说明参见AnsiCompareFileName。 首部 function AnsiCompareText(const S1, S2: string): Integer;$[SysUtils 功能返回两个字符串是否相同的状态。不区分大小写。 说明参见AnsiCompareFileName。 首部 function AnsiExtractQuotedStr(var Src: PChar; Quote: Char):string;$[SysUtils 功能将引用字串转换成结束引语返回。 说明函数支持多字节字符系统[MBCS]。 首部 function AnsiLastChar(const S: string): PChar;$[SysUtils 功能取参数S的最后一个字符,并转换成以null结束的字符串指针返回。 说明 ##AnsiLastChar(‘Sysoft’) = {‘t\0’}; 首部 function AnsiLowerCase(const S: string): string;$[SysUtils 功能将字符串S转换为小写返回。 说明函数支持多字节字符系统[MBCS]。 首部 function AnsiLowerCaseFileName(const S: string): string;$[SysUtils 功能将文件名S转换成小写返回 说明函数支持多字节字符系统[MBCS]。 首部 function AnsiPos(const Substr, S: string): Integer; $[SysUtils 功能返回子串Substr出现在主串S中的第一个位置。 说明 首部 function AnsiQuotedStr(const S: string; Quote: Char): string; $[SysUtils 功能返回引用字串的译文 说明 首部 function AnsiStrComp(S1, S2: PChar): Integer; $[SysUtils 功能比较两个指针字符串的大小。要区分大小写。 说明参见AnsiCompareFileName。

VC_与Delphi源代码的互译详解

Computer Knowledge and Technology 电脑知识与技术第7卷第32期(2011年11月)VC++与Delphi 源代码的互译详解 许苗村,陈业恩 (海南软件职业技术学院软件工程系,海南琼海571400) 摘要:以大量举例的形式给出了VC++与Delphi 的代码互译,首次做到了对VC++与Delphi 程序的沟通,为算法研究及软件开发人员提供了可靠的代码转换依据,具有非常重要的意义和应用价值。 关键词:VC++;Delphi ;互译 中图分类号:TP311文献标识码:A 文章编号:1009-3044(2011)32-7924-04 VC++and Delphi Source Code Mutual Translation XU Miao-cun,CHEN Ye-en (Hainan College of Software Technology,Qionghai 571400,China) Abstract:The article gives VC++and the Delphi code mutually translation by the massive examples,for the first time to do the VC++and the Delphi code communication,which provides the reliable code conversion basis for the algorithm research and the software develop?er and has the extremely vital significance and the application value. Key words:VC++;Delphi;Mutually translation 一个程序开发员常常手中掌握了一种语言的代码,但却需要以另一种开发平台进行开发,为解决此问题,本文通过举出大量实 例对VC++与Delphi 语言中的一些不同之处进行了对应互译,解决了不同开发平台之间沟通难的问题[1-4]。 1运算符互译 表1为VC++与Delphi 的算术、位、逻辑运算符 互译对照表。2源代码的互译详解 2.1单元的引用 VC++中单元引用部分include 用于列出该单元要引用的标准库单元(诸如①)和其它库单元 (诸如②),这类似于Delphi 中的uses 语句,可以把外部的已声明过的常量、类型、变量、过程或函数引入到本单元中使用,使得功能更加强大,使用更加方便。VC++:#include ①#include "shearwarp.h"②Delphi :Uses windows ,shearwarpunit;2.2宏常量 用#define 定义的常量,即宏常量,其一般形式为#define <宏名><常量>,宏名可以是简单的字符名,也可以是带有参数的函数名。常量可以是数值、字符串和函数等。一般用#define 定义一个宏,是为了在程序中使用,使程序更加简洁,维护更加方便。1)#define <字符名><数值>VC++:#define FPSH 8Delphi :Const FPSH=8;2)#define <带参的函数名><函数>VC++:#define CLAMPX(x)(((x)<0)?0:(((x)>=m_x)?(m_x-1):(x)))在Delphi 中首先需要在此函数所属的类中宣称这一方法,Public function CLAMPX(x:integer):integer;其次需要在执行部分(implementation)对函数体进行定义,以便返回函数值:function Volume.CLAMPX(x:integer):integer; 收稿日期:2011-08-25 作者简介:许苗村(1984-),女,陕西咸阳人,海南软件职业技术学院教师,主要研究方向为图像处理与信息技术;陈业恩(1980-), 男,海南琼海人,海南软件职业技术学院教师,主要研究方向WEB 开发。 表1VC++与Delphi 的算术、位、逻辑运算符互译对照表 E-mail:xsjl@https://www.360docs.net/doc/d111520171.html, https://www.360docs.net/doc/d111520171.html, Tel:+86-551-56909635690964ISSN 1009-3044Computer Knowledge and Technology 电脑知识与技术Vol.7,No.32,November 2011.

DELPHI 中WEBBROWSER控件详解实例

Delphi中WebBrowser控件详解实例 2008-10-18下午06:58 很久都没有原创了,前几天帮朋友做了个网址发布程序,主要应用到了WebBrowser控件。今天主要给大家演示一下过程,让大家学习一下Delphi工具。 WebBrowser功能: 1。自动加载网页 2。去除WebBrowser滚动条 3。WebBrowser自身打开页面 4。禁止右键 1。首先,新建一个FROM窗体: 2。加入一个WEBBROWSER控件

3。调整后如下: 4.这样一个webbrowser就完成了,下一步我们来让程序打开后自动加载一个网页。 核心代码:WebBrowser1.Navigate('https://www.360docs.net/doc/d111520171.html,'); 双击窗体灰色处,对窗体进行初始化,在代码窗口中输入(Begin与End间输入核心代码): procedure TForm1.FormCreate(Sender:TObject); begin WebBrowser1.Navigate('https://www.360docs.net/doc/d111520171.html,');//窗体初始化完成WEBBROWSER加载一个网页end; 5。下面我们来实现禁止WEBBROWSER控件的滚动条功能:

核心代码:WebBrowser1.oleobject.Document.body.Scroll:=‘no’; 利用这个代码去掉滚动条的前提是webbrowser中必须有打开的网页,也就是在网页加载完完毕后再去掉滚动条。所以首先要判断页面是否加载完毕,如果加载完毕,就执行上面的语句 去掉滚动条。这时就要引入一个按扭控件来触发程序 加入SPEEDBUTTEN 调整形后:

Delphi如何使用基本的绘图函数绘制统计图

一个windows自带的画图工具是无论如何也不能满足我们的画图需要的,很多效果都需要我们在另外的工具中来实现。这些高级的功能是如何实现的呢,如何操纵一些基本的属性和函数,让它们最终能作出我们想要的效果呢?这里我们以绘制统计图来说明这些问题。 解决思路―― 这里,我们暂且先撇开具体的问题,综合地一下讨论画图的问题。 画图工具是基本元素的具体实现,对于我们初学者来说,还是有很好的参考价值的,在delphi 5中有一个自带的工程例子“……Borland\Delphi5\Demos\Doc\Graphex”,这个例子可以实现一些基本的绘图功能。对这个例子多加修改,一定会有所收获的。这里就不列出它的详细代码了,有心的读者可以自己找到这个例子。我这里只是想综合地讨论这方面的问题。使用DELPHI编写绘图软件的灵魂就在于操作画布,画笔和刷子,尽可能地挖掘它们的属性和相关参数的设置。 (一)画布 画布,画笔和刷子之间的关系很明了.其实,画笔和刷子都是画布的一个属性.而画布也只是TForm,TImage,TShape等组件对象的一个属性,专门负责与图象相关的信息打交道.它的主要作用可以概括如下几点: 1.指定使用画笔,刷子和字体的使用类型; 2.绘制和填充指定形状的线或图形; 3.修饰和改变图象; 画布的主要属性有: Brush--指定填充图形和背景的样式 CanvasOrientation--指定画布的定位类型,有coLeftToRight, coRightToLeft两个属性; ClipRect--指定剪切矩形的边界; CopyMode--指定图形图象的复制模式; Font--指定画布上使用的字体; Handle--为画布指定窗口GDI对象的设备描述表; LockCount--指定画布被别的线程锁定的次数; Pen--指定画布上使用的画笔,具体见下面描述; PenPos--指定画笔当前的位置; Pixels--指定当前剪切矩形的象素颜色; TextFlags--指定字体在画布上的显示方式,有ETO_CLIPPED,ETO_OPAQUE,ETO_RTLREADING,ETO_GL YPH_INDEX,ETO_IGNORELANGUAGE,ETO_NUMERICSLOCALETO_NUMERIC SLATIN等值可选; 画布相关的API函数及其注释如下: Arc--按指定方式画一条弧; BrushCopy--把位图复制到指定的画布的矩形中,用画布刷子颜色替换位图的颜色; Chord--按指定方式画弦; CopyRect--从一个矩形区域复制部分图象到另一个矩形区域; Draw--用指定参数在指定位置画图; DrawFocusRect--按指定焦点风格,通过异或操作来绘制一焦点矩形; Ellipse--按指定参数画一椭圆; FillRect--按指定的刷子填充一矩形; FloodFill--使用当前选定的刷子填充指定设备描述表中的一块区域;

DELPHI语法基础 循环嵌套

delphi语法基础-循环嵌套 循环嵌套用于一个循环的循环体中又包含循环结构程序时。 例5_6、1!+2!+…+10!的值。 分析:这个问题是求1到10自然数的阶乘之和。 var s,t:longint; i,j:integer; begin s:=0; for i:=1to10do begin t:=1; for j:=1to i do t:=t*j;{求N!的值t} s:=s+t;{累加N!的值t} end; writeln('s=',s); end. 以上的程序是一个二重for循环嵌套。这是比较容易想到的方法,但实际上对于求n!,可以求出的(n-1)!再乘上n即可得到,而无需重新从1再累乘到n。程序可改为: var s,t:longint; i:integer; begin S:=0;t:=1; for i:=1to10do begin t:=t*i;s:=s+t end; writeln('s=',s); end. 显然程序二的效率要比程序一高得多。程序一要进行1+2+…+10=55次循环,而程序二进行10次循环。 例5_7、上街采购,用500元钱买了90只鸡,其中母鸡一只15元,公鸡一只10元,小鸡一只5元,正好把钱买完。问母鸡、公鸡、小鸡各买多少只? var i,j,k:integer; begin for i:=1to33do for j:=1to50do begin k:=90-i-j; if15*i+10*j+5*k=500then writeln(i:5,j:5,k:5); end; end. 例5_8、求100-200之间的所有素数。 分析:我们可对100-200之间的每一整数进行判断,判断它是否为素数,是则输出。而对于任意整数i,根据素数定义,我们从2开始到找到i的第一个约数。若找到第一个约数,则i必然不是素数。否则i为素数。 var i,x:integer; begin for i:=101to200do begin x:=2; while(x<=trunc(sqrt(i)))and(i mod x<>0)do begin x:=x+1; if x>trunc(sqrt(i))then write(i:6)

【VIP专享】delphi 三层架构CS简单例子一步步做

delphi 三层CS架构一步步建立的简单例子 所谓三层: (1) 客户端 (2) 服务器端 (3) 数据库 在数据访问时,使得客户端必须通过服务器来访问数据库。提高了系统的安全性。 在Delphi中可以使用Socket或者Dcom组件来连接他们相互间的通讯。 本例使用SOCKET组件. DCOM用在局域网, SOCKET用在互联网. 环境为windows xp+ delphi 7 + access2000 创建过程: 1、请用ACCESS2000新建一个数据库database02.mdb. 2、请在delphi7执行file-new- application, 新建一个桌面, 上面放一个label, label.caption =’服务器端已运行….’

3、接下来在delphi7执行file --new--other,选择"Multitier"--"Remote data module"。在跳出来的对话框里面输入名称(任意),例如: AppSqlConn。选择确定,进入remote data module窗口。 界面如下图所示

4、加入组件:adodataset,点击connectionstring属性,点击后面的…,进 入设定连接窗口。在选择数据库中选择自己想要使用的数据库 database02.mdb。一般只要地址正确、用户名和密码无误,肯定可以连接通过。确定。 3、ADODATASET1在commandtext中点击后面的…,啥也不用设定,默认 配置; 4、ADODATASET1将active属性设置为false。

5、再加入组件:datasetprovider。设定其dataset属性为上面的adodataset1。 5.1 接着设置datasetprovider1的属性,poallowcommandtext=true, 其他的参数默认即可. datasetprovider1的属性如下图所示

delphi数学模块函数、过程大全

function ArcCos(const X : Extended) : Extended; overload; function ArcCos(const X : Double) : Double; overload; function ArcCos(const X : Single) : Single; overload; function ArcSin(const X : Extended) : Extended; overload; function ArcSin(const X : Double) : Double; overload; function ArcSin(const X : Single) : Single; overload; function ArcTan2(const Y, X: Extended): Extended; procedure SinCos(const Theta: Extended; var Sin, Cos: Extended) register; function Tan(const X: Extended): Extended; function Cotan(const X: Extended): Extended; { 1 / tan(X), X <> 0 } function Secant(const X: Extended): Extended; { 1 / cos(X) } function Cosecant(const X: Extended): Extended; { 1 / sin(X) } function Hypot(const X, Y: Extended): Extended; { Sqrt(X**2 + Y**2) } function RadToDeg(const Radians: Extended): Extended; inline; { Degrees := Radians * 180 / PI } function RadToGrad(const Radians: Extended): Extended; inline; { Grads := Radians * 200 / PI } function RadToCycle(const Radians: Extended): Extended; inline; { Cycles := Radians / 2PI } function DegToRad(const Degrees: Extended): Extended; inline; { Radians := Degrees * PI / 180} function DegToGrad(const Degrees: Extended): Extended; function DegToCycle(const Degrees: Extended): Extended; function GradToRad(const Grads: Extended): Extended; inline; { Radians := Grads * PI / 200 } function GradToDeg(const Grads: Extended): Extended; function GradToCycle(const Grads: Extended): Extended; function CycleToRad(const Cycles: Extended): Extended; inline; { Radians := Cycles * 2PI } function CycleToDeg(const Cycles: Extended): Extended; function CycleToGrad(const Cycles: Extended): Extended; { Hyperbolic functions and inverses } function Cot(const X: Extended): Extended; inline; { alias for Cotan } function Sec(const X: Extended): Extended; inline; { alias for Secant } function Csc(const X: Extended): Extended; inline; { alias for Cosecant } function Cosh(const X: Extended): Extended; function Sinh(const X: Extended): Extended; function Tanh(const X: Extended): Extended; function CotH(const X: Extended): Extended; inline; function SecH(const X: Extended): Extended; inline; function CscH(const X: Extended): Extended; inline; function ArcCot(const X: Extended): Extended; { IN: X <> 0 } function ArcSec(const X: Extended): Extended; { IN: X <> 0 } function ArcCsc(const X: Extended): Extended; { IN: X <> 0 } function ArcCosh(const X: Extended): Extended; { IN: X >= 1 } function ArcSinh(const X: Extended): Extended;

DELPHI常用函数说明

一、数据类型转换函数1 在我们编写程序当中,根据不同情况,会使用到多种数据类型。当要对不同的类型进行操作时,必须要将不同的类型转换成同样的类型。因此熟练地掌握数据类型的转换是非常重要的。 1.FloatToStr 功能说明:该函数用于将“浮点型”转换成“字符型”。 参考实例: Edit1.Text := FloatToStr(1.981); 2.IntToStr 功能说明:该函数用于将“整数型”转换成“字符型”。 参考实例: S := IntToStr(10);(注:S为String类型变量。) 3.IntToHex 功能说明:该函数用于将“十进制”转换成“十进制”。该函数有二个参数1。第一个参数为要转换的十进制数据,第二个参数是指定使用多少位来显示十六进制数据。 参考实例: Edit1.Text := IntToHex('100', 2);

执行结果,Edit1.Text等于64。 注意:Delphi没有提供专门的“十六进制”转换为“十进制”的函数。使用StrToInt函数可以实现这个功能。具体代码是:I := StrToInt('S\' + '64'); 这时I等于100。加上一个'S\'即可将“十六进制”转换为“十进制”。 4.StrToInt 功能说明:该函数用于将“字符型”转换成“整数型”。 参考实例: I := StrToInt('100'); 注意:不能转换如StrToInt('ab')或StrToInt('好')这样的类型,因为他们并不存在数字型。 5.StrToFloat 功能说明:该函数用于将“字符型”转换成“浮点型”。 参考实例: N := StrToFloat(Edit1.Text); 注意:Edit1.Text中的内容为1.981(凡在Edit 控件中显示的文本均为字符串)。N为Double类型,用于保存转换后的浮点型数据。

Delphi调用WebService的实例(非常经典)

Delphi 调用webservice 经典实例 Dispatch: 派遣,分派 Invoke: 调用 Invokable: 可调用接口 TReomtable: WebService中自定义类都是继承自该类 TSOAPAttachment: Attachment:附件,一种流类型,可以返回流数据 CGI:(EXE) ISAPI:(DLL) Base64编码: uses EncdDecd; s := EncodeString(s); //加 base64 编码 s := DecodeString( str ); //解码 UTF8: UTF8 是8位的UNICODE字符,而ASCII是7位 ,gb2312和unicode是2字节/字,utf8是3字节/字utf8类似以前的8位转7位的编码,是为了在网络间不同系统的通讯方便而作的转换。几乎所有用.Net写的WebService只支持DOC方式、Delphi写的只支持RPC方式;J2ME目前对Web Service的支持仅限于RFC172,而 RFC172要求必须为DOC方式(sun怎么偏袒MS?)! 为了在设计中减少障碍,下面还介绍几个概念。 1) SOAP:SOAP是一种简单有效的数据传输协议,用于分布式网络环境下数据信息交换,它以XML 作为数据传输的格式,搭配Internet上标准的传输协议HTTP、SMTP、TCP等来传送信息。从本质上看,SOAP事实上只是将Request和Response经由XML格式把数据打包,达到双方沟通的目的。 2) WSDL:WSDL(Web Service Description Language)是一种以XML格式描述的Web Service语言,当Web Service Provider 要对外公布提供的 Web Service,就需要通过WSDL来构建描述语言。在WSDL中有两个非常重要的要素::此WSDL文件所要描述的Web Service集合;每一个Port代表外界Client可以和此Service沟通的一个进入点,一个Port会指定一个Binding方式。 3):处理中文乱码的问题: 将HttpRio的 Converter 的 Options 的 soUTF8InHeader 设为 True 将生成soap消息的HTTPSoapDispatcher控件,添加encoding为gb2312 https://www.360docs.net/doc/d111520171.html,eUTF8InHeader := True; 4)在Delphi中,能够传递的自定义类型的对象要继承TRemotable, 5:修正一个服务器端的一个Bug:将ISAPIThreadPool和ISAPIApp的次序变一下:ISAPIApp必须在 ISAPIThreadPool之前: uses ... ISAPIApp, ISAPIThreadPool 解决如下错误: Received content of invalid Content-Type setting:text/html -SOAP"expects"text/xml" 6:"XML document must have a top level element. Line: 0" 错误,我该如何解决??哈纳斯 (2002-08-05 17:26:00) 我也曾碰到同样的问题解决方法是:别设httprio的wsdllocation,设它的url 如http://localhost/mydir/project1.exe/wsdl/IFIRST mydir是你的可执行的虚拟目录,IFIRST是你定义的接口名 ********************************************************************* **************************

Delphi函数大全

Delphi函数大全 首部function Languages: TLanguages; $[ 功能返回系统语言对象 说明通过此函数可以得到系统的语言环境 参考type 例子 12a12c12a12c. 参考 例子:= IsValidIdent; ━━━━━━━━━━━━━━━━━━━━━ 首部function IntToStr(Value: Integer): string; overload; $[ 首部function IntToStr(Value: Int64): string; overload; $[ 功能返回整数Value转换成字符串 说明Format('%d', [Value]) 参考function 例子:= IntToStr; ━━━━━━━━━━━━━━━━━━━━━ 首部function IntToHex(V alue: Integer; Digits: Integer): string; overload; $[ 首部function IntToHex(V alue: Int64; Digits: Integer): string; overload; $[ 功能返回整数Value转换成十六进制表现结果;Format('%.*x', [Digits, Value]) 说明参数Digits指定字符最小宽度;最小宽度不足时将用0填充 参考function 例子:= IntToHex, ; ━━━━━━━━━━━━━━━━━━━━━ 首部function StrToInt(const S: string): Integer; $[ 功能返回字符串S转换成整数 说明字符串非整数表达时将引起异常 参考procedure 例子:= StrToInt; ━━━━━━━━━━━━━━━━━━━━━ 首部function StrToIntDef(const S: string; Default: Integer): Integer; $[ 功能返回字符串S转换成整数 说明字符串非整数表达时则返回默认值Default 参考procedure 例子:= StrToIntDef, 0); ━━━━━━━━━━━━━━━━━━━━━ 首部function TryStrToInt(const S: string; out Value: Integer): Boolean; $[ 功能返回字符串S转换成整数V alue是否成功 说明字符串非整数表达时返回False并且Value将输出为0 参考procedure 例子 ..);打开失败则返回负数 参考function

delphi7串口通信(spcomm控件)实例

Delphi7串口通信(spcomm控件)实例 最近在用delphi7做串口通信,网上找了很多例程,复制粘贴运行就没有能通过的,再次鄙视一下列位先行者,你们帮人倒是帮到底啊,没一个是拿过来能用的,太坑了,在N天的努力下(鄙人比较笨)终于通过串口接收到数据,希望给后来人予以帮助,程序如下: 功能简介 功能比较简单,只是从串口接收单片机发送的数据,给memo1 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes,

Graphics, Controls, Forms,

Dialogs, SPComm, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Button2: TButton; Comm1: TComm; Memo1: TMemo; procedure Button1Click(Sender: TObject); procedure Button2Click(Sender: TObject); procedure Comm1ReceiveData(Sender: TObject; Buffer: Pointer;BufferLength: Word); procedure Comm1ModemStateChange(Sender: TObject; ModemEvent: Cardinal); private { Private declarations } public { Public declarations } end; var

delphi_三层架构简单例子.

delphi 三层架构简单例子(经测试成功2009-01-22 下午 02:45所谓三层: (1 客户端 (2 服务器端 (3 数据库在数据访问时,使得客户端必须通过服务器来访问数据库。提高了系统的安全性。在Delphi中可以使用Socket或者Dcom来连接他们相互间的通讯。如果使用Scocket在系统使用时必须提供Scocket连接器,而Dcom 则不用。客户端和服务器的连接需要Broker来联系。环境为winxp sp2 + delphi 7 + db7.(MSSQL2000 创建过程: 1、请不要新建application.file-new-activex-activex library,file --new--other,选择"Multitier"--"Remote data module"。在跳出来的对话框里面输入名称(任意),例如:AppSqlConn。选择确定,进入remote data module窗口。 2、加入组件:adodataset,点击connectionstring属性,点击后面的…,进入 设定连接窗口。选择:use connection string--build,在提供程序中选择:"Microsoft ole db provider for sql server",在连接中:服务器名称输入sql server的ip地址,登录信息中输入用户名和密码(sql server),在选择数据库中选择自己想要使用的数据库。一般只要地址正确、用户名和密码无误,肯定可以连接通过。确定退出。 3、在commandtext中点击后面的…,进入sql 语句设定,根据自己的要求设定。 4、将active属性设置为true。只要前面的设定是正确的,这里应该顺利通过。 5、加入组件:datasetprovider。设定其dataset属性为上面的adodataset。 6、到此服务器端已经设置完成。请保存并且运行一次,从而使服务注册。 7、运行delphi的bin目录下面的scktsrvr,因为下面要使用socket连接。运行后任务栏中出现socket server的图标。 8、新建程序(application),然后file--new--data module,会创建客户端的data module。 9、加入组件:socketconnection,在address中输入sql server的ip地址,然后在servername中输入刚才创建的remote data module的服务程序。程序会自动在serverguid中加入id。然后选择connected属性为true。只要 此处不报告错误,此程序基本成功了。 10、加入组件:clientdataset,选择remoteserver属性为socketconnection,选择providename为服务器程序的datasetprovider。然后选择active属性为true。 11、到程序的form窗口状态,首先选择file--use unit,选择上面创建的data module,确定。然后加入组件datasource 和dbgrid。选择datasourece的dataset属性为data module的clientdataset,选择dbgrid的datasource为这里的datasource组件。现在应该可以看到dbgrid的窗口中

(DELPHI)API函数大全

(DELPHI)API函数大全 1. API之网络函数 WNetAddConnection 创建同一个网络资源的永久性连接WNetAddConnection2 创建同一个网络资源的连接WNetAddConnection3 创建同一个网络资源的连接WNetCancelConnection 结束一个网络连接 WNetCancelConnection2 结束一个网络连接 WNetCloseEnum 结束一次枚举操作 WNetConnectionDialog 启动一个标准对话框,以便建立同网络资源的连接WNetDisconnectDialog 启动一个标准对话框,以便断开同网络资源的连接WNetEnumResource 枚举网络资源 WNetGetConnection 获取本地或已连接的一个资源的网络名称WNetGetLastError 获取网络错误的扩展错误信息WNetGetUniversalName 获取网络中一个文件的远程名称以及/或者UNC (统一命名规范)名称 WNetGetUser 获取一个网络资源用以连接的名字 WNetOpenEnum 启动对网络资源进行枚举的过程 2. API之消息函数 BroadcastSystemMessage 将一条系统消息广播给系统中所有的顶级窗口GetMessagePos 取得消息队列中上一条消息处理完毕时的鼠标指针屏幕位置GetMessageTime 取得消息队列中上一条消息处理完毕时的时间PostMessage 将一条消息投递到指定窗口的消息队列PostThreadMessage 将一条消息投递给应用程序RegisterWindowMessage 获取分配给一个字串标识符的消息编号ReplyMessage 答复一个消息 SendMessage 调用一个窗口的窗口函数,将一条消息发给那个窗口SendMessageCallback 将一条消息发给窗口 SendMessageTimeout 向窗口发送一条消息 SendNotifyMessage 向窗口发送一条消息 3. API之文件处理函数 CloseHandle 关闭一个内核对象。其中包括文件、文件映射、进程、线程、安全和同步对象等 CompareFileTime 对比两个文件的时间 CopyFile 复制文件 CreateDirectory 创建一个新目录 CreateFile 打开和创建文件、管道、邮槽、通信服务、设备以及控制台CreateFileMapping 创建一个新的文件映射对象 DeleteFile 删除指定文件

delphi函数参考手册

delphi函数参考手册 名称类型说明 abort 函数引起放弃的意外处理 abs 函数绝对值函数 addexitproc 函数将一过程添加到运行时库的结束过程表中addr 函数返回指定对象的地址 adjustlinebreaks 函数将给定字符串的行分隔符调整为cr/lf序列align 属性使控件位于窗口某部分 alignment 属性控件标签的文字位置 allocmem 函数在堆栈上分配给定大小的块 allowgrayed 属性允许一个灰度选择 ansicomparestr 函数比较字符串(区分大小写)ansicomparetext 函数比较字符串(不区分大小写)ansilowercase 函数将字符转换为小写 ansiuppercase 函数将字符转换为大写 append 函数以附加的方式打开已有的文件 arctan 函数余切函数 assignfile 函数给文件变量赋一外部文件名 assigned 函数测试函数或过程变量是否为空 autosize 属性自动控制标签的大小 backgrounddi2001.jpg 属性背景色 beginthread 函数以适当的方式建立用于内存管理的线程bevelinner 属性控件方框的内框方式

bevelouter 属性控件方框的外框方式 bevelwidth 属性控件方框的外框宽度 blockread 函数读一个或多个记录到变量中blockwrite 函数从变量中写一个或多个记录borderstyle 属性边界类型 borderwidth 属性边界宽度 break 命令终止for、while、repeat循环语句 brush 属性画刷 caption 属性标签文字的内容 change 函数改变文件的后缀 chdir 函数改变当前目录 checked 属性确定复选框选中状态 chr 函数返回指定序数的字符 closefile 命令关闭打开的文件 color 属性标签的颜色 columns 属性显示的列数 comparestr 函数比较字符串(区分大小写)concat 函数合并字符串 continue 命令继续for、while、repeat的下一个循环copy 函数返回一字符串的子串 cos 函数余弦函数 ctl3d 属性是否具有3d效果

delphi常用函数大全

delphi常用函数大全(转) Abort函数引起放弃的意外处理 Abs函数绝对值函数 AddExitProc函数将一过程添加到运行时库的结束过程表中 Addr函数返回指定对象的地址 AdjustLineBreaks函数将给定字符串的行分隔符调整为CR/LF序列Align属性使控件位于窗口某部分 Alignment属性控件标签的文字位置 AllocMem函数在堆栈上分配给定大小的块 AllowGrayed属性允许一个灰度选择 AnsiCompareStr函数比较字符串(区分大小写) AnsiCompareText函数比较字符串(不区分大小写) AnsiLowerCase函数将字符转换为小写 AnsiUpperCase函数将字符转换为大写 Append函数以附加的方式打开已有的文件 ArcTan函数余切函数 AssignFile函数给文件变量赋一外部文件名 Assigned函数测试函数或过程变量是否为空 AutoSize属性自动控制标签的大小 BackgroundColor属性背景色 BeginThread函数以适当的方式建立用于内存管理的线程 BevelInner属性控件方框的内框方式 BevelOuter属性控件方框的外框方式 BevelWidth属性控件方框的外框宽度 BlockRead函数读一个或多个记录到变量中 BlockWrite函数从变量中写一个或多个记录 BorderStyle属性边界类型 BorderWidth属性边界宽度 Break命令终止for、while、repeat循环语句 Brush属性画刷 Caption属性标签文字的内容 ChangeFileExt函数改变文件的后缀 ChDir函数改变当前目录 Checked属性确定复选框选中状态 Chr函数返回指定序数的字符 CloseFile命令关闭打开的文件 Color属性标签的颜色 Columns属性显示的列数 CompareStr函数比较字符串(区分大小写) Concat函数合并字符串 Continue命令继续for、while、repeat的下一个循环 Copy函数返回一字符串的子串 Cos函数余弦函数 Ctl3D属性是否具有3D效果 Cursor属性鼠标指针移入后的形状 Date函数返回当前的日期 DateTimeToFileDate函数将DELPHI的日期格式转换为DOS的日期格式DateTimeToStr函数将日期时间格式转换为字符串DateTimeToString函数将日期时间格式转换为字符串 DateToStr函数将日期格式转换为字符串

相关文档
最新文档