opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2025-08-06 18:24:26 +08:00
Code Issues Packages Projects Releases Wiki Activity

Update SynEdit component to their revision 114, and add Delphi XE5 packages.

Browse Source
This commit is contained in:
Ansgar Becker
2013-10-16 18:05:33 +00:00
parent 34c420cbce
commit 077b119b66
17 changed files with 3089 additions and 47 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
components/synedit/Source/SynUnicode.pas
View File

@ -3162,7 +3162,7 @@ var
if (Length(BOM) <> Length(UTF8BOM)) or
not CompareMem(@BOM[0], @UTF8BOM[0], Length(UTF8BOM))
then
Stream.Seek(-Length(BOM), soFromCurrent)
Stream.Seek(-Length(BOM), soCurrent)
else
Result := True;
end;
@ -3173,7 +3173,7 @@ var
if (Length(BOM) <> Length(UTF16BOMLE)) or
not CompareMem(@BOM[0], @UTF16BOMLE[0], Length(UTF16BOMLE))
then
Stream.Seek(-Length(BOM), soFromCurrent)
Stream.Seek(-Length(BOM), soCurrent)
else
Result := True;
end;
@ -3184,7 +3184,7 @@ var
if (Length(BOM) <> Length(UTF16BOMBE)) or
not CompareMem(@BOM[0], @UTF16BOMBE[0], Length(UTF16BOMBE))
then
Stream.Seek(-Length(BOM), soFromCurrent)
Stream.Seek(-Length(BOM), soCurrent)
else
Result := True;
end;