delphi中怎样替换整个项目中的某个字符串？

Delphi > VCL组件开发及应用
收藏 回复
[问题点数：100分，结帖人csdyyr]
更多帖子
私信 空间 博客
csdyyr
等级
本版专家分：1236
结帖率 98.84%
因为有N个文件中包含需要替换的字符串，如果逐个替换太麻烦了，请问有没有简单的方法？
只看楼主 引用 举报 楼主 收起
展开阅读全文
更多帖子
私信 空间 博客
hongss
等级
本版专家分：11395
把这个字符串变成一个全局变量，替换的时候只需要替换这个字符串的赋值就可以了。

可以用Replace

只看TA 引用 举报 #1得分 5
更多帖子
私信 空间 博客
csdyyr
等级
本版专家分：1236
引用 1 楼 hongss 的回复:
把这个字符串变成一个全局变量，替换的时候只需要替换这个字符串的赋值就可以了。

可以用Replace

可惜现在不是你所说的情况。
只看TA 引用 举报 #2得分 0
更多帖子
私信 空间 博客
merrymin
等级
本版专家分：1869
引用楼主 csdyyr 的回复:
因为有N个文件中包含需要替换的字符串，如果逐个替换太麻烦了，请问有没有简单的方法？

我先搜索到当前所有文件需要替换的字符串，然后再一个个地Ctrl + V
只看TA 引用 举报 #3得分 5
更多帖子
私信 空间 博客
csdyyr
等级
本版专家分：1236
引用 3 楼 merrymin 的回复:
引用楼主 csdyyr 的回复:
因为有N个文件中包含需要替换的字符串，如果逐个替换太麻烦了，请问有没有简单的方法？

我先搜索到当前所有文件需要替换的字符串，然后再一个个地Ctrl + V

你这方法更慢了，可以Ctrl+R..., 确定之后可以在其它文件中直接F3就可以了。
只看TA 引用 举报 #4得分 0
更多帖子
私信 空间 博客
devhp
等级
本版专家分：3064
如果樓主是非必將此功能置入自己程序的話。直接DOWN一個幾百K的批量文本替換工具，比較省事，

只看TA 引用 举报 #5得分 10
更多帖子
私信 空间 博客
SQLDebug_Fan
等级
本版专家分：26053
勋章
Blank
红花 2010年7月 Delphi大版内专家分月排行榜第一
2010年3月 Delphi大版内专家分月排行榜第一
Blank
蓝花 2010年10月 Delphi大版内专家分月排行榜第三
2010年4月 Delphi大版内专家分月排行榜第三
DELPHI中不提供这样的编辑功能，可以自己写个工具，查找替换就可以了。
只看TA 引用 举报 #6得分 10
更多帖子
私信 空间 博客
fang
等级
本版专家分：1748
写代码自己检索pas文、窗体文件替换，以为又是宏的处理问题。
只看TA 引用 举报 #7得分 10
更多帖子
私信 空间 博客
shuaialang
等级
本版专家分：4608
首先使用



function FindFile(Path: string): string; {搜索文件夹和文件}

var

 Sr: TSearchRec;

  CommaList: TStringList;

  s: string;

  dt: TDateTime;

