答题先锋网

用DELPHI开发银河麒麟上应用的一些问题处理

1、在连接PASSSERVER后，编译出现V10不是个整数的问题解决方法：修改麒麟系统/etc/os-release文件中的VERSION_ID="10"注:'V11' is not a valid integer value.的错误提示也一样，相应的改为VERSION_ID="11"2、在DELPHI安装本地 ...

阅读全文

2024-02-04 王守红 0 条评论 6649 次浏览

技术分享个人备忘

Delphi/Lazarus使用mormot2解析JSON

mormot2生成JSON和解析JSON的功能非常强大，也非常灵活，灵活的结果就是有时候有点乱。下面总结了最简单的一种使用方法要解析的JSON如下，基本涉及了要解析的所有类型。JsonContent:=' { "head": { "jzDate": ...

阅读全文

2024-02-04 王守红 0 条评论 5580 次浏览

个人备忘

Ubuntu安装VNC服务

这是一个亲测可用的VNC安装步骤。sudo apt install -y x11vnc sudo apt install -y lightdm mestars@pop-os:~$ mkdir -pv /home/yourname/.vnc mestars@pop-os:~$ x11vnc -storepass ...

阅读全文

2023-05-22 王守红 0 条评论 5069 次浏览

个人备忘

Lazarus项目使用fpRedis操作Redis

在Delphi下可以使用开源控件delphiredisclient进行Redis的操作，使用比较简单这里就不说了。那么Lazarus下目前只找到一个更新停止于6年前的一个开源项目fpRedis（基于12年前开源的redis_client.fpc），虽然老点但是能用。gitgub地址https://github. ...

阅读全文

2023-04-15 王守红 0 条评论 4293 次浏览

技术分享

Delphi实现字符串Base64编码解码（解决中文乱码）

网上实现Base64编码和界面的文章很多，之所以单独写出来是因为这次对接一个老接口的时候，对方的xml里面有中文，我这边接收之后用网上搜到的那些常规的Base64解码中文部分都是乱码，经过多轮测试发现使用NativeXml中的DecodeBase64可以解决该问题。Unit NativeXml functio ...

阅读全文

2023-04-13 王守红 0 条评论 4126 次浏览

小技巧

用Python实现pdf转Excel

先安装三个库:pip intall pdfplumber pip intall openpyxl pip intall tqdm 功能实现代码：#coding:utf-8 #pdf转excel import pdfplumber from openpyxl import Workbook from tqdm i ...

阅读全文

2022-12-16 王守红 0 条评论 7771 次浏览

技术分享

用Python实现PDF转图片

首先需要安装四个库文件pip install PyPDF2 pip install pymupdf pip install pdf2image pip install wand 然后具体编码如下：# -*- coding:utf-8 -*- import fitz import os def pdf2img ...

阅读全文

2022-12-16 王守红 0 条评论 4265 次浏览

技术分享

使用mORMot访问Postgresql、MySQL、Oracle等数据库

首先说一下直接访问Postgresql数据库的方法，单元需引用SynCommons,SynDB,SynDBPostgres。连接数据库代码示例：var Conn: TSQLDBConnection; Query: TSQLDBStatement; Props: TSQLDBPostgresConne ...

阅读全文

2022-12-03 王守红 0 条评论 7198 次浏览

生活点滴

English Test 2022

Part 1 日常对话（一问一答）Work 工作1) What work do you do?2) Do you enjoy that work?3) Why did you choose to do that type of work?4) How do you go to work every day?5) ...

阅读全文

2022-11-08 王守红 0 条评论 3877 次浏览

技术分享

Lazarus和Delphi使用自带的TrayIcon组件实现最小化后显示在状态栏

首先在Form上放置一个TTrayIcon的控件，Lazarus的话还需要应用windows单元(Linux需要引用lclintf单元)，记得给TrayIcon的Icon指定一个图标。其它废话不多说具体核心代码如下：procedure TForm1.TrayIcon1DblClick(Sender: TObje ...

阅读全文

2022-03-30 王守红 0 条评论 12607 次浏览