哪种文本编辑器 改一处变量 ，下面内容自动变？
费话说完，下面举例。unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, Menus;typeTMenuNotifyEvent = 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;varForm1: TForm1;NewMenuItem: TMenuItem;implementation{$R *.dfm}procedure TForm1.AddMenuText(MenuText, FileName: string);varEventName: TMenuNotifyEvent;NewMenuItem: TMenuItem;beginNewMenuItem := TMenuItem.Create(self);NewMenuItem.Caption := MenuText;NewMenuItem.Tag := Integer(PChar(FileName));EventName := MenuClick;NewMenuItem.OnClick := TNotifyEvent(EventName);MainMenu1.Items.Add(NewMenuItem);end;procedure TForm1.MenuClick(Sender: TMenuItem);vars: AnsiString;begins := AnsiString(Sender.Tag);WinExec(PAnsiChar(s), sw_normal);end;procedure TForm1.FormCreate(Sender: TObject);varsFile, sLine: TStrings; <========比如这里吧，把sFile 改成 文件名，下面的自动变化。r, c: Integer;list: TStringlist;beginsFile := TStringList.Create;sFile.LoadFromFile('X:\test.txt');sLine := TStringList.Create;for r := 0 to sFile.Count - 1 dobegin ShowMessage(sFile); //得到每行内容 sLine.CommaText := sFile; for c := 0 to sLine.Count - 1 do begin list := TStringlist.Create; list.Delimiter := '='; //用=来分割 list.DelimitedText := (sFile);// AddMenuText(list.Strings, list.Strings); ShowMessage(list.Strings + #13#10 + list.Strings); //得到的每行的数组0和数组1内容(也就是=前后的部分) end;end;sLine.Free;sFile.Free;end;end. VSC CTRL+Shift+L ide 自带的重构功能（变量重命名）？一般都有吧… 没见过，有这种东西么，反正note++不能 爱飞的猫 发表于 2024-9-21 17:56
ide 自带的重构功能（变量重命名）？一般都有吧…
原来Delphi是Ctrl+Shift+E FCGkitty 发表于 2024-9-21 18:15
没见过，有这种东西么，反正note++不能
我好像在B站视频里见过。 易语言可以 vscode可以，滑动选中，右键，更改所有匹配项，那么引用的所有点都会同步更新，防止类似变量的替换。例如str1和str12，只会修改选中的。不会直接错误文本字符替换。 直接替换 本帖最后由 三滑稽甲苯 于 2024-9-21 20:30 编辑
vscode 就可以，按 f2 就能直接重命名变量，就是不知道你的这种语言是否支持
如果你想要的是单纯的文本查找替换，那就直接 ctrl+f 查找替换
页:
[1]
2