- 博客(77)
- 资源 (4)
- 收藏
- 关注
RSS订阅原创 delphi xe12升级一款老app为64位后出现安装时包解析错误
测试也是安装失败，然后得到一条错误信息“Failure [DELETE_FAILED_INTERNAL_ERROR]”但在小米和努比亚手机上安装都不成功，或者安装时闪退或者提示“安装包异常”或者提示“安装包解析出错”。最近delphi xe发布了12版本，很多手机平台也纷纷提示只收64位版的。于是把一款以前用xe10编译的32位APP改为64位重新编译了一下。把这两个文件随便改个名，然后重新编译，重新打包，问题解决。根据这错误信息搜索后也没能解决的方法。网上搜一下也都是泛泛而谈没实质性的解决方法。
2024-04-12 16:21:16
225
原创 一款自动翻译并索引的搜索引擎的想法
随着人工智能翻译水平的提高。有个想法，可以把英文，俄文，日文等多种语言的网页内容自动翻译成中文并作为快照存储。这样用户搜索后可以点进去显示译文或者跳转到原文。以为客户提供更多搜索内容来源。
2023-09-26 15:27:24
69
原创 东方六爻怎么起卦的，国学小知识
专业人士的起卦排盘小工具。所以使用上需要具备一定的知识。东方六爻小程序找不到原先的起卦排盘入口了？其实只要回答出对应的两个完整卦名即可过关。所以在主界面上有两个国学小知识的考验。如果知道六十四卦名称，回答此问题不难。因为在定位上东方六爻小程序是面向。
2022-10-19 22:08:29
299
1
原创 换个角度看进化论（二）
从DOS 到windows 10 也可以看做是一个系统的进化，从原始粗糙进化到功能强大界面美观。如果生命可以通过随机组合来产生，那么我们假设地球表面布满猴子，每个猴子一台电脑，然后电脑全部联网，猴子每敲一次键盘都会试图编译链接一次。看能否通过随机输入来产生一个DOS的io.sys文件？每个猴子占一平方米，地球表面积是510067866平方公里，能放500万亿只猴子。相当于同时能产生500万亿次随机输入。早期版本的io.sys文件123K按10万字节计算。猴子每秒敲一次键盘，相当于每秒能产生5
2021-06-19 20:19:58
348
原创 进化论真的合理吗？换个角度看进化论（一）
1857年，瑞士科学家阿尔伯特·冯·科立克发现了细胞内的线粒体。线粒体负责的最终氧化的共同途径三羧酸循环与氧化磷酸化，分别对应有氧呼吸的第二、三阶段。线粒体被誉为是生命的发动机，在线粒体内膜上的酶复合物利用碳氢等氧化过程中释放的能量将质子逆浓度梯度泵入线粒体膜间隙。然后线粒体内膜两侧便建立起了电化学梯度，质子就会有顺浓度梯度扩散的趋势。质子唯一的扩散通道是ATP合酶，ATP合酶拥有精巧的旋转机械机构，使用离子浓度产生的压力推动分子马达旋转。然后用机械力合成三磷酸腺苷以作为细胞活动的主要能量来源。线粒体结
2021-06-18 17:41:58
2248
原创 百度bch虚拟服务器使用独立ip与共享ip的一点差异
百度的bch价格便宜，默认是提供共享ip。如果需要独立ip独立带宽需要27元1M每月。经测试，在带宽都是1M的情况下。有如下差异，算是各有千秋吧。 共享ip 独立ip 稳定性 低，有时会提示连接中断 高，连接稳定 http获取页面时间 平均220毫秒左右 慢15毫秒左右 快15毫秒左右 下载速度 快，网络空闲时有3-5M甚至更快 固定1M的下载速度 综合而言，独立ip使用稳定，共享ip稍微不稳定一点但能提供更好.
2020-10-04 16:18:28
248
原创 delphi xe10.4.1编译Android老项目 No resource found that matches the given name 错误解决一例
今天用delphi xe10.4.1编译了一个原先10.3.1开发的安卓项目，编译正常，但打包的时候提示错误：[PAClient Error] Error: E2312 xxx\res\drawable\splash_image_def.xml:5: error: Error: No resource found that matches the given name (at 'src' with value '@drawable/splash_image').看提示信息应该是闪屏图片没有找到，但看
2020-09-08 18:07:44
926
原创 周易六爻起卦排盘微信小程序
最近制作了一款极简风格的六爻排盘小程序。实现了自动起卦，手工起卦，数据搜索，后台云服务器保存等功能。支持京房易和藏山卜排盘。效果展示：开发当中遇到的一些坑：1.由于习惯了pascl的单个等于号作为表达式，但js使用双等于号。可是你写了单等于号也不报错，代码也能运行，然后执行结果就不对了。2.小程序里使用很多的json数据结构，你用单引号也能运行，但在个别地方，json必须是双引号。3.wx.request的提交格式，默认使用json化的参数，如果服务器端使用普通参数形式，那么
2020-07-19 18:32:24
4630
2
转载 一款公历转农历节气以及天干地支的js代码
最近用到公历转农历，节气，天干地支的JavaScript代码。公历转节气可以计算法，能精确到时辰。如果只要精确到日也可以用查表法。然后农历涉及到闰月的计算。年和日的天干地支计算比较简单，但月份要根据节气变换。于是先从网上找一下有没现成的代码，找了几个都不合适。偶然发现了一款支持从1900到2100年的js代码，在此向作者Jea杨表示感谢。使用方法： 1 2 3 4 5 6 7 8 9 10 11 12
2020-07-12 23:31:22
1740
原创 delphi用indy实现php后台的文件上传下载
indy控件使用方便，用indy来下载的资料网上很好找。因业务需要使用了indy上传，php后台来接收文件。主要代码如下：delphi：uses IdMultipartFormData 单元PostData := TIdMultipartFormDataStream.Create; PostData.AddFile('file',ss,'1.mp3'); PostData.AddFormField('p',get_sound_mulu); PostData.AddFormFie...
2020-06-30 16:19:48
400
原创 delphi xe10 TNetHTTPClient 中文乱码 utf-8的解码
delphi新版本里增加了 TNetHTTPClient 组件，在https的ssl使用上比indy控件方便。然后获取的如果是utf-8编码的网页，需要解码后显示，不然中文会乱码。不需解码时可以直接获取网页内容：ss:= NetHTTPClient1.Get('https://abc.com');如果需要utf-8解码：ss:= NetHTTPClient1.Get('https://abc.com').ContentAsString(TEncoding.UTF8);...
2020-06-30 09:53:41
1789
原创 asphyre pxl canvas的常用函数介绍
asphyre pxl是一个可用于 delphi和freePascal的跨平台2d 3D引擎，但介绍资料很少。其中的canvas是画布，这上面的图形会渲染到屏幕上。canvas有很多实用的函数，简介如下function Initialize: Boolean; 初始化画布以便用于渲染。请注意，要进行实际渲染，@假设初始化成功，则需要首先调用link（beginscene）。此结果为@t...
2019-08-25 10:37:23
759
原创 梅森旋转法伪随机数在delphi下实现
梅森旋转法（也有翻译为马特赛特旋转算法）产生的伪随机数比线性同余法要好。产生随机数的速度快、周期长，可达到2^19937-1，且具有623维均匀分布的性质，对于一般的应用来说，足够大了，序列关联比较小，能通过很多随机性测试。现在很多编程语言都默认用梅森旋转法来提供伪随机数比如c++从11开始加入了梅森旋转法，但delphi一直都是用的线性同于法，在xe10.3还是这样的：//Random in...
2019-08-17 21:11:27
433
原创 解决nethttpclient下post与get的urlencode问题一个
在delphi xe下调用百度的翻译api，百度支持get与post两种方法。想着get效率更高，于是打算数据量小的时候用get，要翻译的数据量大时用post提交。要提交的数据 q=httpEncode(UTF8Encode(memo1.Text))在get模式下运行正常。但post模式下总是提示签名错误。全面检查代码发现没有问题。想来会不会是post的时候nethttpclient组...
2019-08-11 17:17:24
780
原创 discuz x3.4在https下实现首页去除 portal.php 尾巴
discuz x3.4版本，开启了全站https后，又添加了门户内的频道为首页。导致每次访问主页都会改变url，后面加上 portal.php?mod=list&catid=1 这么一个尾巴，既不雅观又影响搜索引擎权重。网上查了一圈给的方法要么不适合x3.4版，要么修改后没效果。摸索一番修改成功，现记录如下：1.不用修改 全局下的域名设置2.“门户”内取消频道的首页设置3....
2019-08-06 20:18:33
1627
原创 用百度人工智能进行繁体文字中文OCR识别
BAT都有提供OCR识别接口，各有千秋，其中百度提供的识别速度快，识别准确率高。具体内容如下：
2019-07-30 19:25:40
30096
12
原创 解决 delphi xe10.3.1 Secure File Sharing选项不起作用坑一个
Android7.0开始，uri不能直接传递文件名，需要使用FileProvider，常见的异常就是，原先在低api版本下正常的程序，升级到api26及以上时，图片分享，文字分享，程序下载更新后的启动安装，都会出错，比如出现 ava.lang.nullPointerException: Attempt to invoke virtual method 'android.content.res.Xm...
2019-07-08 22:06:40
2800
原创 delphi xe 升级后编译的app覆盖安装老版本问题
xe升级后重新编译一个app，在已经安装的手机上提示安装失败。换一个华为手机，也提示安装失败，但给出了信息，说明是签名不一致。但由于都是用的默认签名，那应该是xe升级后签名文件改了。经查看编译部署日志，发现是用了 C:\Users\fu\AppData\Roaming\Embarcadero\BDS\版本号\debug.keystore于是找了老版本里的debug.keystore替换掉新版本...
2019-06-27 14:21:56
2724
原创 [PAClient Error] Error: E2312 Unable to execute 错误解决一例
用 xe10.3.1编译一个老项目，在部署打包的时候提示 [PAClient Error] Error: E2312 E:\Android\六爻APP\Android\Debug\DFLY\res\drawable\splash_image_def.xml:2: error: Error: No resource found that matches the given name (at 'src...
2019-06-27 09:18:58
1886
原创 2k，4k 高分屏显示器DPI缩放检测完整版
最近在做高DPI显示器的适配，由于很多用户不知道自己的显示器是否有dpi缩放。于是做了这么个小工具，专门用于系统dpi缩放参数的检测。程序下载：链接: https://pan.baidu.com/s/1XR2nvwYWFKd6DH6PMCeNyQ 提取码: hvff程序运行效果图：如果修改一下程序属性里的兼容性，更改高dpi设置，高dpi缩放替代，选择 系统，那么运行效果也会...
2019-06-24 21:37:33
8671
原创 Nginx 虚拟主机用 Rewrite 实现子域名指向子目录
用的是百度的bch虚拟主机，想将二级域名 bbs.finer2.com 指向主目录下的bbs文件夹。但百度虚拟主机不支持域名单独绑定目录。于是在bcloud_nginx_user.conf 下加了一条Rewrite规则if ($host ~* bbs\.){rewrite ^[/]$ /bbs/ permanent;}就是当检测到bbs.域名前缀时，如果url参数是斜杠，那么改为bbs...
2019-06-12 12:43:52
1573
原创 百度的bd0001.sys引起的google chrome 浏览器奔溃解决方法
这段时间遇到google 的Chrome浏览器总是奔溃，任何网站都无法访问，重装升级浏览器均不能解决。网上查了发现可能是bd0001.sys 搞鬼。于是在C:\Windows\System32\drivers下面的bd0001.sys文件删除，如果不能删除，那么给它重命名随便改个名称也行。然后重启电脑，google浏览器恢复正常了。...
2019-03-21 10:09:51
8108
原创 大衍之数概率分析
今天闲着没事写了个程序，跑了一下大衍之数揲蓍法的概率模拟。现今普遍使用的摇钱法，老阴和老阳出现的概率各为12.5%，阴阳出现的概率为37.5%先按49开始3变得结果，模拟10万次出现次数6533 老阴6占比：6.5331745 阳7占比：31.7543496 阴8占比：43.5018226 老阳9占比：18.23可见出现的概率很不均匀。这是由于49不能被4整除出现的概率偏...
2018-10-06 17:12:50
1524
2
原创 delphi xe 10.2.3开发的Android app上架时显示有多点，盟德广告的处理
用delphi 写的app上传到华为应用市场，提示含有多点(a.banner.doubleClick)和 盟德(a.spot.admob.b)广告，经查资料，这是google框架自带的广告接口。想着应该有地方可以禁用，但找了一圈没找到，经请教《Delphi xe6 Android 编程入门》一书作者高勇先生，找到了禁用google广告接口的地方。在此表示感谢。也给受到相同问题困扰的朋友一个指点。禁...
2018-07-29 21:14:08
2200
原创 在用Delphi 10.2.3 提示connection closed gracefully的处理
在用Delphi 10.2.3制作一个Android app的时候用了idhttp控件，post数据能成功，但每次都会提示connection closed gracefully 错误信息，网上找了一下用了 https://blog.csdn.net/nerdy/article/details/8749617 说的修改http协议后问题解决。在此表示感谢！加入如下两行代码即可。IdHTTP1.HT...
2018-07-06 14:57:56
4478
原创 delphi下unicodestring 编码为utf-8 RawByteString转换为ansistring
delphi在新版本的字符串默认编码都是unicode编码，但有些场合需要使用utf-8编码后的ansistring，比如常用的aes加密。在delphi2010下有个函数可以使用如果字符串大小不超过256个字符的，可以直接使用UTF8EncodeToShortString，返回值为utf-8编码的ansistring如果更多的字符内容，那么使用Utf8Encode函数，返回值为RawByteSt...
2018-06-14 23:01:09
5111
原创 东方六爻周易排盘起卦软件，有电脑和手机Android App，Pad平板应用，卦例本机网络双备份，支持藏山卜
东方六爻排盘起卦软件电脑PC最新6.7.2版，安卓手机最新2.8.6版主要功能 ：1.有安卓手机版App，Pad平板大字体版应用和电脑PC版软件，实现电脑和手机、Pad数据互通。2.支持百度云存储，换电脑卦例数据不丢失。后台数据加密保存确保隐私安全3.方便的卦例搜索功能4.方便的断语反馈撰写并在线保存5.支持cpu真随机数起卦（酷睿3代及以上cpu支持）6.支持多种起卦方式，支持...
2018-06-10 19:57:07
5642
2
原创 报数起卦法的概率分析
很多人喜欢用报数起卦，觉得起卦简单。但报数起卦有个问题不容忽视，就是能出来的卦数量很少。报数起卦总是有一爻动，全部卦里面一爻动的卦只有384个。但常用的报数起卦法能出来的卦只有192个，用3个数字起卦甚至只能出来157个卦也就是一爻动的卦里面，还有一半多出不来。而且概率的分布很不均匀。常用的报数起卦法如下：2个数，第一个数除以8的余数（能除尽的则为8）为上卦，第二个数除以8的余数为下卦，两数相加除...
2018-06-10 18:14:57
4176
原创 网页head内的数据移到body内，BOM问题和WordPress网页上部24px空白问题的解决
这几天发现网站上部总是多出一个24px的空白栏，找来找去找不出原因。开始想可能是css的问题，后来干脆把body的背景色设置成了黑色，这样和黑色顶栏融为一体，看着没这么扎眼。昨天用百度的网站速度检测，提示css没放在head段内，跑到了body段内。引起浏览器二次渲染，影响加载速度。看看源码都正常，但用浏览器按F12键看，确实有一个空白的<head></head>段，css...
2018-06-08 10:25:46
518
原创 一款高速精简优化版wordpress
这是一个能飞速加载显示网页的精简优化版的WordPress网站，基于WordPress4.5版修改而来。支持不同分辨率电脑和手机屏幕自动适配。通过改动后实现了加载速度的飞跃，从原先的首次打开页面需要20秒左右，到现在的2秒左右。速度测试是在我的百度云虚拟香港主机上测得，配置为1核cpu，128M内存，1M独享带宽（有加独立ip）针对原版改动如下：1.去掉了google的字体文件。2.大幅简化了cs...
2018-06-07 17:14:40
3719
3
原创 wordpress 设置固定链接后文章列表分页不正常的解决
WordPress设置了自定义固定链接，格式为 xx.com/archives/%post_id%.html 服务器的rewrite也做好了，其他一切正常，就是文章列表或者搜索出来的列表出现分页时，第二页分页链接成了 xxx.com/page/2 导致404错误。默认固定链接时分页是 xx.com/index.php/page/2 能正常显示。想着是内部对自定义固定链接的处理出现了错误。于是打开u...
2018-06-06 19:38:37
1357
原创 wordpress 伪静态rewrite几种方法优缺点
我用的这个百度bch空间，path_info默认开启，所以wordpress能实现 xx.com/index.php/123.html 这种模式的伪静态链接。但感觉这类url不好看，于是改为 xxx.com/archives/123.html 在WordPress后台“设置”-》“固定链接”自定义方式，修改好后。访问页面显示404，通过网上查询得知需要配置主机的 rewrite方式。适合百度bch...
2018-06-06 14:33:52
4803
原创 wordpress博客网站之改造提速
前几天弄了一个WordPress博客网站，不过默认的主页宽度不是全屏的，一番改造后实现了宽度全屏显示，文章查看次数显示，网站总访问人数显示。这样基本满足要求了。但发现首次打开奇慢无比，要20多秒才能出来。后续再打开由于有了本地缓存后稍微快了一点，但也要5秒左右才能显示。用浏览器跟踪发现是google字体的加载和query.js的加载卡了15秒以上的时间。于是先把google字体本地化，但发现goo...
2018-05-30 21:40:26
815
原创 随机数真的随机吗？
5号的时候我想从淘宝上买杂志，但12月的期刊还没上架，一般1号就会上架的了，所以有点奇怪。于是用Intel的cpu内置随机数发生器产生的真随机数起了一个卦，当时看卦像月破，一般是缝值或者缝合应事。那么应该巳日（8号）能上架，觉得申日（11号）的可能性太小。结果到了今天，也就是申日申时上架了。讲这个事情不讨论卦技如何，而是觉得这些看似无关的事情，有着我们未知内在的联系。比如cpu内热
2017-12-11 16:42:59
502
原创 一个扫描数据后提示重复与否的小工具
功能很简单，用条码扫描器扫入数据，当遇到重复扫入的数据时会提示。应用场景，当一堆件里面怀疑有重复发货的包裹时，可以逐个扫描一遍，遇到重复的单号会提示。如果扫描器不支持自动加回车符的，可以勾选“位数长度”选项，然后设置好快递单号长度，会自动在达到指定位数时加回车符以确认输入。下载地址，百度网盘：https://pan.baidu.com/s/1gftkcRh运行效果如图：...
2017-11-13 22:17:35
1094
2
原创 一个快速批量查询快递物流数据的小工具，可同时多种快递物流信息跟踪查件
前几天写了一个用于快递批量查询并分类的小工具，适合快递网点或者商家用于物流或者问题件的状态跟踪。支持批量查询，支持不同快递单号混合一起查询。方便物流跟踪查件，本程序仅一个程序文件绿色免安装下载解压即可运行。下载地址1：本地下载 快递批量查件1.32.zip下载地址2：百度网盘下载：链接: https://pan.baidu.com/s/1Qi7XufTV_YaYojkXTqZFMg 提...
2017-11-06 17:12:20
26651
7
原创 调用百度大脑智能里的文字识别实现图片识别
由于有一本古籍需要识别，网上找了几个软件对于繁体字均感觉识别率不高。试了下发现百度的识别率还可以，于是想自己写一个调用百度图片识别api的程序。用Delphi2010编码实现。在开发中遇到了几个问题，现写出来供需要的朋友参考。1. SSL问题，用的是indyhttp控件，使用SSL时需要添加 IdSSLIOHandlerSocketOpenSSL1 组件然后 idhttp的iohandler 属性...
2017-04-20 14:26:39
5644
原创 delphi2007下使用indy连接https时could not load ssl library问题的解决
delphi 2007 下的indy版本是10.1.5的，连接https需要用到较早版本的 libeay32.dll 和 ssleay32.dll。先从网上下载了1.0版本的dll。第一次连接https总是会提示 could not load ssl library 后续也能正常使用。 不过这样每次报一下错也不是个事情，考虑到indy控件版本比较老想找个早先的dll试试。下载了一个没有
2017-03-29 11:51:42
9727
1
原创 用电脑自己给电波表授时
由于国内只有一个商丘授时中心，所以离商丘比较远或者高楼林立的地方经常会出现电波表无法自动收波，手动收波由于信号弱也总是失败。这时候可以试试用电脑给电波表授时。win7，win10等系统会自动和网络上的时间同步所以也是比较准的。那么自己授时如何做？很简单，下载一个日本的授时软件，然后用耳机线插上，然后音量开最大。然后耳机线在手表上绕几圈，然后开启软件就可以了，一般等几分钟，就授时成功了。我用
2017-03-09 11:02:21
14354
原创 对进化论的一些反思
虽然我不相信神创论，且进化论看起来有其合理性，但在很多地方进化论却还是无法解释。仔细区分起来，进化有渐进式进化和模块化进化的区别。进化论讲是通过随机变异和自然选择来完成进化，这其实只适合渐进式进化。比如马从3个脚趾走路进化到1个蹄子走路，这通过渐进式缓慢进化可以实现。我们来看看随机变异的进化方式： 首先生物的DNA里的一个或者几个点位发生随机变异，导致蛋白质合成后出现差异，进
2016-12-19 12:12:23
557
1
delphi通过php上传下载文件的源码.rar
2020-06-30
调用百度语音合成朗读中英文示例，Delphi2010下编译通过
2018-04-13
调用百度大脑智能实现图片内文字识别，在Delphi2010下测试通过
2017-04-20
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人