{$
}
(*$
)
{
}
(*
*)
//
'
#$
#
$
.
e
and
else
inherited
packed
then
array
end
initialization
procedure
threadvar
as
except
inline
program
to
asm
exports
interface
property
try
begin
file
is
raise
type
case
final
label
record
unit
class
finalization
library
repeat
unsafe
const
finally
mod
resourcestring
until
constructor
for
nil
sealed
uses
destructor
function
not
set
var
dispinterface
goto
object
shl
while
div
if
of
shr
with
do
implementation
or
static
xor
downto
in
out
string
at
on
absolute
dynamic
local
platform
requires
abstract
export
message
private
resident
assembler
external
name
protected
safecall
automated
far
near
public
stdcall
cdecl
forward
nodefault
published
stored
contains
implements
overload
read
varargs
default
index
override
readonly
virtual
deprecated
inline
package
register
write
dispid
library
pascal
reintroduce
writeonly