83 lines
1.0 KiB
ObjectPascal
83 lines
1.0 KiB
ObjectPascal
// Enumerate all primary styles: 0 to 14
|
|
|
|
{
|
|
SCE_PAS_DEFAULT=0
|
|
SCE_PAS_IDENTIFIER=1
|
|
SCE_PAS_COMMENT=2
|
|
SCE_PAS_COMMENT2=3
|
|
SCE_PAS_COMMENTLINE=4
|
|
SCE_PAS_PREPROCESSOR=5
|
|
SCE_PAS_PREPROCESSOR2=6
|
|
SCE_PAS_NUMBER=7
|
|
SCE_PAS_HEXNUMBER=8
|
|
SCE_PAS_WORD=9
|
|
SCE_PAS_STRING=10
|
|
SCE_PAS_STRINGEOL=11
|
|
SCE_PAS_CHARACTER=12
|
|
SCE_PAS_OPERATOR=13
|
|
SCE_PAS_ASM=14
|
|
}
|
|
|
|
// default=0
|
|
|
|
// identifier=1
|
|
function functionname(var paramerter1: type1):result1;
|
|
procedure procedurename(const parameter2: type2);
|
|
|
|
// comment=2
|
|
{comment text}
|
|
|
|
// comment2=3
|
|
(* comment text *)
|
|
|
|
// commentline=4
|
|
// example line
|
|
|
|
// preprocessor=5
|
|
{$DEFINE xyz}
|
|
|
|
{$IFDEF xyz}
|
|
codeblock 1
|
|
{$else}
|
|
codeblock 2
|
|
{$endif}
|
|
|
|
// preprocessor2=6
|
|
(*$DEFINE xyz*)
|
|
|
|
// number=7
|
|
123
|
|
1.23
|
|
-123
|
|
-12.3
|
|
+123
|
|
123
|
|
1.23e2
|
|
-1.23E2
|
|
|
|
// hexnumber=8
|
|
$123
|
|
$123ABCDEF
|
|
$ABCDEF123
|
|
|
|
// word=9
|
|
absolute abstract and array as
|
|
|
|
// string=10
|
|
'string'
|
|
|
|
// stringeol=11
|
|
'string
|
|
|
|
// character=12
|
|
#65
|
|
|
|
// operator=13
|
|
$ & * + / < = > ^
|
|
|
|
// asm
|
|
asm
|
|
this is
|
|
inside assembler
|
|
end
|