摘要：开发环境D7 效果图 Image2的图片请自行加载，加载的图片为bmp格式，最好是颜色丰富的图片！ Image2.Picture Unit开始-- unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, G
阅读全文
随笔分类 - delphi
记性不好，博客园真是个好地方
摘要：开发环境D7 图片要是bmp的，否则可能没有效果 左边的彩色的是原图，右边的是效果图（点击按钮3） Unit开始 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls
阅读全文
摘要：开发环境Delphi7 Unit-开始 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TMyA
阅读全文
摘要：Delphi7没有泛型 开发环境是Delphi XE （是XE，不是XE2，不是XE10） Unit 开始- 1 unit Unit1; 2 3 interface 4 5 uses 6 Windows, Messages, SysUtils, Variants, Classes, Graphics
阅读全文
摘要：Delphi中目前好像只能在Record中定义运算法重载的方法，C++的运算符重载定义在类中，有区别，以后有啥研究再记录下来，方便学习交流 资料来源：delphi 中record 的类操作符重载简介 - findumars - 博客园 https://www.cnblogs.com/findumar
阅读全文
摘要：来源：Delphi常用函数速查表 - Jerome Kwok〖旧日的足迹〗 - BlogJava http://www.blogjava.net/JeromeKwok/articles/340156.html 名称 类型 说明 A部 Abort 函数 引起放弃的意外处理 Abs 函数 绝对值函数 A
阅读全文
摘要：直接连接网络盘时，如果目标网络盘是断开状态，程序会卡住！PC用户程序在需要取存网络盘文件时，最好先判断目标网络盘和本机是否连接状态； 在网上没有搜索到类似的文章，自己踩了坑，分享出来； 开发环境 D7 本机测试正常！ Unit 开始 unit Unit1; interface uses Window
阅读全文
摘要：开发环境D7 有位数限制，超过位数，不会转换 注释乱码问题，以前的操作系统用繁体，后来改成简体的了，有乱码； 代码仅提供思路，不喜勿喷 Unit unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Gr
阅读全文
摘要：开发环境D7-在后续的控件开发中，没有特别注明，开发环境都是D7 学习，只供学习！ 写控件，和使用，控件没有安装； Unit1开始 有窗体 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graph
阅读全文
摘要：哈哈，这个是某个大神的，直接搬过来； 本人加了一点东西，加了一个图标，试了一下，Exe图标可以放上来，提供一个思路 Unit开始 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics,
阅读全文
摘要：var MyArray：Variant; MyArray:=VarArrayCreate([0,1,2,5],Varinteger)这个中的[0,1,2,5]解释一下，从这里可以看出这是一个二维数组，0是一维的最小下标，1是一维的最大下标；2是二维的最小下标，5是二维的最大下标； MyArray:=
阅读全文
摘要：回调函数的说明：回调函数（callback）是什么？ - 知乎 https://www.zhihu.com/question/19801131 了解一下这个：Delphi 中三种回调函数形式解析 - 码农的笔记 - 博客园 https://www.cnblogs.com/dmqhjp/p/14776
阅读全文
摘要：多态性的概念：很通俗地讲，多态性是指可以将子对象赋值给父对象的技术，可以通过父对象调用子对象从父对象继承并覆盖了的虚方法。或者说，多态性是可以让父对象具有不同行动方式的技术。注意上面一句话包含了两个特性：（1）可以将子对象赋值给父对象的技术。（2）可以通过父对象调用子对象从父对象继承并覆盖了的虚方法
阅读全文
摘要：仅做简单的测试，只想看看怎么播放视频，不想弄这个，有兴趣的可以深入了解，谢谢！ 要想更深入了解请参考：Delphi多媒体设计之TMediaPlayer组件（一） - pchmonster - 博客园 https://www.cnblogs.com/pchmonster/archive/2012/07
阅读全文
摘要：var s:string;begin SetLength(s,256); GetWindowsDirectory(PChar(s),256); ShowMessage(IntToStr(Length(s))); //Length(s) 256 ShowMessage(IntToStr(StrLen(
阅读全文
摘要：Delphi 7 本次测试没有用到第三方控件 ADOquery的多表关联，如果直接ADOquery1.delete；会删除多个表的数据； 如果要删除资料，请另行写SQL语句，有人说把这个SQL语句放在ADOquery1.BeforeDelete中；感觉太麻烦； 这在项目中怎么能行！不好控制啊，删除的
阅读全文
摘要：D7下 --String和Shortstring不一样！！！ vstr:string; vShort:Shortstring; vstr[0]这样写错误！;//vstr[1]才是第一个字符 vShort[0]这样写没问题！//vShort[0]保存的是vShort的长度：byte(vShort[0]
阅读全文
摘要：--一个简单的密码非法字符校验，存在非法字符，就返回false; CheckPassWord(‘hhhhhh哈哈’)；//有中文，返回False function CheckPassWord(PassWord: string): boolean; //不允许（汉字和空格，双引号等）var wStr:
阅读全文
摘要：--仿照：Delphi中double类型真正实现四舍五入（保留两位）_踏雪无痕-CSDN博客_delphi 四舍五入保留两位小数 https://blog.csdn.net/zhongguoren666/article/details/6659781 /// <summary> /// <remar
阅读全文
摘要：--[教程]Delphi 中三种回调函数形式解析 – QDAC数据访问组件网站 http://blog.qdac.cc/?p=4595 Delphi 支持三种形式的回调函数： 全局函数这种方式几乎是所有的语言都支持的，类的静态函数也可以归为此类，它保存的只是一个函数的代码起始地址指针（ Pointe
阅读全文
浙公网安备 33010602011771号