#SQL QUERY FORMATTER CODE#

I was wondering if the reformat SQL rules can be customizable through the UI, and indentation support be added?īasically I'm looking for a nice reformatting based on how I'm currently using Aqua Data Studio ( ): If (TestPair = ' )') or (TestPair = ' ,') then If (TestPair = ' ') or (TestPair = ' ( ') then begin If (not InComment) and (not InBigComment) and (not InString) and (not InIdent) then begin IndexOf(Keyword) > -1) and (PairKeywords. If LastWasComment or ((ImportantKeywords. get a new line, but don't separate LEFT JOIN with linebreaks While (Run > 1) and CharInSet(Result, WhiteSpaces) do InKeyword := (not InComment) and (not InBigComment) and (not InString) and (not InIdent) and CharInSet(c, WordChars) If (c = '/' ) and (p = '*' ) and (not InComment) and (not InString) then InBigComment := False If (c = '*' ) and (p = '/' ) and (not InComment) and (not InString) then InBigComment := True If ((c = #10) or (c = #13)) and InComment then begin If (not IsEsc) and IsQuote then InString := not InString If i > 1 then p := SQL else p := #0 // Previous char PairKeywords := Explode(',', 'LEFT,RIGHT,STRAIGHT,NATURAL,INNER,ORDER,GROUP' ) Keywords which followers should not get separated into a new line ImportantKeywords := Explode(',', 'SELECT,FROM,LEFT,RIGHT,STRAIGHT,NATURAL,INNER,JOIN,WHERE,GROUP,ORDER,HAVING,LIMIT,CREATE,DROP,UPDATE,INSERT,REPLACE,TRUNCATE,DELETE' ) A subset of the above list, each of them will get a linebreak left to it KeywordMaxLen := Max(KeywordMaxLen, Length(AllKeywords)) Add(MySQLFunctions.Name) ĭatatypes := įor i:= Low(Datatypes) to High(Datatypes) do If (MySQLFunctions.Declaration '' ) and (MySQLFunctions.Name 'X' ) thenĪllKeywords. Leave out operator functions like '>', and the ' X()' function so hex values don' t get touched Known SQL keywords, get converted to UPPERCASEįor i:= Low(MySQLFunctions) to High(MySQLFunctions) do begin

Keyword, PreviousKeyword, TestPair: String IsEsc, IsQuote, InComment, InBigComment, InString, InKeyword, InIdent, LastWasComment: Boolean Probably we can enhance it here in this forum thread:įunction ReformatSQL(SQL: String): String ĪllKeywords, ImportantKeywords, PairKeywords: TStringList

#SQL QUERY FORMATTER CODE#

Here's the code which does this reformat stuff. Ģ2 Jun - Themus: I need a 'root' canal apparent. Ģ9 Jun - azbtr: Lost the result output window!Ģ8 Jun - ansgar: Impossible to use backspace, enter and delĢ4 Jun - giraffedata: Does ssh.exe currently work?Ģ2 Jun - ansgar: Windows: Feature 'Truncate log line. Ģ9 Jun - veloopity: Umlauts get lost on SQL export from o. ģ0 Jun - ArnorBld: Remove entry from table name filterģ0 Jun - serhio: connection issue to SQL server with rele. ġ4 Jul - RobsonSG: improvement suggestion - Copy Tableġ4 Jul - RobsonSG: Text Editor lost resizeġ3 Jul - ansgar: libpq for all posgres versionsġ2 Jul - cxi: Some suggestions for the experienceĠ8 Jul - VOCALOID4: Some functions cannot be used normallyĠ7 Jul - Eduard_F: Bugreport: HeidiSQL not saving changesĠ7 Jul - mlhandel: Massively Problems importing csv-FilesĠ5 Jul - ansgar: Method to Connect All Databases For Pos. You may want toġ5 Jul - JAB Creations: Long query bug shows text past li. User support and hosting takes time and money. But keep in mind that developing HeidiSQL,

Sql query formatter