我正在使用我们的实验室报告系统,并希望自动化一些任务。我们使用的系统不直观,使用word文档输入数据。有几个带有标题的段落(受保护的标题)。
我想复制一个段落中的一个短语并使用 Delphi 应用程序将其粘贴到另一个段落中
GetActiveOleObject('Word.Application');
我该如何使用正则表达式。好消息是我要复制的可搜索短语是大写的,而其他所有内容都是句子大小写。例子:
第 3 段标题:---> 收件人备注 <---- 这在文档中不可编辑(受保护)
标本在此工作站的 FORMALIN 容器中收到
在该工作站收到的样本是新鲜的,没有固定剂
我的结果必须是这样的:
第 4 段标题 ---> 接收方法 <----- 再次受保护
福尔马林容器 <----- 这是我想从第一场比赛中粘贴的地方
没有固定剂的新鲜<-----这里是第二场比赛……等等
所以我的感觉是有一个德尔福代码来搜索段落标题“接收者注释”和“接收方法”之间的大写字母,并在下一段中列出它们。
我使用delphi xe3,我知道如何将正则表达式与其他文件一起使用,但不使用delphi。任何输入、代码片段、示例等将不胜感激!