如题

解决方案 »

  1.   

    Var
      FList: TStringList;
    Begin
      FList:= TStringList.Create;
      FList.LoadFromFile(TextFileName)
      

  2.   

    帮楼上的添了一些,希望大家共同进步,我也是才学了不久的!
    Var
      FList: TStringList;
      mm:string;
    Begin
      mm:='到!来晚了一步!55555555';
    try
      FList:= TStringList.Create;
      FList.LoadFromFile(TextFileName)  
      FList.add('mm');
      FList.insert('love');
      FList.savetofile('TextFileName');
    fanlly
      FList.free;
    end;
    end;
      
      

  3.   

    大体思路:FindWindow取得记事本句柄,用spy++查看文本部分的类为“Edit”,GetWindowText取得其中内容后处理,然后再用SetWindowText送回。
      

  4.   

    FindWindow取得记事本句柄,
    SendMessage( ... GetText
    修改完
    SendMessage( ... SetText