From 398c5e93dfa34beb3ca6c42fa8f37bf05f7e97c4 Mon Sep 17 00:00:00 2001 From: jesus Date: Sat, 4 Oct 2014 21:27:26 +0000 Subject: [PATCH] LCL, grids, TXMLConfig (Laz2_XMLCfg and ultimately TFileStreamUTF8) need UTF8 encoded filename git-svn-id: trunk@46433 - --- lcl/grids.pas | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lcl/grids.pas b/lcl/grids.pas index b45e2f57c8..c8d5ea87c4 100644 --- a/lcl/grids.pas +++ b/lcl/grids.pas @@ -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