From: Maël Hörz <ma...@us...> - 2009-06-14 14:11:48
|
Update of /cvsroot/synedit/SynEdit/Source In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv12411 Modified Files: Tag: Unicode_2004_08_31 SynDBEdit.pas Log Message: Assume DefaultEncoding when loading from BlobStream Index: SynDBEdit.pas =================================================================== RCS file: /cvsroot/synedit/SynEdit/Source/SynDBEdit.pas,v retrieving revision 1.11.2.1 retrieving revision 1.11.2.2 diff -u -d -r1.11.2.1 -r1.11.2.2 --- SynDBEdit.pas 31 Aug 2004 12:55:16 -0000 1.11.2.1 +++ SynDBEdit.pas 14 Jun 2009 13:33:38 -0000 1.11.2.2 @@ -363,7 +363,7 @@ BlobStream := TBlobStream.Create(BlobField, bmRead); {$ENDIF} Lines.BeginUpdate; - Lines.LoadFromStream(BlobStream); + Lines.LoadFromStream(BlobStream{$IFDEF UNICODE}, TEncoding.Default{$ENDIF}); Lines.EndUpdate; BlobStream.Free; Modified := False; |