技术分享个人备忘

Lazarus中用ado方式操作Excel文件

---

在Delphi中操作Excel大部分人已经轻车熟路,因为Delphi中有一套ADO组件用于操作微软的相关产品,无论是MsSql、Access还是Excel都可以轻松搞定，网上的例子也比较多。 但用Lazarus操作Excel的例子比较少，能搜到的大部分也是通过控件FPSpreadsheet进行，虽然操作Ex ...

---

阅读全文

2020-09-05 王守红 0 条评论 3423 次浏览

技术分享

Ubuntu19.04 里设置python默认版本为python3

---

Ubuntu 19里默认是既安装了python2.7也安装了python3.7。如果直接输入python，调用的是默认的python2.7，那么如何将默认的python改为python3.7呢？可以利用alternatives机制更改python3.7为默认。shell里执行以下命令即可：sudo update ...

---

阅读全文

2019-06-12 王守红 0 条评论 4417 次浏览

技术分享

解决FMXLinux编译Linux程序报ld-linux.exe: error: cannot find -lcurl的问题

---

这两天计划把用Firemonkey开发的程序编译一个Linux的版本玩玩,删除了里面用到的一些跨平台不兼容的代码。本以为用FMXLinux应该很容易就搞定了（以前编译过简单界面的程序）。这次程序由于用到了DataSnap Rest，编译的时候直接报错，如下：[DCC Error] E2597 D:\Progra ...

---

阅读全文

2019-06-10 王守红 0 条评论 4393 次浏览

树莓派3B+ 下python-bluez的安装

---

最近研究Ibeacon用到树莓派上扫描Ibeacon基站的问题.使用python的话需要用到bulez. 安装过程及遇到的问题的解决办法如下:一、在树莓派3上安装BlueZsudo apt-get updatesudo apt-get upgradesudo apt-get install libus ...

---

阅读全文

2019-05-16 王守红 0 条评论 5420 次浏览

新版本Intraweb中TIWURLMap的问题

---

      这两天重新拾起Intraweb准备开发个小东西，发现Intraweb 15中已经没有IWURLMap单元了。示例ContentHandlers中的TIWURLMap.Add('/blue/', 'index.html', TfrmBlue); 这种用 ...

---

阅读全文

2018-11-14 王守红 0 条评论 4187 次浏览

C#中Unicode编码字符串转中文字符

---

有时在请求一些服务的时候返回数据中的中文内容被编码成一些Unicode编码,形式如:\u82E5其实一个函数就可以实现完美解码：    Regex.Unescape(“\u82e5\u9690\u82e5\u73b0″)注：需要先引用  System.Text.Regul ...

---

阅读全文

2016-08-19 王守红 0 条评论 10437 次浏览

技术分享

Delphi 2007 报错:未找到导入的项目，请确认 <Import> 声明中的路径正确

---

      这几天系统升级到Win10的红石版后,打开Delphi2007编译以前可以正常编译时,突然报错,内容大体就是:未找到导入的项目，请确认 <Import> 声明中的路径正确。 百度了一下，由于目前Delphi越来越小众，网上报这个错误的基本都是vs.net的用 ...

---

阅读全文

2016-08-06 王守红 0 条评论 11556 次浏览

技术分享

php用pdo方式连接访问oracle数据库报

---

最近学习thinphp5,连接Oracle数据库的时候遇到"could not find driver"的问题,实际上出现这个提示的原因可能有很多种,解决方法如下：1)要打开php.ini中的相关扩展项,即将extension=php_oci8.dll和extension=php_pdo_oci.dll前面的分 ...

---

阅读全文

2016-06-13 王守红 0 条评论 14286 次浏览

技术分享

Delphi XE自带JSON的使用方法总结

---

算是自己备忘吧，也免得大家遇到同类问题再重复劳动，现将DelphiXE 自带的JSON操作类的使用方法总结如下：先介绍一下最基本的TJSONObject的使用。uses System.JSON; var JSON: TJSONObject; begin JSON := TJSONObject.Crea ...

---

阅读全文

2016-05-13 王守红 0 条评论 22955 次浏览

技术分享

Delphi的第三方JSON解析类XSuperObject的使用实例

---

主要是用于备忘吧，XSuperObject的使用相对比较简单，而且可以跨平台。var X: ISuperObject; I:integer; begin X:=SO(); X.I['Result'] := 1; X.A['UserRight'].Clear; while n ...

---

阅读全文

2016-05-11 王守红 0 条评论 13030 次浏览