解决ImageEn 读cmyk模式的JPG无法知道是cmyk模式问题
• 半支烟 • 5年前
0 回复
3799 阅读
0 收藏
本来想着TIOJPEGColorspace中就有ioJPEG_CMYK类型的定义，通过TImageEnIO的ParamsFromFile方法读取后就可以知道是不是CMYK调色板了，写了下面代码： procedure TForm1.FormCreate(Sender: TObject); begin ImageEnIO1.ParamsFromFile('C:\temp\1.jpg'); ShowMe
阅读全文获取文件长度不正确的问题解决了，但是还是觉得有点不可思议
• smallghost • 5年前
0 回复
4490 阅读
0 收藏
下面今天新做的一个获取文件长度的函数。 function onGetFileSize(arg_file:String):Int64; var fileHandle:Integer; begin fileHandle := FileOpen(arg_file,0); Result := getFileSize(fileHandle,nil); FileClose(fileHandle); end;
阅读全文WORD转Sqlite数据库开发手记（3）
• smallghost • 5年前
0 回复
3582 阅读
0 收藏
通过前两张（1、2）的介绍，已经大致了解了整个转换的流程，接下来我们开始实际编码。
阅读全文WORD转Sqlite数据库开发手记（2）
• smallghost • 5年前
0 回复
3868 阅读
0 收藏
转换过程的逻辑 1、 先打开WORD文件 2、 初始化SQLITE数据库 3、 创建存储WORD数据需要的表 4、 循环处理：读一条记录并保存到SQLITE数据库中 5、 关闭先前打开的WORD文件 6、 关闭SQLITE数据库
阅读全文
