<?xml version="1.0" encoding="utf-8" ?><rss version="2.0"><channel><title><![CDATA[htits2008的专栏]]></title><description><![CDATA[]]></description><link>https://blog.youkuaiyun.com/htits2008</link><language>zh-cn</language><generator>https://blog.youkuaiyun.com/</generator><copyright><![CDATA[Copyright &copy; htits2008]]></copyright><item><title><![CDATA[codetyphon下调用flask+LTP实现中文分词]]></title><link>https://blog.youkuaiyun.com/htits2008/article/details/127919643</link><guid>https://blog.youkuaiyun.com/htits2008/article/details/127919643</guid><author>htits2008</author><pubDate>Fri, 18 Nov 2022 14:17:37 +0800</pubDate><description><![CDATA[在NLP方面中文分词CWS现如今LTP的准确率相当高。不过NLP和CWS一般都用python来实现。为了方便codetyphon，delphi等调用分词功能，所有用flask做了一个本机的HTTP服务。现在可以用python XXX.py 启动服务。在codetyhon下，可以用httpcliet来调用。也可以用THTTPSend等类似组件代替，关键要注意字符串编码。]]></description><category></category></item><item><title><![CDATA[codetyphon 7.6 里面的TRegExpr 正在表达式 多行模式]]></title><link>https://blog.youkuaiyun.com/htits2008/article/details/121515023</link><guid>https://blog.youkuaiyun.com/htits2008/article/details/121515023</guid><author>htits2008</author><pubDate>Wed, 24 Nov 2021 14:36:15 +0800</pubDate><description><![CDATA[codetyphon 7.6 里面的TRegExpr 正在表达式 多行模式设置很简单

里面的有个属性 ModifierS设置为False，ModifierM设置为True。正则表达式以多行模式运行，每行可以分别匹配^和$(行首和行尾)。




]]></description><category></category></item><item><title><![CDATA[Codetyphon下TShellTreeView改造增加显示桌面和我的文档]]></title><link>https://blog.youkuaiyun.com/htits2008/article/details/117810782</link><guid>https://blog.youkuaiyun.com/htits2008/article/details/117810782</guid><author>htits2008</author><pubDate>Fri, 11 Jun 2021 11:45:35 +0800</pubDate><description><![CDATA[Codetyphon下TShellTreeView默认显示的内容还是几个盘符。在Windows熏陶下，感觉这个样子特别 古老。定位常用目录不方便。经过跟踪源码，发现TShellTreeView本质上是T。
]]></description><category></category></item><item><title><![CDATA[CEF4 Chromium 指定文件下载到目录和文件下载完成提示]]></title><link>https://blog.youkuaiyun.com/htits2008/article/details/108796408</link><guid>https://blog.youkuaiyun.com/htits2008/article/details/108796408</guid><author>htits2008</author><pubDate>Fri, 25 Sep 2020 14:45:29 +0800</pubDate><description><![CDATA[1.指定文件下载目录和文件名在onBeforeDownload 事件里面

调用callback.Cont(“文件名”,false);  

2.文件下载完成提示，直接给外国人的答案，在onDownloadUpdated事件中：

if downloadItem.IsInProgress then
  ShowStatusText('Download in progress');//这是在下载过程中
 if downloadItem.IsComplete then
  ShowStatusTe...]]></description><category></category></item><item><title><![CDATA[Win10下64位，使用CodeTyphon开发mormot程序的几个坑]]></title><link>https://blog.youkuaiyun.com/htits2008/article/details/106636123</link><guid>https://blog.youkuaiyun.com/htits2008/article/details/106636123</guid><author>htits2008</author><pubDate>Tue, 09 Jun 2020 10:48:41 +0800</pubDate><description><![CDATA[1.Mormot下载版本，要注意static目录下面有没有配套的如x86_64-win64子目录下的*.o文件，要不有9-10个错误文件找不到。

2.Mormot下面Synopse.inc文件里面对应的FPC版本如3-3下面要有{$define FPC_PROVIDE_ATTR_TABLE}  定义，要不不能编译，或者能编译会出现运行期错误。