begin

  commalist := Tstringlist.Create;

  try

    Findfirst(path + '*.*', faAnyFile, sr);

    if ((Sr.Attr and faDirectory) > 0) and (Sr.Name <> '.') then

    begin

      dt := FileDateToDateTime(sr.Time);

      s := FormatDateTime('yyyy-mm-dd hh:nn', dt);

      commalist.add('*' + s + sr.name);

    end;

    while findnext(sr) = 0 do

    begin

      if ((Sr.Attr and faDirectory) > 0) and (Sr.Name <> '..') then

      begin

        dt := FileDateToDateTime(sr.Time);

        s := FormatDateTime('yyyy-mm-dd hh:nn', dt);

        commalist.add('*' + s + sr.name);

      end;

    end;

    FindClose(sr);

    FindFirst(path + '*.txt', faArchive + faReadOnly + faHidden + faSysFile, Sr);

    if Sr.Attr <> faDirectory then

    begin

      dt := FileDateToDateTime(sr.Time);

      s := FormatDateTime('yyyy-mm-dd hh:nn', dt);

      commalist.add('\' + s+ Format('%.0n', [sr.Size / 1]) + '|' + sr.name);

    end; //Inttostr(

    while findnext(sr) = 0 do

    begin

      if (sr.Attr <> faDirectory) then

      begin

        dt := FileDateToDateTime(sr.Time);

        s := FormatDateTime('yyyy-mm-dd hh:nn', dt);

        commalist.add('\' + s +Format('%.0n', [sr.Size / 1]) + '|' + sr.name);

      end;

    end;

    FindClose(Sr);

  except

  end;

  Result := commalist.Text;     //Result是消息的 定义

  commalist.Free;

end;

得到txt文件列表 


再利用  memo.loadfromfile 逐一加载并且使用Replace替换内容不就可以啦?我没理解错吧？
只看TA 引用 举报 #8得分 10
更多帖子
私信 空间 博客
风之谷
等级
本版专家分：7118
cnpack
只看TA 引用 举报 #9得分 10
更多帖子
私信 空间 博客
shuaialang
等级
本版专家分：4608
LZ要毕业设计的话加我QQ我帮你做了 20589816
只看TA 引用 举报 #10得分 0
1 2
收起
收藏 回复
csdyyr

等级：

关注 私信 TA的帖子
delphi 字符串数组清空_JS数组色常用操作方法

1.split 方法：将一个字符串分割为子字符串，然后将结果作为字符串数组返回 返回：字符串数组var arr="123,456,789" arr.split(',') // ["123", "456", "789"]2.join方法:用于把数组中的所有元素放入一个字符串，...

xml节点解析成字符串的方法

之前汇总了一篇关于xml文档与字符串转换的文章，文章主要是说明了如何将整个xml文档解析成字符串，并没有说明将xml文档中的某个节点转换成字符串的方法。项目中需要这个功能，所以就研究了一下，下面贴出代码供参考...

delphi中的单元

Object Passal的程序结构很特殊，与其它语言如C++，Object Windows等结构都不同。一个Delphi程序由多个称为单元的源代码...　Program单元就是Delphi中的项目文件。 　Program单元是一个特殊的单元，类似于C语言中的M

delphi edit里面的文字如何添加下划线_如何写出高质量可读性强的代码？长文详解...

欢迎FPGA工程师加入官方微信技术群点击蓝字关注我们FPGA之家-中国最好最大的FPGA纯工程师社群信息来源：《编写可读代码的艺术》，参考：J_Knight、蔡勇等脍炙人口的诗"春有百花秋有月，夏有凉风冬有雪"，意境唯美，...

从目录中查找指定后缀文件内的指定字符串

从目录中查找指定后缀文件内的指定字符串 find dirname -type f -exec egrep "from[ ]{0,}portfolio.*? " {} /; posted @ 2005-04-14 17:51 HuYis Blog 阅读(93) | 评论 (0) | 编辑 收藏 2005年4月13日 # CodeDom...

C#基础教程-c#实例教程，适合初学者

C#基础教程-c#实例教程，适合初学者。 第一章 C#语言基础 本章介绍C#语言的基础知识，希望具有C语言的读者能够基本掌握C#语言，并以此为基础，能够进一步学习用C#语言编写window应用程序和Web应用程序。...

delphi添加类文件_16 个超级实用的 Java 工具类

作者：alterem来源：https://juejin.im/post/5d4a25b351882505c105cc6e...以下工具类、方法按使用流行度排名，参考数据来源于Github上随机选取的5万个开源项目源码。一. org.apache.commons.io.IOUtilscloseQuietly...

测试开发笔记

★软件测试的目的、意义：（怎么做好软件测试） 7 3.软件生命周期： 7 第二章 测试过程 8 1.测试模型 8 H模型： 8 V模型 9 2.内部测试 10 3外部测试： 10 验收测试：（在系统测试之后） 11 回归测试： 11 4.测试过程...

c# split效率低_C# Split 字符文本中的字符太多

原因：Split()里面是用char类型不是string字符串类型，所以只能用一个字符，必须先把多个字符替换成一个字符，然后再分割。解决方案一：string html = " 第二百三十六章 古神精神印记";html = html.Replace("","*")....

Delphi_SysUtils中文翻译

************************系统实用例程********************************Delphi / Kylix 跨平台运行时库(System Utilities)Copyright (c) 1995-2002 Borland Softwrare Corporation********************************...

delphi 调用excel并打印_一文学会用Python操作Excel+Word+CSV

作者：奈何缘浅wyjhttps://juejin.im/post/6868073137263607821Python 操作 Excel常用工具数据处理是 Python 的一大应用场景，而 Excel 又是当前最流行的数据处理软件。因此用 Python 进行数据处理时，很容易会和 ...

delphi XE 10实现App和PC下TreeView调用ImageList和Sqlite数据

delphi XE 10实现App和PC下TreeView调用ImageList和Sqlite数据 一、工程 program TreeView; uses System.StartUpCopy, FMX.Forms, Unit1 in 'Unit1.pas' {Form1}, FrmTreeView in 'FrmTreeView.pas' {...

delphi添加类文件_16个通用高效 Java 工具类总结

来自：掘金(作者：alterem)原文链接：...以下工具类、方法按使用流行度排名，参考数据来源于Github上随机选取的5万个开源项目源码。一. org.apache.commons.io.IOUtilsclo...

delphi添加类文件_16 个超级实用的 Java 工具类，赶紧保存下来吧

在Java中，工具类定义了一组公共方法，这篇文章将介绍Java中使用最频繁及最通用的Java工具类。以下工具类、方法按使用流行度排名，参考数据来源于Github上随机选取的5万个开源项目源码。一. org.apache.commons.io....

delphi的专家工具Gexperts以及使用介绍

 GExperts是一组通过扩展集成开发环境（IDE）来提高Delphi和C++ Builer程序员工作效率的工具，详细的算的话，至少有二，三十项对Delphi的IDE功能的补充。GExperts以开放源码形式开发，以自由软件形式来发布。 作者...

Delphi常用函数大全（转）

AdjustLineBreaks函数将给定字符串的行分隔符调整为CR/LF序列 Align属性使控件位于窗口某部分 Alignment属性控件标签的文字位置 AllocMem函数在堆栈上分配给定大小的块 AllowGrayed属性允许一个灰度选择 ...

DelphiXE环境认知

第一章、 Project Options ØProject > Options 这个页面用来设置当前项目的Delphi编译器选项。Default勾选后可将当前的配置作为新工程的默认配置。... + +项目中。 一、 Delphi Compiler ØProject > Optio

delphi控件使用

Standard页 1- Tlistbox控件 重要属性items.* 举例，界面设计如下左，执行结果如下右： 代码为 procedure TForm1.Button1Click(Sender: TObject); begin edit1.Text := listbox1....edit2.Text := listbo...

delphi datasnap 中间件

...摘要: 客户端每天从代理服务器获取一个有效的中间件的IP地址和端口号，客户端当天之内都连接此中间件。如果客户端连不上中间件，就重新从代理服务器获取另一个有效的中间件的IP地址和端口号。...

delphi 各新版本特性收集

delphi 各新版本特性收集   Delphi XE6新增了一些特性并增强了原有的功能，主要有以下几个方面：   IDE（整合开发环境）   Internet XML（扩展标记语言） Compiler（编译器） COM/Active X ...

Delphi 线程同步技术（转）

上次跟大家分享了线程的标准代码，其实在线程的使用中最重要的是线程的同步问题，如果你在使用线程后，发现你的界面经常被卡死，或者无法显示出来，显示混乱，你的使用的变量值老是不按预想的变化，结果往往出乎意料...

delphi 各版本的特性

delphi 各新版本特性收集 Delphi XE6新增了一些特性并增强了原有的功能，主要有以下几个方面： IDE（整合开发环境） Internet XML（扩展标记语言） Compiler（编译器） COM/Active X Database support...

Delphi IDE扩展开发向导

作者：Borland(由CnPack翻译) 来源：www.CnPack.org 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 ...38

delphi SysUtils单元详解

源：CSDN 作者：Broker 发布时间：2007-3-26 人气：671   ************************系统实用例程*************...Delphi / Kylix 跨平台运行时库(System Utilities) Copyright (c) 1995-2002 Borland Softwrare Cor

delphi插件－Gexperts使用

 GExperts是一组通过扩展集成开发环境（IDE）来提高Delphi和C++ Builer程序员工作效率的工具，详细的算的话，至少有二，三十项对Delphi的IDE功能的补充。GExperts以开放源码形式开发，以自由软件形式来发布。 作者

Delphi实现sql 复制编程

{ Copyright (c) 咏南工作室 2006 作者： 陈新光 EMail：hnxxcxg@yahoo.com.cn QQ： 254072148 手机： 13025531017 TODO： 断网收银以及总部和各门店间的数据通讯（通过复制方法实现） .......

Delphi多线程详解

Delphi多线程处理 1-1多线程的基本概念 WIN 98/NT/2000/XP 是个多任务操作系统，也就是：一个进程可以划分为多个线程，每个线程轮流占用CPU 运行时间和资源，或者说，把CPU 时间划成片，每个片分给不同的线程，...

Delphi的可视化部件用法简介

本节中，我们将较为深入地讲解Delphi的部件。这是编制大型复杂应用程序的必由之路。下面，我们将对各种部件分类进行简单的介绍，以便于您在编程时能够较快地了解有哪些部件可能会满足您的要求，并对其重要的方法、...

delphi bpl插件系统开发

一个插件系统需要什么? 一个最小的插件系统当然需要插件本身,调用插件的容器,最后需要契约. 契约是什么呢?契约就是两个对象相互沟通的一个标准,这个标准应该统一,这样容器才能和不同的插件通讯....

相关热词 c# 多线程调接口 类动态更改窗口的值c# c# josn解析工具 c#中try catch c# 子类化重绘按键 c# string数组 c# 基类不能序列化 c#查看object c# 截取最后一个字符 c#合并多个excel