Delphi
文章平均质量分 58
A00553344
嘛都不懂.
展开
-
程序内hook键盘
通过hook api让不支持键盘的控件也支持键盘输入。原创 2022-08-17 11:18:07 · 487 阅读 · 1 评论 -
解决Delphi 10.4.2在Android 10 下访问相机和相册出错的故障
打开工程目录下的AndroidManifest.template.xml文件将 android:resizeableActivity="false">改成 android:resizeableActivity="false" android:requestLegacyExternalStorage="true">重新编译即可解决!...原创 2021-07-07 01:02:12 · 694 阅读 · 0 评论 -
如何解决Delphi写的APP发布到APP Store需要1024x1024图标的问题
由于苹果修改了发布规则,原先在iTunes Connect里上传的1024x1024图标,修改为要加入到发布的ipa包里。导致delphi生成的app无法在苹果商店发布。查阅很多资料,以下办法可以通过发布审阅。1. 在xcode上生成一个空的Project, 命名为和DELPHI工程相同的名称。2. 在Assets.xcassets的AppIcon里把要求的图标都加入。3. 在Assets.xcassets生成一个LaunchImage, 将要求的图标都加入。4. 设置正确的发布到商店需要的原创 2020-09-22 14:17:10 · 1012 阅读 · 0 评论 -
REST Datasnap服务端与javascript客户端实现
快速实现一个REST服务端和一个javascript客户端。原创 2016-06-20 12:04:05 · 4985 阅读 · 0 评论 -
DataSnap初步二
复习上一篇的内容: 1. 一个典型的DataSnap服务器至少需要三个控件:TDSServer: DataSnap的逻辑核心控件,控制服务器的运行。TDSServerClass: DataSnap服务端服务导出控件,通过OnGetClass事件来导出服务端的类及方法供客户端的远程调用。 作为服务端导出给客户端远程调用的类需要满足以下两个条件:原创 2016-06-14 12:08:58 · 2412 阅读 · 0 评论 -
DataSnap初步之一
认识DataSnap,REST原创 2016-06-13 23:36:41 · 3510 阅读 · 0 评论 -
MYSQL数据库自动定期备份和恢复工具
自动定期备份和恢复mysql数据库。原创 2016-04-19 01:02:50 · 9938 阅读 · 3 评论 -
如何解决delphi xe8编译大程序时内存不够的问题。
Delphi xe8在编译一个大程序的时候,会出现一个内存不够的错误,有时候是以Internal Error的形式出现,有时候是以Out of Memory的形式出现。主要原因是IDE调用各种资源占用了大量内存资源,再以DLL方式调入编译器的时候,就会出现内存不够的情况。要解决这个问题,需要采用进程外编译的方式,就是让编译器以单独进程的方式运行,而不是以DLL的方式调入IDE的内存空间原创 2016-03-10 11:34:49 · 1673 阅读 · 0 评论 -
解决ISO9强制https造成已有的app中原有的http失败的问题。
用delphi xe 开发的iphone app, 在iphone升级到ios 9以后,出现一些奇怪的错误,原有的http请求都失败。查了资料后才知道ios 9会强制所有的app中原有的http请求变为https请求。如果原有的服务器部不支持https的话,就会出现各种错误。解决办法:修改源程序所带的xxx.info.plist文件,来关闭ios 9强制https的功能,让针对app的原创 2016-03-20 21:28:43 · 2177 阅读 · 0 评论 -
Firemonkey Listview 计算文字行高
procedure TForm1.ListView1UpdateObjects(const Sender: TObject; const AItem: TListViewItem);var TextR : TRectF; DetailR: TRectF; TextRHeight: integer; DetailRHeight: integer;begin原创 2016-03-03 11:01:32 · 1541 阅读 · 0 评论 -
如何解决Delphi读取Mysql的Text字段出现乱码的情况
之前使用Delphi的dbExpress读取Mysql的text字段时,会出现乱码的情况,查了下网上的方案,不是很理想。网上的方案: 使用UTF8ToUnicodeString(Query1.FieldByName('textField').asBytes); 虽然可以获得大部分正确的内容,但是碰到数字或是全角的符号,还是会出现乱码。正确的方案:使用TEncoding.UT原创 2015-12-19 21:33:43 · 3450 阅读 · 0 评论 -
ShowModal在VCL和Firemonkey中的使用区别
通常在VCL中,要显示一个子窗口,使用下面的代码: procedure TForm1.Button1Click(Sender: TObject); var ChildForm: TChildForm; begin ChildForm := TChildForm.Create(nil); try原创 2015-11-06 11:17:29 · 1945 阅读 · 0 评论