LCL, grids, TXMLConfig (Laz2_XMLCfg and ultimately TFileStreamUTF8) need UTF8 encoded filename

git-svn-id: trunk@46433 -
This commit is contained in:
jesus 2014-10-04 21:27:26 +00:00
parent 63ce6e53b2
commit 398c5e93df

View File

@ -8858,7 +8858,7 @@ begin
raise Exception.Create(rsGridFileDoesNotExists);
Cfg:=TXMLConfig.Create(nil);
Try
Cfg.Filename := UTF8ToSys(FileName);
Cfg.Filename := FileName;
LoadSub(Cfg);
Finally
FreeThenNil(Cfg);
@ -8886,7 +8886,7 @@ begin
DeleteFileUTF8(FileName);
Cfg:=TXMLConfig.Create(nil);
Try
Cfg.FileName := UTF8ToSys(FileName);
Cfg.FileName := FileName;
SaveContent(Cfg);
Cfg.Flush;
Finally