Develop and Download Open Source Software

Browse CVS Repository

Diff of /gikonavigoeson/gikonavi/MojuUtils.pas

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.24 by h677, Mon Feb 11 16:41:13 2008 UTC revision 1.25 by h677, Sat Mar 29 01:38:48 2008 UTC
# Line 377  begin Line 377  begin
377          end;          end;
378  end;  end;
379    
380  //! 無害化(& -> & " -> &auot; に変換する)  //! 無害化(& -> & " -> " に変換する)
381  function Sanitize(const s: String): String;  function Sanitize(const s: String): String;
382  begin  begin
383          Result := CustomStringReplace(s, '&', '&');      // 余分にサニタイズされないようにいったん元に戻す
384        Result := UnSanitize(s);
385            Result := CustomStringReplace(Result, '&', '&');
386          Result := CustomStringReplace(Result, '"', '"');          Result := CustomStringReplace(Result, '"', '"');
387  end;  end;
388  //! 無害化解除(& -> & &auot; -> " に変換する)  //! 無害化解除(& -> & " -> " に変換する)
389  function UnSanitize(const s: String): String;  function UnSanitize(const s: String): String;
390  begin  begin
391          Result := CustomStringReplace(s, '"', '"');          Result := CustomStringReplace(s, '"', '"');

Legend:
Removed from v.1.24  
changed lines
  Added in v.1.25

Back to OSDN">Back to OSDN
ViewVC Help
Powered by ViewVC 1.1.26