随笔 - 33  文章 - 0  评论 - 0  阅读 - 6426
02 2022 档案
实例12 指针指向何方,前途各不一样
摘要:指针的优点是处理速度快,而现在的电脑运行速度已经相当惊人了,并且还向更惊人的速度发展。在这种的硬件环境下,指针的处理速度已经显得不重要了,因此建议慎用指针,一旦把握不好,会弄巧成拙,造成系统崩溃。 用的比较多的可能算字符指针了,比如如下的代码: var P:Pchar; ii:Integer; be 阅读全文
posted @ 2022-02-28 01:36 Delphi搬运工 阅读(58) 评论(0) 推荐(0) 编辑
实例11 break,让循环刹车
摘要:break的英文字面意思就是打断,在循环中,用它表示停止本循环。主要,它是停止本循环,比如以下多层循环,如果要打断每一层,在每一层的循环中都要用一个break语句。 while 条件关系 do begin while 条件关系 do begin while 条件关系 do begin ShowMes 阅读全文
posted @ 2022-02-26 01:02 Delphi搬运工 阅读(71) 评论(0) 推荐(0) 编辑
实例10 continue,让循环不做工作自己走
摘要:continue的英文字面意思就是继续,在循环中,用它表示继续下一个循环。别看这个“继续”不起眼,有时候一个continue可以让程序进入死循环,再也爬不出来。试看下面的一段小程序: procedure test(); var ii,jj:Integer; begin ii:=0; jj:=0; r 阅读全文
posted @ 2022-02-26 00:56 Delphi搬运工 阅读(88) 评论(0) 推荐(0) 编辑
实例9 repeat ... until循环
摘要:repeat...until也是一个条件循环,与while循环有点相似,但是对条件的判断角度不一样,while是满足条件关系就循环,不满足就退出。repeat...until是直到条件关系满足之前一直循环。比如如下的循环: var ii:Integer; begin ii:=0; repeat ii 阅读全文
posted @ 2022-02-26 00:45 Delphi搬运工 阅读(727) 评论(0) 推荐(0) 编辑
实例8 条件循环用while
摘要:条件循环while的标准写法为: while 条件关系 do begin 处理语句; end; 当条件关系满足时就循环,不满足时就停止循环。但也有条件关系满足不了的情况 ,在这种情况下,该循环就成了死循环。死循环是程序设计中的一大忌,一定要在程序代码中多加判断条件,让程序跳出循环。 在实际应用程序设 阅读全文
posted @ 2022-02-26 00:11 Delphi搬运工 阅读(303) 评论(0) 推荐(0) 编辑
实例7 for循环
摘要:for循环是最常用的循环,它适用于重复次数比较确定的情况,主要有两种典型的用法。 for ... to do法: var ii:Integer; for ii:=1 to 100 do begin 处理语句; end; for ... downto do法: for ii:=100 downto 1 阅读全文
posted @ 2022-02-25 23:52 Delphi搬运工 阅读(115) 评论(0) 推荐(0) 编辑
实例6 条件分支判断语句if
摘要:该语句就是一个条件判断语句,在写程序时,少不了要与它打交道。它的出现形式,无非就两种情况。 第一种情况: if 条件表达式 then begin 处理语句; end else //else的前一句,不要带分号 begin 处理语句; end; 第二种情况: if 条件表达式1 then begin 阅读全文
posted @ 2022-02-25 23:48 Delphi搬运工 阅读(181) 评论(0) 推荐(0) 编辑
实例5 分支语句case
摘要:无论编写大程序还是小程序,总少不了要用到分支语句,常用的分支处理语句case,经典的写法如下: case 变量值 of 值1:分支处理语句1; 值2:分支处理语句2; 值3: begin 多行分支处理语句; end; ..... else 缺省分支处理语句n; break; //书中有此代码,是错误 阅读全文
posted @ 2022-02-24 01:35 Delphi搬运工 阅读(260) 评论(0) 推荐(0) 编辑
实例4 过程与函数
摘要:过程与函数都是自己写的一段程序代码,这段程序代码要完成指定的功能,也称之为模块。在C语言中,只有函数概念,没有过程概念。C语言中的函数,分为有返回值的与无返回值的;而在Pascal语言中,有返回值的称为函数,无返回值的称为过程。函数用function说明,过程由procedure说明。函数的返回值赋 阅读全文
posted @ 2022-02-24 01:09 Delphi搬运工 阅读(38) 评论(0) 推荐(0) 编辑
实例3 逻辑操作,很少用却很有用
摘要:所谓逻辑,即与、或关系,含有与、或关系运算符的表达式称为逻辑表达式,在Pascal语言中,与用and代替,或用or代替。 编写程序时,基本是处理这样几类问题:表达式、判断、分支选择。判断有简单判断与复杂判断,在复杂判断中,少不了用到各种逻辑关系。比如有这样一个判断: 筛选出年里在18~20岁、长头发 阅读全文
posted @ 2022-02-24 00:41 Delphi搬运工 阅读(94) 评论(0) 推荐(0) 编辑
实例2 整数、浮点、双精度,使用起来要心中有数
摘要:在数学运算中,整数、浮点、双精度是我们常用到的。 (1)要尽可能多运用整数进行运算,因为它运行的速度快。有时为了提高运算速度,有经验的程序员甚至将浮点数转化为整数运算。 如浮点数为12.34,将它乘以100,变为整数1234,然后再参加运算。 (2)需要用到浮点运算时,多用float类型,少用dou 阅读全文
posted @ 2022-02-24 00:21 Delphi搬运工 阅读(417) 评论(0) 推荐(0) 编辑
容易理解但不一定会灵活运用的常量、变量、表达式
摘要:常量,就是在程序运行过程中,以一个固定的值表现的量。在Pascal语言中,用关键字const声明。在使用时,注意下面两点: (1)常量在声明时就要赋值。 const abc=1234; (2)常量的属性是只读的,在使用过程中,不能再被赋值。 定义常量时,可以带数据类型,也可以不带数据类型。如 cos 阅读全文
posted @ 2022-02-24 00:14 Delphi搬运工 阅读(44) 评论(0) 推荐(0) 编辑
FasetReport中的段
摘要:段用于将它们包含的对象放置在输出页面上的特定位置。将对象放在“PageHeader”区域时,我们告诉报表引擎必须在完成的报表中的每个页面的顶部显示给定对象。同样,“PageFooter”段中的对象显示在每个页面的底部。 因此,段负责在页面上定位对象。根据段的类型,我们可以在页面的顶部或底部以及第一页 阅读全文
posted @ 2022-02-08 21:16 Delphi搬运工 阅读(109) 评论(0) 推荐(0) 编辑
常用的对象:Text文本
摘要:“Text”文本:WordWrap属性--允许自动换行,如果不够宽度的话;对象中的所有文本都可以旋转到0..360度范围内的任何角度; "Text"文本一些常用属性: BrushStyle:对象填充的类型 CharSpacing:在字符之间进行拼写,以像素为单位 GapX,Gapy:左边和上边的文本 阅读全文
posted @ 2022-02-05 18:17 Delphi搬运工 阅读(297) 评论(0) 推荐(0) 编辑
fastReport6.1的一些快捷键操作
摘要:控制键 描述 鼠标控制 按Ctrl+O “文件>打开......”菜单命令 手术 描述 按Ctrl+S “文件>保存”菜单命令 左键 选择对象;粘贴新对象;移动或调整对象大小 按Ctrl+P “文件>预览”菜单命令 对于选定对象,通过拖动所选对象组左下角的红色方块来放大和缩小 按Ctrl+Z “编辑 阅读全文
posted @ 2022-02-05 15:02 Delphi搬运工 阅读(219) 评论(0) 推荐(0) 编辑
FastReport6的安装
摘要:安装的介绍是借鉴了别人的博客的方法https://www.cnblogs.com/windson/p/13764165.html, 按上面的方法一步一步的操作基本就能安装成功。 测试fastreport是否安装成功: 1.拉frxReport和frxUserDataSet控件到form上。 2.拉一 阅读全文
posted @ 2022-02-05 14:08 Delphi搬运工 阅读(350) 评论(0) 推荐(0) 编辑
Delphi接口的一些简单介绍
摘要:Delphi只能单继承,不像C++可以多继承,而接口则为Delphi提供了弹性、让类别能够宣告支持多接口,并加以实现的能力,同时避免因多重继承而可能产生的问题。 简单的,把接口想成是一个对象拥有多个不同的基础类别。从宏观的角度来看,接口比类别支持了更多不同的面向对象程序设计的模式。实作接口的对象,可 阅读全文
posted @ 2022-02-04 19:12 Delphi搬运工 阅读(598) 评论(0) 推荐(0) 编辑
建立TDate组件
摘要:当我们已经理解属性跟事件后,下一步就需要探讨下组件。透过把TDate类别转换为组件来简单的了解下这个主题。 首先,必须从TComponent类别来衍生出我们的新类别,这里不再从TObject来衍生了。 type TDate=class(TComponent) ... public construct 阅读全文
posted @ 2022-02-04 14:00 Delphi搬运工 阅读(122) 评论(0) 推荐(0) 编辑
Delphi自定义组件
摘要:1.组件设计基础 a.编写组件步骤: 1)确定一个祖先类 TObject:直接从TObject继承下来的类不是组件。有些以此为基类的对象在设计期不需要使用,如TIniFile TComponent:这是非可视组件的起点,它的特点是在设计时能够以流的方式在IDE上存取 TGraphicControl: 阅读全文
posted @ 2022-02-04 13:19 Delphi搬运工 阅读(397) 评论(0) 推荐(0) 编辑
FireDAC分页查询
摘要:FireDAC原生支持分页查询,不用写分页查询SQL,只要设置FetchOptions.RecsSkip(跳过的行数)和RecsMax(分页大小)允许通过结果集进行分页。 打开游标后,将跳过第一个RecsSkip。其余的记录,最多RecsMax将被获取。当Prepared后,更改RecsSkip和R 阅读全文
posted @ 2022-02-01 16:39 Delphi搬运工 阅读(164) 评论(0) 推荐(0) 编辑
在创建窗口时,对需要进行数据库连接的控件进行初始化,或者在数据模块中,非常有用
摘要:ComponentCount--组件数量 for i:=0 to ComponentCount-1 do //对窗口组件进行遍历 begin if self.Components[i] is TFDQuery then begin (self.Components[i] as TFDQuery).C 阅读全文
posted @ 2022-02-01 15:19 Delphi搬运工 阅读(30) 评论(0) 推荐(0) 编辑
TFDConnection.FetchOptions的RecordCountMode和RowsetSize
摘要:1.使用TFDQuery.RecordCount,或TDateSet.RecordCount只能获取50,实际数量是超过50的。 因为TFDConection.FetchOptions.RecordCountMode的默认属性为cmVisible,也就是已经显示出来的数量,把属性改为fmTotal, 阅读全文
posted @ 2022-02-01 15:06 Delphi搬运工 阅读(145) 评论(0) 推荐(0) 编辑

< 2025年2月 >
26 27 28 29 30 31 1
2 3 4 5 6 7 8
9 10 11 12 13 14 15
16 17 18 19 20 21 22
23 24 25 26 27 28 1
2 3 4 5 6 7 8

点击右上角即可分享
微信分享提示