吾爱破解 - 52pojie.cn

 找回密码
 注册[Register]

QQ登录

只需一步,快速开始

查看: 1052|回复: 13
收起左侧

[求助] 哪种文本编辑器 改一处变量 ,下面内容自动变?

[复制链接]
冥界3大法王 发表于 2024-9-21 17:29
费话说完,下面举例。

unit Unit1;interfaceuses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs, Menus;type  TMenuNotifyEvent = procedure(Sender: TMenuItem) of object;  TForm1 = class(TForm)    MainMenu1: TMainMenu;    N1: TMenuItem;    procedure AddMenuText(MenuText, FileName: string);    procedure MenuClick(Sender: TMenuItem);    procedure FormCreate(Sender: TObject);  private    { Private declarations }  public    FileName: string;  end;var  Form1: TForm1;  NewMenuItem: TMenuItem;implementation{$R *.dfm}procedure TForm1.AddMenuText(MenuText, FileName: string);var  EventName: TMenuNotifyEvent;  NewMenuItem: TMenuItem;begin  NewMenuItem := TMenuItem.Create(self);  NewMenuItem.Caption := MenuText;  NewMenuItem.Tag := Integer(PChar(FileName));  EventName := MenuClick;  NewMenuItem.OnClick := TNotifyEvent(EventName);  MainMenu1.Items[MainMenu1.Items.Count - 1].Add(NewMenuItem);end;procedure TForm1.MenuClick(Sender: TMenuItem);var  s: AnsiString;begin  s := AnsiString(Sender.Tag);  WinExec(PAnsiChar(s), sw_normal);end;procedure TForm1.FormCreate(Sender: TObject);var  sFile, sLine: TStrings;                           <========比如这里吧,把sFile 改成 文件名,下面的自动变化。  r, c: Integer;  list: TStringlist;begin  sFile := TStringList.Create;  sFile.LoadFromFile('X:\test.txt');  sLine := TStringList.Create;  for r := 0 to sFile.Count - 1 do  begin    ShowMessage(sFile[r]);           //得到每行内容    sLine.CommaText := sFile[r];    for c := 0 to sLine.Count - 1 do    begin      list := TStringlist.Create;      list.Delimiter := '=';             //用=来分割      list.DelimitedText := (sFile[r]);//      AddMenuText(list.Strings[0], list.Strings[1]);      ShowMessage(list.Strings[0] + #13#10 + list.Strings[1]);      //得到的每行的数组0和数组1内容(也就是=前后的部分)    end;  end;  sLine.Free;  sFile.Free;end;end.

发帖前要善用论坛搜索功能,那里可能会有你要找的答案或者已经有人发布过相同内容了,请勿重复发帖。

T4DNA 发表于 2024-9-21 17:46
VSC CTRL+Shift+L
爱飞的猫 发表于 2024-9-21 17:56
ide 自带的重构功能(变量重命名)?一般都有吧…
FCGkitty 发表于 2024-9-21 18:15
 楼主| 冥界3大法王 发表于 2024-9-21 18:22
爱飞的猫 发表于 2024-9-21 17:56
ide 自带的重构功能(变量重命名)?一般都有吧…

原来Delphi是Ctrl+Shift+E
 楼主| 冥界3大法王 发表于 2024-9-21 18:23
FCGkitty 发表于 2024-9-21 18:15
没见过,有这种东西么,反正note++不能

我好像在B站视频里见过。
houdongen 发表于 2024-9-21 18:37
易语言可以
wkfy 发表于 2024-9-21 18:49
vscode可以,滑动选中,右键,更改所有匹配项,那么引用的所有点都会同步更新,防止类似变量的替换。例如str1和str12,只会修改选中的。不会直接错误文本字符替换。
feifanll 发表于 2024-9-21 19:36
直接替换
三滑稽甲苯 发表于 2024-9-21 20:28
本帖最后由 三滑稽甲苯 于 2024-9-21 20:30 编辑

vscode 就可以,按 f2 就能直接重命名变量,就是不知道你的这种语言是否支持
如果你想要的是单纯的文本查找替换,那就直接 ctrl+f 查找替换
您需要登录后才可以回帖 登录 | 注册[Register]

本版积分规则

返回列表

RSS订阅|小黑屋|处罚记录|联系我们|吾爱破解 - LCG - LSG ( 京ICP备16042023号 | 京公网安备 11010502030087号 )

GMT+8, 2024-11-24 11:42

Powered by Discuz!

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表