文章分类 -  Delphi

Delphi 10.3实现Android App的动态权限申请
摘要:Delphi 10.3 RIO发布近两个月,针对Google Play的要求,完美实现了对Android 8的支持,即对Android API Level 26的支持。这支持当中,最主要的得算是动态申请应用权限,现在我们来看看,如何在自己的app中动态申请权限? 下面的代码,是10.3封装的Andr 阅读全文
posted @ 2021-06-07 14:47 恩恩爸爸 阅读(137) 评论(0) 推荐(0) 编辑
JSON 之 SuperObject(12): TSuperEnumerator、TSuperAvlIterator、ObjectFindFirst...
摘要://通过 ISuperObject.GetEnumerator 可获取一个 TSuperEnumerator 对象.//TSuperEnumerator 主要有: MoveNext 方法、Current 属性; 使用举例://-------------------------------------... 阅读全文
posted @ 2014-05-14 09:45 恩恩爸爸 阅读(192) 评论(0) 推荐(0) 编辑
JSON 之 SuperObject(11): TSuperTableString、TSuperAvlEntry
摘要://通过 ISuperObject.AsObject 可获取一个 TSuperTableString 对象.//TSuperTableString 的常用属性: count、GetNames、GetValues//-------------------------------------------... 阅读全文
posted @ 2014-05-14 09:42 恩恩爸爸 阅读(211) 评论(0) 推荐(0) 编辑
JSON 之 SuperObject(10): Merge、Clone、ForcePath
摘要:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) ... 阅读全文
posted @ 2014-05-14 09:41 恩恩爸爸 阅读(148) 评论(0) 推荐(0) 编辑
JSON 之 SuperObject(6): 方法
摘要:procedure Method(const This, Params: ISuperObject; var Result: ISuperObject);//另外, 这是其数据类型的枚举:TSuperType = (stNull, stBoolean, stDouble, stInt, stObje... 阅读全文
posted @ 2014-05-14 09:40 恩恩爸爸 阅读(125) 评论(0) 推荐(0) 编辑
JSON 之 SuperObject(5): Format 与转义字符
摘要:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) ... 阅读全文
posted @ 2014-05-14 09:39 恩恩爸爸 阅读(189) 评论(0) 推荐(0) 编辑
JSON 之 SuperObject(2): 构建方式与 AsJSon
摘要:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) ... 阅读全文
posted @ 2014-05-14 09:35 恩恩爸爸 阅读(235) 评论(0) 推荐(0) 编辑
JSON 之 SuperObject(1): 接口
摘要:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) ... 阅读全文
posted @ 2014-05-14 09:31 恩恩爸爸 阅读(145) 评论(0) 推荐(0) 编辑
ord()与chr()函数
摘要:1.ord()函数:Returns the ordinal value of an ordinal-type expression.返回一个序数类型表达式的序数值; Example:uses Dialogs;type Colors = (RED,BLUE,GREEN);var S: string;begin S := 'BLUE has an ordinal value of ' + IntToS... 阅读全文
posted @ 2010-01-14 10:00 恩恩爸爸 阅读(699) 评论(0) 推荐(0) 编辑
dbgrideh竖直滚动条horzScrollBar显示只有(上中下)三个位置,怎么能正确显示实际位置?
摘要:sumlist active>true virtualrecords>true 阅读全文
posted @ 2009-11-18 09:07 恩恩爸爸 阅读(496) 评论(0) 推荐(0) 编辑
ACCESS数据库加密方法
摘要:Mrosoft的ACCESS数据库,是我们常用的桌面数据之一,大多中小企业的数据库管理系统都可以采用它,但其安全性一直令人担犹,试想,一套财务管理系统,用户直接打开数据库去更改数据,后果会如何?有些系统对ACCESS数据库可能只是更改扩展名,或加个密码,众所周知,破解ACCESS密码的方法和工具网上多的是!所以这样的加密一样令人担犹,下面介绍一个简单的方法,实现ACCESS数据的加密,供大家参考。... 阅读全文
posted @ 2009-11-17 16:34 恩恩爸爸 阅读(575) 评论(0) 推荐(0) 编辑
CopyFile函數
摘要:CopyFile函数详解━━━━━━━━━━━━━━━━━━━━━━━━━━CopyFi... 阅读全文
posted @ 2009-11-17 15:58 恩恩爸爸 阅读(5497) 评论(0) 推荐(0) 编辑
如何在ACCESS中实现类似:(case when …… then …… else …… end )的语句!?
摘要:IIf 函数示例 该示例使用了 IIf 函数计算“订单数量”字段,在数量大于 1000 时返回“Large”;否则,返回“Small”。可以在计算控件的 ControlSource 属性中输入下列表达式。 = IIf([OrderAmount] > 1000, "Large", "Small") ... 阅读全文
posted @ 2009-11-16 09:13 恩恩爸爸 阅读(378) 评论(0) 推荐(0) 编辑
用Delphi制作动态菜单
摘要:所谓动态菜单是指菜单项随着程序的操作变化而变化。现在,我们用Delphi来实现这一功能,具体步骤如下:  1.首先,确定动态菜单的数据来源,即要确定动态菜单标题是来自Windows的系统注册表,还是来自一个数据库,或者是来自一个子目录,主要由程序的功能而定。这里假设主窗口名为MainForm,上面已有主菜单,其动态菜单的数据源是一个String(字符串)类型的变量,名称为SubMenuItemSo... 阅读全文
posted @ 2009-11-16 09:08 恩恩爸爸 阅读(214) 评论(0) 推荐(0) 编辑
delphi listview 的使用
摘要:ListView1.Items 为标准 Tlistitems类  ListView1.Items  (1)赋值  with ListView1.Items.Add do begin Caption:=caption; //添加第一项 SubItems.add(aaaaa); //添加后面数据 SubItems.add(1234); SubItems.add(1234); end; //一定要使用W... 阅读全文
posted @ 2009-11-12 14:52 恩恩爸爸 阅读(373) 评论(0) 推荐(0) 编辑
DELPHI学习技巧 (转)
摘要:原文地址:http://hi.baidu.com/sqldebug/blog/item/58a764624a44d74eeaf8f863.html 一、如何限制系统服务和桌面程序只运行一个 如何限制系统服务和桌面程序只运行一个 在工程加入下列代码可以设置系统服务和桌面程序只运行一个。 program FleetReportSvr; uses SvcMgr, Forms, SysUtils, Win... 阅读全文
posted @ 2009-10-24 10:14 恩恩爸爸 阅读(383) 评论(0) 推荐(0) 编辑
Delphi中实现控件的自由摆布 (转)
摘要:在做Mis项目过程中,有时需要让用户自己来实现窗体控件的布局,比如酒店管理中就需要对餐厅餐桌位置进行布局。要实现这种功能,必须做好三件事:  1、设置进入控件边缘的光标形状;  2、改变控件的大小及位置;  3、保存窗体控件的位置及状态,窗体下次启动时重新设置它们的这些信息。具体步骤如下:  1、修改控件光标。只需要在进入控件的时候,将screen的cursor属性设置成对应形状即可,控件都有一个... 阅读全文
posted @ 2009-08-21 17:48 恩恩爸爸 阅读(223) 评论(0) 推荐(0) 编辑
在delphi中用indy实现FTP上传 下载的例子
摘要:以前总认为FTP程序实现很困难,但后来在网上查看了相关的帖子后发现原来用delphi实现FTP上传与下载竟如此容易,确实对我鼓舞很大。 由于delphi本身自带了indy控件,因此用这些控件实现网络编程即快又容易。尽管如此,我还是极大地鼓励自己查看FTP底层是如何实现的,但就目前而言,indy控件还是一个非常不错的选择。 针对indy的强大,我还是决定将这段代码帖出来,主要是方便自己日后复习、查询... 阅读全文
posted @ 2009-08-06 15:58 恩恩爸爸 阅读(6254) 评论(0) 推荐(0) 编辑
MSComm串口控件使用出错
摘要:引入TMSComm控件(1)进入Delphi 编程环境下,在菜单项中选中Component/Import ActiveX选项,出现ActiveX控件导入窗口;(2)在其中选中Microsoft Comm CONTROL 6.0(Version 1.1),并按需要选定Palette pages、unit dir NAME、Search path值(一般取默认值),最后选择INSTALL按钮进行安装... 阅读全文
posted @ 2009-07-25 19:45 恩恩爸爸 阅读(1165) 评论(0) 推荐(0) 编辑
delphi程序的时限和注册
摘要:本例中TRegistry是关键类,Delphi 4.0不能自行加入,需在uses部分手工加入“registry”,通过其方法“ReadString”和“WriteString”来读出和写入字符,亦可通过其方法“ReadDate”和“WriteDate”来读出和写入日期。  程序第... 阅读全文
posted @ 2009-07-18 16:30 恩恩爸爸 阅读(430) 评论(0) 推荐(0) 编辑