opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2026-03-13 09:24:25 +08:00
Code Issues Packages Projects Releases Wiki Activity

Left trim query split marker to avoid whitespaces in log window. Fixes issue #2460.

Browse Source
This commit is contained in:
Ansgar Becker
2011-06-18 15:24:44 +00:00
parent cbd847477e
commit 83b59a9bde
1 changed files with 3 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
source/helpers.pas
View File

@@ -311,6 +311,7 @@ var
const
StringEnclosers = ['"', '''', '`'];
NewLines = [#13, #10];
WhiteSpaces = NewLines + [#9, ' '];
begin
// Scan SQL batch for delimiters and return a list with start + end offsets
AllLen := Length(SQL);
@@ -379,6 +380,8 @@ begin
QueryTest := Trim(Copy(SQL, LastLeftOffset, RightOffset-LastLeftOffset));
if (QueryTest <> '') and (QueryTest <> Delim) then begin
Marker := TSQLSentence.Create;
while CharInSet(SQL[LastLeftOffset], WhiteSpaces) do
Inc(LastLeftOffset);
Marker.LeftOffset := LastLeftOffset;
Marker.RightOffset := RightOffset;
Result.Add(Marker);