07 2022 档案

摘要:type TArr = array of TPoint; {把数组先定义成一个类型会方便许多, 这里仅用 TPoint 测试} {删除动态数组指定元素的过程: 参数 arr 是数组名, 参数 Index 是要删除的索引} procedure DeleteArrItem(var arr: TArr; 阅读全文
posted @ 2022-07-29 08:30 一曲轻扬 阅读(351) 评论(0) 推荐(0) 编辑
摘要:在浏览器书签栏空白处右击,新建标签,然后名字自取,网址处粘贴代码. 代码总体结构是 "JavaScript: + 自运行函数". 以下这段案例是修改页面CSS的代码: JavaScript: (function(){ var table = document.querySelector("table 阅读全文
posted @ 2022-07-25 16:06 一曲轻扬 阅读(777) 评论(0) 推荐(0) 编辑
摘要:效果图如下: 本程序使用了DEV组件的(TcxRTTIInspector控件),和SC组件的几个基本控件,SC控件为非必须,只是为了方便演示. 设计图: 核心代码: var Form5: TForm5; arr: array of Integer; implementation {$R *.dfm} 阅读全文
posted @ 2022-07-22 16:07 一曲轻扬 阅读(360) 评论(0) 推荐(0) 编辑
摘要:Close:1.只关闭本窗体2.当Close是一个主窗体时,程序会退出。3.Close会发生FormClose事件,FormCloseQuery事件4.主窗体close以后程序就Application.Terminate了5.子窗体close以后。没释放,还可以Show出来。6.也是说主窗口的Clo 阅读全文
posted @ 2022-07-19 22:34 一曲轻扬 阅读(417) 评论(0) 推荐(0) 编辑
摘要:1.抽象 (相当于制造前 画图纸/捏造/想象对象的阶段,还没开始造) 1.1.类在 type 之下定义. 1.2.类的结构: type TPerson = class end; 类名为TPerson,你可以随便取,但应该符合命名规范.前面的T 为类名约定前缀,你可以不要. 2.实例化.(把抽象好的对 阅读全文
posted @ 2022-07-19 10:52 一曲轻扬 阅读(289) 评论(0) 推荐(0) 编辑
摘要:关于Class里的成员: 1.Public, 2.Private, 3.Protected, 4.Published, 以上四个class 的成员指令,它们的功用是什么??要怎么用和什么时候输入?怎样用? 和C++是差不多的、可见性不同、比较容易弄混的就是private和protected了、pro 阅读全文
posted @ 2022-07-18 15:10 一曲轻扬 阅读(670) 评论(0) 推荐(0) 编辑
摘要://事件声明procedure CreateParams(var Params: TCreateParams); override; //事件主体代码 procedure TForm1.CreateParams(var Params: TCreateParams); begin inherited 阅读全文
posted @ 2022-07-13 17:17 一曲轻扬 阅读(327) 评论(0) 推荐(0) 编辑
摘要:form1: frame3: 效果图:可以基于frame3创建多个相同的tab,且包含所有frame3设定的业务逻辑 代码也很简单: uses Unit3;procedure TForm2.Button2Click(Sender: TObject); var NewTab: TTabSheet ; 阅读全文
posted @ 2022-07-12 17:18 一曲轻扬 阅读(1121) 评论(0) 推荐(0) 编辑
摘要:一.TscGPButton按钮 1.按钮外观基本上都在options里设置. Normal开头的属性: 按钮常态下的效果设置; HOT开头(或包含)的属性: 鼠标停在按钮上时的效果设置; Frame开头的属性: 边框设置; pressed开头(或包含)的属性: 与点击有关的效果设置; Font开头的 阅读全文
posted @ 2022-07-08 11:00 一曲轻扬 阅读(2992) 评论(0) 推荐(1) 编辑
摘要:【使用上下键控制控件的选择】 Taborder Tabstop: 这组表识号本来是用来表示组件的按键顺序以及在该组件上是否停留的标识号。但是如果在某些时候稍微重视一下的话,将会事半功倍。下面略举一例:桌面上有几个编辑框,用户希望按回车键、上下方向键而不是TAB在其间来回游动。 【属性设置】 Form 阅读全文
posted @ 2022-07-06 17:03 一曲轻扬 阅读(476) 评论(0) 推荐(0) 编辑
摘要:delphi Jpg和Bitmap互转转换的方法: uses Jpeg; procedure Bmp2Jpeg(const BmpFileName, JpgFileName: string); var Bmp: TBitmap; Jpg: TJPEGImage; begin Bmp := TBitm 阅读全文
posted @ 2022-07-01 08:01 一曲轻扬 阅读(381) 评论(0) 推荐(0) 编辑

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