3.工程设置里面要注意选择LCLWidgetType:=win32，要不会出现libmsvcrt.a文件找不到提示。

本人实测，可以运行范例1，范例4。...]]></description><category></category></item><item><title><![CDATA[codetyphon7.0 fastrepot中文换行首字乱码问题解决方案]]></title><link>https://blog.youkuaiyun.com/htits2008/article/details/106133692</link><guid>https://blog.youkuaiyun.com/htits2008/article/details/106133692</guid><author>htits2008</author><pubDate>Fri, 15 May 2020 08:00:52 +0800</pubDate><description><![CDATA[codetyphon7.0 fastrepot中文换行首字乱码问题解决方案

找到了，很简单

就是

Unit LR_Class;

里面的WrapLine 过程

const s: String 改成const s: wideString

ch: char; 改成 ch: widechar;

如下，成功解决。

procedure WrapLine(const s: wideString);
 var
  i, cur, beg, last, len: Integer;
  Was...]]></description><category></category></item><item><title><![CDATA[codeTyphon7.0里面的cef版本是79.0.10，貌似79.xxx都可以用]]></title><link>https://blog.youkuaiyun.com/htits2008/article/details/106123393</link><guid>https://blog.youkuaiyun.com/htits2008/article/details/106123393</guid><author>htits2008</author><pubDate>Thu, 14 May 2020 16:48:39 +0800</pubDate><description><![CDATA[codeTyphon7.0里面的cef版本是79.0.10，貌似79.xxx都可以用，81.XXX，实测不能用，提示版本不对。3.XXX的也不行。

下载的时候要注意。

下载地址在pas提示里面

// ************************************************************************
// ***************************** CEF4Delphi *******************************
// *]]></description><category></category></item><item><title><![CDATA[实测JQuery操作Frame可用格式，Delphi 下 TChromium 控件里面的JavaScript]]></title><link>https://blog.youkuaiyun.com/htits2008/article/details/88022855</link><guid>https://blog.youkuaiyun.com/htits2008/article/details/88022855</guid><author>htits2008</author><pubDate>Thu, 28 Feb 2019 12:57:04 +0800</pubDate><description><![CDATA[只代表一种存在，不参与争论。

网上找了很多，测试了一些，掉了几次坑，可能是输入不标准引起。

frame里面的JQuery操作外面的DOM元素，$(&quot;#XXX&quot;,parent.document)

本级操作下级名为（XXX）frame里面的（YYY）元素，$(&quot;#XXX&quot;).contents().find(&quot;#YYY&quot;)

XXX,YYY都是ID...]]></description><category></category></item><item><title><![CDATA[SQL left join 条件位置问题]]></title><link>https://blog.youkuaiyun.com/htits2008/article/details/48521717</link><guid>https://blog.youkuaiyun.com/htits2008/article/details/48521717</guid><author>htits2008</author><pubDate>Thu, 17 Sep 2015 14:44:43 +0800</pubDate><description><![CDATA[今日把一个where A.ID*=b.ID and b.AAA='AAA' 语句改成Left jion
以为很简单，就这么改了，
完了结果集出来比原来少了那些B表空值的
仔细一看，原来Left Jion b on A.ID=b.ID ，还需要把 and B.AAA='AAA'移过来一起
仅A.XXX='XXX'放在Where下面
写一笔存档]]></description><category></category></item><item><title><![CDATA[Delphi中WebBrowser用IHTMLDocument2自动填表中的Frame问题]]></title><link>https://blog.youkuaiyun.com/htits2008/article/details/45915497</link><guid>https://blog.youkuaiyun.com/htits2008/article/details/45915497</guid><author>htits2008</author><pubDate>Fri, 22 May 2015 11:51:40 +0800</pubDate><description><![CDATA[网上找了一堆，没有找到Frame嵌套情况的。
Frame里面的东西，相当一个独立的网页。它的JavaScript环境是独立的，变量是受保护的。所以，要先找到具体的Frame，然后再执行脚本。
这段代码使用了递归。抛砖引玉。
var
  doc: IHTMLDocument2;
  ICount: Integer;
  procedure showFrame(doc: IHTMLDocu]]></description><category></category></item></channel></rss>