anchor.diff:  
   
   implementation
  -uses TntSystem, TntClasses;
  +uses TntSystem, TntClasses, gf_strings;
   
   
   procedure SaveToFile(FN: WideString; Str: String);
  
positive.code:      S: AnsiString;
    begin
      if (wline <> '') and (not lastParamWide or force) then begin
          S:= string(wline);                   // To make it more compatible with older versions. Only use UTF8 if it's necessary
          if wline <> WideString(S) then
             S:= WideStringToUTF8(wline);
  
          F.WriteBuffer(PChar(S)^, length(S));
          wline:= '';
      end;
  
negative.code:    Result:= (posF = 0);
  end;
  
  {See: Variant Open Array Parameters}
  
  procedure TWTextFile.WriteLn (const Args: array of const);
  var
  