Develop and Download Open Source Software

Browse CVS Repository

Diff of /gikonavigoeson/gikonavi/Favorite.pas

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

revision 1.39 by yoffy, Thu Aug 5 01:21:47 2004 UTC revision 1.40 by yoffy, Thu Aug 26 17:08:13 2004 UTC
# Line 444  var Line 444  var
444          SaveList: TStringList;          SaveList: TStringList;
445  begin  begin
446          FileName := GikoSys.GetConfigDir + FAVORITE_FILE_NAME;          FileName := GikoSys.GetConfigDir + FAVORITE_FILE_NAME;
447            MoveFile( PChar( FileName ), PChar( GikoSys.GetConfigDir + '~' + FAVORITE_FILE_NAME ) );
448          SaveList := TStringList.Create;          SaveList := TStringList.Create;
449          try          try
450                  SaveList.Add('<?xml version="1.0" encoding="Shift_JIS" standalone="yes"?>');                  SaveList.Add('<?xml version="1.0" encoding="Shift_JIS" standalone="yes"?>');

Legend:
Removed from v.1.39  
changed lines
  Added in v.1.40

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