Description | uses | Classes, Interfaces, Objects and Records | Functions and Procedures | Types | Constants | Variables |
This program is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details.
You should have received a copy of the GNU Lesser General Public License along with this program; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
—————————————————————————
Messages localisation unit Author : Luc DAVID Email: luckylazarus@free.fr 2006-2009
Major changes are indicated in the \Documentation\changes.pdf file Last update : 05.01.2009
—————————————————————————
AfterIdentifierSeparator = [KwSpace, KwComma, kwLineReturn, kwBraceClose, KwSqlEnd]; |
BeforeIdentifierSeparator = [KwSpace, KwComma, kwLineBreak, kwBraceOpen]; |
IdentifierChar: Set of Char = ['0'..'9', 'a'..'z', 'A'..'Z', '_', '.', 'é', 'è', 'ê']; |
kwAll = 'ALL'; |
KwAllFields = '*'; |
KwAnd = 'AND'; |
KwASAlias = 'AS'; |
kwBraceClose = ')'; |
kwBraceOpen = '('; |
kwBracketClose = ']'; |
kwBracketOpen = '['; |
kwComma = ','; |
kwCreate = 'CREATE'; |
kwCreateTable = 'CREATE TABLE'; |
kwCreateTemporaryTable = 'CREATE TEMPORARY TABLE'; |
kwCreateTempTable = 'CREATE TEMP TABLE'; |
kwDelete = 'DELETE'; |
kwDistinct = 'DISTINCT'; |
kwDot = '.'; |
kwDoubleQuote = '"'; |
kwEqual = '='; |
kwFrom = 'FROM'; |
kwGroupBy = 'GROUP BY'; |
kwHaving = 'HAVING'; |
kwInsert = 'INSERT'; |
kwLike = 'LIKE'; |
kwLimit = 'LIMIT'; |
kwLineBreak = Char($A); |
kwLineEnd = KwLineReturn + KwLineBreak; |
KwLineReturn = Char($D); |
kwOrderBy = 'ORDER BY'; |
kwPragmaTableInfo = 'PRAGMA TABLE_INFO'; |
kwSelect = 'SELECT'; |
kwSingleQuote = ''''; |
KwSpace = ' '; |
kwSQLEnd = ';' ; |
kwUpdate = 'UPDATE'; |
kwWhere = 'WHERE'; |
QuoteChars = [KwSingleQuote, KwDoubleQuote, kwBracketOpen, kwBracketClose]; |
QuoteCharsArray: Array[0..3] of String = (KwSingleQuote, KwDoubleQuote, kwBracketOpen, kwBracketClose); |
SelectStmtFieldDefs: array[0..4] of String = (kwSelect, kwAll, KwDistinct, kwComma, KwSQLEnd); |
SelectStmtKeywords: array[0..7] of String = (kwSelect, kwFrom, kwWhere, kwGroupBy, kwHaving, kwOrderBy, kwLimit, kwSQLEnd); |
SelectStmtTableDefs: array[0..3] of String = (kwFrom, kwAsAlias, kwComma, KwSQLEnd); |
SqlitePassDatabaseVersion = '0.45'; |
SqlitePassDatasetVersion = '0.45'; |
SqlitePassDbSettingsTable = 'SQLitePass__DbSettings'; |
SqlitePassPackageVersion = '0.45'; |
SqlitePassSQLStmtDefsTable = 'SQLitePass__SQLStmts'; |
SqlitePassSQLTokenTypeAsString: Array[0..35] of String =
('ttKeyword', 'ttIdentifier', 'ttDatabaseIdentifier', 'ttTableIdentifier', 'ttFieldIdentifier', 'ttFunctionIdentifier',
'ttStar', 'ttNumber', 'ttDateTime', 'ttSingleQuote', 'ttDoubleQuote', 'ttHash', 'ttBraceOpen', 'ttBraceClose', 'ttSquareOpen', 'ttSquareClose',
'ttRoundOpen', 'ttRoundClose', 'ttWhitespace', 'ttComment', 'ttComma', 'ttColon', 'ttSemiColon', 'ttEqual', 'ttNotEqual',
'ttGreater', 'ttGreaterOrEqual', 'ttLesser', 'ttLesserOrEqual', 'ttPlus', 'ttMinus', 'ttPoint', 'ttSlash', 'ttSeparator', 'ttEOF', 'ttUnknown'); |
SqlitePassStorageVersion = '0.40'; |
StmtTypeKeywords: array[0..7] of String = (kwCreateTemporaryTable, kwCreateTempTable, kwCreateTable, kwCreate,
kwSelect, KwInsert, kwUpdate, kwDelete); |
vlLog = 1; |
vlLogAndShow = 3; |
vlShow = 2; |
vlSilent = 0; |
AfterIdentifierSeparator = [KwSpace, KwComma, kwLineReturn, kwBraceClose, KwSqlEnd]; |
BeforeIdentifierSeparator = [KwSpace, KwComma, kwLineBreak, kwBraceOpen]; |
IdentifierChar: Set of Char = ['0'..'9', 'a'..'z', 'A'..'Z', '_', '.', 'é', 'è', 'ê']; |
kwAll = 'ALL'; |
KwAllFields = '*'; |
KwAnd = 'AND'; |
KwASAlias = 'AS'; |
kwBraceClose = ')'; |
kwBraceOpen = '('; |
kwBracketClose = ']'; |
kwBracketOpen = '['; |
Quotes |
kwComma = ','; |
kwCreate = 'CREATE'; |
Keywords definition for [create] statement |
kwCreateTable = 'CREATE TABLE'; |
kwCreateTemporaryTable = 'CREATE TEMPORARY TABLE'; |
kwCreateTempTable = 'CREATE TEMP TABLE'; |
kwDelete = 'DELETE'; |
Keywords definition for [delete] statement |
kwDistinct = 'DISTINCT'; |
kwDot = '.'; |
kwDoubleQuote = '"'; |
kwEqual = '='; |
kwFrom = 'FROM'; |
kwGroupBy = 'GROUP BY'; |
kwHaving = 'HAVING'; |
kwInsert = 'INSERT'; |
Keywords definition for [Insert] statement |
kwLike = 'LIKE'; |
kwLimit = 'LIMIT'; |
kwLineBreak = Char($A); |
kwLineEnd = KwLineReturn + KwLineBreak; |
KwLineReturn = Char($D); |
kwOrderBy = 'ORDER BY'; |
kwPragmaTableInfo = 'PRAGMA TABLE_INFO'; |
kwSelect = 'SELECT'; |
Keywords definition for [select] statement |
kwSingleQuote = ''''; |
KwSpace = ' '; |
kwSQLEnd = ';' ; |
Global Keywords definition |
kwUpdate = 'UPDATE'; |
Keywords definition for [update] statement |
kwWhere = 'WHERE'; |
QuoteChars = [KwSingleQuote, KwDoubleQuote, kwBracketOpen, kwBracketClose]; |
QuoteCharsArray: Array[0..3] of String = (KwSingleQuote, KwDoubleQuote, kwBracketOpen, kwBracketClose); |
SelectStmtFieldDefs: array[0..4] of String = (kwSelect, kwAll, KwDistinct, kwComma, KwSQLEnd); |
SelectStmtKeywords: array[0..7] of String = (kwSelect, kwFrom, kwWhere, kwGroupBy, kwHaving, kwOrderBy, kwLimit, kwSQLEnd); |
SelectStmtTableDefs: array[0..3] of String = (kwFrom, kwAsAlias, kwComma, KwSQLEnd); |
SqlitePassDatabaseVersion = '0.45'; |
SqlitePassDatasetVersion = '0.45'; |
SqlitePassDbSettingsTable = 'SQLitePass__DbSettings'; |
System tables |
SqlitePassPackageVersion = '0.45'; |
Components version |
SqlitePassSQLStmtDefsTable = 'SQLitePass__SQLStmts'; |
SqlitePassStorageVersion = '0.40'; |
Storage version |
StmtTypeKeywords: array[0..7] of String = (kwCreateTemporaryTable, kwCreateTempTable, kwCreateTable, kwCreate,
kwSelect, KwInsert, kwUpdate, kwDelete); |
Keywords definitions for statement type checking |
vlLog = 1; |
vlLogAndShow = 3; |
vlShow = 2; |
vlSilent = 0; |
Verbose Level (For error handling) |