+ Cocoa interfaces and parser by Ryan Joseph

git-svn-id: http://svn.freepascal.org/svn/fpc/branches/objc@13688 3ad0048d-3df7-0310-abae-a5850022a9f2

298 files changed, 39071 insertions, 0 deletions

diff --git a/packages/cocoaint/Makefile b/packages/cocoaint/Makefile
new file mode 100644
index 0000000000..cb1a81b394
--- /dev/null
+++ b/packages/cocoaint/Makefile
@@ -0,0 +1,2261 @@
+#
+# Don't edit, this file is generated by FPCMake Version 2.0.0 [2009/08/14]
+#
+default: all
+MAKEFILETARGETS=i386-linux i386-go32v2 i386-win32 i386-os2 i386-freebsd i386-beos i386-haiku i386-netbsd i386-solaris i386-qnx i386-netware i386-openbsd i386-wdosx i386-darwin i386-emx i386-watcom i386-netwlibc i386-wince i386-embedded i386-symbian m68k-linux m68k-freebsd m68k-netbsd m68k-amiga m68k-atari m68k-openbsd m68k-palmos m68k-embedded powerpc-linux powerpc-netbsd powerpc-amiga powerpc-macos powerpc-darwin powerpc-morphos powerpc-embedded sparc-linux sparc-netbsd sparc-solaris sparc-embedded x86_64-linux x86_64-freebsd x86_64-darwin x86_64-win64 x86_64-embedded arm-linux arm-palmos arm-darwin arm-wince arm-gba arm-nds arm-embedded arm-symbian powerpc64-linux powerpc64-darwin powerpc64-embedded avr-embedded armeb-linux armeb-embedded
+BSDs = freebsd netbsd openbsd darwin
+UNIXs = linux $(BSDs) solaris qnx
+LIMIT83fs = go32v2 os2 emx watcom
+OSNeedsComspecToRunBatch = go32v2 watcom
+FORCE:
+.PHONY: FORCE
+override PATH:=$(patsubst %/,%,$(subst \,/,$(PATH)))
+ifneq ($(findstring darwin,$(OSTYPE)),)
+inUnix=1 #darwin
+SEARCHPATH:=$(filter-out .,$(subst :, ,$(PATH)))
+else
+ifeq ($(findstring ;,$(PATH)),)
+inUnix=1
+SEARCHPATH:=$(filter-out .,$(subst :, ,$(PATH)))
+else
+SEARCHPATH:=$(subst ;, ,$(PATH))
+endif
+endif
+SEARCHPATH+=$(patsubst %/,%,$(subst \,/,$(dir $(MAKE))))
+PWD:=$(strip $(wildcard $(addsuffix /pwd.exe,$(SEARCHPATH))))
+ifeq ($(PWD),)
+PWD:=$(strip $(wildcard $(addsuffix /pwd,$(SEARCHPATH))))
+ifeq ($(PWD),)
+$(error You need the GNU utils package to use this Makefile)
+else
+PWD:=$(firstword $(PWD))
+SRCEXEEXT=
+endif
+else
+PWD:=$(firstword $(PWD))
+SRCEXEEXT=.exe
+endif
+ifndef inUnix
+ifeq ($(OS),Windows_NT)
+inWinNT=1
+else
+ifdef OS2_SHELL
+inOS2=1
+endif
+endif
+else
+ifneq ($(findstring cygdrive,$(PATH)),)
+inCygWin=1
+endif
+endif
+ifdef inUnix
+SRCBATCHEXT=.sh
+else
+ifdef inOS2
+SRCBATCHEXT=.cmd
+else
+SRCBATCHEXT=.bat
+endif
+endif
+ifdef COMSPEC
+ifneq ($(findstring $(OS_SOURCE),$(OSNeedsComspecToRunBatch)),)
+ifndef RUNBATCH
+RUNBATCH=$(COMSPEC) /C
+endif
+endif
+endif
+ifdef inUnix
+PATHSEP=/
+else
+PATHSEP:=$(subst /,\,/)
+ifdef inCygWin
+PATHSEP=/
+endif
+endif
+ifdef PWD
+BASEDIR:=$(subst \,/,$(shell $(PWD)))
+ifdef inCygWin
+ifneq ($(findstring /cygdrive/,$(BASEDIR)),)
+BASENODIR:=$(patsubst /cygdrive%,%,$(BASEDIR))
+BASEDRIVE:=$(firstword $(subst /, ,$(BASENODIR)))
+BASEDIR:=$(subst /cygdrive/$(BASEDRIVE)/,$(BASEDRIVE):/,$(BASEDIR))
+endif
+endif
+else
+BASEDIR=.
+endif
+ifdef inOS2
+ifndef ECHO
+ECHO:=$(strip $(wildcard $(addsuffix /gecho$(SRCEXEEXT),$(SEARCHPATH))))
+ifeq ($(ECHO),)
+ECHO:=$(strip $(wildcard $(addsuffix /echo$(SRCEXEEXT),$(SEARCHPATH))))
+ifeq ($(ECHO),)
+ECHO=echo
+else
+ECHO:=$(firstword $(ECHO))
+endif
+else
+ECHO:=$(firstword $(ECHO))
+endif
+endif
+export ECHO
+endif
+override DEFAULT_FPCDIR=../..
+ifndef FPC
+ifdef PP
+FPC=$(PP)
+endif
+endif
+ifndef FPC
+FPCPROG:=$(strip $(wildcard $(addsuffix /fpc$(SRCEXEEXT),$(SEARCHPATH))))
+ifneq ($(FPCPROG),)
+FPCPROG:=$(firstword $(FPCPROG))
+ifneq ($(CPU_TARGET),)
+FPC:=$(shell $(FPCPROG) -P$(CPU_TARGET) -PB)
+else
+FPC:=$(shell $(FPCPROG) -PB)
+endif
+ifneq ($(findstring Error,$(FPC)),)
+override FPC=$(firstword $(strip $(wildcard $(addsuffix /ppc386$(SRCEXEEXT),$(SEARCHPATH)))))
+else
+ifeq ($(strip $(wildcard $(FPC))),)
+FPC:=$(firstword $(FPCPROG))
+endif
+endif
+else
+override FPC=$(firstword $(strip $(wildcard $(addsuffix /ppc386$(SRCEXEEXT),$(SEARCHPATH)))))
+endif
+endif
+override FPC:=$(subst $(SRCEXEEXT),,$(FPC))
+override FPC:=$(subst \,/,$(FPC))$(SRCEXEEXT)
+FOUNDFPC:=$(strip $(wildcard $(FPC)))
+ifeq ($(FOUNDFPC),)
+FOUNDFPC=$(strip $(wildcard $(addsuffix /$(FPC),$(SEARCHPATH))))
+ifeq ($(FOUNDFPC),)
+$(error Compiler $(FPC) not found)
+endif
+endif
+ifndef FPC_COMPILERINFO
+FPC_COMPILERINFO:=$(shell $(FPC) -iVSPTPSOTO)
+endif
+ifndef FPC_VERSION
+FPC_VERSION:=$(word 1,$(FPC_COMPILERINFO))
+endif
+export FPC FPC_VERSION FPC_COMPILERINFO
+unexport CHECKDEPEND ALLDEPENDENCIES
+ifndef CPU_TARGET
+ifdef CPU_TARGET_DEFAULT
+CPU_TARGET=$(CPU_TARGET_DEFAULT)
+endif
+endif
+ifndef OS_TARGET
+ifdef OS_TARGET_DEFAULT
+OS_TARGET=$(OS_TARGET_DEFAULT)
+endif
+endif
+ifneq ($(words $(FPC_COMPILERINFO)),5)
+FPC_COMPILERINFO+=$(shell $(FPC) -iSP)
+FPC_COMPILERINFO+=$(shell $(FPC) -iTP)
+FPC_COMPILERINFO+=$(shell $(FPC) -iSO)
+FPC_COMPILERINFO+=$(shell $(FPC) -iTO)
+endif
+ifndef CPU_SOURCE
+CPU_SOURCE:=$(word 2,$(FPC_COMPILERINFO))
+endif
+ifndef CPU_TARGET
+CPU_TARGET:=$(word 3,$(FPC_COMPILERINFO))
+endif
+ifndef OS_SOURCE
+OS_SOURCE:=$(word 4,$(FPC_COMPILERINFO))
+endif
+ifndef OS_TARGET
+OS_TARGET:=$(word 5,$(FPC_COMPILERINFO))
+endif
+FULL_TARGET=$(CPU_TARGET)-$(OS_TARGET)
+FULL_SOURCE=$(CPU_SOURCE)-$(OS_SOURCE)
+ifeq ($(CPU_TARGET),armeb)
+ARCH=arm
+override FPCOPT+=-Cb
+else
+ifeq ($(CPU_TARGET),armel)
+ARCH=arm
+override FPCOPT+=-CaEABI
+else
+ARCH=$(CPU_TARGET)
+endif
+endif
+ifneq ($(findstring $(OS_SOURCE),$(LIMIT83fs)),)
+TARGETSUFFIX=$(OS_TARGET)
+SOURCESUFFIX=$(OS_SOURCE)
+else
+TARGETSUFFIX=$(FULL_TARGET)
+SOURCESUFFIX=$(FULL_SOURCE)
+endif
+ifneq ($(FULL_TARGET),$(FULL_SOURCE))
+CROSSCOMPILE=1
+endif
+ifeq ($(findstring makefile,$(MAKECMDGOALS)),)
+ifeq ($(findstring $(FULL_TARGET),$(MAKEFILETARGETS)),)
+$(error The Makefile doesn't support target $(FULL_TARGET), please run fpcmake first)
+endif
+endif
+ifneq ($(findstring $(OS_TARGET),$(BSDs)),)
+BSDhier=1
+endif
+ifeq ($(OS_TARGET),linux)
+linuxHier=1
+endif
+export OS_TARGET OS_SOURCE ARCH CPU_TARGET CPU_SOURCE FULL_TARGET FULL_SOURCE TARGETSUFFIX SOURCESUFFIX CROSSCOMPILE
+ifdef FPCDIR
+override FPCDIR:=$(subst \,/,$(FPCDIR))
+ifeq ($(wildcard $(addprefix $(FPCDIR)/,rtl units)),)
+override FPCDIR=wrong
+endif
+else
+override FPCDIR=wrong
+endif
+ifdef DEFAULT_FPCDIR
+ifeq ($(FPCDIR),wrong)
+override FPCDIR:=$(subst \,/,$(DEFAULT_FPCDIR))
+ifeq ($(wildcard $(addprefix $(FPCDIR)/,rtl units)),)
+override FPCDIR=wrong
+endif
+endif
+endif
+ifeq ($(FPCDIR),wrong)
+ifdef inUnix
+override FPCDIR=/usr/local/lib/fpc/$(FPC_VERSION)
+ifeq ($(wildcard $(FPCDIR)/units),)
+override FPCDIR=/usr/lib/fpc/$(FPC_VERSION)
+endif
+else
+override FPCDIR:=$(subst /$(FPC),,$(firstword $(strip $(wildcard $(addsuffix /$(FPC),$(SEARCHPATH))))))
+override FPCDIR:=$(FPCDIR)/..
+ifeq ($(wildcard $(addprefix $(FPCDIR)/,rtl units)),)
+override FPCDIR:=$(FPCDIR)/..
+ifeq ($(wildcard $(addprefix $(FPCDIR)/,rtl units)),)
+override FPCDIR:=$(BASEDIR)
+ifeq ($(wildcard $(addprefix $(FPCDIR)/,rtl units)),)
+override FPCDIR=c:/pp
+endif
+endif
+endif
+endif
+endif
+ifndef CROSSBINDIR
+CROSSBINDIR:=$(wildcard $(FPCDIR)/bin/$(TARGETSUFFIX))
+endif
+ifeq ($(OS_TARGET),darwin)
+ifeq ($(OS_SOURCE),darwin)
+DARWIN2DARWIN=1
+endif
+endif
+ifndef BINUTILSPREFIX
+ifndef CROSSBINDIR
+ifdef CROSSCOMPILE
+ifndef DARWIN2DARWIN
+BINUTILSPREFIX=$(CPU_TARGET)-$(OS_TARGET)-
+endif
+endif
+endif
+endif
+UNITSDIR:=$(wildcard $(FPCDIR)/units/$(TARGETSUFFIX))
+ifeq ($(UNITSDIR),)
+UNITSDIR:=$(wildcard $(FPCDIR)/units/$(OS_TARGET))
+endif
+PACKAGESDIR:=$(wildcard $(FPCDIR) $(FPCDIR)/packages $(FPCDIR)/packages/base $(FPCDIR)/packages/extra)
+override PACKAGE_NAME=cocoaint
+override PACKAGE_VERSION=2.5.1
+ifeq ($(FULL_TARGET),i386-linux)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),i386-go32v2)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),i386-win32)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),i386-os2)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),i386-freebsd)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),i386-beos)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),i386-haiku)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),i386-netbsd)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),i386-solaris)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),i386-qnx)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),i386-netware)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),i386-openbsd)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),i386-wdosx)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),i386-darwin)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),i386-emx)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),i386-watcom)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),i386-netwlibc)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),i386-wince)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),i386-embedded)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),i386-symbian)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),m68k-linux)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),m68k-freebsd)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),m68k-netbsd)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),m68k-amiga)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),m68k-atari)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),m68k-openbsd)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),m68k-palmos)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),m68k-embedded)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),powerpc-linux)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),powerpc-netbsd)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),powerpc-amiga)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),powerpc-macos)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),powerpc-darwin)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),powerpc-morphos)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),powerpc-embedded)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),sparc-linux)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),sparc-netbsd)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),sparc-solaris)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),sparc-embedded)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),x86_64-linux)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),x86_64-freebsd)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),x86_64-darwin)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),x86_64-win64)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),x86_64-embedded)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),arm-linux)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),arm-palmos)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),arm-darwin)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),arm-wince)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),arm-gba)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),arm-nds)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),arm-embedded)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),arm-symbian)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),powerpc64-linux)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),powerpc64-darwin)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),powerpc64-embedded)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),avr-embedded)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),armeb-linux)
+override TARGET_UNITS+=CocoaAll
+endif
+ifeq ($(FULL_TARGET),armeb-embedded)
+override TARGET_UNITS+=CocoaAll
+endif
+override INSTALL_FPCPACKAGE=y
+ifeq ($(FULL_TARGET),i386-linux)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),i386-go32v2)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),i386-win32)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),i386-os2)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),i386-freebsd)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),i386-beos)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),i386-haiku)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),i386-netbsd)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),i386-solaris)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),i386-qnx)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),i386-netware)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),i386-openbsd)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),i386-wdosx)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),i386-darwin)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),i386-emx)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),i386-watcom)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),i386-netwlibc)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),i386-wince)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),i386-embedded)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),i386-symbian)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),m68k-linux)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),m68k-freebsd)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),m68k-netbsd)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),m68k-amiga)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),m68k-atari)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),m68k-openbsd)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),m68k-palmos)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),m68k-embedded)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),powerpc-linux)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),powerpc-netbsd)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),powerpc-amiga)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),powerpc-macos)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),powerpc-darwin)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),powerpc-morphos)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),powerpc-embedded)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),sparc-linux)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),sparc-netbsd)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),sparc-solaris)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),sparc-embedded)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),x86_64-linux)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),x86_64-freebsd)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),x86_64-darwin)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),x86_64-win64)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),x86_64-embedded)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),arm-linux)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),arm-palmos)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),arm-darwin)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),arm-wince)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),arm-gba)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),arm-nds)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),arm-embedded)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),arm-symbian)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),powerpc64-linux)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),powerpc64-darwin)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),powerpc64-embedded)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),avr-embedded)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),armeb-linux)
+override COMPILER_SOURCEDIR+=src
+endif
+ifeq ($(FULL_TARGET),armeb-embedded)
+override COMPILER_SOURCEDIR+=src
+endif
+ifdef REQUIRE_UNITSDIR
+override UNITSDIR+=$(REQUIRE_UNITSDIR)
+endif
+ifdef REQUIRE_PACKAGESDIR
+override PACKAGESDIR+=$(REQUIRE_PACKAGESDIR)
+endif
+ifdef ZIPINSTALL
+ifneq ($(findstring $(OS_TARGET),$(UNIXs)),)
+UNIXHier=1
+endif
+else
+ifneq ($(findstring $(OS_SOURCE),$(UNIXs)),)
+UNIXHier=1
+endif
+endif
+ifndef INSTALL_PREFIX
+ifdef PREFIX
+INSTALL_PREFIX=$(PREFIX)
+endif
+endif
+ifndef INSTALL_PREFIX
+ifdef UNIXHier
+INSTALL_PREFIX=/usr/local
+else
+ifdef INSTALL_FPCPACKAGE
+INSTALL_BASEDIR:=/pp
+else
+INSTALL_BASEDIR:=/$(PACKAGE_NAME)
+endif
+endif
+endif
+export INSTALL_PREFIX
+ifdef INSTALL_FPCSUBDIR
+export INSTALL_FPCSUBDIR
+endif
+ifndef DIST_DESTDIR
+DIST_DESTDIR:=$(BASEDIR)
+endif
+export DIST_DESTDIR
+ifndef COMPILER_UNITTARGETDIR
+ifdef PACKAGEDIR_MAIN
+COMPILER_UNITTARGETDIR=$(PACKAGEDIR_MAIN)/units/$(TARGETSUFFIX)
+else
+COMPILER_UNITTARGETDIR=units/$(TARGETSUFFIX)
+endif
+endif
+ifndef COMPILER_TARGETDIR
+COMPILER_TARGETDIR=.
+endif
+ifndef INSTALL_BASEDIR
+ifdef UNIXHier
+ifdef INSTALL_FPCPACKAGE
+INSTALL_BASEDIR:=$(INSTALL_PREFIX)/lib/fpc/$(FPC_VERSION)
+else
+INSTALL_BASEDIR:=$(INSTALL_PREFIX)/lib/$(PACKAGE_NAME)
+endif
+else
+INSTALL_BASEDIR:=$(INSTALL_PREFIX)
+endif
+endif
+ifndef INSTALL_BINDIR
+ifdef UNIXHier
+INSTALL_BINDIR:=$(INSTALL_PREFIX)/bin
+else
+INSTALL_BINDIR:=$(INSTALL_BASEDIR)/bin
+ifdef INSTALL_FPCPACKAGE
+ifdef CROSSCOMPILE
+ifdef CROSSINSTALL
+INSTALL_BINDIR:=$(INSTALL_BINDIR)/$(SOURCESUFFIX)
+else
+INSTALL_BINDIR:=$(INSTALL_BINDIR)/$(TARGETSUFFIX)
+endif
+else
+INSTALL_BINDIR:=$(INSTALL_BINDIR)/$(TARGETSUFFIX)
+endif
+endif
+endif
+endif
+ifndef INSTALL_UNITDIR
+INSTALL_UNITDIR:=$(INSTALL_BASEDIR)/units/$(TARGETSUFFIX)
+ifdef INSTALL_FPCPACKAGE
+ifdef PACKAGE_NAME
+INSTALL_UNITDIR:=$(INSTALL_UNITDIR)/$(PACKAGE_NAME)
+endif
+endif
+endif
+ifndef INSTALL_LIBDIR
+ifdef UNIXHier
+INSTALL_LIBDIR:=$(INSTALL_PREFIX)/lib
+else
+INSTALL_LIBDIR:=$(INSTALL_UNITDIR)
+endif
+endif
+ifndef INSTALL_SOURCEDIR
+ifdef UNIXHier
+ifdef BSDhier
+SRCPREFIXDIR=share/src
+else
+ifdef linuxHier
+SRCPREFIXDIR=share/src
+else
+SRCPREFIXDIR=src
+endif
+endif
+ifdef INSTALL_FPCPACKAGE
+ifdef INSTALL_FPCSUBDIR
+INSTALL_SOURCEDIR:=$(INSTALL_PREFIX)/$(SRCPREFIXDIR)/fpc-$(FPC_VERSION)/$(INSTALL_FPCSUBDIR)/$(PACKAGE_NAME)
+else
+INSTALL_SOURCEDIR:=$(INSTALL_PREFIX)/$(SRCPREFIXDIR)/fpc-$(FPC_VERSION)/$(PACKAGE_NAME)
+endif
+else
+INSTALL_SOURCEDIR:=$(INSTALL_PREFIX)/$(SRCPREFIXDIR)/$(PACKAGE_NAME)-$(PACKAGE_VERSION)
+endif
+else
+ifdef INSTALL_FPCPACKAGE
+ifdef INSTALL_FPCSUBDIR
+INSTALL_SOURCEDIR:=$(INSTALL_BASEDIR)/source/$(INSTALL_FPCSUBDIR)/$(PACKAGE_NAME)
+else
+INSTALL_SOURCEDIR:=$(INSTALL_BASEDIR)/source/$(PACKAGE_NAME)
+endif
+else
+INSTALL_SOURCEDIR:=$(INSTALL_BASEDIR)/source
+endif
+endif
+endif
+ifndef INSTALL_DOCDIR
+ifdef UNIXHier
+ifdef BSDhier
+DOCPREFIXDIR=share/doc
+else
+ifdef linuxHier
+DOCPREFIXDIR=share/doc
+else
+DOCPREFIXDIR=doc
+endif
+endif
+ifdef INSTALL_FPCPACKAGE
+INSTALL_DOCDIR:=$(INSTALL_PREFIX)/$(DOCPREFIXDIR)/fpc-$(FPC_VERSION)/$(PACKAGE_NAME)
+else
+INSTALL_DOCDIR:=$(INSTALL_PREFIX)/$(DOCPREFIXDIR)/$(PACKAGE_NAME)-$(PACKAGE_VERSION)
+endif
+else
+ifdef INSTALL_FPCPACKAGE
+INSTALL_DOCDIR:=$(INSTALL_BASEDIR)/doc/$(PACKAGE_NAME)
+else
+INSTALL_DOCDIR:=$(INSTALL_BASEDIR)/doc
+endif
+endif
+endif
+ifndef INSTALL_EXAMPLEDIR
+ifdef UNIXHier
+ifdef INSTALL_FPCPACKAGE
+ifdef BSDhier
+INSTALL_EXAMPLEDIR:=$(INSTALL_PREFIX)/share/examples/fpc-$(FPC_VERSION)/$(PACKAGE_NAME)
+else
+ifdef linuxHier
+INSTALL_EXAMPLEDIR:=$(INSTALL_DOCDIR)/examples
+else
+INSTALL_EXAMPLEDIR:=$(INSTALL_PREFIX)/doc/fpc-$(FPC_VERSION)/examples/$(PACKAGE_NAME)
+endif
+endif
+else
+ifdef BSDhier
+INSTALL_EXAMPLEDIR:=$(INSTALL_PREFIX)/share/examples/$(PACKAGE_NAME)-$(PACKAGE_VERSION)
+else
+ifdef linuxHier
+INSTALL_EXAMPLEDIR:=$(INSTALL_DOCDIR)/examples/$(PACKAGE_NAME)-$(PACKAGE_VERSION)
+else
+INSTALL_EXAMPLEDIR:=$(INSTALL_PREFIX)/doc/$(PACKAGE_NAME)-$(PACKAGE_VERSION)
+endif
+endif
+endif
+else
+ifdef INSTALL_FPCPACKAGE
+INSTALL_EXAMPLEDIR:=$(INSTALL_BASEDIR)/examples/$(PACKAGE_NAME)
+else
+INSTALL_EXAMPLEDIR:=$(INSTALL_BASEDIR)/examples
+endif
+endif
+endif
+ifndef INSTALL_DATADIR
+INSTALL_DATADIR=$(INSTALL_BASEDIR)
+endif
+ifndef INSTALL_SHAREDDIR
+INSTALL_SHAREDDIR=$(INSTALL_PREFIX)/lib
+endif
+ifdef CROSSCOMPILE
+ifndef CROSSBINDIR
+CROSSBINDIR:=$(wildcard $(CROSSTARGETDIR)/bin/$(SOURCESUFFIX))
+ifeq ($(CROSSBINDIR),)
+CROSSBINDIR:=$(wildcard $(INSTALL_BASEDIR)/cross/$(TARGETSUFFIX)/bin/$(FULL_SOURCE))
+endif
+endif
+else
+CROSSBINDIR=
+endif
+BATCHEXT=.bat
+LOADEREXT=.as
+EXEEXT=.exe
+PPLEXT=.ppl
+PPUEXT=.ppu
+OEXT=.o
+ASMEXT=.s
+SMARTEXT=.sl
+STATICLIBEXT=.a
+SHAREDLIBEXT=.so
+SHAREDLIBPREFIX=libfp
+STATICLIBPREFIX=libp
+IMPORTLIBPREFIX=libimp
+RSTEXT=.rst
+ifeq ($(findstring 1.0.,$(FPC_VERSION)),)
+ifeq ($(OS_TARGET),go32v1)
+STATICLIBPREFIX=
+SHORTSUFFIX=v1
+endif
+ifeq ($(OS_TARGET),go32v2)
+STATICLIBPREFIX=
+SHORTSUFFIX=dos
+IMPORTLIBPREFIX=
+endif
+ifeq ($(OS_TARGET),watcom)
+STATICLIBPREFIX=
+OEXT=.obj
+ASMEXT=.asm
+SHAREDLIBEXT=.dll
+SHORTSUFFIX=wat
+IMPORTLIBPREFIX=
+endif
+ifeq ($(OS_TARGET),linux)
+BATCHEXT=.sh
+EXEEXT=
+HASSHAREDLIB=1
+SHORTSUFFIX=lnx
+endif
+ifeq ($(OS_TARGET),freebsd)
+BATCHEXT=.sh
+EXEEXT=
+HASSHAREDLIB=1
+SHORTSUFFIX=fbs
+endif
+ifeq ($(OS_TARGET),netbsd)
+BATCHEXT=.sh
+EXEEXT=
+HASSHAREDLIB=1
+SHORTSUFFIX=nbs
+endif
+ifeq ($(OS_TARGET),openbsd)
+BATCHEXT=.sh
+EXEEXT=
+HASSHAREDLIB=1
+SHORTSUFFIX=obs
+endif
+ifeq ($(OS_TARGET),win32)
+SHAREDLIBEXT=.dll
+SHORTSUFFIX=w32
+endif
+ifeq ($(OS_TARGET),os2)
+BATCHEXT=.cmd
+AOUTEXT=.out
+STATICLIBPREFIX=
+SHAREDLIBEXT=.dll
+SHORTSUFFIX=os2
+ECHO=echo
+IMPORTLIBPREFIX=
+endif
+ifeq ($(OS_TARGET),emx)
+BATCHEXT=.cmd
+AOUTEXT=.out
+STATICLIBPREFIX=
+SHAREDLIBEXT=.dll
+SHORTSUFFIX=emx
+ECHO=echo
+IMPORTLIBPREFIX=
+endif
+ifeq ($(OS_TARGET),amiga)
+EXEEXT=
+SHAREDLIBEXT=.library
+SHORTSUFFIX=amg
+endif
+ifeq ($(OS_TARGET),morphos)
+EXEEXT=
+SHAREDLIBEXT=.library
+SHORTSUFFIX=mos
+endif
+ifeq ($(OS_TARGET),atari)
+EXEEXT=.ttp
+SHORTSUFFIX=ata
+endif
+ifeq ($(OS_TARGET),beos)
+BATCHEXT=.sh
+EXEEXT=
+SHORTSUFFIX=be
+endif
+ifeq ($(OS_TARGET),haiku)
+BATCHEXT=.sh
+EXEEXT=
+SHORTSUFFIX=hai
+endif
+ifeq ($(OS_TARGET),solaris)
+BATCHEXT=.sh
+EXEEXT=
+SHORTSUFFIX=sun
+endif
+ifeq ($(OS_TARGET),qnx)
+BATCHEXT=.sh
+EXEEXT=
+SHORTSUFFIX=qnx
+endif
+ifeq ($(OS_TARGET),netware)
+EXEEXT=.nlm
+STATICLIBPREFIX=
+SHORTSUFFIX=nw
+IMPORTLIBPREFIX=imp
+endif
+ifeq ($(OS_TARGET),netwlibc)
+EXEEXT=.nlm
+STATICLIBPREFIX=
+SHORTSUFFIX=nwl
+IMPORTLIBPREFIX=imp
+endif
+ifeq ($(OS_TARGET),macos)
+BATCHEXT=
+EXEEXT=
+DEBUGSYMEXT=.xcoff
+SHORTSUFFIX=mac
+IMPORTLIBPREFIX=imp
+endif
+ifeq ($(OS_TARGET),darwin)
+BATCHEXT=.sh
+EXEEXT=
+HASSHAREDLIB=1
+SHORTSUFFIX=dwn
+endif
+ifeq ($(OS_TARGET),gba)
+EXEEXT=.gba
+SHAREDLIBEXT=.so
+SHORTSUFFIX=gba
+endif
+ifeq ($(OS_TARGET),symbian)
+SHAREDLIBEXT=.dll
+SHORTSUFFIX=symbian
+endif
+else
+ifeq ($(OS_TARGET),go32v1)
+PPUEXT=.pp1
+OEXT=.o1
+ASMEXT=.s1
+SMARTEXT=.sl1
+STATICLIBEXT=.a1
+SHAREDLIBEXT=.so1
+STATICLIBPREFIX=
+SHORTSUFFIX=v1
+IMPORTLIBPREFIX=
+endif
+ifeq ($(OS_TARGET),go32v2)
+STATICLIBPREFIX=
+SHORTSUFFIX=dos
+IMPORTLIBPREFIX=
+endif
+ifeq ($(OS_TARGET),watcom)
+STATICLIBPREFIX=
+SHORTSUFFIX=wat
+IMPORTLIBPREFIX=
+endif
+ifeq ($(OS_TARGET),linux)
+BATCHEXT=.sh
+EXEEXT=
+HASSHAREDLIB=1
+SHORTSUFFIX=lnx
+endif
+ifeq ($(OS_TARGET),freebsd)
+BATCHEXT=.sh
+EXEEXT=
+HASSHAREDLIB=1
+SHORTSUFFIX=fbs
+endif
+ifeq ($(OS_TARGET),netbsd)
+BATCHEXT=.sh
+EXEEXT=
+HASSHAREDLIB=1
+SHORTSUFFIX=nbs
+endif
+ifeq ($(OS_TARGET),openbsd)
+BATCHEXT=.sh
+EXEEXT=
+HASSHAREDLIB=1
+SHORTSUFFIX=obs
+endif
+ifeq ($(OS_TARGET),win32)
+PPUEXT=.ppw
+OEXT=.ow
+ASMEXT=.sw
+SMARTEXT=.slw
+STATICLIBEXT=.aw
+SHAREDLIBEXT=.dll
+SHORTSUFFIX=w32
+endif
+ifeq ($(OS_TARGET),os2)
+BATCHEXT=.cmd
+PPUEXT=.ppo
+ASMEXT=.so2
+OEXT=.oo2
+AOUTEXT=.out
+SMARTEXT=.sl2
+STATICLIBPREFIX=
+STATICLIBEXT=.ao2
+SHAREDLIBEXT=.dll
+SHORTSUFFIX=os2
+ECHO=echo
+IMPORTLIBPREFIX=
+endif
+ifeq ($(OS_TARGET),amiga)
+EXEEXT=
+PPUEXT=.ppu
+ASMEXT=.s
+OEXT=.o
+SMARTEXT=.sl
+STATICLIBEXT=.a
+SHAREDLIBEXT=.library
+SHORTSUFFIX=amg
+endif
+ifeq ($(OS_TARGET),atari)
+PPUEXT=.ppu
+ASMEXT=.s
+OEXT=.o
+SMARTEXT=.sl
+STATICLIBEXT=.a
+EXEEXT=.ttp
+SHORTSUFFIX=ata
+endif
+ifeq ($(OS_TARGET),beos)
+BATCHEXT=.sh
+PPUEXT=.ppu
+ASMEXT=.s
+OEXT=.o
+SMARTEXT=.sl
+STATICLIBEXT=.a
+EXEEXT=
+SHORTSUFFIX=be
+endif
+ifeq ($(OS_TARGET),solaris)
+BATCHEXT=.sh
+PPUEXT=.ppu
+ASMEXT=.s
+OEXT=.o
+SMARTEXT=.sl
+STATICLIBEXT=.a
+EXEEXT=
+SHORTSUFFIX=sun
+endif
+ifeq ($(OS_TARGET),qnx)
+BATCHEXT=.sh
+PPUEXT=.ppu
+ASMEXT=.s
+OEXT=.o
+SMARTEXT=.sl
+STATICLIBEXT=.a
+EXEEXT=
+SHORTSUFFIX=qnx
+endif
+ifeq ($(OS_TARGET),netware)
+STATICLIBPREFIX=
+PPUEXT=.ppu
+OEXT=.o
+ASMEXT=.s
+SMARTEXT=.sl
+STATICLIBEXT=.a
+SHAREDLIBEXT=.nlm
+EXEEXT=.nlm
+SHORTSUFFIX=nw
+IMPORTLIBPREFIX=imp
+endif
+ifeq ($(OS_TARGET),netwlibc)
+STATICLIBPREFIX=
+PPUEXT=.ppu
+OEXT=.o
+ASMEXT=.s
+SMARTEXT=.sl
+STATICLIBEXT=.a
+SHAREDLIBEXT=.nlm
+EXEEXT=.nlm
+SHORTSUFFIX=nwl
+IMPORTLIBPREFIX=imp
+endif
+ifeq ($(OS_TARGET),macos)
+BATCHEXT=
+PPUEXT=.ppu
+ASMEXT=.s
+OEXT=.o
+SMARTEXT=.sl
+STATICLIBEXT=.a
+EXEEXT=
+DEBUGSYMEXT=.xcoff
+SHORTSUFFIX=mac
+IMPORTLIBPREFIX=imp
+endif
+endif
+ifneq ($(findstring $(OS_SOURCE),$(LIMIT83fs)),)
+FPCMADE=fpcmade.$(SHORTSUFFIX)
+ZIPSUFFIX=$(SHORTSUFFIX)
+ZIPCROSSPREFIX=
+ZIPSOURCESUFFIX=src
+ZIPEXAMPLESUFFIX=exm
+else
+FPCMADE=fpcmade.$(TARGETSUFFIX)
+ZIPSOURCESUFFIX=.source
+ZIPEXAMPLESUFFIX=.examples
+ifdef CROSSCOMPILE
+ZIPSUFFIX=.$(SOURCESUFFIX)
+ZIPCROSSPREFIX=$(TARGETSUFFIX)-
+else
+ZIPSUFFIX=.$(TARGETSUFFIX)
+ZIPCROSSPREFIX=
+endif
+endif
+ifndef ECHO
+ECHO:=$(strip $(wildcard $(addsuffix /gecho$(SRCEXEEXT),$(SEARCHPATH))))
+ifeq ($(ECHO),)
+ECHO:=$(strip $(wildcard $(addsuffix /echo$(SRCEXEEXT),$(SEARCHPATH))))
+ifeq ($(ECHO),)
+ECHO= __missing_command_ECHO
+else
+ECHO:=$(firstword $(ECHO))
+endif
+else
+ECHO:=$(firstword $(ECHO))
+endif
+endif
+export ECHO
+ifndef DATE
+DATE:=$(strip $(wildcard $(addsuffix /gdate$(SRCEXEEXT),$(SEARCHPATH))))
+ifeq ($(DATE),)
+DATE:=$(strip $(wildcard $(addsuffix /date$(SRCEXEEXT),$(SEARCHPATH))))
+ifeq ($(DATE),)
+DATE= __missing_command_DATE
+else
+DATE:=$(firstword $(DATE))
+endif
+else
+DATE:=$(firstword $(DATE))
+endif
+endif
+export DATE
+ifndef GINSTALL
+GINSTALL:=$(strip $(wildcard $(addsuffix /ginstall$(SRCEXEEXT),$(SEARCHPATH))))
+ifeq ($(GINSTALL),)
+GINSTALL:=$(strip $(wildcard $(addsuffix /install$(SRCEXEEXT),$(SEARCHPATH))))
+ifeq ($(GINSTALL),)
+GINSTALL= __missing_command_GINSTALL
+else
+GINSTALL:=$(firstword $(GINSTALL))
+endif
+else
+GINSTALL:=$(firstword $(GINSTALL))
+endif
+endif
+export GINSTALL
+ifndef CPPROG
+CPPROG:=$(strip $(wildcard $(addsuffix /cp$(SRCEXEEXT),$(SEARCHPATH))))
+ifeq ($(CPPROG),)
+CPPROG= __missing_command_CPPROG
+else
+CPPROG:=$(firstword $(CPPROG))
+endif
+endif
+export CPPROG
+ifndef RMPROG
+RMPROG:=$(strip $(wildcard $(addsuffix /rm$(SRCEXEEXT),$(SEARCHPATH))))
+ifeq ($(RMPROG),)
+RMPROG= __missing_command_RMPROG
+else
+RMPROG:=$(firstword $(RMPROG))
+endif
+endif
+export RMPROG
+ifndef MVPROG
+MVPROG:=$(strip $(wildcard $(addsuffix /mv$(SRCEXEEXT),$(SEARCHPATH))))
+ifeq ($(MVPROG),)
+MVPROG= __missing_command_MVPROG
+else
+MVPROG:=$(firstword $(MVPROG))
+endif
+endif
+export MVPROG
+ifndef MKDIRPROG
+MKDIRPROG:=$(strip $(wildcard $(addsuffix /gmkdir$(SRCEXEEXT),$(SEARCHPATH))))
+ifeq ($(MKDIRPROG),)
+MKDIRPROG:=$(strip $(wildcard $(addsuffix /mkdir$(SRCEXEEXT),$(SEARCHPATH))))
+ifeq ($(MKDIRPROG),)
+MKDIRPROG= __missing_command_MKDIRPROG
+else
+MKDIRPROG:=$(firstword $(MKDIRPROG))
+endif
+else
+MKDIRPROG:=$(firstword $(MKDIRPROG))
+endif
+endif
+export MKDIRPROG
+ifndef ECHOREDIR
+ifndef inUnix
+ECHOREDIR=echo
+else
+ECHOREDIR=$(ECHO)
+endif
+endif
+ifndef COPY
+COPY:=$(CPPROG) -fp
+endif
+ifndef COPYTREE
+COPYTREE:=$(CPPROG) -Rfp
+endif
+ifndef MKDIRTREE
+MKDIRTREE:=$(MKDIRPROG) -p
+endif
+ifndef MOVE
+MOVE:=$(MVPROG) -f
+endif
+ifndef DEL
+DEL:=$(RMPROG) -f
+endif
+ifndef DELTREE
+DELTREE:=$(RMPROG) -rf
+endif
+ifndef INSTALL
+ifdef inUnix
+INSTALL:=$(GINSTALL) -c -m 644
+else
+INSTALL:=$(COPY)
+endif
+endif
+ifndef INSTALLEXE
+ifdef inUnix
+INSTALLEXE:=$(GINSTALL) -c -m 755
+else
+INSTALLEXE:=$(COPY)
+endif
+endif
+ifndef MKDIR
+MKDIR:=$(GINSTALL) -m 755 -d
+endif
+export ECHOREDIR COPY COPYTREE MOVE DEL DELTREE INSTALL INSTALLEXE MKDIR
+ifndef PPUMOVE
+PPUMOVE:=$(strip $(wildcard $(addsuffix /ppumove$(SRCEXEEXT),$(SEARCHPATH))))
+ifeq ($(PPUMOVE),)
+PPUMOVE= __missing_command_PPUMOVE
+else
+PPUMOVE:=$(firstword $(PPUMOVE))
+endif
+endif
+export PPUMOVE
+ifndef FPCMAKE
+FPCMAKE:=$(strip $(wildcard $(addsuffix /fpcmake$(SRCEXEEXT),$(SEARCHPATH))))
+ifeq ($(FPCMAKE),)
+FPCMAKE= __missing_command_FPCMAKE
+else
+FPCMAKE:=$(firstword $(FPCMAKE))
+endif
+endif
+export FPCMAKE
+ifndef ZIPPROG
+ZIPPROG:=$(strip $(wildcard $(addsuffix /zip$(SRCEXEEXT),$(SEARCHPATH))))
+ifeq ($(ZIPPROG),)
+ZIPPROG= __missing_command_ZIPPROG
+else
+ZIPPROG:=$(firstword $(ZIPPROG))
+endif
+endif
+export ZIPPROG
+ifndef TARPROG
+TARPROG:=$(strip $(wildcard $(addsuffix /gtar$(SRCEXEEXT),$(SEARCHPATH))))
+ifeq ($(TARPROG),)
+TARPROG:=$(strip $(wildcard $(addsuffix /tar$(SRCEXEEXT),$(SEARCHPATH))))
+ifeq ($(TARPROG),)
+TARPROG= __missing_command_TARPROG
+else
+TARPROG:=$(firstword $(TARPROG))
+endif
+else
+TARPROG:=$(firstword $(TARPROG))
+endif
+endif
+export TARPROG
+ASNAME=$(BINUTILSPREFIX)as
+LDNAME=$(BINUTILSPREFIX)ld
+ARNAME=$(BINUTILSPREFIX)ar
+RCNAME=$(BINUTILSPREFIX)rc
+ifneq ($(findstring 1.0.,$(FPC_VERSION)),)
+ifeq ($(OS_TARGET),win32)
+ifeq ($(CROSSBINDIR),)
+ASNAME=asw
+LDNAME=ldw
+ARNAME=arw
+endif
+endif
+endif
+ifndef ASPROG
+ifdef CROSSBINDIR
+ASPROG=$(CROSSBINDIR)/$(ASNAME)$(SRCEXEEXT)
+else
+ASPROG=$(ASNAME)
+endif
+endif
+ifndef LDPROG
+ifdef CROSSBINDIR
+LDPROG=$(CROSSBINDIR)/$(LDNAME)$(SRCEXEEXT)
+else
+LDPROG=$(LDNAME)
+endif
+endif
+ifndef RCPROG
+ifdef CROSSBINDIR
+RCPROG=$(CROSSBINDIR)/$(RCNAME)$(SRCEXEEXT)
+else
+RCPROG=$(RCNAME)
+endif
+endif
+ifndef ARPROG
+ifdef CROSSBINDIR
+ARPROG=$(CROSSBINDIR)/$(ARNAME)$(SRCEXEEXT)
+else
+ARPROG=$(ARNAME)
+endif
+endif
+AS=$(ASPROG)
+LD=$(LDPROG)
+RC=$(RCPROG)
+AR=$(ARPROG)
+PPAS=ppas$(SRCBATCHEXT)
+ifdef inUnix
+LDCONFIG=ldconfig
+else
+LDCONFIG=
+endif
+ifdef DATE
+DATESTR:=$(shell $(DATE) +%Y%m%d)
+else
+DATESTR=
+endif
+ifndef UPXPROG
+ifeq ($(OS_TARGET),go32v2)
+UPXPROG:=1
+endif
+ifeq ($(OS_TARGET),win32)
+UPXPROG:=1
+endif
+ifdef UPXPROG
+UPXPROG:=$(strip $(wildcard $(addsuffix /upx$(SRCEXEEXT),$(SEARCHPATH))))
+ifeq ($(UPXPROG),)
+UPXPROG=
+else
+UPXPROG:=$(firstword $(UPXPROG))
+endif
+else
+UPXPROG=
+endif
+endif
+export UPXPROG
+ZIPOPT=-9
+ZIPEXT=.zip
+ifeq ($(USETAR),bz2)
+TAROPT=vj
+TAREXT=.tar.bz2
+else
+TAROPT=vz
+TAREXT=.tar.gz
+endif
+override REQUIRE_PACKAGES=rtl univint
+ifeq ($(FULL_TARGET),i386-linux)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),i386-go32v2)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),i386-win32)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),i386-os2)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),i386-freebsd)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),i386-beos)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),i386-haiku)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),i386-netbsd)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),i386-solaris)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),i386-qnx)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),i386-netware)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),i386-openbsd)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),i386-wdosx)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),i386-darwin)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),i386-emx)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),i386-watcom)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),i386-netwlibc)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),i386-wince)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),i386-embedded)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),i386-symbian)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),m68k-linux)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),m68k-freebsd)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),m68k-netbsd)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),m68k-amiga)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),m68k-atari)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),m68k-openbsd)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),m68k-palmos)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),m68k-embedded)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),powerpc-linux)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),powerpc-netbsd)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),powerpc-amiga)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),powerpc-macos)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),powerpc-darwin)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),powerpc-morphos)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),powerpc-embedded)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),sparc-linux)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),sparc-netbsd)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),sparc-solaris)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),sparc-embedded)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),x86_64-linux)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),x86_64-freebsd)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),x86_64-darwin)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),x86_64-win64)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),x86_64-embedded)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),arm-linux)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),arm-palmos)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),arm-darwin)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),arm-wince)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),arm-gba)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),arm-nds)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),arm-embedded)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),arm-symbian)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),powerpc64-linux)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),powerpc64-darwin)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),powerpc64-embedded)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),avr-embedded)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),armeb-linux)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifeq ($(FULL_TARGET),armeb-embedded)
+REQUIRE_PACKAGES_RTL=1
+REQUIRE_PACKAGES_UNIVINT=1
+endif
+ifdef REQUIRE_PACKAGES_RTL
+PACKAGEDIR_RTL:=$(firstword $(subst /Makefile.fpc,,$(strip $(wildcard $(addsuffix /rtl/Makefile.fpc,$(PACKAGESDIR))))))
+ifneq ($(PACKAGEDIR_RTL),)
+ifneq ($(wildcard $(PACKAGEDIR_RTL)/units/$(TARGETSUFFIX)),)
+UNITDIR_RTL=$(PACKAGEDIR_RTL)/units/$(TARGETSUFFIX)
+else
+UNITDIR_RTL=$(PACKAGEDIR_RTL)
+endif
+ifdef CHECKDEPEND
+$(PACKAGEDIR_RTL)/$(FPCMADE):
+	$(MAKE) -C $(PACKAGEDIR_RTL) $(FPCMADE)
+override ALLDEPENDENCIES+=$(PACKAGEDIR_RTL)/$(FPCMADE)
+endif
+else
+PACKAGEDIR_RTL=
+UNITDIR_RTL:=$(subst /Package.fpc,,$(strip $(wildcard $(addsuffix /rtl/Package.fpc,$(UNITSDIR)))))
+ifneq ($(UNITDIR_RTL),)
+UNITDIR_RTL:=$(firstword $(UNITDIR_RTL))
+else
+UNITDIR_RTL=
+endif
+endif
+ifdef UNITDIR_RTL
+override COMPILER_UNITDIR+=$(UNITDIR_RTL)
+endif
+endif
+ifdef REQUIRE_PACKAGES_UNIVINT
+PACKAGEDIR_UNIVINT:=$(firstword $(subst /Makefile.fpc,,$(strip $(wildcard $(addsuffix /univint/Makefile.fpc,$(PACKAGESDIR))))))
+ifneq ($(PACKAGEDIR_UNIVINT),)
+ifneq ($(wildcard $(PACKAGEDIR_UNIVINT)/units/$(TARGETSUFFIX)),)
+UNITDIR_UNIVINT=$(PACKAGEDIR_UNIVINT)/units/$(TARGETSUFFIX)
+else
+UNITDIR_UNIVINT=$(PACKAGEDIR_UNIVINT)
+endif
+ifdef CHECKDEPEND
+$(PACKAGEDIR_UNIVINT)/$(FPCMADE):
+	$(MAKE) -C $(PACKAGEDIR_UNIVINT) $(FPCMADE)
+override ALLDEPENDENCIES+=$(PACKAGEDIR_UNIVINT)/$(FPCMADE)
+endif
+else
+PACKAGEDIR_UNIVINT=
+UNITDIR_UNIVINT:=$(subst /Package.fpc,,$(strip $(wildcard $(addsuffix /univint/Package.fpc,$(UNITSDIR)))))
+ifneq ($(UNITDIR_UNIVINT),)
+UNITDIR_UNIVINT:=$(firstword $(UNITDIR_UNIVINT))
+else
+UNITDIR_UNIVINT=
+endif
+endif
+ifdef UNITDIR_UNIVINT
+override COMPILER_UNITDIR+=$(UNITDIR_UNIVINT)
+endif
+endif
+ifndef NOCPUDEF
+override FPCOPTDEF=$(ARCH)
+endif
+ifneq ($(OS_TARGET),$(OS_SOURCE))
+override FPCOPT+=-T$(OS_TARGET)
+endif
+ifneq ($(CPU_TARGET),$(CPU_SOURCE))
+override FPCOPT+=-P$(ARCH)
+endif
+ifeq ($(OS_SOURCE),openbsd)
+override FPCOPT+=-FD$(NEW_BINUTILS_PATH)
+endif
+ifndef CROSSBOOTSTRAP
+ifneq ($(BINUTILSPREFIX),)
+override FPCOPT+=-XP$(BINUTILSPREFIX)
+endif
+ifneq ($(BINUTILSPREFIX),)
+override FPCOPT+=-Xr$(RLINKPATH)
+endif
+endif
+ifdef UNITDIR
+override FPCOPT+=$(addprefix -Fu,$(UNITDIR))
+endif
+ifdef LIBDIR
+override FPCOPT+=$(addprefix -Fl,$(LIBDIR))
+endif
+ifdef OBJDIR
+override FPCOPT+=$(addprefix -Fo,$(OBJDIR))
+endif
+ifdef INCDIR
+override FPCOPT+=$(addprefix -Fi,$(INCDIR))
+endif
+ifdef LINKSMART
+override FPCOPT+=-XX
+endif
+ifdef CREATESMART
+override FPCOPT+=-CX
+endif
+ifdef DEBUG
+override FPCOPT+=-gl
+override FPCOPTDEF+=DEBUG
+endif
+ifdef RELEASE
+ifneq ($(findstring 2.0.,$(FPC_VERSION)),)
+ifeq ($(CPU_TARGET),i386)
+FPCCPUOPT:=-OG2p3
+endif
+ifeq ($(CPU_TARGET),powerpc)
+FPCCPUOPT:=-O1r
+endif
+else
+FPCCPUOPT:=-O2
+endif
+override FPCOPT+=-Ur -Xs $(FPCCPUOPT) -n
+override FPCOPTDEF+=RELEASE
+endif
+ifdef STRIP
+override FPCOPT+=-Xs
+endif
+ifdef OPTIMIZE
+override FPCOPT+=-O2
+endif
+ifdef VERBOSE
+override FPCOPT+=-vwni
+endif
+ifdef COMPILER_OPTIONS
+override FPCOPT+=$(COMPILER_OPTIONS)
+endif
+ifdef COMPILER_UNITDIR
+override FPCOPT+=$(addprefix -Fu,$(COMPILER_UNITDIR))
+endif
+ifdef COMPILER_LIBRARYDIR
+override FPCOPT+=$(addprefix -Fl,$(COMPILER_LIBRARYDIR))
+endif
+ifdef COMPILER_OBJECTDIR
+override FPCOPT+=$(addprefix -Fo,$(COMPILER_OBJECTDIR))
+endif
+ifdef COMPILER_INCLUDEDIR
+override FPCOPT+=$(addprefix -Fi,$(COMPILER_INCLUDEDIR))
+endif
+ifdef CROSSBINDIR
+override FPCOPT+=-FD$(CROSSBINDIR)
+endif
+ifdef COMPILER_TARGETDIR
+override FPCOPT+=-FE$(COMPILER_TARGETDIR)
+ifeq ($(COMPILER_TARGETDIR),.)
+override TARGETDIRPREFIX=
+else
+override TARGETDIRPREFIX=$(COMPILER_TARGETDIR)/
+endif
+endif
+ifdef COMPILER_UNITTARGETDIR
+override FPCOPT+=-FU$(COMPILER_UNITTARGETDIR)
+ifeq ($(COMPILER_UNITTARGETDIR),.)
+override UNITTARGETDIRPREFIX=
+else
+override UNITTARGETDIRPREFIX=$(COMPILER_UNITTARGETDIR)/
+endif
+else
+ifdef COMPILER_TARGETDIR
+override COMPILER_UNITTARGETDIR=$(COMPILER_TARGETDIR)
+override UNITTARGETDIRPREFIX=$(TARGETDIRPREFIX)
+endif
+endif
+ifdef CREATESHARED
+override FPCOPT+=-Cg
+ifeq ($(CPU_TARGET),i386)
+override FPCOPT+=-Aas
+endif
+endif
+ifeq ($(findstring 2.0.,$(FPC_VERSION)),)
+ifeq ($(OS_TARGET),linux)
+ifeq ($(CPU_TARGET),x86_64)
+override FPCOPT+=-Cg
+endif
+endif
+endif
+ifdef LINKSHARED
+endif
+ifdef OPT
+override FPCOPT+=$(OPT)
+endif
+ifdef FPCOPTDEF
+override FPCOPT+=$(addprefix -d,$(FPCOPTDEF))
+endif
+ifdef CFGFILE
+override FPCOPT+=@$(CFGFILE)
+endif
+ifdef USEENV
+override FPCEXTCMD:=$(FPCOPT)
+override FPCOPT:=!FPCEXTCMD
+export FPCEXTCMD
+endif
+override AFULL_TARGET=$(CPU_TARGET)-$(OS_TARGET)
+override AFULL_SOURCE=$(CPU_SOURCE)-$(OS_SOURCE)
+ifneq ($(AFULL_TARGET),$(AFULL_SOURCE))
+override ACROSSCOMPILE=1
+endif
+ifdef ACROSSCOMPILE
+override FPCOPT+=$(CROSSOPT)
+endif
+override COMPILER:=$(FPC) $(FPCOPT)
+ifeq (,$(findstring -s ,$(COMPILER)))
+EXECPPAS=
+else
+ifeq ($(FULL_SOURCE),$(FULL_TARGET))
+ifdef RUNBATCH
+EXECPPAS:=@$(RUNBATCH) $(PPAS)
+else
+EXECPPAS:=@$(PPAS)
+endif
+endif
+endif
+.PHONY: fpc_units
+ifneq ($(TARGET_UNITS)$(TARGET_IMPLICITUNITS),)
+override ALLTARGET+=fpc_units
+override UNITPPUFILES=$(addsuffix $(PPUEXT),$(TARGET_UNITS))
+override IMPLICITUNITPPUFILES=$(addsuffix $(PPUEXT),$(TARGET_IMPLICITUNITS))
+override INSTALLPPUFILES+=$(UNITPPUFILES) $(IMPLICITUNITPPUFILES)
+override CLEANPPUFILES+=$(UNITPPUFILES) $(IMPLICITUNITPPUFILES)
+endif
+fpc_units: $(COMPILER_UNITTARGETDIR) $(UNITPPUFILES)
+ifdef TARGET_RSTS
+override RSTFILES=$(addsuffix $(RSTEXT),$(TARGET_RSTS))
+override CLEANRSTFILES+=$(RSTFILES)
+endif
+.PHONY: fpc_all fpc_smart fpc_debug fpc_release fpc_shared
+$(FPCMADE): $(ALLDEPENDENCIES) $(ALLTARGET)
+	@$(ECHOREDIR) Compiled > $(FPCMADE)
+fpc_all: $(FPCMADE)
+fpc_smart:
+	$(MAKE) all LINKSMART=1 CREATESMART=1
+fpc_debug:
+	$(MAKE) all DEBUG=1
+fpc_release:
+	$(MAKE) all RELEASE=1
+.SUFFIXES: $(EXEEXT) $(PPUEXT) $(OEXT) .pas .lpr .dpr .pp .rc .res
+$(COMPILER_UNITTARGETDIR):
+	$(MKDIRTREE) $(COMPILER_UNITTARGETDIR)
+$(COMPILER_TARGETDIR):
+	$(MKDIRTREE) $(COMPILER_TARGETDIR)
+%$(PPUEXT): %.pp
+	$(COMPILER) $<
+	$(EXECPPAS)
+%$(PPUEXT): %.pas
+	$(COMPILER) $<
+	$(EXECPPAS)
+%$(EXEEXT): %.pp
+	$(COMPILER) $<
+	$(EXECPPAS)
+%$(EXEEXT): %.pas
+	$(COMPILER) $<
+	$(EXECPPAS)
+%$(EXEEXT): %.lpr
+	$(COMPILER) $<
+	$(EXECPPAS)
+%$(EXEEXT): %.dpr
+	$(COMPILER) $<
+	$(EXECPPAS)
+%.res: %.rc
+	windres -i $< -o $@
+vpath %.pp $(COMPILER_SOURCEDIR) $(COMPILER_INCLUDEDIR)
+vpath %.pas $(COMPILER_SOURCEDIR) $(COMPILER_INCLUDEDIR)
+vpath %.lpr $(COMPILER_SOURCEDIR) $(COMPILER_INCLUDEDIR)
+vpath %.dpr $(COMPILER_SOURCEDIR) $(COMPILER_INCLUDEDIR)
+vpath %.inc $(COMPILER_INCLUDEDIR)
+vpath %$(OEXT) $(COMPILER_UNITTARGETDIR)
+vpath %$(PPUEXT) $(COMPILER_UNITTARGETDIR)
+.PHONY: fpc_shared
+override INSTALLTARGET+=fpc_shared_install
+ifndef SHARED_LIBVERSION
+SHARED_LIBVERSION=$(FPC_VERSION)
+endif
+ifndef SHARED_LIBNAME
+SHARED_LIBNAME=$(PACKAGE_NAME)
+endif
+ifndef SHARED_FULLNAME
+SHARED_FULLNAME=$(SHAREDLIBPREFIX)$(SHARED_LIBNAME)-$(SHARED_LIBVERSION)$(SHAREDLIBEXT)
+endif
+ifndef SHARED_LIBUNITS
+SHARED_LIBUNITS:=$(TARGET_UNITS) $(TARGET_IMPLICITUNITS)
+override SHARED_LIBUNITS:=$(filter-out $(INSTALL_BUILDUNIT),$(SHARED_LIBUNITS))
+endif
+fpc_shared:
+ifdef HASSHAREDLIB
+	$(MAKE) all CREATESHARED=1 LINKSHARED=1 CREATESMART=1
+ifneq ($(SHARED_BUILD),n)
+	$(PPUMOVE) -q $(SHARED_LIBUNITS) -i$(COMPILER_UNITTARGETDIR) -o$(SHARED_FULLNAME) -d$(COMPILER_UNITTARGETDIR)
+endif
+else
+	@$(ECHO) Shared Libraries not supported
+endif
+fpc_shared_install:
+ifneq ($(SHARED_BUILD),n)
+ifneq ($(SHARED_LIBUNITS),)
+ifneq ($(wildcard $(COMPILER_UNITTARGETDIR)/$(SHARED_FULLNAME)),)
+	$(INSTALL) $(COMPILER_UNITTARGETDIR)/$(SHARED_FULLNAME) $(INSTALL_SHAREDDIR)
+endif
+endif
+endif
+.PHONY: fpc_install fpc_sourceinstall fpc_exampleinstall
+ifdef INSTALL_UNITS
+override INSTALLPPUFILES+=$(addsuffix $(PPUEXT),$(INSTALL_UNITS))
+endif
+ifdef INSTALL_BUILDUNIT
+override INSTALLPPUFILES:=$(filter-out $(INSTALL_BUILDUNIT)$(PPUEXT),$(INSTALLPPUFILES))
+endif
+ifdef INSTALLPPUFILES
+override INSTALLPPULINKFILES:=$(subst $(PPUEXT),$(OEXT),$(INSTALLPPUFILES)) $(addprefix $(STATICLIBPREFIX),$(subst $(PPUEXT),$(STATICLIBEXT),$(INSTALLPPUFILES))) $(addprefix $(IMPORTLIBPREFIX),$(subst $(PPUEXT),$(STATICLIBEXT),$(INSTALLPPUFILES)))
+ifneq ($(UNITTARGETDIRPREFIX),)
+override INSTALLPPUFILES:=$(addprefix $(UNITTARGETDIRPREFIX),$(notdir $(INSTALLPPUFILES)))
+override INSTALLPPULINKFILES:=$(wildcard $(addprefix $(UNITTARGETDIRPREFIX),$(notdir $(INSTALLPPULINKFILES))))
+endif
+override INSTALL_CREATEPACKAGEFPC=1
+endif
+ifdef INSTALLEXEFILES
+ifneq ($(TARGETDIRPREFIX),)
+override INSTALLEXEFILES:=$(addprefix $(TARGETDIRPREFIX),$(notdir $(INSTALLEXEFILES)))
+endif
+endif
+fpc_install: all $(INSTALLTARGET)
+ifdef INSTALLEXEFILES
+	$(MKDIR) $(INSTALL_BINDIR)
+ifdef UPXPROG
+	-$(UPXPROG) $(INSTALLEXEFILES)
+endif
+	$(INSTALLEXE) $(INSTALLEXEFILES) $(INSTALL_BINDIR)
+endif
+ifdef INSTALL_CREATEPACKAGEFPC
+ifdef FPCMAKE
+ifdef PACKAGE_VERSION
+ifneq ($(wildcard Makefile.fpc),)
+	$(FPCMAKE) -p -T$(CPU_TARGET)-$(OS_TARGET) Makefile.fpc
+	$(MKDIR) $(INSTALL_UNITDIR)
+	$(INSTALL) Package.fpc $(INSTALL_UNITDIR)
+endif
+endif
+endif
+endif
+ifdef INSTALLPPUFILES
+	$(MKDIR) $(INSTALL_UNITDIR)
+	$(INSTALL) $(INSTALLPPUFILES) $(INSTALL_UNITDIR)
+ifneq ($(INSTALLPPULINKFILES),)
+	$(INSTALL) $(INSTALLPPULINKFILES) $(INSTALL_UNITDIR)
+endif
+ifneq ($(wildcard $(LIB_FULLNAME)),)
+	$(MKDIR) $(INSTALL_LIBDIR)
+	$(INSTALL) $(LIB_FULLNAME) $(INSTALL_LIBDIR)
+ifdef inUnix
+	ln -sf $(LIB_FULLNAME) $(INSTALL_LIBDIR)/$(LIB_NAME)
+endif
+endif
+endif
+ifdef INSTALL_FILES
+	$(MKDIR) $(INSTALL_DATADIR)
+	$(INSTALL) $(INSTALL_FILES) $(INSTALL_DATADIR)
+endif
+fpc_sourceinstall: distclean
+	$(MKDIR) $(INSTALL_SOURCEDIR)
+	$(COPYTREE) $(BASEDIR)/* $(INSTALL_SOURCEDIR)
+fpc_exampleinstall: $(addsuffix _distclean,$(TARGET_EXAMPLEDIRS))
+ifdef HASEXAMPLES
+	$(MKDIR) $(INSTALL_EXAMPLEDIR)
+endif
+ifdef EXAMPLESOURCEFILES
+	$(COPY) $(EXAMPLESOURCEFILES) $(INSTALL_EXAMPLEDIR)
+endif
+ifdef TARGET_EXAMPLEDIRS
+	$(COPYTREE) $(addsuffix /*,$(TARGET_EXAMPLEDIRS)) $(INSTALL_EXAMPLEDIR)
+endif
+.PHONY: fpc_distinstall
+fpc_distinstall: install exampleinstall
+.PHONY: fpc_zipinstall fpc_zipsourceinstall fpc_zipexampleinstall
+ifndef PACKDIR
+ifndef inUnix
+PACKDIR=$(BASEDIR)/../fpc-pack
+else
+PACKDIR=/tmp/fpc-pack
+endif
+endif
+ifndef ZIPNAME
+ifdef DIST_ZIPNAME
+ZIPNAME=$(DIST_ZIPNAME)
+else
+ZIPNAME=$(PACKAGE_NAME)
+endif
+endif
+ifndef FULLZIPNAME
+FULLZIPNAME=$(ZIPCROSSPREFIX)$(ZIPPREFIX)$(ZIPNAME)$(ZIPSUFFIX)
+endif
+ifndef ZIPTARGET
+ifdef DIST_ZIPTARGET
+ZIPTARGET=DIST_ZIPTARGET
+else
+ZIPTARGET=install
+endif
+endif
+ifndef USEZIP
+ifdef inUnix
+USETAR=1
+endif
+endif
+ifndef inUnix
+USEZIPWRAPPER=1
+endif
+ifdef USEZIPWRAPPER
+ZIPPATHSEP=$(PATHSEP)
+ZIPWRAPPER=$(subst /,$(PATHSEP),$(DIST_DESTDIR)/fpczip$(SRCBATCHEXT))
+else
+ZIPPATHSEP=/
+endif
+ZIPCMD_CDPACK:=cd $(subst /,$(ZIPPATHSEP),$(PACKDIR))
+ZIPCMD_CDBASE:=cd $(subst /,$(ZIPPATHSEP),$(BASEDIR))
+ifdef USETAR
+ZIPDESTFILE:=$(DIST_DESTDIR)/$(FULLZIPNAME)$(TAREXT)
+ZIPCMD_ZIP:=$(TARPROG) cf$(TAROPT) $(ZIPDESTFILE) *
+else
+ZIPDESTFILE:=$(DIST_DESTDIR)/$(FULLZIPNAME)$(ZIPEXT)
+ZIPCMD_ZIP:=$(subst /,$(ZIPPATHSEP),$(ZIPPROG)) -Dr $(ZIPOPT) $(ZIPDESTFILE) *
+endif
+fpc_zipinstall:
+	$(MAKE) $(ZIPTARGET) INSTALL_PREFIX=$(PACKDIR) ZIPINSTALL=1
+	$(MKDIR) $(DIST_DESTDIR)
+	$(DEL) $(ZIPDESTFILE)
+ifdef USEZIPWRAPPER
+ifneq ($(ECHOREDIR),echo)
+	$(ECHOREDIR) -e "$(subst \,\\,$(ZIPCMD_CDPACK))" > $(ZIPWRAPPER)
+	$(ECHOREDIR) -e "$(subst \,\\,$(ZIPCMD_ZIP))" >> $(ZIPWRAPPER)
+	$(ECHOREDIR) -e "$(subst \,\\,$(ZIPCMD_CDBASE))" >> $(ZIPWRAPPER)
+else
+	echo $(ZIPCMD_CDPACK) > $(ZIPWRAPPER)
+	echo $(ZIPCMD_ZIP) >> $(ZIPWRAPPER)
+	echo $(ZIPCMD_CDBASE) >> $(ZIPWRAPPER)
+endif
+ifdef inUnix
+	/bin/sh $(ZIPWRAPPER)
+else
+ifdef RUNBATCH
+	$(RUNBATCH) $(ZIPWRAPPER)
+else
+	$(ZIPWRAPPER)
+endif
+endif
+	$(DEL) $(ZIPWRAPPER)
+else
+	$(ZIPCMD_CDPACK) ; $(ZIPCMD_ZIP) ; $(ZIPCMD_CDBASE)
+endif
+	$(DELTREE) $(PACKDIR)
+fpc_zipsourceinstall:
+	$(MAKE) fpc_zipinstall ZIPTARGET=sourceinstall ZIPSUFFIX=$(ZIPSOURCESUFFIX)
+fpc_zipexampleinstall:
+ifdef HASEXAMPLES
+	$(MAKE) fpc_zipinstall ZIPTARGET=exampleinstall ZIPSUFFIX=$(ZIPEXAMPLESUFFIX)
+endif
+fpc_zipdistinstall:
+	$(MAKE) fpc_zipinstall ZIPTARGET=distinstall
+.PHONY: fpc_clean fpc_cleanall fpc_distclean
+ifdef EXEFILES
+override CLEANEXEFILES:=$(addprefix $(TARGETDIRPREFIX),$(CLEANEXEFILES))
+endif
+ifdef CLEAN_UNITS
+override CLEANPPUFILES+=$(addsuffix $(PPUEXT),$(CLEAN_UNITS))
+endif
+ifdef CLEANPPUFILES
+override CLEANPPULINKFILES:=$(subst $(PPUEXT),$(OEXT),$(CLEANPPUFILES)) $(addprefix $(STATICLIBPREFIX),$(subst $(PPUEXT),$(STATICLIBEXT),$(CLEANPPUFILES))) $(addprefix $(IMPORTLIBPREFIX),$(subst $(PPUEXT),$(STATICLIBEXT),$(CLEANPPUFILES)))
+ifdef DEBUGSYMEXT
+override CLEANPPULINKFILES+=$(subst $(PPUEXT),$(DEBUGSYMEXT),$(CLEANPPUFILES))
+endif
+override CLEANPPUFILES:=$(addprefix $(UNITTARGETDIRPREFIX),$(CLEANPPUFILES))
+override CLEANPPULINKFILES:=$(wildcard $(addprefix $(UNITTARGETDIRPREFIX),$(CLEANPPULINKFILES)))
+endif
+fpc_clean: $(CLEANTARGET)
+ifdef CLEANEXEFILES
+	-$(DEL) $(CLEANEXEFILES)
+endif
+ifdef CLEANPPUFILES
+	-$(DEL) $(CLEANPPUFILES)
+endif
+ifneq ($(CLEANPPULINKFILES),)
+	-$(DEL) $(CLEANPPULINKFILES)
+endif
+ifdef CLEANRSTFILES
+	-$(DEL) $(addprefix $(UNITTARGETDIRPREFIX),$(CLEANRSTFILES))
+endif
+ifdef CLEAN_FILES
+	-$(DEL) $(CLEAN_FILES)
+endif
+ifdef LIB_NAME
+	-$(DEL) $(LIB_NAME) $(LIB_FULLNAME)
+endif
+	-$(DEL) $(FPCMADE) Package.fpc $(PPAS) script.res link.res $(FPCEXTFILE) $(REDIRFILE)
+	-$(DEL) *$(ASMEXT) *_ppas$(BATCHEXT)
+fpc_cleanall: $(CLEANTARGET)
+ifdef CLEANEXEFILES
+	-$(DEL) $(CLEANEXEFILES)
+endif
+ifdef COMPILER_UNITTARGETDIR
+ifdef CLEANPPUFILES
+	-$(DEL) $(CLEANPPUFILES)
+endif
+ifneq ($(CLEANPPULINKFILES),)
+	-$(DEL) $(CLEANPPULINKFILES)
+endif
+ifdef CLEANRSTFILES
+	-$(DEL) $(addprefix $(UNITTARGETDIRPREFIX),$(CLEANRSTFILES))
+endif
+endif
+	-$(DELTREE) units
+	-$(DEL) *$(OEXT) *$(PPUEXT) *$(RSTEXT) *$(ASMEXT) *$(STATICLIBEXT) *$(SHAREDLIBEXT) *$(PPLEXT)
+ifneq ($(PPUEXT),.ppu)
+	-$(DEL) *.o *.ppu *.a
+endif
+	-$(DELTREE) *$(SMARTEXT)
+	-$(DEL) fpcmade.* Package.fpc $(PPAS) script.res link.res $(FPCEXTFILE) $(REDIRFILE)
+	-$(DEL) *_ppas$(BATCHEXT)
+ifdef AOUTEXT
+	-$(DEL) *$(AOUTEXT)
+endif
+ifdef DEBUGSYMEXT
+	-$(DEL) *$(DEBUGSYMEXT)
+endif
+fpc_distclean: cleanall
+.PHONY: fpc_baseinfo
+override INFORULES+=fpc_baseinfo
+fpc_baseinfo:
+	@$(ECHO)
+	@$(ECHO)  == Package info ==
+	@$(ECHO)  Package Name..... $(PACKAGE_NAME)
+	@$(ECHO)  Package Version.. $(PACKAGE_VERSION)
+	@$(ECHO)
+	@$(ECHO)  == Configuration info ==
+	@$(ECHO)
+	@$(ECHO)  FPC.......... $(FPC)
+	@$(ECHO)  FPC Version.. $(FPC_VERSION)
+	@$(ECHO)  Source CPU... $(CPU_SOURCE)
+	@$(ECHO)  Target CPU... $(CPU_TARGET)
+	@$(ECHO)  Source OS.... $(OS_SOURCE)
+	@$(ECHO)  Target OS.... $(OS_TARGET)
+	@$(ECHO)  Full Source.. $(FULL_SOURCE)
+	@$(ECHO)  Full Target.. $(FULL_TARGET)
+	@$(ECHO)  SourceSuffix. $(SOURCESUFFIX)
+	@$(ECHO)  TargetSuffix. $(TARGETSUFFIX)
+	@$(ECHO)
+	@$(ECHO)  == Directory info ==
+	@$(ECHO)
+	@$(ECHO)  Required pkgs... $(REQUIRE_PACKAGES)
+	@$(ECHO)
+	@$(ECHO)  Basedir......... $(BASEDIR)
+	@$(ECHO)  FPCDir.......... $(FPCDIR)
+	@$(ECHO)  CrossBinDir..... $(CROSSBINDIR)
+	@$(ECHO)  UnitsDir........ $(UNITSDIR)
+	@$(ECHO)  PackagesDir..... $(PACKAGESDIR)
+	@$(ECHO)
+	@$(ECHO)  GCC library..... $(GCCLIBDIR)
+	@$(ECHO)  Other library... $(OTHERLIBDIR)
+	@$(ECHO)
+	@$(ECHO)  == Tools info ==
+	@$(ECHO)
+	@$(ECHO)  As........ $(AS)
+	@$(ECHO)  Ld........ $(LD)
+	@$(ECHO)  Ar........ $(AR)
+	@$(ECHO)  Rc........ $(RC)
+	@$(ECHO)
+	@$(ECHO)  Mv........ $(MVPROG)
+	@$(ECHO)  Cp........ $(CPPROG)
+	@$(ECHO)  Rm........ $(RMPROG)
+	@$(ECHO)  GInstall.. $(GINSTALL)
+	@$(ECHO)  Echo...... $(ECHO)
+	@$(ECHO)  Shell..... $(SHELL)
+	@$(ECHO)  Date...... $(DATE)
+	@$(ECHO)  FPCMake... $(FPCMAKE)
+	@$(ECHO)  PPUMove... $(PPUMOVE)
+	@$(ECHO)  Upx....... $(UPXPROG)
+	@$(ECHO)  Zip....... $(ZIPPROG)
+	@$(ECHO)
+	@$(ECHO)  == Object info ==
+	@$(ECHO)
+	@$(ECHO)  Target Loaders........ $(TARGET_LOADERS)
+	@$(ECHO)  Target Units.......... $(TARGET_UNITS)
+	@$(ECHO)  Target Implicit Units. $(TARGET_IMPLICITUNITS)
+	@$(ECHO)  Target Programs....... $(TARGET_PROGRAMS)
+	@$(ECHO)  Target Dirs........... $(TARGET_DIRS)
+	@$(ECHO)  Target Examples....... $(TARGET_EXAMPLES)
+	@$(ECHO)  Target ExampleDirs.... $(TARGET_EXAMPLEDIRS)
+	@$(ECHO)
+	@$(ECHO)  Clean Units......... $(CLEAN_UNITS)
+	@$(ECHO)  Clean Files......... $(CLEAN_FILES)
+	@$(ECHO)
+	@$(ECHO)  Install Units....... $(INSTALL_UNITS)
+	@$(ECHO)  Install Files....... $(INSTALL_FILES)
+	@$(ECHO)
+	@$(ECHO)  == Install info ==
+	@$(ECHO)
+	@$(ECHO)  DateStr.............. $(DATESTR)
+	@$(ECHO)  ZipName.............. $(ZIPNAME)
+	@$(ECHO)  ZipPrefix............ $(ZIPPREFIX)
+	@$(ECHO)  ZipCrossPrefix....... $(ZIPCROSSPREFIX)
+	@$(ECHO)  ZipSuffix............ $(ZIPSUFFIX)
+	@$(ECHO)  FullZipName.......... $(FULLZIPNAME)
+	@$(ECHO)  Install FPC Package.. $(INSTALL_FPCPACKAGE)
+	@$(ECHO)
+	@$(ECHO)  Install base dir..... $(INSTALL_BASEDIR)
+	@$(ECHO)  Install binary dir... $(INSTALL_BINDIR)
+	@$(ECHO)  Install library dir.. $(INSTALL_LIBDIR)
+	@$(ECHO)  Install units dir.... $(INSTALL_UNITDIR)
+	@$(ECHO)  Install source dir... $(INSTALL_SOURCEDIR)
+	@$(ECHO)  Install doc dir...... $(INSTALL_DOCDIR)
+	@$(ECHO)  Install example dir.. $(INSTALL_EXAMPLEDIR)
+	@$(ECHO)  Install data dir..... $(INSTALL_DATADIR)
+	@$(ECHO)
+	@$(ECHO)  Dist destination dir. $(DIST_DESTDIR)
+	@$(ECHO)  Dist zip name........ $(DIST_ZIPNAME)
+	@$(ECHO)
+.PHONY: fpc_info
+fpc_info: $(INFORULES)
+.PHONY: fpc_makefile fpc_makefiles fpc_makefile_sub1 fpc_makefile_sub2 \
+	fpc_makefile_dirs
+fpc_makefile:
+	$(FPCMAKE) -w -T$(OS_TARGET) Makefile.fpc
+fpc_makefile_sub1:
+ifdef TARGET_DIRS
+	$(FPCMAKE) -w -T$(OS_TARGET) $(addsuffix /Makefile.fpc,$(TARGET_DIRS))
+endif
+ifdef TARGET_EXAMPLEDIRS
+	$(FPCMAKE) -w -T$(OS_TARGET) $(addsuffix /Makefile.fpc,$(TARGET_EXAMPLEDIRS))
+endif
+fpc_makefile_sub2: $(addsuffix _makefile_dirs,$(TARGET_DIRS) $(TARGET_EXAMPLEDIRS))
+fpc_makefile_dirs: fpc_makefile_sub1 fpc_makefile_sub2
+fpc_makefiles: fpc_makefile fpc_makefile_dirs
+all: fpc_all
+debug: fpc_debug
+smart: fpc_smart
+release: fpc_release
+units: fpc_units
+examples:
+shared: fpc_shared
+install: fpc_install
+sourceinstall: fpc_sourceinstall
+exampleinstall: fpc_exampleinstall
+distinstall: fpc_distinstall
+zipinstall: fpc_zipinstall
+zipsourceinstall: fpc_zipsourceinstall
+zipexampleinstall: fpc_zipexampleinstall
+zipdistinstall: fpc_zipdistinstall
+clean: fpc_clean
+distclean: fpc_distclean
+cleanall: fpc_cleanall
+info: fpc_info
+makefiles: fpc_makefiles
+.PHONY: all debug smart release units examples shared install sourceinstall exampleinstall distinstall zipinstall zipsourceinstall zipexampleinstall zipdistinstall clean distclean cleanall info makefiles
+ifneq ($(wildcard fpcmake.loc),)
+include fpcmake.loc
+endif
diff --git a/packages/cocoaint/Makefile.fpc b/packages/cocoaint/Makefile.fpc
new file mode 100644
index 0000000000..13f9e38115
--- /dev/null
+++ b/packages/cocoaint/Makefile.fpc
@@ -0,0 +1,27 @@
+#
+#   Makefile.fpc for Apple Universal Interfaces for Free Pascal
+#
+
+[package]
+name=cocoaint
+version=2.5.1
+
+[target]
+units=CocoaAll
+
+[libs]
+libversion=2.5.1
+
+[install]
+fpcpackage=y
+
+[compiler]
+sourcedir=src
+
+[default]
+fpcdir=../..
+
+[require]
+packages=univint
+
+[rules]
diff --git a/packages/cocoaint/src/CocoaAll.pas b/packages/cocoaint/src/CocoaAll.pas
new file mode 100644
index 0000000000..c46d37671b
--- /dev/null
+++ b/packages/cocoaint/src/CocoaAll.pas
@@ -0,0 +1,89 @@
+unit CocoaAll;
+
+{$mode objfpc}
+{$modeswitch objectivec1}
+{$define NSGEOMETRY_TYPES_SAME_AS_CGGEOMETRY_TYPES}
+
+{NOTE: This is to prevent against a huge list of "never used" private variable notes}
+{$notes off}
+
+interface
+
+uses 
+  ctypes, MacOSAll;
+
+{$include UndefinedTypes.inc}
+
+{$define HEADER}
+{$include foundation/Foundation.inc}
+{$include appkit/AppKit.inc}
+{$undef HEADER}
+
+{$define TYPES}
+{$include foundation/Foundation.inc}
+{$include appkit/AppKit.inc}
+{$undef TYPES}
+
+{$define RECORDS}
+{$include foundation/Foundation.inc}
+{$include appkit/AppKit.inc}
+{$undef RECORDS}
+
+type
+{$define FORWARD}
+{$include foundation/Foundation.inc}
+{$include appkit/AppKit.inc}
+{$undef FORWARD}
+
+{$include UndefinedClasses.inc}
+
+{$define CLASSES}
+{$include foundation/Foundation.inc}
+{$include appkit/AppKit.inc}
+{$undef CLASSES}
+ 
+{$define PROTOCOLS}
+{$include foundation/Foundation.inc}
+{$include appkit/AppKit.inc}
+{$undef PROTOCOLS}
+
+{$define FUNCTIONS}
+{$include foundation/Foundation.inc}
+{$include appkit/AppKit.inc}
+{$undef FUNCTIONS}
+
+{$define EXTERNAL_SYMBOLS}
+{$include foundation/Foundation.inc}
+{$include appkit/AppKit.inc}
+{$undef EXTERNAL_SYMBOLS}
+
+{$notes on}
+
+{ Inline functions }
+function NSMakeRange (loc: NSUInteger; len: NSUInteger): NSRange;
+function NSMaxRange (range: NSRange): NSUInteger;
+function NSLocationInRange (loc: NSUInteger; range: NSRange): boolean;
+function NSEqualRanges (range1, range2: NSRange): boolean;
+function NSMakePoint (x: CGFloat; y: CGFloat): NSPoint;
+function NSMakeSize(w: CGFloat; h: CGFloat): NSSize;
+function NSMakeRect(x, y: CGFloat; w, h: CGFloat): NSRect;
+function NSMaxX (aRect: NSRect): CGFloat;
+function NSMaxY (aRect: NSRect): CGFloat;
+function NSMidX (aRect: NSRect): CGFloat;
+function NSMidY (aRect: NSRect): CGFloat;
+function NSMinX (aRect: NSRect): CGFloat;
+function NSMinY (aRect: NSRect): CGFloat;
+function NSWidth (aRect: NSRect): CGFloat;
+function NSHeight (aRect: NSRect): CGFloat;
+function NSRectFromCGRect (aRect: CGRect): NSRect;
+function NSRectToCGRect (aRect: NSRect): CGRect;
+function NSPointFromCGPoint (aPoint: CGPoint): NSPoint;
+function NSPointToCGPoint (aPoint: NSPoint): CGPoint;
+function NSSizeFromCGSize(aSize: CGSize): NSSize;
+function NSSizeToCGSize(aSize: NSSize): CGSize;
+
+implementation
+
+{$include InlineFunctions.inc}
+
+end.
\ No newline at end of file
diff --git a/packages/cocoaint/src/InlineFunctions.inc b/packages/cocoaint/src/InlineFunctions.inc
new file mode 100644
index 0000000000..3d7311a3b1
--- /dev/null
+++ b/packages/cocoaint/src/InlineFunctions.inc
@@ -0,0 +1,127 @@
+
+function NSMakeRange (loc: NSUInteger; len: NSUInteger): NSRange;
+begin
+ result.location := loc;
+ result.length := len;
+end;
+
+function NSMaxRange (range: NSRange): NSUInteger;
+begin
+ result := range.location + range.length;
+end;
+
+function NSLocationInRange (loc: NSUInteger; range: NSRange): boolean;
+begin
+ if (loc <= range.location + range.length) and (loc >= range.location) then
+  result := true
+ else
+  result := false;
+end;
+
+function NSEqualRanges (range1, range2: NSRange): boolean;
+begin
+ if (range1.location = range2.location) and (range1.length = range2.length) then
+  result := true
+ else
+  result := false;
+end;
+
+function NSMakePoint (x: CGFloat; y: CGFloat): NSPoint;
+begin
+  result.y := y;
+  result.x := x;
+end;
+
+function NSMakeSize(w: CGFloat; h: CGFloat): NSSize;
+begin
+  result.width := w;
+  result.height := h;
+end;
+
+function NSMakeRect(x, y: CGFloat; w, h: CGFloat): NSRect;
+begin
+  result.origin.x := x;
+  result.origin.y := y;
+  result.size.width := w;
+  result.size.height := h;
+end;
+
+function NSMaxX (aRect: NSRect): CGFloat;
+begin
+  result := aRect.origin.x + aRect.size.width;
+end;
+
+function NSMaxY (aRect: NSRect): CGFloat;
+begin
+  result := aRect.origin.y + aRect.size.height;
+end;
+
+function NSMidX (aRect: NSRect): CGFloat;
+begin
+  result := (aRect.origin.x + aRect.size.width) * 0.5 ;
+end;
+
+function NSMidY (aRect: NSRect): CGFloat;
+begin
+  result := (aRect.origin.y + aRect.size.height) * 0.5 ;
+end;
+
+function NSMinX (aRect: NSRect): CGFloat;
+begin
+  result := aRect.origin.x;
+end;
+
+function NSMinY (aRect: NSRect): CGFloat;
+begin
+  result := aRect.origin.y;
+end;
+
+function NSWidth (aRect: NSRect): CGFloat;
+begin
+  result := aRect.size.width;
+end;
+
+function NSHeight (aRect: NSRect): CGFloat;
+begin
+  result := aRect.size.height;
+end;
+
+function NSRectFromCGRect (aRect: CGRect): NSRect;
+begin
+  result.origin.x := aRect.origin.x;
+  result.origin.y := aRect.origin.y;
+  result.size.width := aRect.size.width;
+  result.size.height := aRect.size.height;
+end;
+
+function NSRectToCGRect (aRect: NSRect): CGRect;
+begin
+  result.origin.x := aRect.origin.x;
+  result.origin.y := aRect.origin.y;
+  result.size.width := aRect.size.width;
+  result.size.height := aRect.size.height;
+end;
+
+function NSPointFromCGPoint (aPoint: CGPoint): NSPoint;
+begin
+  result.y := aPoint.y;
+  result.x := aPoint.x;
+end;
+
+function NSPointToCGPoint (aPoint: NSPoint): CGPoint;
+begin
+  result.y := aPoint.y;
+  result.x := aPoint.x;
+end;
+
+function NSSizeFromCGSize(aSize: CGSize): NSSize;
+begin
+  result.width := aSize.width;
+  result.height := aSize.height;
+end;
+
+function NSSizeToCGSize(aSize: NSSize): CGSize;
+begin
+  result.width := aSize.width;
+  result.height := aSize.height;
+end;
diff --git a/packages/cocoaint/src/NSDelegatesAll.pas b/packages/cocoaint/src/NSDelegatesAll.pas
new file mode 100644
index 0000000000..d4132ec59a
--- /dev/null
+++ b/packages/cocoaint/src/NSDelegatesAll.pas
@@ -0,0 +1,658 @@
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 9:10:40 ICT 2009 }
+
+unit NSDelegatesAll;
+interface
+
+{ Copy and paste these delegate methods into your real classes. }
+
+type
+  NSAlertDelegate = objccategory
+    function alertShowHelp(alert: NSAlert): Boolean; message 'alertShowHelp:';
+  end;
+
+type
+  NSAnimationDelegate = objccategory
+    procedure animation_didReachProgressMark(animation: NSAnimation; progress: NSAnimationProgress); message 'animation:didReachProgressMark:';
+    function animation_valueForProgress(animation: NSAnimation; progress: NSAnimationProgress): single; message 'animation:valueForProgress:';
+    procedure animationDidEnd(animation: NSAnimation); message 'animationDidEnd:';
+    procedure animationDidStop(animation: NSAnimation); message 'animationDidStop:';
+    function animationShouldStart(animation: NSAnimation): Boolean; message 'animationShouldStart:';
+  end;
+
+type
+  NSApplicationDelegate = objccategory
+    function application_openFile(sender: NSApplication; filename: NSString): Boolean; message 'application:openFile:';
+    function application_openFileWithoutUI(sender: id; filename: NSString): Boolean; message 'application:openFileWithoutUI:';
+    procedure application_openFiles(sender: NSApplication; filenames: NSArray); message 'application:openFiles:';
+    function application_openTempFile(sender: NSApplication; filename: NSString): Boolean; message 'application:openTempFile:';
+    function application_printFile(sender: NSApplication; filename: NSString): Boolean; message 'application:printFile:';
+    procedure application_printFiles(sender: NSApplication; filenames: NSArray); message 'application:printFiles:';
+    function application_printFiles_withSettings_showPrintPanels(application: NSApplication; fileNames: NSArray; printSettings: NSDictionary; showPrintPanels: Boolean): NSApplicationPrintReply; message 'application:printFiles:withSettings:showPrintPanels:';
+    function application_willPresentError(application: NSApplication; error: NSError): NSError; message 'application:willPresentError:';
+    function applicationDockMenu(sender: NSApplication): NSMenu; message 'applicationDockMenu:';
+    function applicationOpenUntitledFile(sender: NSApplication): Boolean; message 'applicationOpenUntitledFile:';
+    function applicationShouldHandleReopen_hasVisibleWindows(sender: NSApplication; flag: Boolean): Boolean; message 'applicationShouldHandleReopen:hasVisibleWindows:';
+    function applicationShouldOpenUntitledFile(sender: NSApplication): Boolean; message 'applicationShouldOpenUntitledFile:';
+    function applicationShouldTerminate(sender: NSApplication): NSApplicationTerminateReply; message 'applicationShouldTerminate:';
+    function applicationShouldTerminateAfterLastWindowClosed(sender: NSApplication): Boolean; message 'applicationShouldTerminateAfterLastWindowClosed:';
+  end;
+
+type
+  NSApplicationNotifications = objccategory
+    procedure applicationDidBecomeActive(notification: NSNotification); message 'applicationDidBecomeActive:';
+    procedure applicationDidChangeScreenParameters(notification: NSNotification); message 'applicationDidChangeScreenParameters:';
+    procedure applicationDidFinishLaunching(notification: NSNotification); message 'applicationDidFinishLaunching:';
+    procedure applicationDidHide(notification: NSNotification); message 'applicationDidHide:';
+    procedure applicationDidResignActive(notification: NSNotification); message 'applicationDidResignActive:';
+    procedure applicationDidUnhide(notification: NSNotification); message 'applicationDidUnhide:';
+    procedure applicationDidUpdate(notification: NSNotification); message 'applicationDidUpdate:';
+    procedure applicationWillBecomeActive(notification: NSNotification); message 'applicationWillBecomeActive:';
+    procedure applicationWillFinishLaunching(notification: NSNotification); message 'applicationWillFinishLaunching:';
+    procedure applicationWillHide(notification: NSNotification); message 'applicationWillHide:';
+    procedure applicationWillResignActive(notification: NSNotification); message 'applicationWillResignActive:';
+    procedure applicationWillTerminate(notification: NSNotification); message 'applicationWillTerminate:';
+    procedure applicationWillUnhide(notification: NSNotification); message 'applicationWillUnhide:';
+    procedure applicationWillUpdate(notification: NSNotification); message 'applicationWillUpdate:';
+  end;
+
+type
+  NSApplicationScriptingDelegation = objccategory
+    function application_delegateHandlesKey(sender: NSApplication; key: NSString): Boolean; message 'application:delegateHandlesKey:';
+  end;
+
+type
+  NSBrowserDelegate = objccategory
+    function browser_acceptDrop_atRow_column_dropOperation(browser: NSBrowser; info: id; row: clong; column: clong; dropOperation: NSBrowserDropOperation): Boolean; message 'browser:acceptDrop:atRow:column:dropOperation:';
+    function browser_canDragRowsWithIndexes_inColumn_withEvent(browser: NSBrowser; rowIndexes: NSIndexSet; column: clong; event: NSEvent): Boolean; message 'browser:canDragRowsWithIndexes:inColumn:withEvent:';
+    procedure browser_createRowsForColumn_inMatrix(sender: NSBrowser; column: clong; matrix: NSMatrix); message 'browser:createRowsForColumn:inMatrix:';
+    function browser_draggingImageForRowsWithIndexes_inColumn_withEvent_offset(browser: NSBrowser; rowIndexes: NSIndexSet; column: clong; event: NSEvent; dragImageOffset: NSPointPointer): NSImage; message 'browser:draggingImageForRowsWithIndexes:inColumn:withEvent:offset:';
+    function browser_isColumnValid(sender: NSBrowser; column: clong): Boolean; message 'browser:isColumnValid:';
+    function browser_namesOfPromisedFilesDroppedAtDestination_forDraggedRowsWithIndexes_inColumn(browser: NSBrowser; dropDestination: NSURL; rowIndexes: NSIndexSet; column: clong): NSArray; message 'browser:namesOfPromisedFilesDroppedAtDestination:forDraggedRowsWithIndexes:inColumn:';
+    function browser_nextTypeSelectMatchFromRow_toRow_inColumn_forString(browser: NSBrowser; startRow: clong; endRow: clong; column: clong; searchString: NSString): clong; message 'browser:nextTypeSelectMatchFromRow:toRow:inColumn:forString:';
+    function browser_numberOfRowsInColumn(sender: NSBrowser; column: clong): clong; message 'browser:numberOfRowsInColumn:';
+    function browser_selectCellWithString_inColumn(sender: NSBrowser; title: NSString; column: clong): Boolean; message 'browser:selectCellWithString:inColumn:';
+    function browser_selectRow_inColumn(sender: NSBrowser; row: clong; column: clong): Boolean; message 'browser:selectRow:inColumn:';
+    function browser_shouldShowCellExpansionForRow_column(browser: NSBrowser; row: clong; column: clong): Boolean; message 'browser:shouldShowCellExpansionForRow:column:';
+    function browser_shouldSizeColumn_forUserResize_toWidth(browser: NSBrowser; columnIndex: clong; forUserResize: Boolean; suggestedWidth: CGFloat): CGFloat; message 'browser:shouldSizeColumn:forUserResize:toWidth:';
+    function browser_shouldTypeSelectForEvent_withCurrentSearchString(browser: NSBrowser; event: NSEvent; searchString: NSString): Boolean; message 'browser:shouldTypeSelectForEvent:withCurrentSearchString:';
+    function browser_sizeToFitWidthOfColumn(browser: NSBrowser; columnIndex: clong): CGFloat; message 'browser:sizeToFitWidthOfColumn:';
+    function browser_titleOfColumn(sender: NSBrowser; column: clong): NSString; message 'browser:titleOfColumn:';
+    function browser_typeSelectStringForRow_inColumn(browser: NSBrowser; row: clong; column: clong): NSString; message 'browser:typeSelectStringForRow:inColumn:';
+    function browser_validateDrop_proposedRow_column_dropOperation(browser: NSBrowser; info: id; row: clong; column: clong; dropOperation: NSBrowserDropOperation): NSDragOperation; message 'browser:validateDrop:proposedRow:column:dropOperation:';
+    procedure browser_willDisplayCell_atRow_column(sender: NSBrowser; cell_: id; row: clong; column: clong); message 'browser:willDisplayCell:atRow:column:';
+    function browser_writeRowsWithIndexes_inColumn_toPasteboard(browser: NSBrowser; rowIndexes: NSIndexSet; column: clong; pasteboard: NSPasteboard): Boolean; message 'browser:writeRowsWithIndexes:inColumn:toPasteboard:';
+    procedure browserColumnConfigurationDidChange(notification: NSNotification); message 'browserColumnConfigurationDidChange:';
+    procedure browserDidScroll(sender: NSBrowser); message 'browserDidScroll:';
+    procedure browserWillScroll(sender: NSBrowser); message 'browserWillScroll:';
+  end;
+
+type
+  NSComboBoxCellDataSource = objccategory
+    function comboBoxCell_completedString(aComboBoxCell: NSComboBoxCell; uncompletedString: NSString): NSString; message 'comboBoxCell:completedString:';
+    function comboBoxCell_indexOfItemWithStringValue(aComboBoxCell: NSComboBoxCell; string_: NSString): culong; message 'comboBoxCell:indexOfItemWithStringValue:';
+    function comboBoxCell_objectValueForItemAtIndex(aComboBoxCell: NSComboBoxCell; index: clong): id; message 'comboBoxCell:objectValueForItemAtIndex:';
+    function numberOfItemsInComboBoxCell(comboBoxCell: NSComboBoxCell): clong; message 'numberOfItemsInComboBoxCell:';
+  end;
+
+type
+  NSComboBoxDataSource = objccategory
+    function comboBox_completedString(aComboBox: NSComboBox; string_: NSString): NSString; message 'comboBox:completedString:';
+    function comboBox_indexOfItemWithStringValue(aComboBox: NSComboBox; string_: NSString): culong; message 'comboBox:indexOfItemWithStringValue:';
+    function comboBox_objectValueForItemAtIndex(aComboBox: NSComboBox; index: clong): id; message 'comboBox:objectValueForItemAtIndex:';
+    function numberOfItemsInComboBox(aComboBox: NSComboBox): clong; message 'numberOfItemsInComboBox:';
+  end;
+
+type
+  NSComboBoxNotifications = objccategory
+    procedure comboBoxSelectionDidChange(notification: NSNotification); message 'comboBoxSelectionDidChange:';
+    procedure comboBoxSelectionIsChanging(notification: NSNotification); message 'comboBoxSelectionIsChanging:';
+    procedure comboBoxWillDismiss(notification: NSNotification); message 'comboBoxWillDismiss:';
+    procedure comboBoxWillPopUp(notification: NSNotification); message 'comboBoxWillPopUp:';
+  end;
+
+type
+  NSConnectionDelegateMethods = objccategory
+    function authenticateComponents_withData(components: NSArray; signature: NSData): Boolean; message 'authenticateComponents:withData:';
+    function authenticationDataForComponents(components: NSArray): NSData; message 'authenticationDataForComponents:';
+    function connection_shouldMakeNewConnection(ancestor: NSConnection; conn: NSConnection): Boolean; message 'connection:shouldMakeNewConnection:';
+    function createConversationForConnection(conn: NSConnection): id; message 'createConversationForConnection:';
+    function makeNewConnection_sender(conn: NSConnection; ancestor: NSConnection): Boolean; message 'makeNewConnection:sender:';
+  end;
+
+type
+  NSControlSubclassDelegate = objccategory
+    function control_didFailToFormatString_errorDescription(control: NSControl; string_: NSString; error: NSString): Boolean; message 'control:didFailToFormatString:errorDescription:';
+    procedure control_didFailToValidatePartialString_errorDescription(control: NSControl; string_: NSString; error: NSString); message 'control:didFailToValidatePartialString:errorDescription:';
+    function control_isValidObject(control: NSControl; obj: id): Boolean; message 'control:isValidObject:';
+    function control_textShouldBeginEditing(control: NSControl; fieldEditor: NSText): Boolean; message 'control:textShouldBeginEditing:';
+    function control_textShouldEndEditing(control: NSControl; fieldEditor: NSText): Boolean; message 'control:textShouldEndEditing:';
+    function control_textView_completions_forPartialWordRange_indexOfSelectedItem(control: NSControl; textView: NSTextView; words: NSArray; charRange: NSRange; index: clong): NSArray; message 'control:textView:completions:forPartialWordRange:indexOfSelectedItem:';
+    function control_textView_doCommandBySelector(control: NSControl; textView: NSTextView; commandSelector: SEL): Boolean; message 'control:textView:doCommandBySelector:';
+  end;
+
+type
+  NSControlSubclassNotifications = objccategory
+    procedure controlTextDidBeginEditing(obj: NSNotification); message 'controlTextDidBeginEditing:';
+    procedure controlTextDidChange(obj: NSNotification); message 'controlTextDidChange:';
+    procedure controlTextDidEndEditing(obj: NSNotification); message 'controlTextDidEndEditing:';
+  end;
+
+type
+  NSCopyLinkMoveHandler = objccategory
+    function fileManager_shouldProceedAfterError(fm: NSFileManager; errorInfo: NSDictionary): Boolean; message 'fileManager:shouldProceedAfterError:';
+    procedure fileManager_willProcessPath(fm: NSFileManager; path: NSString); message 'fileManager:willProcessPath:';
+  end;
+
+type
+  NSDatePickerCellDelegate = objccategory
+    procedure datePickerCell_validateProposedDateValue_timeInterval(aDatePickerCell: NSDatePickerCell; proposedDateValue: NSDate; proposedTimeInterval: NSTimeInterval); message 'datePickerCell:validateProposedDateValue:timeInterval:';
+  end;
+
+type
+  NSDistantObjectRequestMethods = objccategory
+    function connection_handleRequest(connection_: NSConnection; doreq: NSDistantObjectRequest): Boolean; message 'connection:handleRequest:';
+  end;
+
+type
+  NSDraggingDestination = objccategory
+    procedure concludeDragOperation(sender: id); message 'concludeDragOperation:';
+    procedure draggingEnded(sender: id); message 'draggingEnded:';
+    function draggingEntered(sender: id): NSDragOperation; message 'draggingEntered:';
+    procedure draggingExited(sender: id); message 'draggingExited:';
+    function draggingUpdated(sender: id): NSDragOperation; message 'draggingUpdated:';
+    function performDragOperation(sender: id): Boolean; message 'performDragOperation:';
+    function prepareForDragOperation(sender: id): Boolean; message 'prepareForDragOperation:';
+    function wantsPeriodicDraggingUpdates: Boolean; message 'wantsPeriodicDraggingUpdates';
+  end;
+
+type
+  NSDraggingSource = objccategory
+    procedure draggedImage_beganAt(image: NSImage; screenPoint: NSPoint); message 'draggedImage:beganAt:';
+    procedure draggedImage_endedAt_deposited(image: NSImage; screenPoint: NSPoint; flag: Boolean); message 'draggedImage:endedAt:deposited:';
+    procedure draggedImage_endedAt_operation(image: NSImage; screenPoint: NSPoint; operation: NSDragOperation); message 'draggedImage:endedAt:operation:';
+    procedure draggedImage_movedTo(image: NSImage; screenPoint: NSPoint); message 'draggedImage:movedTo:';
+    function draggingSourceOperationMaskForLocal(flag: Boolean): NSDragOperation; message 'draggingSourceOperationMaskForLocal:';
+    function ignoreModifierKeysWhileDragging: Boolean; message 'ignoreModifierKeysWhileDragging';
+    function namesOfPromisedFilesDroppedAtDestination(dropDestination: NSURL): NSArray; message 'namesOfPromisedFilesDroppedAtDestination:';
+  end;
+
+type
+  NSDrawerDelegate = objccategory
+    function drawerShouldClose(sender: NSDrawer): Boolean; message 'drawerShouldClose:';
+    function drawerShouldOpen(sender: NSDrawer): Boolean; message 'drawerShouldOpen:';
+    function drawerWillResizeContents_toSize(sender: NSDrawer; contentSize: NSSize): NSSize; message 'drawerWillResizeContents:toSize:';
+  end;
+
+type
+  NSDrawerNotifications = objccategory
+    procedure drawerDidClose(notification: NSNotification); message 'drawerDidClose:';
+    procedure drawerDidOpen(notification: NSNotification); message 'drawerDidOpen:';
+    procedure drawerWillClose(notification: NSNotification); message 'drawerWillClose:';
+    procedure drawerWillOpen(notification: NSNotification); message 'drawerWillOpen:';
+  end;
+
+type
+  NSEditorRegistration = objccategory
+    procedure objectDidBeginEditing(editor: id); message 'objectDidBeginEditing:';
+    procedure objectDidEndEditing(editor: id); message 'objectDidEndEditing:';
+  end;
+
+type
+  NSFileManagerFileOperationAdditions = objccategory
+    function fileManager_shouldCopyItemAtPath_toPath(fileManager: NSFileManager; srcPath: NSString; dstPath: NSString): Boolean; message 'fileManager:shouldCopyItemAtPath:toPath:';
+    function fileManager_shouldLinkItemAtPath_toPath(fileManager: NSFileManager; srcPath: NSString; dstPath: NSString): Boolean; message 'fileManager:shouldLinkItemAtPath:toPath:';
+    function fileManager_shouldMoveItemAtPath_toPath(fileManager: NSFileManager; srcPath: NSString; dstPath: NSString): Boolean; message 'fileManager:shouldMoveItemAtPath:toPath:';
+    function fileManager_shouldProceedAfterError_copyingItemAtPath_toPath(fileManager: NSFileManager; error: NSError; srcPath: NSString; dstPath: NSString): Boolean; message 'fileManager:shouldProceedAfterError:copyingItemAtPath:toPath:';
+    function fileManager_shouldProceedAfterError_linkingItemAtPath_toPath(fileManager: NSFileManager; error: NSError; srcPath: NSString; dstPath: NSString): Boolean; message 'fileManager:shouldProceedAfterError:linkingItemAtPath:toPath:';
+    function fileManager_shouldProceedAfterError_movingItemAtPath_toPath(fileManager: NSFileManager; error: NSError; srcPath: NSString; dstPath: NSString): Boolean; message 'fileManager:shouldProceedAfterError:movingItemAtPath:toPath:';
+    function fileManager_shouldProceedAfterError_removingItemAtPath(fileManager: NSFileManager; error: NSError; path: NSString): Boolean; message 'fileManager:shouldProceedAfterError:removingItemAtPath:';
+    function fileManager_shouldRemoveItemAtPath(fileManager: NSFileManager; path: NSString): Boolean; message 'fileManager:shouldRemoveItemAtPath:';
+  end;
+
+type
+  NSFontManagerDelegate = objccategory
+    function fontManager_willIncludeFont(sender: id; fontName: NSString): Boolean; message 'fontManager:willIncludeFont:';
+  end;
+
+type
+  NSImageDelegate = objccategory
+    procedure image_didLoadPartOfRepresentation_withValidRows(image: NSImage; rep: NSImageRep; rows: clong); message 'image:didLoadPartOfRepresentation:withValidRows:';
+    procedure image_didLoadRepresentation_withStatus(image: NSImage; rep: NSImageRep; status: NSImageLoadStatus); message 'image:didLoadRepresentation:withStatus:';
+    procedure image_didLoadRepresentationHeader(image: NSImage; rep: NSImageRep); message 'image:didLoadRepresentationHeader:';
+    procedure image_willLoadRepresentation(image: NSImage; rep: NSImageRep); message 'image:willLoadRepresentation:';
+    function imageDidNotDraw_inRect(sender: id; aRect: NSRect): NSImage; message 'imageDidNotDraw:inRect:';
+  end;
+
+type
+  NSKeyValueObserverNotification = objccategory
+    procedure didChange_valuesAtIndexes_forKey(changeKind: NSKeyValueChange; indexes: NSIndexSet; key: NSString); message 'didChange:valuesAtIndexes:forKey:';
+    procedure didChangeValueForKey(key: NSString); message 'didChangeValueForKey:';
+    procedure didChangeValueForKey_withSetMutation_usingObjects(key: NSString; mutationKind: NSKeyValueSetMutationKind; objects: NSSet); message 'didChangeValueForKey:withSetMutation:usingObjects:';
+    procedure willChange_valuesAtIndexes_forKey(changeKind: NSKeyValueChange; indexes: NSIndexSet; key: NSString); message 'willChange:valuesAtIndexes:forKey:';
+    procedure willChangeValueForKey(key: NSString); message 'willChangeValueForKey:';
+    procedure willChangeValueForKey_withSetMutation_usingObjects(key: NSString; mutationKind: NSKeyValueSetMutationKind; objects: NSSet); message 'willChangeValueForKey:withSetMutation:usingObjects:';
+  end;
+
+type
+  NSKeyedArchiverDelegate = objccategory
+    procedure archiver_didEncodeObject(archiver: NSKeyedArchiver; object_: id); message 'archiver:didEncodeObject:';
+    function archiver_willEncodeObject(archiver: NSKeyedArchiver; object_: id): id; message 'archiver:willEncodeObject:';
+    procedure archiver_willReplaceObject_withObject(archiver: NSKeyedArchiver; object_: id; newObject: id); message 'archiver:willReplaceObject:withObject:';
+    procedure archiverDidFinish(archiver: NSKeyedArchiver); message 'archiverDidFinish:';
+    procedure archiverWillFinish(archiver: NSKeyedArchiver); message 'archiverWillFinish:';
+  end;
+
+type
+  NSKeyedUnarchiverDelegate = objccategory
+    function unarchiver_cannotDecodeObjectOfClassName_originalClasses(unarchiver: NSKeyedUnarchiver; name: NSString; classNames: NSArray): Pobjc_class; message 'unarchiver:cannotDecodeObjectOfClassName:originalClasses:';
+    function unarchiver_didDecodeObject(unarchiver: NSKeyedUnarchiver; object_: id): id; message 'unarchiver:didDecodeObject:';
+    procedure unarchiver_willReplaceObject_withObject(unarchiver: NSKeyedUnarchiver; object_: id; newObject: id); message 'unarchiver:willReplaceObject:withObject:';
+    procedure unarchiverDidFinish(unarchiver: NSKeyedUnarchiver); message 'unarchiverDidFinish:';
+    procedure unarchiverWillFinish(unarchiver: NSKeyedUnarchiver); message 'unarchiverWillFinish:';
+  end;
+
+type
+  NSLayoutManagerDelegate = objccategory
+    procedure layoutManager_didCompleteLayoutForTextContainer_atEnd(layoutManager: NSLayoutManager; textContainer: NSTextContainer; layoutFinishedFlag: Boolean); message 'layoutManager:didCompleteLayoutForTextContainer:atEnd:';
+    function layoutManager_shouldUseTemporaryAttributes_forDrawingToScreen_atCharacterIndex_effectiveRange(layoutManager: NSLayoutManager; attrs: NSDictionary; toScreen: Boolean; charIndex: culong; effectiveCharRange: NSRangePointer): NSDictionary; message 'layoutManager:shouldUseTemporaryAttributes:forDrawingToScreen:atCharacterIndex:effectiveRange:';
+    procedure layoutManagerDidInvalidateLayout(sender: NSLayoutManager); message 'layoutManagerDidInvalidateLayout:';
+  end;
+
+type
+  NSMachPortDelegateMethods = objccategory
+    procedure handleMachMessage(msg: Pointer); message 'handleMachMessage:';
+  end;
+
+type
+  NSMenuDelegate = objccategory
+    function menu_updateItem_atIndex_shouldCancel(menu: NSMenu; item: NSMenuItem; index: clong; shouldCancel: Boolean): Boolean; message 'menu:updateItem:atIndex:shouldCancel:';
+    procedure menu_willHighlightItem(menu: NSMenu; item: NSMenuItem); message 'menu:willHighlightItem:';
+    procedure menuDidClose(menu: NSMenu); message 'menuDidClose:';
+    function menuHasKeyEquivalent_forEvent_target_action(menu: NSMenu; event: NSEvent; target: id; action: SEL): Boolean; message 'menuHasKeyEquivalent:forEvent:target:action:';
+    procedure menuNeedsUpdate(menu: NSMenu); message 'menuNeedsUpdate:';
+    procedure menuWillOpen(menu: NSMenu); message 'menuWillOpen:';
+    function numberOfItemsInMenu(menu: NSMenu): clong; message 'numberOfItemsInMenu:';
+  end;
+
+type
+  NSMetadataQueryDelegate = objccategory
+    function metadataQuery_replacementObjectForResultObject(query: NSMetadataQuery; result_: NSMetadataItem): id; message 'metadataQuery:replacementObjectForResultObject:';
+    function metadataQuery_replacementValueForAttribute_value(query: NSMetadataQuery; attrName: NSString; attrValue: id): id; message 'metadataQuery:replacementValueForAttribute:value:';
+  end;
+
+type
+  NSNetServiceBrowserDelegateMethods = objccategory
+    procedure netServiceBrowser_didFindDomain_moreComing(aNetServiceBrowser: NSNetServiceBrowser; domainString: NSString; moreComing: Boolean); message 'netServiceBrowser:didFindDomain:moreComing:';
+    procedure netServiceBrowser_didFindService_moreComing(aNetServiceBrowser: NSNetServiceBrowser; aNetService: NSNetService; moreComing: Boolean); message 'netServiceBrowser:didFindService:moreComing:';
+    procedure netServiceBrowser_didNotSearch(aNetServiceBrowser: NSNetServiceBrowser; errorDict: NSDictionary); message 'netServiceBrowser:didNotSearch:';
+    procedure netServiceBrowser_didRemoveDomain_moreComing(aNetServiceBrowser: NSNetServiceBrowser; domainString: NSString; moreComing: Boolean); message 'netServiceBrowser:didRemoveDomain:moreComing:';
+    procedure netServiceBrowser_didRemoveService_moreComing(aNetServiceBrowser: NSNetServiceBrowser; aNetService: NSNetService; moreComing: Boolean); message 'netServiceBrowser:didRemoveService:moreComing:';
+    procedure netServiceBrowserDidStopSearch(aNetServiceBrowser: NSNetServiceBrowser); message 'netServiceBrowserDidStopSearch:';
+    procedure netServiceBrowserWillSearch(aNetServiceBrowser: NSNetServiceBrowser); message 'netServiceBrowserWillSearch:';
+  end;
+
+type
+  NSNetServiceDelegateMethods = objccategory
+    procedure netService_didNotPublish(sender: NSNetService; errorDict: NSDictionary); message 'netService:didNotPublish:';
+    procedure netService_didNotResolve(sender: NSNetService; errorDict: NSDictionary); message 'netService:didNotResolve:';
+    procedure netService_didUpdateTXTRecordData(sender: NSNetService; data: NSData); message 'netService:didUpdateTXTRecordData:';
+    procedure netServiceDidPublish(sender: NSNetService); message 'netServiceDidPublish:';
+    procedure netServiceDidResolveAddress(sender: NSNetService); message 'netServiceDidResolveAddress:';
+    procedure netServiceDidStop(sender: NSNetService); message 'netServiceDidStop:';
+    procedure netServiceWillPublish(sender: NSNetService); message 'netServiceWillPublish:';
+    procedure netServiceWillResolve(sender: NSNetService); message 'netServiceWillResolve:';
+  end;
+
+type
+  NSOutlineViewDataSource = objccategory
+    function outlineView_acceptDrop_item_childIndex(outlineView: NSOutlineView; info: id; item: id; index: clong): Boolean; message 'outlineView:acceptDrop:item:childIndex:';
+    function outlineView_child_ofItem(outlineView: NSOutlineView; index: clong; item: id): id; message 'outlineView:child:ofItem:';
+    function outlineView_isItemExpandable(outlineView: NSOutlineView; item: id): Boolean; message 'outlineView:isItemExpandable:';
+    function outlineView_itemForPersistentObject(outlineView: NSOutlineView; object_: id): id; message 'outlineView:itemForPersistentObject:';
+    function outlineView_namesOfPromisedFilesDroppedAtDestination_forDraggedItems(outlineView: NSOutlineView; dropDestination: NSURL; items: NSArray): NSArray; message 'outlineView:namesOfPromisedFilesDroppedAtDestination:forDraggedItems:';
+    function outlineView_numberOfChildrenOfItem(outlineView: NSOutlineView; item: id): clong; message 'outlineView:numberOfChildrenOfItem:';
+    function outlineView_objectValueForTableColumn_byItem(outlineView: NSOutlineView; tableColumn: NSTableColumn; item: id): id; message 'outlineView:objectValueForTableColumn:byItem:';
+    function outlineView_persistentObjectForItem(outlineView: NSOutlineView; item: id): id; message 'outlineView:persistentObjectForItem:';
+    procedure outlineView_setObjectValue_forTableColumn_byItem(outlineView: NSOutlineView; object_: id; tableColumn: NSTableColumn; item: id); message 'outlineView:setObjectValue:forTableColumn:byItem:';
+    procedure outlineView_sortDescriptorsDidChange(outlineView: NSOutlineView; oldDescriptors: NSArray); message 'outlineView:sortDescriptorsDidChange:';
+    function outlineView_validateDrop_proposedItem_proposedChildIndex(outlineView: NSOutlineView; info: id; item: id; index: clong): NSDragOperation; message 'outlineView:validateDrop:proposedItem:proposedChildIndex:';
+    function outlineView_writeItems_toPasteboard(outlineView: NSOutlineView; items: NSArray; pasteboard: NSPasteboard): Boolean; message 'outlineView:writeItems:toPasteboard:';
+  end;
+
+type
+  NSOutlineViewDelegate = objccategory
+    function outlineView_dataCellForTableColumn_item(outlineView: NSOutlineView; tableColumn: NSTableColumn; item: id): NSCell; message 'outlineView:dataCellForTableColumn:item:';
+    procedure outlineView_didClickTableColumn(outlineView: NSOutlineView; tableColumn: NSTableColumn); message 'outlineView:didClickTableColumn:';
+    procedure outlineView_didDragTableColumn(outlineView: NSOutlineView; tableColumn: NSTableColumn); message 'outlineView:didDragTableColumn:';
+    function outlineView_heightOfRowByItem(outlineView: NSOutlineView; item: id): CGFloat; message 'outlineView:heightOfRowByItem:';
+    function outlineView_isGroupItem(outlineView: NSOutlineView; item: id): Boolean; message 'outlineView:isGroupItem:';
+    procedure outlineView_mouseDownInHeaderOfTableColumn(outlineView: NSOutlineView; tableColumn: NSTableColumn); message 'outlineView:mouseDownInHeaderOfTableColumn:';
+    function outlineView_nextTypeSelectMatchFromItem_toItem_forString(outlineView: NSOutlineView; startItem: id; endItem: id; searchString: NSString): id; message 'outlineView:nextTypeSelectMatchFromItem:toItem:forString:';
+    function outlineView_selectionIndexesForProposedSelection(outlineView: NSOutlineView; proposedSelectionIndexes: NSIndexSet): NSIndexSet; message 'outlineView:selectionIndexesForProposedSelection:';
+    function outlineView_shouldCollapseItem(outlineView: NSOutlineView; item: id): Boolean; message 'outlineView:shouldCollapseItem:';
+    function outlineView_shouldEditTableColumn_item(outlineView: NSOutlineView; tableColumn: NSTableColumn; item: id): Boolean; message 'outlineView:shouldEditTableColumn:item:';
+    function outlineView_shouldExpandItem(outlineView: NSOutlineView; item: id): Boolean; message 'outlineView:shouldExpandItem:';
+    function outlineView_shouldSelectItem(outlineView: NSOutlineView; item: id): Boolean; message 'outlineView:shouldSelectItem:';
+    function outlineView_shouldSelectTableColumn(outlineView: NSOutlineView; tableColumn: NSTableColumn): Boolean; message 'outlineView:shouldSelectTableColumn:';
+    function outlineView_shouldShowCellExpansionForTableColumn_item(outlineView: NSOutlineView; tableColumn: NSTableColumn; item: id): Boolean; message 'outlineView:shouldShowCellExpansionForTableColumn:item:';
+    function outlineView_shouldTrackCell_forTableColumn_item(outlineView: NSOutlineView; cell_: NSCell; tableColumn: NSTableColumn; item: id): Boolean; message 'outlineView:shouldTrackCell:forTableColumn:item:';
+    function outlineView_shouldTypeSelectForEvent_withCurrentSearchString(outlineView: NSOutlineView; event: NSEvent; searchString: NSString): Boolean; message 'outlineView:shouldTypeSelectForEvent:withCurrentSearchString:';
+    function outlineView_toolTipForCell_rect_tableColumn_item_mouseLocation(outlineView: NSOutlineView; cell_: NSCell; rect: NSRectPointer; tableColumn: NSTableColumn; item: id; mouseLocation: NSPoint): NSString; message 'outlineView:toolTipForCell:rect:tableColumn:item:mouseLocation:';
+    function outlineView_typeSelectStringForTableColumn_item(outlineView: NSOutlineView; tableColumn: NSTableColumn; item: id): NSString; message 'outlineView:typeSelectStringForTableColumn:item:';
+    procedure outlineView_willDisplayCell_forTableColumn_item(outlineView: NSOutlineView; cell_: id; tableColumn: NSTableColumn; item: id); message 'outlineView:willDisplayCell:forTableColumn:item:';
+    procedure outlineView_willDisplayOutlineCell_forTableColumn_item(outlineView: NSOutlineView; cell_: id; tableColumn: NSTableColumn; item: id); message 'outlineView:willDisplayOutlineCell:forTableColumn:item:';
+    function selectionShouldChangeInOutlineView(outlineView: NSOutlineView): Boolean; message 'selectionShouldChangeInOutlineView:';
+  end;
+
+type
+  NSOutlineViewNotifications = objccategory
+    procedure outlineViewColumnDidMove(notification: NSNotification); message 'outlineViewColumnDidMove:';
+    procedure outlineViewColumnDidResize(notification: NSNotification); message 'outlineViewColumnDidResize:';
+    procedure outlineViewItemDidCollapse(notification: NSNotification); message 'outlineViewItemDidCollapse:';
+    procedure outlineViewItemDidExpand(notification: NSNotification); message 'outlineViewItemDidExpand:';
+    procedure outlineViewItemWillCollapse(notification: NSNotification); message 'outlineViewItemWillCollapse:';
+    procedure outlineViewItemWillExpand(notification: NSNotification); message 'outlineViewItemWillExpand:';
+    procedure outlineViewSelectionDidChange(notification: NSNotification); message 'outlineViewSelectionDidChange:';
+    procedure outlineViewSelectionIsChanging(notification: NSNotification); message 'outlineViewSelectionIsChanging:';
+  end;
+
+type
+  NSPasteboardOwner = objccategory
+    procedure pasteboard_provideDataForType(sender: NSPasteboard; type_: NSString); message 'pasteboard:provideDataForType:';
+    procedure pasteboardChangedOwner(sender: NSPasteboard); message 'pasteboardChangedOwner:';
+  end;
+
+type
+  NSPortDelegateMethods = objccategory
+    procedure handlePortMessage(message: NSPortMessage); message 'handlePortMessage:';
+  end;
+
+type
+  NSRuleEditorDelegateMethods = objccategory
+    function ruleEditor_child_forCriterion_withRowType(editor: NSRuleEditor; index: clong; criterion: id; rowType: NSRuleEditorRowType): id; message 'ruleEditor:child:forCriterion:withRowType:';
+    function ruleEditor_displayValueForCriterion_inRow(editor: NSRuleEditor; criterion: id; row: clong): id; message 'ruleEditor:displayValueForCriterion:inRow:';
+    function ruleEditor_numberOfChildrenForCriterion_withRowType(editor: NSRuleEditor; criterion: id; rowType: NSRuleEditorRowType): clong; message 'ruleEditor:numberOfChildrenForCriterion:withRowType:';
+    function ruleEditor_predicatePartsForCriterion_withDisplayValue_inRow(editor: NSRuleEditor; criterion: id; value: id; row: clong): NSDictionary; message 'ruleEditor:predicatePartsForCriterion:withDisplayValue:inRow:';
+    procedure ruleEditorRowsDidChange(notification: NSNotification); message 'ruleEditorRowsDidChange:';
+  end;
+
+type
+  NSSavePanelDelegate = objccategory
+    function panel_compareFilename_with_caseSensitive(sender: id; name: NSString; name1: NSString; caseSensitive: Boolean): NSComparisonResult; message 'panel:compareFilename:with:caseSensitive:';
+    procedure panel_directoryDidChange(sender: id; path: NSString); message 'panel:directoryDidChange:';
+    function panel_isValidFilename(sender: id; filename_: NSString): Boolean; message 'panel:isValidFilename:';
+    function panel_shouldShowFilename(sender: id; filename_: NSString): Boolean; message 'panel:shouldShowFilename:';
+    function panel_userEnteredFilename_confirmed(sender: id; filename_: NSString; okFlag: Boolean): NSString; message 'panel:userEnteredFilename:confirmed:';
+    procedure panel_willExpand(sender: id; expanding: Boolean); message 'panel:willExpand:';
+    procedure panelSelectionDidChange(sender: id); message 'panelSelectionDidChange:';
+  end;
+
+type
+  NSSoundDelegateMethods = objccategory
+    procedure sound_didFinishPlaying(sound: NSSound; aBool: Boolean); message 'sound:didFinishPlaying:';
+  end;
+
+type
+  NSSpeechRecognizerDelegate = objccategory
+    procedure speechRecognizer_didRecognizeCommand(sender: NSSpeechRecognizer; command: id); message 'speechRecognizer:didRecognizeCommand:';
+  end;
+
+type
+  NSSpeechSynthesizerDelegate = objccategory
+    procedure speechSynthesizer_didEncounterErrorAtIndex_ofString_message(sender: NSSpeechSynthesizer; characterIndex: culong; string_: NSString; message: NSString); message 'speechSynthesizer:didEncounterErrorAtIndex:ofString:message:';
+    procedure speechSynthesizer_didEncounterSyncMessage(sender: NSSpeechSynthesizer; message: NSString); message 'speechSynthesizer:didEncounterSyncMessage:';
+    procedure speechSynthesizer_didFinishSpeaking(sender: NSSpeechSynthesizer; finishedSpeaking: Boolean); message 'speechSynthesizer:didFinishSpeaking:';
+    procedure speechSynthesizer_willSpeakPhoneme(sender: NSSpeechSynthesizer; phonemeOpcode: cshort); message 'speechSynthesizer:willSpeakPhoneme:';
+    procedure speechSynthesizer_willSpeakWord_ofString(sender: NSSpeechSynthesizer; characterRange: NSRange; string_: NSString); message 'speechSynthesizer:willSpeakWord:ofString:';
+  end;
+
+type
+  NSSpellServerDelegate = objccategory
+    function spellServer_checkGrammarInString_language_details(sender: NSSpellServer; stringToCheck: NSString; language: NSString; details: NSArray): NSRange; message 'spellServer:checkGrammarInString:language:details:';
+    procedure spellServer_didForgetWord_inLanguage(sender: NSSpellServer; word: NSString; language: NSString); message 'spellServer:didForgetWord:inLanguage:';
+    procedure spellServer_didLearnWord_inLanguage(sender: NSSpellServer; word: NSString; language: NSString); message 'spellServer:didLearnWord:inLanguage:';
+    function spellServer_findMisspelledWordInString_language_wordCount_countOnly(sender: NSSpellServer; stringToCheck: NSString; language: NSString; wordCount: clong; countOnly: Boolean): NSRange; message 'spellServer:findMisspelledWordInString:language:wordCount:countOnly:';
+    function spellServer_suggestCompletionsForPartialWordRange_inString_language(sender: NSSpellServer; range: NSRange; string_: NSString; language: NSString): NSArray; message 'spellServer:suggestCompletionsForPartialWordRange:inString:language:';
+    function spellServer_suggestGuessesForWord_inLanguage(sender: NSSpellServer; word: NSString; language: NSString): NSArray; message 'spellServer:suggestGuessesForWord:inLanguage:';
+  end;
+
+type
+  NSSplitViewDelegate = objccategory
+    function splitView_additionalEffectiveRectOfDividerAtIndex(splitView: NSSplitView; dividerIndex: clong): NSRect; message 'splitView:additionalEffectiveRectOfDividerAtIndex:';
+    function splitView_canCollapseSubview(splitView: NSSplitView; subview: NSView): Boolean; message 'splitView:canCollapseSubview:';
+    function splitView_constrainMaxCoordinate_ofSubviewAt(splitView: NSSplitView; proposedMaximumPosition: CGFloat; dividerIndex: clong): CGFloat; message 'splitView:constrainMaxCoordinate:ofSubviewAt:';
+    function splitView_constrainMinCoordinate_ofSubviewAt(splitView: NSSplitView; proposedMinimumPosition: CGFloat; dividerIndex: clong): CGFloat; message 'splitView:constrainMinCoordinate:ofSubviewAt:';
+    function splitView_constrainSplitPosition_ofSubviewAt(splitView: NSSplitView; proposedPosition: CGFloat; dividerIndex: clong): CGFloat; message 'splitView:constrainSplitPosition:ofSubviewAt:';
+    function splitView_effectiveRect_forDrawnRect_ofDividerAtIndex(splitView: NSSplitView; proposedEffectiveRect: NSRect; drawnRect: NSRect; dividerIndex: clong): NSRect; message 'splitView:effectiveRect:forDrawnRect:ofDividerAtIndex:';
+    procedure splitView_resizeSubviewsWithOldSize(splitView: NSSplitView; oldSize: NSSize); message 'splitView:resizeSubviewsWithOldSize:';
+    function splitView_shouldCollapseSubview_forDoubleClickOnDividerAtIndex(splitView: NSSplitView; subview: NSView; dividerIndex: clong): Boolean; message 'splitView:shouldCollapseSubview:forDoubleClickOnDividerAtIndex:';
+    function splitView_shouldHideDividerAtIndex(splitView: NSSplitView; dividerIndex: clong): Boolean; message 'splitView:shouldHideDividerAtIndex:';
+    procedure splitViewDidResizeSubviews(notification: NSNotification); message 'splitViewDidResizeSubviews:';
+    procedure splitViewWillResizeSubviews(notification: NSNotification); message 'splitViewWillResizeSubviews:';
+  end;
+
+type
+  NSStreamDelegateEventExtensions = objccategory
+    procedure stream_handleEvent(aStream: NSStream; eventCode: NSStreamEvent); message 'stream:handleEvent:';
+  end;
+
+type
+  NSTabViewDelegate = objccategory
+    procedure tabView_didSelectTabViewItem(tabView: NSTabView; tabViewItem: NSTabViewItem); message 'tabView:didSelectTabViewItem:';
+    function tabView_shouldSelectTabViewItem(tabView: NSTabView; tabViewItem: NSTabViewItem): Boolean; message 'tabView:shouldSelectTabViewItem:';
+    procedure tabView_willSelectTabViewItem(tabView: NSTabView; tabViewItem: NSTabViewItem); message 'tabView:willSelectTabViewItem:';
+    procedure tabViewDidChangeNumberOfTabViewItems(TabView: NSTabView); message 'tabViewDidChangeNumberOfTabViewItems:';
+  end;
+
+type
+  NSTableDataSource = objccategory
+    function numberOfRowsInTableView(tableView: NSTableView): clong; message 'numberOfRowsInTableView:';
+    function tableView_acceptDrop_row_dropOperation(tableView: NSTableView; info: id; row: clong; dropOperation: NSTableViewDropOperation): Boolean; message 'tableView:acceptDrop:row:dropOperation:';
+    function tableView_namesOfPromisedFilesDroppedAtDestination_forDraggedRowsWithIndexes(tableView: NSTableView; dropDestination: NSURL; indexSet: NSIndexSet): NSArray; message 'tableView:namesOfPromisedFilesDroppedAtDestination:forDraggedRowsWithIndexes:';
+    function tableView_objectValueForTableColumn_row(tableView: NSTableView; tableColumn: NSTableColumn; row: clong): id; message 'tableView:objectValueForTableColumn:row:';
+    procedure tableView_setObjectValue_forTableColumn_row(tableView: NSTableView; object_: id; tableColumn: NSTableColumn; row: clong); message 'tableView:setObjectValue:forTableColumn:row:';
+    procedure tableView_sortDescriptorsDidChange(tableView: NSTableView; oldDescriptors: NSArray); message 'tableView:sortDescriptorsDidChange:';
+    function tableView_validateDrop_proposedRow_proposedDropOperation(tableView: NSTableView; info: id; row: clong; dropOperation: NSTableViewDropOperation): NSDragOperation; message 'tableView:validateDrop:proposedRow:proposedDropOperation:';
+    function tableView_writeRows_toPasteboard(tableView: NSTableView; rows: NSArray; pboard: NSPasteboard): Boolean; message 'tableView:writeRows:toPasteboard:';
+    function tableView_writeRowsWithIndexes_toPasteboard(tableView: NSTableView; rowIndexes: NSIndexSet; pboard: NSPasteboard): Boolean; message 'tableView:writeRowsWithIndexes:toPasteboard:';
+  end;
+
+type
+  NSTableViewDelegate = objccategory
+    function selectionShouldChangeInTableView(tableView: NSTableView): Boolean; message 'selectionShouldChangeInTableView:';
+    function tableView_dataCellForTableColumn_row(tableView: NSTableView; tableColumn: NSTableColumn; row: clong): NSCell; message 'tableView:dataCellForTableColumn:row:';
+    procedure tableView_didClickTableColumn(tableView: NSTableView; tableColumn: NSTableColumn); message 'tableView:didClickTableColumn:';
+    procedure tableView_didDragTableColumn(tableView: NSTableView; tableColumn: NSTableColumn); message 'tableView:didDragTableColumn:';
+    function tableView_heightOfRow(tableView: NSTableView; row: clong): CGFloat; message 'tableView:heightOfRow:';
+    function tableView_isGroupRow(tableView: NSTableView; row: clong): Boolean; message 'tableView:isGroupRow:';
+    procedure tableView_mouseDownInHeaderOfTableColumn(tableView: NSTableView; tableColumn: NSTableColumn); message 'tableView:mouseDownInHeaderOfTableColumn:';
+    function tableView_nextTypeSelectMatchFromRow_toRow_forString(tableView: NSTableView; startRow: clong; endRow: clong; searchString: NSString): clong; message 'tableView:nextTypeSelectMatchFromRow:toRow:forString:';
+    function tableView_selectionIndexesForProposedSelection(tableView: NSTableView; proposedSelectionIndexes: NSIndexSet): NSIndexSet; message 'tableView:selectionIndexesForProposedSelection:';
+    function tableView_shouldEditTableColumn_row(tableView: NSTableView; tableColumn: NSTableColumn; row: clong): Boolean; message 'tableView:shouldEditTableColumn:row:';
+    function tableView_shouldSelectRow(tableView: NSTableView; row: clong): Boolean; message 'tableView:shouldSelectRow:';
+    function tableView_shouldSelectTableColumn(tableView: NSTableView; tableColumn: NSTableColumn): Boolean; message 'tableView:shouldSelectTableColumn:';
+    function tableView_shouldShowCellExpansionForTableColumn_row(tableView: NSTableView; tableColumn: NSTableColumn; row: clong): Boolean; message 'tableView:shouldShowCellExpansionForTableColumn:row:';
+    function tableView_shouldTrackCell_forTableColumn_row(tableView: NSTableView; cell_: NSCell; tableColumn: NSTableColumn; row: clong): Boolean; message 'tableView:shouldTrackCell:forTableColumn:row:';
+    function tableView_shouldTypeSelectForEvent_withCurrentSearchString(tableView: NSTableView; event: NSEvent; searchString: NSString): Boolean; message 'tableView:shouldTypeSelectForEvent:withCurrentSearchString:';
+    function tableView_toolTipForCell_rect_tableColumn_row_mouseLocation(tableView: NSTableView; cell_: NSCell; rect: NSRectPointer; tableColumn: NSTableColumn; row: clong; mouseLocation: NSPoint): NSString; message 'tableView:toolTipForCell:rect:tableColumn:row:mouseLocation:';
+    function tableView_typeSelectStringForTableColumn_row(tableView: NSTableView; tableColumn: NSTableColumn; row: clong): NSString; message 'tableView:typeSelectStringForTableColumn:row:';
+    procedure tableView_willDisplayCell_forTableColumn_row(tableView: NSTableView; cell_: id; tableColumn: NSTableColumn; row: clong); message 'tableView:willDisplayCell:forTableColumn:row:';
+  end;
+
+type
+  NSTableViewNotifications = objccategory
+    procedure tableViewColumnDidMove(notification: NSNotification); message 'tableViewColumnDidMove:';
+    procedure tableViewColumnDidResize(notification: NSNotification); message 'tableViewColumnDidResize:';
+    procedure tableViewSelectionDidChange(notification: NSNotification); message 'tableViewSelectionDidChange:';
+    procedure tableViewSelectionIsChanging(notification: NSNotification); message 'tableViewSelectionIsChanging:';
+  end;
+
+type
+  NSTextDelegate = objccategory
+    procedure textDidBeginEditing(notification: NSNotification); message 'textDidBeginEditing:';
+    procedure textDidChange(notification: NSNotification); message 'textDidChange:';
+    procedure textDidEndEditing(notification: NSNotification); message 'textDidEndEditing:';
+    function textShouldBeginEditing(textObject: NSText): Boolean; message 'textShouldBeginEditing:';
+    function textShouldEndEditing(textObject: NSText): Boolean; message 'textShouldEndEditing:';
+  end;
+
+type
+  NSTextStorageDelegate = objccategory
+    procedure textStorageDidProcessEditing(notification: NSNotification); message 'textStorageDidProcessEditing:';
+    procedure textStorageWillProcessEditing(notification: NSNotification); message 'textStorageWillProcessEditing:';
+  end;
+
+type
+  NSTextViewDelegate = objccategory
+    procedure textView_clickedOnCell_inRect(textView: NSTextView; cell: id; cellFrame: NSRect); message 'textView:clickedOnCell:inRect:';
+    procedure textView_clickedOnCell_inRect_atIndex(textView: NSTextView; cell: id; cellFrame: NSRect; charIndex: culong); message 'textView:clickedOnCell:inRect:atIndex:';
+    function textView_clickedOnLink(textView: NSTextView; link: id): Boolean; message 'textView:clickedOnLink:';
+    function textView_clickedOnLink_atIndex(textView: NSTextView; link: id; charIndex: culong): Boolean; message 'textView:clickedOnLink:atIndex:';
+    function textView_completions_forPartialWordRange_indexOfSelectedItem(textView: NSTextView; words: NSArray; charRange: NSRange; index: clong): NSArray; message 'textView:completions:forPartialWordRange:indexOfSelectedItem:';
+    function textView_doCommandBySelector(textView: NSTextView; commandSelector: SEL): Boolean; message 'textView:doCommandBySelector:';
+    procedure textView_doubleClickedOnCell_inRect(textView: NSTextView; cell: id; cellFrame: NSRect); message 'textView:doubleClickedOnCell:inRect:';
+    procedure textView_doubleClickedOnCell_inRect_atIndex(textView: NSTextView; cell: id; cellFrame: NSRect; charIndex: culong); message 'textView:doubleClickedOnCell:inRect:atIndex:';
+    procedure textView_draggedCell_inRect_event(view: NSTextView; cell: id; rect: NSRect; event: NSEvent); message 'textView:draggedCell:inRect:event:';
+    procedure textView_draggedCell_inRect_event_atIndex(view: NSTextView; cell: id; rect: NSRect; event: NSEvent; charIndex: culong); message 'textView:draggedCell:inRect:event:atIndex:';
+    function textView_menu_forEvent_atIndex(view: NSTextView; menu_: NSMenu; event: NSEvent; charIndex: culong): NSMenu; message 'textView:menu:forEvent:atIndex:';
+    function textView_shouldChangeTextInRange_replacementString(textView: NSTextView; affectedCharRange: NSRange; replacementString: NSString): Boolean; message 'textView:shouldChangeTextInRange:replacementString:';
+    function textView_shouldChangeTextInRanges_replacementStrings(textView: NSTextView; affectedRanges: NSArray; replacementStrings: NSArray): Boolean; message 'textView:shouldChangeTextInRanges:replacementStrings:';
+    function textView_shouldChangeTypingAttributes_toAttributes(textView: NSTextView; oldTypingAttributes: NSDictionary; newTypingAttributes: NSDictionary): NSDictionary; message 'textView:shouldChangeTypingAttributes:toAttributes:';
+    function textView_shouldSetSpellingState_range(textView: NSTextView; value: clong; affectedCharRange: NSRange): clong; message 'textView:shouldSetSpellingState:range:';
+    function textView_willChangeSelectionFromCharacterRange_toCharacterRange(textView: NSTextView; oldSelectedCharRange: NSRange; newSelectedCharRange: NSRange): NSRange; message 'textView:willChangeSelectionFromCharacterRange:toCharacterRange:';
+    function textView_willChangeSelectionFromCharacterRanges_toCharacterRanges(textView: NSTextView; oldSelectedCharRanges: NSArray; newSelectedCharRanges: NSArray): NSArray; message 'textView:willChangeSelectionFromCharacterRanges:toCharacterRanges:';
+    function textView_willDisplayToolTip_forCharacterAtIndex(textView: NSTextView; toolTip_: NSString; characterIndex: culong): NSString; message 'textView:willDisplayToolTip:forCharacterAtIndex:';
+    function textView_writablePasteboardTypesForCell_atIndex(view: NSTextView; cell: id; charIndex: culong): NSArray; message 'textView:writablePasteboardTypesForCell:atIndex:';
+    function textView_writeCell_atIndex_toPasteboard_type(view: NSTextView; cell: id; charIndex: culong; pboard: NSPasteboard; type_: NSString): Boolean; message 'textView:writeCell:atIndex:toPasteboard:type:';
+    procedure textViewDidChangeSelection(notification: NSNotification); message 'textViewDidChangeSelection:';
+    procedure textViewDidChangeTypingAttributes(notification: NSNotification); message 'textViewDidChangeTypingAttributes:';
+    function undoManagerForTextView(view: NSTextView): NSUndoManager; message 'undoManagerForTextView:';
+  end;
+
+type
+  NSTokenFieldCellDelegate = objccategory
+    function tokenFieldCell_completionsForSubstring_indexOfToken_indexOfSelectedItem(tokenFieldCell: NSTokenFieldCell; substring: NSString; tokenIndex: clong; selectedIndex: clong): NSArray; message 'tokenFieldCell:completionsForSubstring:indexOfToken:indexOfSelectedItem:';
+    function tokenFieldCell_displayStringForRepresentedObject(tokenFieldCell: NSTokenFieldCell; representedObject_: id): NSString; message 'tokenFieldCell:displayStringForRepresentedObject:';
+    function tokenFieldCell_editingStringForRepresentedObject(tokenFieldCell: NSTokenFieldCell; representedObject_: id): NSString; message 'tokenFieldCell:editingStringForRepresentedObject:';
+    function tokenFieldCell_hasMenuForRepresentedObject(tokenFieldCell: NSTokenFieldCell; representedObject_: id): Boolean; message 'tokenFieldCell:hasMenuForRepresentedObject:';
+    function tokenFieldCell_menuForRepresentedObject(tokenFieldCell: NSTokenFieldCell; representedObject_: id): NSMenu; message 'tokenFieldCell:menuForRepresentedObject:';
+    function tokenFieldCell_readFromPasteboard(tokenFieldCell: NSTokenFieldCell; pboard: NSPasteboard): NSArray; message 'tokenFieldCell:readFromPasteboard:';
+    function tokenFieldCell_representedObjectForEditingString(tokenFieldCell: NSTokenFieldCell; editingString: NSString): id; message 'tokenFieldCell:representedObjectForEditingString:';
+    function tokenFieldCell_shouldAddObjects_atIndex(tokenFieldCell: NSTokenFieldCell; tokens: NSArray; index: culong): NSArray; message 'tokenFieldCell:shouldAddObjects:atIndex:';
+    function tokenFieldCell_styleForRepresentedObject(tokenFieldCell: NSTokenFieldCell; representedObject_: id): NSTokenStyle; message 'tokenFieldCell:styleForRepresentedObject:';
+    function tokenFieldCell_writeRepresentedObjects_toPasteboard(tokenFieldCell: NSTokenFieldCell; objects: NSArray; pboard: NSPasteboard): Boolean; message 'tokenFieldCell:writeRepresentedObjects:toPasteboard:';
+  end;
+
+type
+  NSTokenFieldDelegate = objccategory
+    function tokenField_completionsForSubstring_indexOfToken_indexOfSelectedItem(tokenField: NSTokenField; substring: NSString; tokenIndex: clong; selectedIndex: clong): NSArray; message 'tokenField:completionsForSubstring:indexOfToken:indexOfSelectedItem:';
+    function tokenField_displayStringForRepresentedObject(tokenField: NSTokenField; representedObject: id): NSString; message 'tokenField:displayStringForRepresentedObject:';
+    function tokenField_editingStringForRepresentedObject(tokenField: NSTokenField; representedObject: id): NSString; message 'tokenField:editingStringForRepresentedObject:';
+    function tokenField_hasMenuForRepresentedObject(tokenField: NSTokenField; representedObject: id): Boolean; message 'tokenField:hasMenuForRepresentedObject:';
+    function tokenField_menuForRepresentedObject(tokenField: NSTokenField; representedObject: id): NSMenu; message 'tokenField:menuForRepresentedObject:';
+    function tokenField_readFromPasteboard(tokenField: NSTokenField; pboard: NSPasteboard): NSArray; message 'tokenField:readFromPasteboard:';
+    function tokenField_representedObjectForEditingString(tokenField: NSTokenField; editingString: NSString): id; message 'tokenField:representedObjectForEditingString:';
+    function tokenField_shouldAddObjects_atIndex(tokenField: NSTokenField; tokens: NSArray; index: culong): NSArray; message 'tokenField:shouldAddObjects:atIndex:';
+    function tokenField_styleForRepresentedObject(tokenField: NSTokenField; representedObject: id): NSTokenStyle; message 'tokenField:styleForRepresentedObject:';
+    function tokenField_writeRepresentedObjects_toPasteboard(tokenField: NSTokenField; objects: NSArray; pboard: NSPasteboard): Boolean; message 'tokenField:writeRepresentedObjects:toPasteboard:';
+  end;
+
+type
+  NSToolbarDelegate = objccategory
+    function toolbar_itemForItemIdentifier_willBeInsertedIntoToolbar(toolbar: NSToolbar; itemIdentifier: NSString; flag: Boolean): NSToolbarItem; message 'toolbar:itemForItemIdentifier:willBeInsertedIntoToolbar:';
+    function toolbarAllowedItemIdentifiers(toolbar: NSToolbar): NSArray; message 'toolbarAllowedItemIdentifiers:';
+    function toolbarDefaultItemIdentifiers(toolbar: NSToolbar): NSArray; message 'toolbarDefaultItemIdentifiers:';
+    function toolbarSelectableItemIdentifiers(toolbar: NSToolbar): NSArray; message 'toolbarSelectableItemIdentifiers:';
+  end;
+
+type
+  NSToolbarNotifications = objccategory
+    procedure toolbarDidRemoveItem(notification: NSNotification); message 'toolbarDidRemoveItem:';
+    procedure toolbarWillAddItem(notification: NSNotification); message 'toolbarWillAddItem:';
+  end;
+
+type
+  NSURLConnectionDelegate = objccategory
+    procedure connection_didCancelAuthenticationChallenge(connection: NSURLConnection; challenge: NSURLAuthenticationChallenge); message 'connection:didCancelAuthenticationChallenge:';
+    procedure connection_didFailWithError(connection: NSURLConnection; error: NSError); message 'connection:didFailWithError:';
+    procedure connection_didReceiveAuthenticationChallenge(connection: NSURLConnection; challenge: NSURLAuthenticationChallenge); message 'connection:didReceiveAuthenticationChallenge:';
+    procedure connection_didReceiveData(connection: NSURLConnection; data: NSData); message 'connection:didReceiveData:';
+    procedure connection_didReceiveResponse(connection: NSURLConnection; response: NSURLResponse); message 'connection:didReceiveResponse:';
+    function connection_willCacheResponse(connection: NSURLConnection; cachedResponse: NSCachedURLResponse): NSCachedURLResponse; message 'connection:willCacheResponse:';
+    function connection_willSendRequest_redirectResponse(connection: NSURLConnection; request: NSURLRequest; response: NSURLResponse): NSURLRequest; message 'connection:willSendRequest:redirectResponse:';
+    procedure connectionDidFinishLoading(connection: NSURLConnection); message 'connectionDidFinishLoading:';
+  end;
+
+type
+  NSURLDownloadDelegate = objccategory
+    procedure download_decideDestinationWithSuggestedFilename(download: NSURLDownload; filename: NSString); message 'download:decideDestinationWithSuggestedFilename:';
+    procedure download_didCancelAuthenticationChallenge(download: NSURLDownload; challenge: NSURLAuthenticationChallenge); message 'download:didCancelAuthenticationChallenge:';
+    procedure download_didCreateDestination(download: NSURLDownload; path: NSString); message 'download:didCreateDestination:';
+    procedure download_didFailWithError(download: NSURLDownload; error: NSError); message 'download:didFailWithError:';
+    procedure download_didReceiveAuthenticationChallenge(download: NSURLDownload; challenge: NSURLAuthenticationChallenge); message 'download:didReceiveAuthenticationChallenge:';
+    procedure download_didReceiveDataOfLength(download: NSURLDownload; length: culong); message 'download:didReceiveDataOfLength:';
+    procedure download_didReceiveResponse(download: NSURLDownload; response: NSURLResponse); message 'download:didReceiveResponse:';
+    function download_shouldDecodeSourceDataOfMIMEType(download: NSURLDownload; encodingType: NSString): Boolean; message 'download:shouldDecodeSourceDataOfMIMEType:';
+    procedure download_willResumeWithResponse_fromByte(download: NSURLDownload; response: NSURLResponse; startingByte: clonglong); message 'download:willResumeWithResponse:fromByte:';
+    function download_willSendRequest_redirectResponse(download: NSURLDownload; request_: NSURLRequest; redirectResponse: NSURLResponse): NSURLRequest; message 'download:willSendRequest:redirectResponse:';
+    procedure downloadDidBegin(download: NSURLDownload); message 'downloadDidBegin:';
+    procedure downloadDidFinish(download: NSURLDownload); message 'downloadDidFinish:';
+  end;
+
+type
+  NSWindowDelegate = objccategory
+    function window_shouldDragDocumentWithEvent_from_withPasteboard(window: NSWindow; event: NSEvent; dragImageLocation: NSPoint; pasteboard: NSPasteboard): Boolean; message 'window:shouldDragDocumentWithEvent:from:withPasteboard:';
+    function window_shouldPopUpDocumentPathMenu(window: NSWindow; menu_: NSMenu): Boolean; message 'window:shouldPopUpDocumentPathMenu:';
+    function window_willPositionSheet_usingRect(window: NSWindow; sheet: NSWindow; rect: NSRect): NSRect; message 'window:willPositionSheet:usingRect:';
+    function windowShouldClose(sender: id): Boolean; message 'windowShouldClose:';
+    function windowShouldZoom_toFrame(window: NSWindow; newFrame: NSRect): Boolean; message 'windowShouldZoom:toFrame:';
+    function windowWillResize_toSize(sender: NSWindow; frameSize: NSSize): NSSize; message 'windowWillResize:toSize:';
+    function windowWillReturnFieldEditor_toObject(sender: NSWindow; client: id): id; message 'windowWillReturnFieldEditor:toObject:';
+    function windowWillReturnUndoManager(window: NSWindow): NSUndoManager; message 'windowWillReturnUndoManager:';
+    function windowWillUseStandardFrame_defaultFrame(window: NSWindow; newFrame: NSRect): NSRect; message 'windowWillUseStandardFrame:defaultFrame:';
+  end;
+
+type
+  NSWindowNotifications = objccategory
+    procedure windowDidBecomeKey(notification: NSNotification); message 'windowDidBecomeKey:';
+    procedure windowDidBecomeMain(notification: NSNotification); message 'windowDidBecomeMain:';
+    procedure windowDidChangeScreen(notification: NSNotification); message 'windowDidChangeScreen:';
+    procedure windowDidChangeScreenProfile(notification: NSNotification); message 'windowDidChangeScreenProfile:';
+    procedure windowDidDeminiaturize(notification: NSNotification); message 'windowDidDeminiaturize:';
+    procedure windowDidEndSheet(notification: NSNotification); message 'windowDidEndSheet:';
+    procedure windowDidExpose(notification: NSNotification); message 'windowDidExpose:';
+    procedure windowDidMiniaturize(notification: NSNotification); message 'windowDidMiniaturize:';
+    procedure windowDidMove(notification: NSNotification); message 'windowDidMove:';
+    procedure windowDidResignKey(notification: NSNotification); message 'windowDidResignKey:';
+    procedure windowDidResignMain(notification: NSNotification); message 'windowDidResignMain:';
+    procedure windowDidResize(notification: NSNotification); message 'windowDidResize:';
+    procedure windowDidUpdate(notification: NSNotification); message 'windowDidUpdate:';
+    procedure windowWillBeginSheet(notification: NSNotification); message 'windowWillBeginSheet:';
+    procedure windowWillClose(notification: NSNotification); message 'windowWillClose:';
+    procedure windowWillMiniaturize(notification: NSNotification); message 'windowWillMiniaturize:';
+    procedure windowWillMove(notification: NSNotification); message 'windowWillMove:';
+  end;
+
+type
+  NSXMLParserDelegateEventAdditions = objccategory
+    procedure parser_didEndElement_namespaceURI_qualifiedName(parser: NSXMLParser; elementName: NSString; namespaceURI: NSString; qName: NSString); message 'parser:didEndElement:namespaceURI:qualifiedName:';
+    procedure parser_didEndMappingPrefix(parser: NSXMLParser; prefix: NSString); message 'parser:didEndMappingPrefix:';
+    procedure parser_didStartElement_namespaceURI_qualifiedName_attributes(parser: NSXMLParser; elementName: NSString; namespaceURI: NSString; qName: NSString; attributeDict: NSDictionary); message 'parser:didStartElement:namespaceURI:qualifiedName:attributes:';
+    procedure parser_didStartMappingPrefix_toURI(parser: NSXMLParser; prefix: NSString; namespaceURI: NSString); message 'parser:didStartMappingPrefix:toURI:';
+    procedure parser_foundAttributeDeclarationWithName_forElement_type_defaultValue(parser: NSXMLParser; attributeName: NSString; elementName: NSString; type_: NSString; defaultValue: NSString); message 'parser:foundAttributeDeclarationWithName:forElement:type:defaultValue:';
+    procedure parser_foundCDATA(parser: NSXMLParser; CDATABlock: NSData); message 'parser:foundCDATA:';
+    procedure parser_foundCharacters(parser: NSXMLParser; string_: NSString); message 'parser:foundCharacters:';
+    procedure parser_foundComment(parser: NSXMLParser; comment: NSString); message 'parser:foundComment:';
+    procedure parser_foundElementDeclarationWithName_model(parser: NSXMLParser; elementName: NSString; model: NSString); message 'parser:foundElementDeclarationWithName:model:';
+    procedure parser_foundExternalEntityDeclarationWithName_publicID_systemID(parser: NSXMLParser; name: NSString; publicID_: NSString; systemID_: NSString); message 'parser:foundExternalEntityDeclarationWithName:publicID:systemID:';
+    procedure parser_foundIgnorableWhitespace(parser: NSXMLParser; whitespaceString: NSString); message 'parser:foundIgnorableWhitespace:';
+    procedure parser_foundInternalEntityDeclarationWithName_value(parser: NSXMLParser; name: NSString; value: NSString); message 'parser:foundInternalEntityDeclarationWithName:value:';
+    procedure parser_foundNotationDeclarationWithName_publicID_systemID(parser: NSXMLParser; name: NSString; publicID_: NSString; systemID_: NSString); message 'parser:foundNotationDeclarationWithName:publicID:systemID:';
+    procedure parser_foundProcessingInstructionWithTarget_data(parser: NSXMLParser; target: NSString; data: NSString); message 'parser:foundProcessingInstructionWithTarget:data:';
+    procedure parser_foundUnparsedEntityDeclarationWithName_publicID_systemID_notationName(parser: NSXMLParser; name: NSString; publicID_: NSString; systemID_: NSString; notationName: NSString); message 'parser:foundUnparsedEntityDeclarationWithName:publicID:systemID:notationName:';
+    procedure parser_parseErrorOccurred(parser: NSXMLParser; parseError: NSError); message 'parser:parseErrorOccurred:';
+    function parser_resolveExternalEntityName_systemID(parser: NSXMLParser; name: NSString; systemID_: NSString): NSData; message 'parser:resolveExternalEntityName:systemID:';
+    procedure parser_validationErrorOccurred(parser: NSXMLParser; validationError: NSError); message 'parser:validationErrorOccurred:';
+    procedure parserDidEndDocument(parser: NSXMLParser); message 'parserDidEndDocument:';
+    procedure parserDidStartDocument(parser: NSXMLParser); message 'parserDidStartDocument:';
+  end;
diff --git a/packages/cocoaint/src/UndefinedClasses.inc b/packages/cocoaint/src/UndefinedClasses.inc
new file mode 100644
index 0000000000..f0a5b612f2
--- /dev/null
+++ b/packages/cocoaint/src/UndefinedClasses.inc
@@ -0,0 +1,57 @@
+{MISSING CLASSES}
+NSTypesetter = NSObject;
+NSInvocation = id;
+NSPointerFunctions = id;
+NSManagedObjectContext = id;
+NSFetchRequest = id;
+CIColor = id;
+NSPredicateOperator = id;
+
+{"internal" classes that appeared in instance variables - declare as external?}
+NSURLAuthenticationChallengeInternal = id;
+NSURLCredentialInternal = id;
+NSURLCredentialStorageInternal = id;
+NSURLProtectionSpaceInternal = id;
+NSCachedURLResponseInternal = id;
+NSURLCacheInternal = id;
+NSURLConnectionInternal = id;
+NSURLProtocolInternal = id;
+NSURLRequestInternal = id;
+NSURLResponseInternal = id;
+NSHTTPURLResponseInternal = id;
+NSHTTPCookieInternal = id;
+NSHTTPCookieStorageInternal = id;
+NSURLDownloadInternal = id;
+
+{"auxiliary" instance variable classes - external?}
+_NSImageAuxiliary = id;
+_NSViewAuxiliary = id;
+NSWindowAuxiliary = id;
+NSSavePanelAuxiliary = id;
+
+{private instance variable classes - external?}
+NSNavView = id;
+NSMouseTracker = id;
+__NSOVRowEntry = id;
+NSStorage = id;
+NSRunStorage = id;
+NSSortedArray = id;
+NSTabWell = id;
+NSManagedObjectModel = id;
+
+{MISSING PROTOCOLS}
+NSCopyingProtocol = objcprotocol
+end; external;
+
+NSMutableCopyingProtocol = objcprotocol
+end; external;
+
+NSCodingProtocol = objcprotocol
+end; external;
+
+NSValidatedUserInterfaceItemProtocol = objcprotocol
+end; external;
+
+NSUserInterfaceValidationsProtocol = objcprotocol
+end; external;
+
diff --git a/packages/cocoaint/src/UndefinedTypes.inc b/packages/cocoaint/src/UndefinedTypes.inc
new file mode 100644
index 0000000000..9457b42e38
--- /dev/null
+++ b/packages/cocoaint/src/UndefinedTypes.inc
@@ -0,0 +1,80 @@
+type
+  __NSAppleEventManagerSuspension = Pointer;
+  CGFloat = Float32;
+  UTF = UInt32;
+  va_list = Pointer; //typedef __darwin_va_list	va_list;
+  NSPointerFunctionsOptions = UInt16;
+  URefCon = UInt32;
+  SRefCon = SInt32;
+  IBAction = Pointer;
+  CIContext = id;
+  CIFilter = id;
+  CIImage = id;
+  CALayer = id;
+  QTMovie = Pointer;
+  GLint = integer;
+  GLenum = integer;
+  GLsizei = integer;
+  GLbitfield = integer;
+  objc_protocol = protocol;
+  
+{ Private instance variable types }
+type
+ _NSImageCellAnimationState = Pointer;
+ _CGLPBufferObject = Pointer;
+ PATHSEGMENT = Pointer;		{from NSBezierPath.h what is this???}
+ 
+{ Pointer C-Types }
+{ Note: the parser appends "Pointer" by default but these may have preferred names in ctypes. }
+type
+ culongPointer = ^culong;
+ UInt32Pointer = Pointer;
+ 
+{ An array of objects }
+type
+  NSObjectArrayOfObjects = array[0..(high(longint) div sizeof(id))-1] of id;
+  NSObjectArrayOfObjectsPtr = ^NSObjectArrayOfObjects;
+
+{ Cocoa types }
+const
+  NSIntegerMax = high(clong);
+  NSIntegerMin = low(clong);
+  NSUIntegerMax = high(culong);
+ 
+const
+ NX_TABLET_POINTER_UNKNOWN = 0;
+ NX_TABLET_POINTER_PEN = 1;
+ NX_TABLET_POINTER_CURSOR = 2;
+ NX_TABLET_POINTER_ERASER = 3;
+ 
+ NX_SUBTYPE_DEFAULT = 0;
+ NX_SUBTYPE_TABLET_POINT = 1;
+ NX_SUBTYPE_TABLET_PROXIMITY = 2;
+ 
+ NX_TABLET_BUTTON_PENTIPMASK = $0001;
+ NX_TABLET_BUTTON_PENLOWERSIDEMASK = $0002;
+ NX_TABLET_BUTTON_PENUPPERSIDEMASK = $0004;
+  
+{ The CFError API is not in MacOSAll! we need to port this for PasCocoa... } 
+type
+  CFErrorRef = Pointer;
+ 
+{ Parser hacks - these types should never exist }
+type
+  char_ = Pointer;
+  aeDesc_ = AEDesc;
+  CIContext_ = id;
+  CIImage_ = id;
+  NSRangePointerPointer = Pointer;
+
+{ Parse bugs - these should have been parsed but were not due to errors }
+type
+  NSHashEnumerator = Pointer; {struct}
+  NSMapEnumerator = Pointer; {struct}
+  NSUncaughtExceptionHandler = Pointer; {function?}
+ 
+{ NSPointerFunctions - missing from where?? }
+const
+  NSPointerFunctionsZeroingWeakMemory = 1 shl 0;
+  NSPointerFunctionsCopyIn = 1 shl 16;
+  NSPointerFunctionsObjectPointerPersonality = 2 shl 8;
\ No newline at end of file
diff --git a/packages/cocoaint/src/appkit/AppKit.inc b/packages/cocoaint/src/appkit/AppKit.inc
new file mode 100644
index 0000000000..6cd90f9bb1
--- /dev/null
+++ b/packages/cocoaint/src/appkit/AppKit.inc
@@ -0,0 +1,181 @@
+{
+	AppKit.h
+	Application Kit
+	Copyright (c) 1994-2007, Apple Inc.
+	All rights reserved.
+
+	This file is included by all AppKit application source files for easy building.  Using this file is preferred over importing individual files because it will use a precompiled version.
+}
+
+
+{NOTE: These headers were added for compatibility}
+{$include CIColor.inc}
+{include NSValidatedUserInterfaceItem.inc}	// ??? NSValidatedUserInterfaceItem.h is not located in the current version in AppKit.framework.
+
+{From AppKit.h}
+{$include NSResponder.inc} 
+{$include NSGraphicsContext.inc} 
+{$include NSAccessibility.inc} 
+{$include NSAlert.inc} 
+{$include NSAnimationContext.inc} 
+{$include NSAppleScriptExtensions.inc} 
+{$include NSApplication.inc} 
+{$include NSParagraphStyle.inc} 
+{$include NSCell.inc} 
+{$include NSActionCell.inc} 
+{$include NSButtonCell.inc} 
+{$include NSDockTile.inc} 
+{$include NSFont.inc} 
+{$include NSFontDescriptor.inc} 
+{$include NSFontManager.inc} 
+{$include NSFormCell.inc} 
+{$include NSMenu.inc} 
+{$include NSMenuItem.inc} 
+{$include NSColor.inc} 
+{$include NSColorSpace.inc} 
+{$include NSBrowserCell.inc} 
+{$include NSColorList.inc} 
+{$include NSColorPicking.inc} 
+{$include NSColorPicker.inc} 
+{$include NSCursor.inc} 
+{$include NSDocument.inc} 
+{$include NSDocumentController.inc} 
+{$include NSDragging.inc} 
+{$include NSErrors.inc} 
+{$include NSEvent.inc} 
+{$include NSFileWrapper.inc} 
+{$include NSHelpManager.inc} 
+{$include NSGradient.inc} 
+{$include NSGraphics.inc} 
+{$include NSImage.inc} 
+{$include NSImageCell.inc} 
+{$include NSImageRep.inc} 
+{$include NSBitmapImageRep.inc} 
+{$include NSCachedImageRep.inc} 
+{$include NSCIImageRep.inc} 
+{$include NSCustomImageRep.inc} 
+{$include NSEPSImageRep.inc} 
+{$include NSNib.inc} 
+{$include NSNibLoading.inc} 
+{$include NSPrinter.inc} 
+{$include NSSpeechRecognizer.inc} 
+{$include NSSpeechSynthesizer.inc} 
+{$include NSSpellChecker.inc} 
+{$include NSPageLayout.inc} 
+{$include NSPasteboard.inc} 
+{$include NSPrintInfo.inc} 
+{$include NSPrintOperation.inc} 
+{$include NSScreen.inc} 
+{$include NSSliderCell.inc} 
+{$include NSSpellProtocol.inc} 
+{$include NSTextFieldCell.inc} 
+{$include NSTokenFieldCell.inc} 
+{$include NSTrackingArea.inc} 
+{$include NSView.inc} 
+{$include NSScrollView.inc} 
+{$include NSSplitView.inc} 
+{$include NSClipView.inc} 
+{$include NSText.inc} 
+{$include NSViewController.inc} 
+{$include NSControl.inc} 
+{$include NSButton.inc}
+{$include NSPopUpButton.inc} 
+{$include NSImageView.inc} 
+{$include NSColorWell.inc} 
+{$include NSBrowser.inc} 
+{$include NSMatrix.inc}
+{$include NSForm.inc} 
+{$include NSBox.inc}
+{$include NSScroller.inc} 
+{$include NSSegmentedControl.inc} 
+{$include NSSlider.inc} 
+{$include NSTextField.inc} 
+{$include NSTokenField.inc} 
+{$include NSWindow.inc}
+{$include NSPanel.inc} 
+{$include NSColorPanel.inc} 
+{$include NSFontPanel.inc}
+{$include NSPrintPanel.inc} 
+{$include NSSavePanel.inc} 
+{$include NSOpenPanel.inc} 
+{$include NSWindowController.inc} 
+{$include NSWorkspace.inc} 
+{$include NSComboBox.inc} 
+{$include NSComboBoxCell.inc} 
+{$include NSTableColumn.inc} 
+{$include NSTableHeaderCell.inc} 
+{$include NSTableHeaderView.inc} 
+{$include NSTableView.inc} 
+{$include NSOutlineView.inc} 
+{$include NSAttributedString.inc} 
+{$include NSLayoutManager.inc} 
+{$include NSTextStorage.inc} 
+{$include NSTextView.inc} 
+{$include NSTextContainer.inc} 
+{$include NSTextAttachment.inc} 
+{$include NSInputManager.inc} 
+{$include NSInputServer.inc} 
+{$include NSStringDrawing.inc} 
+{$include NSRulerMarker.inc} 
+{$include NSRulerView.inc} 
+{$include NSSecureTextField.inc} 
+{$include NSInterfaceStyle.inc} 
+{------------> NOT FOUND!}{include NSNibDeclarations.inc} 
+{$include NSProgressIndicator.inc} 
+{$include NSTabView.inc} 
+{$include NSTabViewItem.inc} 
+{$include NSMenuView.inc} 
+{$include NSMenuItemCell.inc} 
+{$include NSPopUpButtonCell.inc} 
+{$include NSAffineTransform.inc} 
+{$include NSBezierPath.inc} 
+{$include NSPICTImageRep.inc} 
+{$include NSStatusBar.inc} 
+{$include NSStatusItem.inc} 
+{$include NSSound.inc} 
+{$include NSMovie.inc} 
+{$include NSMovieView.inc} 
+{$include NSPDFImageRep.inc} 
+{$include NSQuickDrawView.inc} 
+{$include NSDrawer.inc} 
+{$include NSOpenGL.inc} 
+{$include NSOpenGLView.inc} 
+{$include NSApplicationScripting.inc} 
+{$include NSDocumentScripting.inc} 
+{$include NSTextStorageScripting.inc} 
+{$include NSToolbar.inc} 
+{$include NSToolbarItem.inc} 
+{$include NSToolbarItemGroup.inc} 
+{$include NSWindowScripting.inc} 
+{$include NSStepper.inc} 
+{$include NSStepperCell.inc} 
+{$include NSGlyphInfo.inc} 
+{$include NSShadow.inc} 
+{$include NSATSTypesetter.inc} 
+{$include NSGlyphGenerator.inc} 
+{$include NSSearchField.inc} 
+{$include NSSearchFieldCell.inc} 
+{$include NSController.inc} 
+{$include NSObjectController.inc} 
+{$include NSArrayController.inc} 
+{$include NSDictionaryController.inc} 
+{$include NSTreeNode.inc} 
+{$include NSTreeController.inc} 
+{$include NSUserDefaultsController.inc} 
+{$include NSKeyValueBinding.inc} 
+{$include NSTextList.inc} 
+{$include NSTextTable.inc} 
+{$include NSDatePickerCell.inc} 
+{$include NSDatePicker.inc} 
+{$include NSLevelIndicatorCell.inc} 
+{$include NSLevelIndicator.inc} 
+{$include NSAnimation.inc} 
+{$include NSPersistentDocument.inc} 
+{$include NSRuleEditor.inc} 
+{$include NSPredicateEditor.inc} 
+{include NSPredicateEditorRowTemplate.inc} 	// ??? this is missing from I don't know where
+{$include NSPathCell.inc} 
+{$include NSPathControl.inc} 
+{$include NSPathComponentCell.inc} 
+{$include NSCollectionView.inc} 
+{$include NSTextInputClient.inc} 
diff --git a/packages/cocoaint/src/appkit/CIColor.inc b/packages/cocoaint/src/appkit/CIColor.inc
new file mode 100644
index 0000000000..e69de29bb2
--- /dev/null
+++ b/packages/cocoaint/src/appkit/CIColor.inc
diff --git a/packages/cocoaint/src/appkit/NSATSTypesetter.inc b/packages/cocoaint/src/appkit/NSATSTypesetter.inc
new file mode 100644
index 0000000000..15be2ce855
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSATSTypesetter.inc
@@ -0,0 +1,125 @@
+{ Parsed from Appkit.framework NSATSTypesetter.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSATSTYPESETTER_PAS_H}
+{$define NSATSTYPESETTER_PAS_H}
+type
+  NSATSTypesetterPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSATSTYPESETTER_PAS_T}
+{$define NSATSTYPESETTER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSATSTYPESETTER_PAS_R}
+{$define NSATSTYPESETTER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSATSTYPESETTER_PAS_F}
+{$define NSATSTYPESETTER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSATSTYPESETTER_PAS_T}
+{$define NSATSTYPESETTER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSATSTypesetter = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSATSTYPESETTER_PAS_C}
+{$define NSATSTYPESETTER_PAS_C}
+
+{ NSATSTypesetter }
+  NSATSTypesetter = objcclass(NSTypesetter)
+  private
+    _attributedString: NSAttributedString;
+    _paragraphGlyphRange: NSRange;
+    _paragraphSeparatorGlyphRange: NSRange;
+    _lineFragmentPadding: CGFloat;
+    _layoutManager: NSLayoutManager;
+    _textContainers: NSArray;
+    _currentTextContainer: NSTextContainer;
+    _currentTextContainerIndex: culong;
+    _currentTextContainerSize: NSSize;
+    _currentParagraphStyle: NSParagraphStyle;
+    __atsReserved: Pointer;
+    __private: id;
+    
+  public
+    class function alloc: NSATSTypesetter; message 'alloc';
+
+    class function sharedTypesetter: id; message 'sharedTypesetter';
+
+    { Category: NSPantherCompatibility }
+    function lineFragmentRectForProposedRect_remainingRect(proposedRect: NSRect; remainingRect: NSRectPointer): NSRect; message 'lineFragmentRectForProposedRect:remainingRect:';
+
+    { Category: NSPrimitiveInterface }
+    function usesFontLeading: Boolean; message 'usesFontLeading';
+    procedure setUsesFontLeading(flag: Boolean); message 'setUsesFontLeading:';
+    function typesetterBehavior: NSTypesetterBehavior; message 'typesetterBehavior';
+    procedure setTypesetterBehavior(behavior: NSTypesetterBehavior); message 'setTypesetterBehavior:';
+    function hyphenationFactor: single; message 'hyphenationFactor';
+    procedure setHyphenationFactor(factor: single); message 'setHyphenationFactor:';
+    function lineFragmentPadding: CGFloat; message 'lineFragmentPadding';
+    procedure setLineFragmentPadding(padding: CGFloat); message 'setLineFragmentPadding:';
+    function substituteFontForFont(originalFont: NSFont): NSFont; message 'substituteFontForFont:';
+    function textTabForGlyphLocation_writingDirection_maxLocation(glyphLocation: CGFloat; direction: NSWritingDirection; maxLocation: CGFloat): NSTextTab; message 'textTabForGlyphLocation:writingDirection:maxLocation:';
+    function bidiProcessingEnabled: Boolean; message 'bidiProcessingEnabled';
+    procedure setBidiProcessingEnabled(flag: Boolean); message 'setBidiProcessingEnabled:';
+    procedure setAttributedString(attrString: NSAttributedString); message 'setAttributedString:';
+    function attributedString: NSAttributedString; message 'attributedString';
+    procedure setParagraphGlyphRange_separatorGlyphRange(paragraphRange: NSRange; paragraphSeparatorRange: NSRange); message 'setParagraphGlyphRange:separatorGlyphRange:';
+    function paragraphGlyphRange: NSRange; message 'paragraphGlyphRange';
+    function paragraphSeparatorGlyphRange: NSRange; message 'paragraphSeparatorGlyphRange';
+    function layoutParagraphAtPoint(var lineFragmentOrigin: NSPoint): culong; message 'layoutParagraphAtPoint:';
+    function lineSpacingAfterGlyphAtIndex_withProposedLineFragmentRect(glyphIndex: culong; rect: NSRect): CGFloat; message 'lineSpacingAfterGlyphAtIndex:withProposedLineFragmentRect:';
+    function paragraphSpacingBeforeGlyphAtIndex_withProposedLineFragmentRect(glyphIndex: culong; rect: NSRect): CGFloat; message 'paragraphSpacingBeforeGlyphAtIndex:withProposedLineFragmentRect:';
+    function paragraphSpacingAfterGlyphAtIndex_withProposedLineFragmentRect(glyphIndex: culong; rect: NSRect): CGFloat; message 'paragraphSpacingAfterGlyphAtIndex:withProposedLineFragmentRect:';
+    function layoutManager: NSLayoutManager; message 'layoutManager';
+    function currentTextContainer: NSTextContainer; message 'currentTextContainer';
+    procedure setHardInvalidation_forGlyphRange(flag: Boolean; glyphRange: NSRange); message 'setHardInvalidation:forGlyphRange:';
+    procedure getLineFragmentRect_usedRect_forParagraphSeparatorGlyphRange_atProposedOrigin(var lineFragmentRect: NSRect; var lineFragmentUsedRect: NSRect; paragraphSeparatorGlyphRange_: NSRange; lineOrigin: NSPoint); message 'getLineFragmentRect:usedRect:forParagraphSeparatorGlyphRange:atProposedOrigin:';
+
+    { Category: NSLayoutPhaseInterface }
+    procedure willSetLineFragmentRect_forGlyphRange_usedRect_baselineOffset(var lineRect: NSRect; glyphRange: NSRange; var usedRect: NSRect; var baselineOffset: CGFloat); message 'willSetLineFragmentRect:forGlyphRange:usedRect:baselineOffset:';
+    function shouldBreakLineByWordBeforeCharacterAtIndex(charIndex: culong): Boolean; message 'shouldBreakLineByWordBeforeCharacterAtIndex:';
+    function shouldBreakLineByHyphenatingBeforeCharacterAtIndex(charIndex: culong): Boolean; message 'shouldBreakLineByHyphenatingBeforeCharacterAtIndex:';
+    function hyphenationFactorForGlyphAtIndex(glyphIndex: culong): single; message 'hyphenationFactorForGlyphAtIndex:';
+    function hyphenCharacterForGlyphAtIndex(glyphIndex: culong): UTF32Char; message 'hyphenCharacterForGlyphAtIndex:';
+    function boundingBoxForControlGlyphAtIndex_forTextContainer_proposedLineFragment_glyphPosition_characterIndex(glyphIndex: culong; textContainer: NSTextContainer; proposedRect: NSRect; glyphPosition: NSPoint; charIndex: culong): NSRect; message 'boundingBoxForControlGlyphAtIndex:forTextContainer:proposedLineFragment:glyphPosition:characterIndex:';
+
+    { Category: NSGlyphStorageInterface }
+    function characterRangeForGlyphRange_actualGlyphRange(glyphRange: NSRange; actualGlyphRange: NSRangePointer): NSRange; message 'characterRangeForGlyphRange:actualGlyphRange:';
+    function glyphRangeForCharacterRange_actualCharacterRange(charRange: NSRange; actualCharRange: NSRangePointer): NSRange; message 'glyphRangeForCharacterRange:actualCharacterRange:';
+    function getGlyphsInRange_glyphs_characterIndexes_glyphInscriptions_elasticBits(glyphsRange: NSRange; var glyphBuffer: NSGlyph; var charIndexBuffer: culong; var inscribeBuffer: NSGlyphInscription; var elasticBuffer: Boolean): culong; message 'getGlyphsInRange:glyphs:characterIndexes:glyphInscriptions:elasticBits:';
+    procedure setLineFragmentRect_forGlyphRange_usedRect_baselineOffset(fragmentRect: NSRect; glyphRange: NSRange; usedRect: NSRect; baselineOffset: CGFloat); message 'setLineFragmentRect:forGlyphRange:usedRect:baselineOffset:';
+    procedure substituteGlyphsInRange_withGlyphs(glyphRange: NSRange; var glyphs: NSGlyph); message 'substituteGlyphsInRange:withGlyphs:';
+    procedure insertGlyph_atGlyphIndex_characterIndex(glyph: NSGlyph; glyphIndex: culong; characterIndex: culong); message 'insertGlyph:atGlyphIndex:characterIndex:';
+    procedure deleteGlyphsInRange(glyphRange: NSRange); message 'deleteGlyphsInRange:';
+    procedure setNotShownAttribute_forGlyphRange(flag: Boolean; glyphRange: NSRange); message 'setNotShownAttribute:forGlyphRange:';
+    procedure setDrawsOutsideLineFragment_forGlyphRange(flag: Boolean; glyphRange: NSRange); message 'setDrawsOutsideLineFragment:forGlyphRange:';
+    procedure setLocation_withAdvancements_forStartOfGlyphRange(location: NSPoint; var advancements: CGFloat; glyphRange: NSRange); message 'setLocation:withAdvancements:forStartOfGlyphRange:';
+    procedure setAttachmentSize_forGlyphRange(attachmentSize: NSSize; glyphRange: NSRange); message 'setAttachmentSize:forGlyphRange:';
+    procedure setBidiLevels_forGlyphRange(var levels: byte; glyphRange: NSRange); message 'setBidiLevels:forGlyphRange:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSAccessibility.inc b/packages/cocoaint/src/appkit/NSAccessibility.inc
new file mode 100644
index 0000000000..5594462cd2
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSAccessibility.inc
@@ -0,0 +1,177 @@
+{ Parsed from Appkit.framework NSAccessibility.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSACCESSIBILITY_PAS_T}
+{$define NSACCESSIBILITY_PAS_T}
+
+{ CFString constants }
+var
+  NSAccessibilityErrorCodeExceptionInfo: CFStringRef; external name '_NSAccessibilityErrorCodeExceptionInfo';
+  NSAccessibilityRoleAttribute: CFStringRef; external name '_NSAccessibilityRoleAttribute';
+  NSAccessibilityRoleDescriptionAttribute: CFStringRef; external name '_NSAccessibilityRoleDescriptionAttribute';
+  NSAccessibilitySubroleAttribute: CFStringRef; external name '_NSAccessibilitySubroleAttribute';
+  NSAccessibilityHelpAttribute: CFStringRef; external name '_NSAccessibilityHelpAttribute';
+  NSAccessibilityValueAttribute: CFStringRef; external name '_NSAccessibilityValueAttribute';
+  NSAccessibilityMinValueAttribute: CFStringRef; external name '_NSAccessibilityMinValueAttribute';
+  NSAccessibilityMaxValueAttribute: CFStringRef; external name '_NSAccessibilityMaxValueAttribute';
+  NSAccessibilityEnabledAttribute: CFStringRef; external name '_NSAccessibilityEnabledAttribute';
+  NSAccessibilityFocusedAttribute: CFStringRef; external name '_NSAccessibilityFocusedAttribute';
+  NSAccessibilityParentAttribute: CFStringRef; external name '_NSAccessibilityParentAttribute';
+  NSAccessibilityChildrenAttribute: CFStringRef; external name '_NSAccessibilityChildrenAttribute';
+  NSAccessibilityWindowAttribute: CFStringRef; external name '_NSAccessibilityWindowAttribute';
+  NSAccessibilitySelectedChildrenAttribute: CFStringRef; external name '_NSAccessibilitySelectedChildrenAttribute';
+  NSAccessibilityVisibleChildrenAttribute: CFStringRef; external name '_NSAccessibilityVisibleChildrenAttribute';
+  NSAccessibilityPositionAttribute: CFStringRef; external name '_NSAccessibilityPositionAttribute';
+  NSAccessibilitySizeAttribute: CFStringRef; external name '_NSAccessibilitySizeAttribute';
+  NSAccessibilityContentsAttribute: CFStringRef; external name '_NSAccessibilityContentsAttribute';
+  NSAccessibilityTitleAttribute: CFStringRef; external name '_NSAccessibilityTitleAttribute';
+  NSAccessibilityPreviousContentsAttribute: CFStringRef; external name '_NSAccessibilityPreviousContentsAttribute';
+  NSAccessibilityNextContentsAttribute: CFStringRef; external name '_NSAccessibilityNextContentsAttribute';
+  NSAccessibilityHeaderAttribute: CFStringRef; external name '_NSAccessibilityHeaderAttribute';
+  NSAccessibilityEditedAttribute: CFStringRef; external name '_NSAccessibilityEditedAttribute';
+  NSAccessibilityTabsAttribute: CFStringRef; external name '_NSAccessibilityTabsAttribute';
+  NSAccessibilityHorizontalScrollBarAttribute: CFStringRef; external name '_NSAccessibilityHorizontalScrollBarAttribute';
+  NSAccessibilityVerticalScrollBarAttribute: CFStringRef; external name '_NSAccessibilityVerticalScrollBarAttribute';
+  NSAccessibilityOverflowButtonAttribute: CFStringRef; external name '_NSAccessibilityOverflowButtonAttribute';
+  NSAccessibilityIncrementButtonAttribute: CFStringRef; external name '_NSAccessibilityIncrementButtonAttribute';
+  NSAccessibilityDecrementButtonAttribute: CFStringRef; external name '_NSAccessibilityDecrementButtonAttribute';
+  NSAccessibilityFilenameAttribute: CFStringRef; external name '_NSAccessibilityFilenameAttribute';
+  NSAccessibilityExpandedAttribute: CFStringRef; external name '_NSAccessibilityExpandedAttribute';
+  NSAccessibilitySelectedAttribute: CFStringRef; external name '_NSAccessibilitySelectedAttribute';
+  NSAccessibilitySplittersAttribute: CFStringRef; external name '_NSAccessibilitySplittersAttribute';
+  NSAccessibilityDocumentAttribute: CFStringRef; external name '_NSAccessibilityDocumentAttribute';
+  NSAccessibilityTitleUIElementAttribute: CFStringRef; external name '_NSAccessibilityTitleUIElementAttribute';
+  NSAccessibilitySelectedTextAttribute: CFStringRef; external name '_NSAccessibilitySelectedTextAttribute';
+  NSAccessibilitySelectedTextRangeAttribute: CFStringRef; external name '_NSAccessibilitySelectedTextRangeAttribute';
+  NSAccessibilityMainAttribute: CFStringRef; external name '_NSAccessibilityMainAttribute';
+  NSAccessibilityMinimizedAttribute: CFStringRef; external name '_NSAccessibilityMinimizedAttribute';
+  NSAccessibilityCloseButtonAttribute: CFStringRef; external name '_NSAccessibilityCloseButtonAttribute';
+  NSAccessibilityZoomButtonAttribute: CFStringRef; external name '_NSAccessibilityZoomButtonAttribute';
+  NSAccessibilityMinimizeButtonAttribute: CFStringRef; external name '_NSAccessibilityMinimizeButtonAttribute';
+  NSAccessibilityToolbarButtonAttribute: CFStringRef; external name '_NSAccessibilityToolbarButtonAttribute';
+  NSAccessibilityProxyAttribute: CFStringRef; external name '_NSAccessibilityProxyAttribute';
+  NSAccessibilityGrowAreaAttribute: CFStringRef; external name '_NSAccessibilityGrowAreaAttribute';
+  NSAccessibilityMenuBarAttribute: CFStringRef; external name '_NSAccessibilityMenuBarAttribute';
+  NSAccessibilityWindowsAttribute: CFStringRef; external name '_NSAccessibilityWindowsAttribute';
+  NSAccessibilityFrontmostAttribute: CFStringRef; external name '_NSAccessibilityFrontmostAttribute';
+  NSAccessibilityHiddenAttribute: CFStringRef; external name '_NSAccessibilityHiddenAttribute';
+  NSAccessibilityMainWindowAttribute: CFStringRef; external name '_NSAccessibilityMainWindowAttribute';
+  NSAccessibilityFocusedWindowAttribute: CFStringRef; external name '_NSAccessibilityFocusedWindowAttribute';
+  NSAccessibilityFocusedUIElementAttribute: CFStringRef; external name '_NSAccessibilityFocusedUIElementAttribute';
+  NSAccessibilityOrientationAttribute: CFStringRef; external name '_NSAccessibilityOrientationAttribute';
+  NSAccessibilityVerticalOrientationValue: CFStringRef; external name '_NSAccessibilityVerticalOrientationValue';
+  NSAccessibilityHorizontalOrientationValue: CFStringRef; external name '_NSAccessibilityHorizontalOrientationValue';
+  NSAccessibilityColumnTitlesAttribute: CFStringRef; external name '_NSAccessibilityColumnTitlesAttribute';
+  NSAccessibilityRowsAttribute: CFStringRef; external name '_NSAccessibilityRowsAttribute';
+  NSAccessibilityVisibleRowsAttribute: CFStringRef; external name '_NSAccessibilityVisibleRowsAttribute';
+  NSAccessibilitySelectedRowsAttribute: CFStringRef; external name '_NSAccessibilitySelectedRowsAttribute';
+  NSAccessibilityColumnsAttribute: CFStringRef; external name '_NSAccessibilityColumnsAttribute';
+  NSAccessibilityVisibleColumnsAttribute: CFStringRef; external name '_NSAccessibilityVisibleColumnsAttribute';
+  NSAccessibilitySelectedColumnsAttribute: CFStringRef; external name '_NSAccessibilitySelectedColumnsAttribute';
+  NSAccessibilityDisclosingAttribute: CFStringRef; external name '_NSAccessibilityDisclosingAttribute';
+  NSAccessibilityDisclosedRowsAttribute: CFStringRef; external name '_NSAccessibilityDisclosedRowsAttribute';
+  NSAccessibilityDisclosedByRowAttribute: CFStringRef; external name '_NSAccessibilityDisclosedByRowAttribute';
+  NSAccessibilityPressAction: CFStringRef; external name '_NSAccessibilityPressAction';
+  NSAccessibilityIncrementAction: CFStringRef; external name '_NSAccessibilityIncrementAction';
+  NSAccessibilityDecrementAction: CFStringRef; external name '_NSAccessibilityDecrementAction';
+  NSAccessibilityConfirmAction: CFStringRef; external name '_NSAccessibilityConfirmAction';
+  NSAccessibilityPickAction: CFStringRef; external name '_NSAccessibilityPickAction';
+  NSAccessibilityMainWindowChangedNotification: CFStringRef; external name '_NSAccessibilityMainWindowChangedNotification';
+  NSAccessibilityFocusedWindowChangedNotification: CFStringRef; external name '_NSAccessibilityFocusedWindowChangedNotification';
+  NSAccessibilityFocusedUIElementChangedNotification: CFStringRef; external name '_NSAccessibilityFocusedUIElementChangedNotification';
+  NSAccessibilityApplicationActivatedNotification: CFStringRef; external name '_NSAccessibilityApplicationActivatedNotification';
+  NSAccessibilityApplicationDeactivatedNotification: CFStringRef; external name '_NSAccessibilityApplicationDeactivatedNotification';
+  NSAccessibilityApplicationHiddenNotification: CFStringRef; external name '_NSAccessibilityApplicationHiddenNotification';
+  NSAccessibilityApplicationShownNotification: CFStringRef; external name '_NSAccessibilityApplicationShownNotification';
+  NSAccessibilityWindowCreatedNotification: CFStringRef; external name '_NSAccessibilityWindowCreatedNotification';
+  NSAccessibilityWindowMovedNotification: CFStringRef; external name '_NSAccessibilityWindowMovedNotification';
+  NSAccessibilityWindowResizedNotification: CFStringRef; external name '_NSAccessibilityWindowResizedNotification';
+  NSAccessibilityWindowMiniaturizedNotification: CFStringRef; external name '_NSAccessibilityWindowMiniaturizedNotification';
+  NSAccessibilityWindowDeminiaturizedNotification: CFStringRef; external name '_NSAccessibilityWindowDeminiaturizedNotification';
+  NSAccessibilityUIElementDestroyedNotification: CFStringRef; external name '_NSAccessibilityUIElementDestroyedNotification';
+  NSAccessibilityValueChangedNotification: CFStringRef; external name '_NSAccessibilityValueChangedNotification';
+  NSAccessibilityUnknownRole: CFStringRef; external name '_NSAccessibilityUnknownRole';
+  NSAccessibilityButtonRole: CFStringRef; external name '_NSAccessibilityButtonRole';
+  NSAccessibilityRadioButtonRole: CFStringRef; external name '_NSAccessibilityRadioButtonRole';
+  NSAccessibilityCheckBoxRole: CFStringRef; external name '_NSAccessibilityCheckBoxRole';
+  NSAccessibilitySliderRole: CFStringRef; external name '_NSAccessibilitySliderRole';
+  NSAccessibilityTabGroupRole: CFStringRef; external name '_NSAccessibilityTabGroupRole';
+  NSAccessibilityTextFieldRole: CFStringRef; external name '_NSAccessibilityTextFieldRole';
+  NSAccessibilityStaticTextRole: CFStringRef; external name '_NSAccessibilityStaticTextRole';
+  NSAccessibilityTextAreaRole: CFStringRef; external name '_NSAccessibilityTextAreaRole';
+  NSAccessibilityScrollAreaRole: CFStringRef; external name '_NSAccessibilityScrollAreaRole';
+  NSAccessibilityPopUpButtonRole: CFStringRef; external name '_NSAccessibilityPopUpButtonRole';
+  NSAccessibilityMenuButtonRole: CFStringRef; external name '_NSAccessibilityMenuButtonRole';
+  NSAccessibilityTableRole: CFStringRef; external name '_NSAccessibilityTableRole';
+  NSAccessibilityApplicationRole: CFStringRef; external name '_NSAccessibilityApplicationRole';
+  NSAccessibilityGroupRole: CFStringRef; external name '_NSAccessibilityGroupRole';
+  NSAccessibilityRadioGroupRole: CFStringRef; external name '_NSAccessibilityRadioGroupRole';
+  NSAccessibilityListRole: CFStringRef; external name '_NSAccessibilityListRole';
+  NSAccessibilityScrollBarRole: CFStringRef; external name '_NSAccessibilityScrollBarRole';
+  NSAccessibilityValueIndicatorRole: CFStringRef; external name '_NSAccessibilityValueIndicatorRole';
+  NSAccessibilityImageRole: CFStringRef; external name '_NSAccessibilityImageRole';
+  NSAccessibilityMenuBarRole: CFStringRef; external name '_NSAccessibilityMenuBarRole';
+  NSAccessibilityMenuRole: CFStringRef; external name '_NSAccessibilityMenuRole';
+  NSAccessibilityMenuItemRole: CFStringRef; external name '_NSAccessibilityMenuItemRole';
+  NSAccessibilityColumnRole: CFStringRef; external name '_NSAccessibilityColumnRole';
+  NSAccessibilityRowRole: CFStringRef; external name '_NSAccessibilityRowRole';
+  NSAccessibilityToolbarRole: CFStringRef; external name '_NSAccessibilityToolbarRole';
+  NSAccessibilityBusyIndicatorRole: CFStringRef; external name '_NSAccessibilityBusyIndicatorRole';
+  NSAccessibilityProgressIndicatorRole: CFStringRef; external name '_NSAccessibilityProgressIndicatorRole';
+  NSAccessibilityWindowRole: CFStringRef; external name '_NSAccessibilityWindowRole';
+  NSAccessibilityDrawerRole: CFStringRef; external name '_NSAccessibilityDrawerRole';
+  NSAccessibilitySystemWideRole: CFStringRef; external name '_NSAccessibilitySystemWideRole';
+  NSAccessibilityOutlineRole: CFStringRef; external name '_NSAccessibilityOutlineRole';
+  NSAccessibilityIncrementorRole: CFStringRef; external name '_NSAccessibilityIncrementorRole';
+  NSAccessibilityBrowserRole: CFStringRef; external name '_NSAccessibilityBrowserRole';
+  NSAccessibilityComboBoxRole: CFStringRef; external name '_NSAccessibilityComboBoxRole';
+  NSAccessibilitySplitGroupRole: CFStringRef; external name '_NSAccessibilitySplitGroupRole';
+  NSAccessibilitySplitterRole: CFStringRef; external name '_NSAccessibilitySplitterRole';
+  NSAccessibilityColorWellRole: CFStringRef; external name '_NSAccessibilityColorWellRole';
+  NSAccessibilityGrowAreaRole: CFStringRef; external name '_NSAccessibilityGrowAreaRole';
+  NSAccessibilitySheetRole: CFStringRef; external name '_NSAccessibilitySheetRole';
+  NSAccessibilityUnknownSubrole: CFStringRef; external name '_NSAccessibilityUnknownSubrole';
+  NSAccessibilityCloseButtonSubrole: CFStringRef; external name '_NSAccessibilityCloseButtonSubrole';
+  NSAccessibilityZoomButtonSubrole: CFStringRef; external name '_NSAccessibilityZoomButtonSubrole';
+  NSAccessibilityMinimizeButtonSubrole: CFStringRef; external name '_NSAccessibilityMinimizeButtonSubrole';
+  NSAccessibilityToolbarButtonSubrole: CFStringRef; external name '_NSAccessibilityToolbarButtonSubrole';
+  NSAccessibilityTableRowSubrole: CFStringRef; external name '_NSAccessibilityTableRowSubrole';
+  NSAccessibilityOutlineRowSubrole: CFStringRef; external name '_NSAccessibilityOutlineRowSubrole';
+  NSAccessibilitySecureTextFieldSubrole: CFStringRef; external name '_NSAccessibilitySecureTextFieldSubrole';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSACCESSIBILITY_PAS_R}
+{$define NSACCESSIBILITY_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSACCESSIBILITY_PAS_F}
+{$define NSACCESSIBILITY_PAS_F}
+
+{ Functions }
+function NSAccessibilityRoleDescription(var role: NSString; var subrole: NSString): NSString; cdecl; external name 'NSAccessibilityRoleDescription';
+function NSAccessibilityRoleDescriptionForUIElement(element: id): NSString; cdecl; external name 'NSAccessibilityRoleDescriptionForUIElement';
+function NSAccessibilityActionDescription(var action: NSString): NSString; cdecl; external name 'NSAccessibilityActionDescription';
+procedure NSAccessibilityRaiseBadArgumentException(element: id; var attribute: NSString; value: id); cdecl; external name 'NSAccessibilityRaiseBadArgumentException';
+function NSAccessibilityUnignoredAncestor(element: id): id; cdecl; external name 'NSAccessibilityUnignoredAncestor';
+function NSAccessibilityUnignoredDescendant(element: id): id; cdecl; external name 'NSAccessibilityUnignoredDescendant';
+function NSAccessibilityUnignoredChildren(var originalChildren: NSArray): NSArray; cdecl; external name 'NSAccessibilityUnignoredChildren';
+function NSAccessibilityUnignoredChildrenForOnlyChild(originalChild: id): NSArray; cdecl; external name 'NSAccessibilityUnignoredChildrenForOnlyChild';
+procedure NSAccessibilityPostNotification(element: id; var notification: NSString); cdecl; external name 'NSAccessibilityPostNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSACCESSIBILITY_PAS_T}
+{$define NSACCESSIBILITY_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSActionCell.inc b/packages/cocoaint/src/appkit/NSActionCell.inc
new file mode 100644
index 0000000000..5faf6b2b4e
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSActionCell.inc
@@ -0,0 +1,85 @@
+{ Parsed from Appkit.framework NSActionCell.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSACTIONCELL_PAS_H}
+{$define NSACTIONCELL_PAS_H}
+type
+  NSActionCellPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSACTIONCELL_PAS_T}
+{$define NSACTIONCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSACTIONCELL_PAS_R}
+{$define NSACTIONCELL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSACTIONCELL_PAS_F}
+{$define NSACTIONCELL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSACTIONCELL_PAS_T}
+{$define NSACTIONCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSActionCell = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSACTIONCELL_PAS_C}
+{$define NSACTIONCELL_PAS_C}
+
+{ NSActionCell }
+  NSActionCell = objcclass(NSCell)
+  private
+    __tag: clong;
+    __target: id;
+    __action: SEL;
+    __controlView: id;
+    
+  public
+    class function alloc: NSActionCell; message 'alloc';
+
+    function controlView: NSView; message 'controlView';
+    procedure setControlView(view: NSView); message 'setControlView:';
+    procedure setFont(fontObj: NSFont); message 'setFont:';
+    procedure setAlignment(mode: NSTextAlignment); message 'setAlignment:';
+    procedure setBordered(flag: Boolean); message 'setBordered:';
+    procedure setBezeled(flag: Boolean); message 'setBezeled:';
+    procedure setEnabled(flag: Boolean); message 'setEnabled:';
+    procedure setFloatingPointFormat_left_right(autoRange: Boolean; leftDigits: culong; rightDigits: culong); message 'setFloatingPointFormat:left:right:';
+    procedure setImage(image_: NSImage); message 'setImage:';
+    function target: id; message 'target';
+    procedure setTarget(anObject: id); message 'setTarget:';
+    function action: SEL; message 'action';
+    procedure setAction(aSelector: SEL); message 'setAction:';
+    function tag: clong; message 'tag';
+    procedure setTag(anInt: clong); message 'setTag:';
+    function stringValue: NSString; message 'stringValue';
+    function intValue: cint; message 'intValue';
+    function floatValue: single; message 'floatValue';
+    function doubleValue: double; message 'doubleValue';
+    procedure setObjectValue(obj: id); message 'setObjectValue:';
+    function integerValue: clong; message 'integerValue';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSAffineTransform.inc b/packages/cocoaint/src/appkit/NSAffineTransform.inc
new file mode 100644
index 0000000000..54f26d4b3b
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSAffineTransform.inc
@@ -0,0 +1,88 @@
+{ Parsed from Appkit.framework NSAffineTransform.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSAFFINETRANSFORM_PAS_H}
+{$define NSAFFINETRANSFORM_PAS_H}
+type
+  NSAffineTransformPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSAFFINETRANSFORM_PAS_T}
+{$define NSAFFINETRANSFORM_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSAFFINETRANSFORM_PAS_R}
+{$define NSAFFINETRANSFORM_PAS_R}
+
+{ Records }
+type
+  NSAffineTransformStruct = record
+    m11: CGFloat;
+    tX: CGFloat;
+  end;
+
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSAFFINETRANSFORM_PAS_F}
+{$define NSAFFINETRANSFORM_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSAFFINETRANSFORM_PAS_T}
+{$define NSAFFINETRANSFORM_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSAffineTransform = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSAFFINETRANSFORM_PAS_C}
+{$define NSAFFINETRANSFORM_PAS_C}
+
+{ NSAffineTransform }
+  NSAffineTransform = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __transformStruct: NSAffineTransformStruct;
+    
+  public
+    class function alloc: NSAffineTransform; message 'alloc';
+
+    class function transform: NSAffineTransform; message 'transform';
+    function initWithTransform(transform_: NSAffineTransform): id; message 'initWithTransform:';
+    procedure translateXBy_yBy(deltaX: CGFloat; deltaY: CGFloat); message 'translateXBy:yBy:';
+    procedure rotateByDegrees(angle: CGFloat); message 'rotateByDegrees:';
+    procedure rotateByRadians(angle: CGFloat); message 'rotateByRadians:';
+    procedure scaleBy(scale: CGFloat); message 'scaleBy:';
+    procedure scaleXBy_yBy(scaleX: CGFloat; scaleY: CGFloat); message 'scaleXBy:yBy:';
+    procedure invert; message 'invert';
+    procedure appendTransform(transform_: NSAffineTransform); message 'appendTransform:';
+    procedure prependTransform(transform_: NSAffineTransform); message 'prependTransform:';
+    function transformPoint(aPoint: NSPoint): NSPoint; message 'transformPoint:';
+    function transformSize(aSize: NSSize): NSSize; message 'transformSize:';
+    function transformStruct: NSAffineTransformStruct; message 'transformStruct';
+    procedure setTransformStruct(transformStruct_: NSAffineTransformStruct); message 'setTransformStruct:';
+
+    { Category: NSAppKitAdditons }
+    function transformBezierPath(aPath: NSBezierPath): NSBezierPath; message 'transformBezierPath:';
+    procedure set_; message 'set';
+    procedure concat; message 'concat';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSAlert.inc b/packages/cocoaint/src/appkit/NSAlert.inc
new file mode 100644
index 0000000000..d01bdca874
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSAlert.inc
@@ -0,0 +1,133 @@
+{ Parsed from Appkit.framework NSAlert.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSALERT_PAS_H}
+{$define NSALERT_PAS_H}
+type
+  NSAlertPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSALERT_PAS_T}
+{$define NSALERT_PAS_T}
+
+{ Constants }
+
+const
+  NSWarningAlertStyle = 0;
+  NSInformationalAlertStyle = 1;
+  NSCriticalAlertStyle = 2;
+
+const
+  NSAlertFirstButtonReturn = 1000;
+  NSAlertSecondButtonReturn = 1001;
+  NSAlertThirdButtonReturn = 1002;
+
+{ Types }
+type
+  NSAlertStyle = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSALERT_PAS_R}
+{$define NSALERT_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSALERT_PAS_F}
+{$define NSALERT_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSALERT_PAS_T}
+{$define NSALERT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSAlert = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSALERT_PAS_C}
+{$define NSALERT_PAS_C}
+
+{ NSAlert }
+  NSAlert = objcclass(NSObject)
+  private
+    __informationField: NSTextField;
+    __first: id;
+    __second: id;
+    __third: id;
+    __buttons: NSArray;
+    __panel: NSPanel;
+    __messageField: id;
+    __imageView: id;
+    __minButtonSize: NSSize;
+    __buttonSpacing: CGFloat;
+    __buttonPadding: CGFloat;
+    __messagePadding: CGFloat;
+    __buttonSpacingMaxX: CGFloat;
+    __buttonSpacingY: CGFloat;
+    __modalDelegate: id;
+    __docWindow: NSWindow;
+    __didEndSelector: SEL;
+    __didDismissSelector: SEL;
+    __unbadgedImage: NSImage;
+    __defaultPanelSize: NSSize;
+    __helpButton: id;
+    __delegate: id;
+    __alertStyle: NSAlertStyle;
+    __helpAnchor: id;
+    __layoutDone: Boolean;
+    __showsHelp: Boolean;
+    __showsSuppressionButton: Boolean;
+    _reserved: Boolean;
+    __suppressionButton: id;
+    __accessoryView: id;
+    
+  public
+    class function alloc: NSAlert; message 'alloc';
+
+    class function alertWithError(error: NSError): NSAlert; message 'alertWithError:';
+    class function alertWithMessageText_defaultButton_alternateButton_otherButton_informativeTextWithFormat(message: NSString; defaultButton: NSString; alternateButton: NSString; otherButton: NSString; format: NSString): NSAlert; message 'alertWithMessageText:defaultButton:alternateButton:otherButton:informativeTextWithFormat:';
+    procedure setMessageText(messageText_: NSString); message 'setMessageText:';
+    procedure setInformativeText(informativeText_: NSString); message 'setInformativeText:';
+    function messageText: NSString; message 'messageText';
+    function informativeText: NSString; message 'informativeText';
+    procedure setIcon(icon_: NSImage); message 'setIcon:';
+    function icon: NSImage; message 'icon';
+    function addButtonWithTitle(title: NSString): NSButton; message 'addButtonWithTitle:';
+    function buttons: NSArray; message 'buttons';
+    procedure setShowsHelp(showsHelp_: Boolean); message 'setShowsHelp:';
+    function showsHelp: Boolean; message 'showsHelp';
+    procedure setHelpAnchor(anchor: NSString); message 'setHelpAnchor:';
+    function helpAnchor: NSString; message 'helpAnchor';
+    procedure setAlertStyle(style: NSAlertStyle); message 'setAlertStyle:';
+    function alertStyle: NSAlertStyle; message 'alertStyle';
+    procedure setDelegate(delegate_: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
+    procedure setShowsSuppressionButton(flag: Boolean); message 'setShowsSuppressionButton:';
+    function showsSuppressionButton: Boolean; message 'showsSuppressionButton';
+    function suppressionButton: NSButton; message 'suppressionButton';
+    procedure setAccessoryView(view: NSView); message 'setAccessoryView:';
+    function accessoryView: NSView; message 'accessoryView';
+    procedure layout; message 'layout';
+    function runModal: clong; message 'runModal';
+    procedure beginSheetModalForWindow_modalDelegate_didEndSelector_contextInfo(window_: NSWindow; delegate_: id; didEndSelector: SEL; contextInfo: Pointer); message 'beginSheetModalForWindow:modalDelegate:didEndSelector:contextInfo:';
+    function window: id; message 'window';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSAnimation.inc b/packages/cocoaint/src/appkit/NSAnimation.inc
new file mode 100644
index 0000000000..316444b0df
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSAnimation.inc
@@ -0,0 +1,174 @@
+{ Parsed from Appkit.framework NSAnimation.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSANIMATION_PAS_H}
+{$define NSANIMATION_PAS_H}
+type
+  NSAnimationPointer = Pointer;
+  NSViewAnimationPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSANIMATION_PAS_T}
+{$define NSANIMATION_PAS_T}
+
+{ Constants }
+
+const
+  NSAnimationEaseIn = 0;
+  NSAnimationEaseOut = 1;
+  NSAnimationLinear = 2;
+
+const
+  NSAnimationBlocking = 0;
+  NSAnimationNonblocking = 1;
+  NSAnimationNonblockingThreaded = 2;
+
+{ Types }
+type
+  NSAnimationCurve = culong;
+  NSAnimationBlockingMode = culong;
+  NSAnimationProgress = single;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSANIMATION_PAS_R}
+{$define NSANIMATION_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSANIMATION_PAS_F}
+{$define NSANIMATION_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSANIMATION_PAS_T}
+{$define NSANIMATION_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSAnimatablePropertyContainerProtocol = objcprotocol;
+  NSAnimation = objcclass;
+  NSViewAnimation = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSANIMATION_PAS_C}
+{$define NSANIMATION_PAS_C}
+
+{ NSAnimation }
+  NSAnimation = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __duration: NSTimeInterval;
+    __currentProgress: NSAnimationProgress;
+    __framesPerSecond: single;
+    __delegate: id;
+    __timer: NSTimer;
+    __startTime: NSTimeInterval;
+    __progressMarks: NSMutableArray;
+    __startAnimation: NSAnimation;
+    __stopAnimation: NSAnimation;
+    __nextProgressMark: cint;
+    __aFlags: bitpacked record
+        delegateAnimationShouldStart: 0..1;
+        delegateAnimationDidStop: 0..1;
+        delegateAnimationDidEnd: 0..1;
+        delegateAnimationValueForProgress: 0..1;
+        delegateAnimationDidReachProgressMark: 0..1;
+        animating: 0..1;
+        blocking: 0..1;
+        reserved: 0..((1 shl 25)-1);
+      end;
+    __aSettings: bitpacked record
+        animationCurve: 0..((1 shl 8)-1);
+        animationBlockingMode: 0..((1 shl 2)-1);
+        reserved: 0..((1 shl 22)-1);
+      end;
+    __reserved1: clong;
+    __reserved2: clong;
+    __reserved3: clong;
+    __reserved4: clong;
+    
+  public
+    class function alloc: NSAnimation; message 'alloc';
+
+    function initWithDuration_animationCurve(duration_: NSTimeInterval; animationCurve_: NSAnimationCurve): id; message 'initWithDuration:animationCurve:';
+    procedure startAnimation; message 'startAnimation';
+    procedure stopAnimation; message 'stopAnimation';
+    function isAnimating: Boolean; message 'isAnimating';
+    function currentProgress: NSAnimationProgress; message 'currentProgress';
+    procedure setCurrentProgress(progress: NSAnimationProgress); message 'setCurrentProgress:';
+    procedure setDuration(duration_: NSTimeInterval); message 'setDuration:';
+    function duration: NSTimeInterval; message 'duration';
+    function animationBlockingMode: NSAnimationBlockingMode; message 'animationBlockingMode';
+    procedure setAnimationBlockingMode(animationBlockingMode_: NSAnimationBlockingMode); message 'setAnimationBlockingMode:';
+    procedure setFrameRate(framesPerSecond: single); message 'setFrameRate:';
+    function frameRate: single; message 'frameRate';
+    procedure setAnimationCurve(curve: NSAnimationCurve); message 'setAnimationCurve:';
+    function animationCurve: NSAnimationCurve; message 'animationCurve';
+    function currentValue: single; message 'currentValue';
+    procedure setDelegate(delegate_: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
+    function progressMarks: NSArray; message 'progressMarks';
+    procedure setProgressMarks(progressMarks_: NSArray); message 'setProgressMarks:';
+    procedure addProgressMark(progressMark: NSAnimationProgress); message 'addProgressMark:';
+    procedure removeProgressMark(progressMark: NSAnimationProgress); message 'removeProgressMark:';
+    procedure startWhenAnimation_reachesProgress(animation: NSAnimation; startProgress: NSAnimationProgress); message 'startWhenAnimation:reachesProgress:';
+    procedure stopWhenAnimation_reachesProgress(animation: NSAnimation; stopProgress: NSAnimationProgress); message 'stopWhenAnimation:reachesProgress:';
+    procedure clearStartAnimation; message 'clearStartAnimation';
+    procedure clearStopAnimation; message 'clearStopAnimation';
+    function runLoopModesForAnimating: NSArray; message 'runLoopModesForAnimating';
+  end; external;
+
+{ NSViewAnimation }
+  NSViewAnimation = objcclass(NSAnimation)
+  private
+    __viewAnimations: NSArray;
+    __viewAnimationInfo: CFMutableDictionaryRef;
+    __windowAnimationInfo: CFMutableDictionaryRef;
+    __reserved4a: culong;
+    __reserved4b: culong;
+    __reserved4c: culong;
+    __vaFlags: bitpacked record
+        reserved: 0..((1 shl 32)-1);
+      end;
+    __reserved5: culong;
+    __reserved6: culong;
+    __reserved7: culong;
+    __reserved8: culong;
+    
+  public
+    class function alloc: NSViewAnimation; message 'alloc';
+
+    function initWithViewAnimations(viewAnimations_: NSArray): id; message 'initWithViewAnimations:';
+    function viewAnimations: NSArray; message 'viewAnimations';
+    procedure setViewAnimations(viewAnimations_: NSArray); message 'setViewAnimations:';
+  end; external;
+
+{$endif}
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSANIMATION_PAS_P}
+{$define NSANIMATION_PAS_P}
+  
+{ NSAnimatablePropertyContainer Protocol }
+  NSAnimatablePropertyContainerProtocol = objcprotocol
+    function animator: id; message 'animator';
+    function animations: NSDictionary; message 'animations';
+    procedure setAnimations(dict: NSDictionary); message 'setAnimations:';
+    function animationForKey(key: NSString): id; message 'animationForKey:';
+  end; external name 'NSAnimatablePropertyContainer';
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSAnimationContext.inc b/packages/cocoaint/src/appkit/NSAnimationContext.inc
new file mode 100644
index 0000000000..fc07130c57
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSAnimationContext.inc
@@ -0,0 +1,67 @@
+{ Parsed from Appkit.framework NSAnimationContext.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSANIMATIONCONTEXT_PAS_H}
+{$define NSANIMATIONCONTEXT_PAS_H}
+type
+  NSAnimationContextPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSANIMATIONCONTEXT_PAS_T}
+{$define NSANIMATIONCONTEXT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSANIMATIONCONTEXT_PAS_R}
+{$define NSANIMATIONCONTEXT_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSANIMATIONCONTEXT_PAS_F}
+{$define NSANIMATIONCONTEXT_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSANIMATIONCONTEXT_PAS_T}
+{$define NSANIMATIONCONTEXT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSAnimationContext = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSANIMATIONCONTEXT_PAS_C}
+{$define NSANIMATIONCONTEXT_PAS_C}
+
+{ NSAnimationContext }
+  NSAnimationContext = objcclass(NSObject)
+  private
+    __duration: NSTimeInterval;
+    __reserved: id;
+    
+  public
+    class function alloc: NSAnimationContext; message 'alloc';
+
+    class procedure beginGrouping; message 'beginGrouping';
+    class procedure endGrouping; message 'endGrouping';
+    class function currentContext: NSAnimationContext; message 'currentContext';
+    procedure setDuration(duration_: NSTimeInterval); message 'setDuration:';
+    function duration: NSTimeInterval; message 'duration';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSAppleScriptExtensions.inc b/packages/cocoaint/src/appkit/NSAppleScriptExtensions.inc
new file mode 100644
index 0000000000..1946c614e9
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSAppleScriptExtensions.inc
@@ -0,0 +1,31 @@
+{ Parsed from Appkit.framework NSAppleScriptExtensions.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSAPPLESCRIPTEXTENSIONS_PAS_T}
+{$define NSAPPLESCRIPTEXTENSIONS_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSAPPLESCRIPTEXTENSIONS_PAS_R}
+{$define NSAPPLESCRIPTEXTENSIONS_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSAPPLESCRIPTEXTENSIONS_PAS_F}
+{$define NSAPPLESCRIPTEXTENSIONS_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSAPPLESCRIPTEXTENSIONS_PAS_T}
+{$define NSAPPLESCRIPTEXTENSIONS_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSApplication.inc b/packages/cocoaint/src/appkit/NSApplication.inc
new file mode 100644
index 0000000000..7856c0c5b4
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSApplication.inc
@@ -0,0 +1,285 @@
+{ Parsed from Appkit.framework NSApplication.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSAPPLICATION_PAS_H}
+{$define NSAPPLICATION_PAS_H}
+type
+  NSApplicationPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSAPPLICATION_PAS_T}
+{$define NSAPPLICATION_PAS_T}
+
+{ Defines }
+const
+  NSAppKitVersionNumber10_0 = 577;
+  NSAppKitVersionNumber10_1 = 620;
+  NSAppKitVersionNumber10_2 = 663;
+  NSAppKitVersionNumber10_2_3 = 663.6;
+  NSAppKitVersionNumber10_3 = 743;
+  NSAppKitVersionNumber10_3_2 = 743.14;
+  NSAppKitVersionNumber10_3_3 = 743.2;
+  NSAppKitVersionNumber10_3_5 = 743.24;
+  NSAppKitVersionNumber10_3_7 = 743.33;
+  NSAppKitVersionNumber10_3_9 = 743.36;
+  NSAppKitVersionNumber10_4 = 824;
+
+{ CFString constants }
+var
+  NSModalPanelRunLoopMode: CFStringRef; external name '_NSModalPanelRunLoopMode';
+  NSEventTrackingRunLoopMode: CFStringRef; external name '_NSEventTrackingRunLoopMode';
+  NSApplicationDidBecomeActiveNotification: CFStringRef; external name '_NSApplicationDidBecomeActiveNotification';
+  NSApplicationDidHideNotification: CFStringRef; external name '_NSApplicationDidHideNotification';
+  NSApplicationDidFinishLaunchingNotification: CFStringRef; external name '_NSApplicationDidFinishLaunchingNotification';
+  NSApplicationDidResignActiveNotification: CFStringRef; external name '_NSApplicationDidResignActiveNotification';
+  NSApplicationDidUnhideNotification: CFStringRef; external name '_NSApplicationDidUnhideNotification';
+  NSApplicationDidUpdateNotification: CFStringRef; external name '_NSApplicationDidUpdateNotification';
+  NSApplicationWillBecomeActiveNotification: CFStringRef; external name '_NSApplicationWillBecomeActiveNotification';
+  NSApplicationWillHideNotification: CFStringRef; external name '_NSApplicationWillHideNotification';
+  NSApplicationWillFinishLaunchingNotification: CFStringRef; external name '_NSApplicationWillFinishLaunchingNotification';
+  NSApplicationWillResignActiveNotification: CFStringRef; external name '_NSApplicationWillResignActiveNotification';
+  NSApplicationWillUnhideNotification: CFStringRef; external name '_NSApplicationWillUnhideNotification';
+  NSApplicationWillUpdateNotification: CFStringRef; external name '_NSApplicationWillUpdateNotification';
+  NSApplicationWillTerminateNotification: CFStringRef; external name '_NSApplicationWillTerminateNotification';
+  NSApplicationDidChangeScreenParametersNotification: CFStringRef; external name '_NSApplicationDidChangeScreenParametersNotification';
+
+{ Constants }
+
+const
+  NSUpdateWindowsRunLoopOrdering = 500000;
+
+const
+  NSCriticalRequest = 0;
+  NSInformationalRequest = 10;
+
+const
+  NSApplicationDelegateReplySuccess = 0;
+  NSApplicationDelegateReplyCancel = 1;
+  NSApplicationDelegateReplyFailure = 2;
+
+const
+  NSTerminateCancel = 0;
+  NSTerminateNow = 1;
+  NSTerminateLater = 2;
+
+const
+  NSPrintingCancelled = 0;
+  NSPrintingSuccess = 1;
+  NSPrintingFailure = 3;
+  NSPrintingReplyLater = 2;
+
+{ Types }
+type
+  NSModalSession = Pointer;
+  NSThreadPrivate = Pointer;
+  _NSThreadPrivate = NSThreadPrivate;
+  NSRequestUserAttentionType = culong;
+  NSApplicationDelegateReply = culong;
+  NSApplicationTerminateReply = culong;
+  NSApplicationPrintReply = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSAPPLICATION_PAS_R}
+{$define NSAPPLICATION_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSAPPLICATION_PAS_F}
+{$define NSAPPLICATION_PAS_F}
+
+{ Functions }
+function NSApplicationMain(argc: cint; var argv: Pointer {array of char}): cint; cdecl; external name 'NSApplicationMain';
+function NSApplicationLoad: Boolean; cdecl; external name 'NSApplicationLoad';
+function NSShowsServicesMenuItem(var_: NSString): Boolean; cdecl; external name 'NSShowsServicesMenuItem';
+function NSSetShowsServicesMenuItem(var_: NSString; enabled: Boolean): clong; cdecl; external name 'NSSetShowsServicesMenuItem';
+procedure NSUpdateDynamicServices; cdecl; external name 'NSUpdateDynamicServices';
+function NSPerformService(var itemName: NSString; var pboard: NSPasteboard): Boolean; cdecl; external name 'NSPerformService';
+procedure NSRegisterServicesProvider(provider: id; var name: NSString); cdecl; external name 'NSRegisterServicesProvider';
+procedure NSUnregisterServicesProvider(var name: NSString); cdecl; external name 'NSUnregisterServicesProvider';
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSAPPLICATION_PAS_T}
+{$define NSAPPLICATION_PAS_T}
+
+{ External symbols }
+var
+  NSAppKitVersionNumber: double; external name '_NSAppKitVersionNumber';
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSApplication = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSAPPLICATION_PAS_C}
+{$define NSAPPLICATION_PAS_C}
+
+{ NSApplication }
+  NSApplication = objcclass(NSResponder, NSUserInterfaceValidationsProtocol)
+  private
+    __currentEvent: NSEvent;
+    __windowList: id;
+    __keyWindow: id;
+    __mainWindow: id;
+    __delegate: id;
+    __hiddenList: id;
+    __hiddenCount: cint;
+    __context: clong;
+    __appleEventSuspensionID: Pointer;
+    __previousKeyWindow: id; {garbage collector: __weak }
+    __unusedApp: cshort;
+    __running: cshort;
+    __appFlags: bitpacked record
+        _hidden: 0..1;
+        _RESERVED1: 0..1;
+        _active: 0..1;
+        _hasBeenRun: 0..1;
+        _doingUnhide: 0..1;
+        _delegateReturnsValidRequestor: 0..1;
+        _deactPending: 0..1;
+        _invalidState: 0..1;
+        _invalidEvent: 0..1;
+        _postedWindowsNeedUpdateNote: 0..1;
+        _wantsToActivate: 0..1;
+        _doingHide: 0..1;
+        _dontSendShouldTerminate: 0..1;
+        _skipWin32DelayedRestoreKeyWindowAfterHide: 0..1;
+        _finishedLaunching: 0..1;
+        _hasEventDelegate: 0..1;
+        _appDying: 0..1;
+        _didNSOpenOrPrint: 0..1;
+        _inDealloc: 0..1;
+        _pendingDidFinish: 0..1;
+        _hasKeyFocus: 0..1;
+        _panelsNonactivating: 0..1;
+        _hiddenOnLaunch: 0..1;
+        _openStatus: 0..((1 shl 2)-1);
+        _batchOrdering: 0..1;
+        _reserved: 0..((1 shl 6)-1);
+      end;
+    __mainMenu: id;
+    __appIcon: id;
+    __nameTable: id;
+    __eventDelegate: id;
+    __threadingSupport: _NSThreadPrivate;
+    
+  public
+    class function alloc: NSApplication; message 'alloc';
+
+    class function sharedApplication: NSApplication; message 'sharedApplication';
+    procedure setDelegate(anObject: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
+    function context: NSGraphicsContext; message 'context';
+    procedure hide(sender: id); message 'hide:';
+    procedure unhide(sender: id); message 'unhide:';
+    procedure unhideWithoutActivation; message 'unhideWithoutActivation';
+    function windowWithWindowNumber(windowNum: clong): NSWindow; message 'windowWithWindowNumber:';
+    function mainWindow: NSWindow; message 'mainWindow';
+    function keyWindow: NSWindow; message 'keyWindow';
+    function isActive: Boolean; message 'isActive';
+    function isHidden: Boolean; message 'isHidden';
+    function isRunning: Boolean; message 'isRunning';
+    procedure deactivate; message 'deactivate';
+    procedure activateIgnoringOtherApps(flag: Boolean); message 'activateIgnoringOtherApps:';
+    procedure hideOtherApplications(sender: id); message 'hideOtherApplications:';
+    procedure unhideAllApplications(sender: id); message 'unhideAllApplications:';
+    procedure finishLaunching; message 'finishLaunching';
+    procedure run; message 'run';
+    function runModalForWindow(theWindow: NSWindow): clong; message 'runModalForWindow:';
+    procedure stop(sender: id); message 'stop:';
+    procedure stopModal; message 'stopModal';
+    procedure stopModalWithCode(returnCode: clong); message 'stopModalWithCode:';
+    procedure abortModal; message 'abortModal';
+    function modalWindow: NSWindow; message 'modalWindow';
+    function beginModalSessionForWindow(theWindow: NSWindow): NSModalSession; message 'beginModalSessionForWindow:';
+    function runModalSession(session: NSModalSession): clong; message 'runModalSession:';
+    procedure endModalSession(session: NSModalSession); message 'endModalSession:';
+    procedure terminate(sender: id); message 'terminate:';
+    function requestUserAttention(requestType: NSRequestUserAttentionType): clong; message 'requestUserAttention:';
+    procedure cancelUserAttentionRequest(request: clong); message 'cancelUserAttentionRequest:';
+    procedure beginSheet_modalForWindow_modalDelegate_didEndSelector_contextInfo(sheet: NSWindow; docWindow: NSWindow; modalDelegate: id; didEndSelector: SEL; contextInfo: Pointer); message 'beginSheet:modalForWindow:modalDelegate:didEndSelector:contextInfo:';
+    procedure endSheet(sheet: NSWindow); message 'endSheet:';
+    procedure endSheet_returnCode(sheet: NSWindow; returnCode: clong); message 'endSheet:returnCode:';
+    function runModalForWindow_relativeToWindow(theWindow: NSWindow; docWindow: NSWindow): clong; message 'runModalForWindow:relativeToWindow:';
+    function beginModalSessionForWindow_relativeToWindow(theWindow: NSWindow; docWindow: NSWindow): NSModalSession; message 'beginModalSessionForWindow:relativeToWindow:';
+    function nextEventMatchingMask_untilDate_inMode_dequeue(mask: culong; expiration: NSDate; mode: NSString; deqFlag: Boolean): NSEvent; message 'nextEventMatchingMask:untilDate:inMode:dequeue:';
+    procedure discardEventsMatchingMask_beforeEvent(mask: culong; lastEvent: NSEvent); message 'discardEventsMatchingMask:beforeEvent:';
+    procedure postEvent_atStart(event: NSEvent; flag: Boolean); message 'postEvent:atStart:';
+    function currentEvent: NSEvent; message 'currentEvent';
+    procedure sendEvent(theEvent: NSEvent); message 'sendEvent:';
+    procedure preventWindowOrdering; message 'preventWindowOrdering';
+    function makeWindowsPerform_inOrder(aSelector: SEL; flag: Boolean): NSWindow; message 'makeWindowsPerform:inOrder:';
+    function windows: NSArray; message 'windows';
+    procedure setWindowsNeedUpdate(needUpdate: Boolean); message 'setWindowsNeedUpdate:';
+    procedure updateWindows; message 'updateWindows';
+    procedure setMainMenu(aMenu: NSMenu); message 'setMainMenu:';
+    function mainMenu: NSMenu; message 'mainMenu';
+    procedure setApplicationIconImage(image: NSImage); message 'setApplicationIconImage:';
+    function applicationIconImage: NSImage; message 'applicationIconImage';
+    function dockTile: NSDockTile; message 'dockTile';
+    function sendAction_to_from(theAction: SEL; theTarget: id; sender: id): Boolean; message 'sendAction:to:from:';
+    function targetForAction(theAction: SEL): id; message 'targetForAction:';
+    function targetForAction_to_from(theAction: SEL; theTarget: id; sender: id): id; message 'targetForAction:to:from:';
+    function tryToPerform_with(anAction: SEL; anObject: id): Boolean; message 'tryToPerform:with:';
+    function validRequestorForSendType_returnType(sendType: NSString; returnType: NSString): id; message 'validRequestorForSendType:returnType:';
+    procedure reportException(theException: NSException); message 'reportException:';
+    class procedure detachDrawingThread_toTarget_withObject(selector: SEL; target: id; argument: id); message 'detachDrawingThread:toTarget:withObject:';
+    procedure replyToApplicationShouldTerminate(shouldTerminate: Boolean); message 'replyToApplicationShouldTerminate:';
+    procedure replyToOpenOrPrint(reply: NSApplicationDelegateReply); message 'replyToOpenOrPrint:';
+    procedure orderFrontCharacterPalette(sender: id); message 'orderFrontCharacterPalette:';
+
+    { Category: NSWindowsMenu }
+    procedure setWindowsMenu(aMenu: NSMenu); message 'setWindowsMenu:';
+    function windowsMenu: NSMenu; message 'windowsMenu';
+    procedure arrangeInFront(sender: id); message 'arrangeInFront:';
+    procedure removeWindowsItem(win: NSWindow); message 'removeWindowsItem:';
+    procedure addWindowsItem_title_filename(win: NSWindow; aString: NSString; isFilename: Boolean); message 'addWindowsItem:title:filename:';
+    procedure changeWindowsItem_title_filename(win: NSWindow; aString: NSString; isFilename: Boolean); message 'changeWindowsItem:title:filename:';
+    procedure updateWindowsItem(win: NSWindow); message 'updateWindowsItem:';
+    procedure miniaturizeAll(sender: id); message 'miniaturizeAll:';
+
+    { Category: NSServicesMenu }
+    procedure setServicesMenu(aMenu: NSMenu); message 'setServicesMenu:';
+    function servicesMenu: NSMenu; message 'servicesMenu';
+    procedure registerServicesMenuSendTypes_returnTypes(sendTypes: NSArray; returnTypes: NSArray); message 'registerServicesMenuSendTypes:returnTypes:';
+
+    { Category: NSServicesHandling }
+    procedure setServicesProvider(provider: id); message 'setServicesProvider:';
+    function servicesProvider: id; message 'servicesProvider';
+
+    { Category: NSStandardAboutPanel }
+    procedure orderFrontStandardAboutPanel(sender: id); message 'orderFrontStandardAboutPanel:';
+    procedure orderFrontStandardAboutPanelWithOptions(optionsDictionary: NSDictionary); message 'orderFrontStandardAboutPanelWithOptions:';
+
+    { Category: NSApplicationHelpExtension }
+    procedure activateContextHelpMode(sender: id); message 'activateContextHelpMode:';
+    procedure showHelp(sender: id); message 'showHelp:';
+
+    { Category: NSPageLayoutPanel }
+    procedure runPageLayout(sender: id); message 'runPageLayout:';
+
+    { Category: NSColorPanel }
+    procedure orderFrontColorPanel(sender: id); message 'orderFrontColorPanel:';
+
+    { Category: NSScripting }
+    function orderedDocuments: NSArray; message 'orderedDocuments';
+    function orderedWindows: NSArray; message 'orderedWindows';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSApplicationScripting.inc b/packages/cocoaint/src/appkit/NSApplicationScripting.inc
new file mode 100644
index 0000000000..03695d32ae
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSApplicationScripting.inc
@@ -0,0 +1,31 @@
+{ Parsed from Appkit.framework NSApplicationScripting.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSAPPLICATIONSCRIPTING_PAS_T}
+{$define NSAPPLICATIONSCRIPTING_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSAPPLICATIONSCRIPTING_PAS_R}
+{$define NSAPPLICATIONSCRIPTING_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSAPPLICATIONSCRIPTING_PAS_F}
+{$define NSAPPLICATIONSCRIPTING_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSAPPLICATIONSCRIPTING_PAS_T}
+{$define NSAPPLICATIONSCRIPTING_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSArrayController.inc b/packages/cocoaint/src/appkit/NSArrayController.inc
new file mode 100644
index 0000000000..30bf44dc11
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSArrayController.inc
@@ -0,0 +1,134 @@
+{ Parsed from Appkit.framework NSArrayController.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSARRAYCONTROLLER_PAS_H}
+{$define NSARRAYCONTROLLER_PAS_H}
+type
+  NSArrayControllerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSARRAYCONTROLLER_PAS_T}
+{$define NSARRAYCONTROLLER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSARRAYCONTROLLER_PAS_R}
+{$define NSARRAYCONTROLLER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSARRAYCONTROLLER_PAS_F}
+{$define NSARRAYCONTROLLER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSARRAYCONTROLLER_PAS_T}
+{$define NSARRAYCONTROLLER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSArrayController = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSARRAYCONTROLLER_PAS_C}
+{$define NSARRAYCONTROLLER_PAS_C}
+
+{ NSArrayController }
+  NSArrayController = objcclass(NSObjectController)
+  private
+    __reserved4: Pointer;
+    __rearrangementExtensions: id;
+    __temporaryWorkObjects: NSMutableArray;
+    __arrayControllerFlags: bitpacked record
+        _avoidsEmptySelection: 0..1;
+        _preservesSelection: 0..1;
+        _selectsInsertedObjects: 0..1;
+        _alwaysUsesMultipleValuesMarker: 0..1;
+        _refreshesAllModelObjects: 0..1;
+        _filterRestrictsInsertion: 0..1;
+        _overridesArrangeObjects: 0..1;
+        _overridesDidChangeArrangementCriteria: 0..1;
+        _explicitlyCannotInsert: 0..1;
+        _generatedEmptyArray: 0..1;
+        _isObservingKeyPathsThroughArrangedObjects: 0..1;
+        _arrangedObjectsIsMutable: 0..1;
+        _clearsFilterPredicateOnInsertion: 0..1;
+        _skipSortingAfterFetch: 0..1;
+        _automaticallyRearrangesObjects: 0..1;
+        _reservedArrayController: 0..((1 shl 17)-1);
+      end;
+    __observedIndexHint: culong;
+    __selectionIndexes: NSMutableIndexSet;
+    __objects: NSMutableArray;
+    __cachedSelectedIndexes: NSIndexSet;
+    __cachedSelectedObjects: NSArray;
+    __arrangedObjects: NSArray;
+    
+  public
+    class function alloc: NSArrayController; message 'alloc';
+
+    procedure rearrangeObjects; message 'rearrangeObjects';
+    procedure setAutomaticallyRearrangesObjects(flag: Boolean); message 'setAutomaticallyRearrangesObjects:';
+    function automaticallyRearrangesObjects: Boolean; message 'automaticallyRearrangesObjects';
+    function automaticRearrangementKeyPaths: NSArray; message 'automaticRearrangementKeyPaths';
+    procedure didChangeArrangementCriteria; message 'didChangeArrangementCriteria';
+    procedure setSortDescriptors(sortDescriptors_: NSArray); message 'setSortDescriptors:';
+    function sortDescriptors: NSArray; message 'sortDescriptors';
+    procedure setFilterPredicate(filterPredicate_: NSPredicate); message 'setFilterPredicate:';
+    function filterPredicate: NSPredicate; message 'filterPredicate';
+    procedure setClearsFilterPredicateOnInsertion(flag: Boolean); message 'setClearsFilterPredicateOnInsertion:';
+    function clearsFilterPredicateOnInsertion: Boolean; message 'clearsFilterPredicateOnInsertion';
+    function arrangeObjects(objects: NSArray): NSArray; message 'arrangeObjects:';
+    function arrangedObjects: id; message 'arrangedObjects';
+    procedure setAvoidsEmptySelection(flag: Boolean); message 'setAvoidsEmptySelection:';
+    function avoidsEmptySelection: Boolean; message 'avoidsEmptySelection';
+    procedure setPreservesSelection(flag: Boolean); message 'setPreservesSelection:';
+    function preservesSelection: Boolean; message 'preservesSelection';
+    procedure setSelectsInsertedObjects(flag: Boolean); message 'setSelectsInsertedObjects:';
+    function selectsInsertedObjects: Boolean; message 'selectsInsertedObjects';
+    procedure setAlwaysUsesMultipleValuesMarker(flag: Boolean); message 'setAlwaysUsesMultipleValuesMarker:';
+    function alwaysUsesMultipleValuesMarker: Boolean; message 'alwaysUsesMultipleValuesMarker';
+    function setSelectionIndexes(indexes: NSIndexSet): Boolean; message 'setSelectionIndexes:';
+    function selectionIndexes: NSIndexSet; message 'selectionIndexes';
+    function setSelectionIndex(index: culong): Boolean; message 'setSelectionIndex:';
+    function selectionIndex: culong; message 'selectionIndex';
+    function addSelectionIndexes(indexes: NSIndexSet): Boolean; message 'addSelectionIndexes:';
+    function removeSelectionIndexes(indexes: NSIndexSet): Boolean; message 'removeSelectionIndexes:';
+    function setSelectedObjects(objects: NSArray): Boolean; message 'setSelectedObjects:';
+    function selectedObjects: NSArray; message 'selectedObjects';
+    function addSelectedObjects(objects: NSArray): Boolean; message 'addSelectedObjects:';
+    function removeSelectedObjects(objects: NSArray): Boolean; message 'removeSelectedObjects:';
+    procedure add(sender: id); message 'add:';
+    procedure remove(sender: id); message 'remove:';
+    procedure insert(sender: id); message 'insert:';
+    function canInsert: Boolean; message 'canInsert';
+    procedure selectNext(sender: id); message 'selectNext:';
+    procedure selectPrevious(sender: id); message 'selectPrevious:';
+    function canSelectNext: Boolean; message 'canSelectNext';
+    function canSelectPrevious: Boolean; message 'canSelectPrevious';
+    procedure addObject(object_: id); message 'addObject:';
+    procedure addObjects(objects: NSArray); message 'addObjects:';
+    procedure insertObject_atArrangedObjectIndex(object_: id; index: culong); message 'insertObject:atArrangedObjectIndex:';
+    procedure insertObjects_atArrangedObjectIndexes(objects: NSArray; indexes: NSIndexSet); message 'insertObjects:atArrangedObjectIndexes:';
+    procedure removeObjectAtArrangedObjectIndex(index: culong); message 'removeObjectAtArrangedObjectIndex:';
+    procedure removeObjectsAtArrangedObjectIndexes(indexes: NSIndexSet); message 'removeObjectsAtArrangedObjectIndexes:';
+    procedure removeObject(object_: id); message 'removeObject:';
+    procedure removeObjects(objects: NSArray); message 'removeObjects:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSAttributedString.inc b/packages/cocoaint/src/appkit/NSAttributedString.inc
new file mode 100644
index 0000000000..b7fff1e169
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSAttributedString.inc
@@ -0,0 +1,216 @@
+{ Parsed from Appkit.framework NSAttributedString.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSATTRIBUTEDSTRING_PAS_H}
+{$define NSATTRIBUTEDSTRING_PAS_H}
+type
+  NSAttributedStringPointer = Pointer;
+  NSMutableAttributedStringPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSATTRIBUTEDSTRING_PAS_T}
+{$define NSATTRIBUTEDSTRING_PAS_T}
+
+{ CFString constants }
+var
+  NSFontAttributeName: CFStringRef; external name '_NSFontAttributeName';
+  NSParagraphStyleAttributeName: CFStringRef; external name '_NSParagraphStyleAttributeName';
+  NSForegroundColorAttributeName: CFStringRef; external name '_NSForegroundColorAttributeName';
+  NSUnderlineStyleAttributeName: CFStringRef; external name '_NSUnderlineStyleAttributeName';
+  NSSuperscriptAttributeName: CFStringRef; external name '_NSSuperscriptAttributeName';
+  NSBackgroundColorAttributeName: CFStringRef; external name '_NSBackgroundColorAttributeName';
+  NSAttachmentAttributeName: CFStringRef; external name '_NSAttachmentAttributeName';
+  NSLigatureAttributeName: CFStringRef; external name '_NSLigatureAttributeName';
+  NSBaselineOffsetAttributeName: CFStringRef; external name '_NSBaselineOffsetAttributeName';
+  NSKernAttributeName: CFStringRef; external name '_NSKernAttributeName';
+  NSLinkAttributeName: CFStringRef; external name '_NSLinkAttributeName';
+  NSCharacterShapeAttributeName: CFStringRef; external name '_NSCharacterShapeAttributeName';
+  NSGlyphInfoAttributeName: CFStringRef; external name '_NSGlyphInfoAttributeName';
+  NSPlainTextDocumentType: CFStringRef; external name '_NSPlainTextDocumentType';
+  NSRTFTextDocumentType: CFStringRef; external name '_NSRTFTextDocumentType';
+  NSRTFDTextDocumentType: CFStringRef; external name '_NSRTFDTextDocumentType';
+  NSMacSimpleTextDocumentType: CFStringRef; external name '_NSMacSimpleTextDocumentType';
+  NSHTMLTextDocumentType: CFStringRef; external name '_NSHTMLTextDocumentType';
+
+{ Constants }
+
+const
+  NSUnderlineStyleNone = $00;
+  NSUnderlineStyleSingle = $01;
+  NSUnderlineStyleThick = $02;
+  NSUnderlineStyleDouble = $09;
+
+const
+  NSUnderlinePatternSolid = $0000;
+  NSUnderlinePatternDot = $0100;
+  NSUnderlinePatternDash = $0200;
+  NSUnderlinePatternDashDot = $0300;
+  NSUnderlinePatternDashDotDot = $0400;
+
+const
+  NSSpellingStateSpellingFlag = 1  shl  0;
+  NSSpellingStateGrammarFlag = 1  shl  1;
+
+const
+  NSNoUnderlineStyle = 0;
+  NSSingleUnderlineStyle = 0;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSATTRIBUTEDSTRING_PAS_R}
+{$define NSATTRIBUTEDSTRING_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSATTRIBUTEDSTRING_PAS_F}
+{$define NSATTRIBUTEDSTRING_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSATTRIBUTEDSTRING_PAS_T}
+{$define NSATTRIBUTEDSTRING_PAS_T}
+
+{ External symbols }
+var
+  NSUnderlineByWordMask: NSUInteger; external name '_NSUnderlineByWordMask';
+  NSUnderlineStrikethroughMask: NSUInteger; external name '_NSUnderlineStrikethroughMask';
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSAttributedString = objcclass;
+  NSMutableAttributedString = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSATTRIBUTEDSTRING_PAS_C}
+{$define NSATTRIBUTEDSTRING_PAS_C}
+
+{ NSAttributedString }
+  NSAttributedString = objcclass(NSObject, NSCopyingProtocol, NSMutableCopyingProtocol, NSCodingProtocol)
+    
+  public
+    class function alloc: NSAttributedString; message 'alloc';
+
+    function string_: NSString; message 'string';
+    function attributesAtIndex_effectiveRange(location: culong; range: NSRangePointer): NSDictionary; message 'attributesAtIndex:effectiveRange:';
+
+    { Category: NSExtendedAttributedString }
+    function length: culong; message 'length';
+    function attribute_atIndex_effectiveRange(attrName: NSString; location: culong; range: NSRangePointer): id; message 'attribute:atIndex:effectiveRange:';
+    function attributedSubstringFromRange(range: NSRange): NSAttributedString; message 'attributedSubstringFromRange:';
+    function attributesAtIndex_longestEffectiveRange_inRange(location: culong; range: NSRangePointer; rangeLimit: NSRange): NSDictionary; message 'attributesAtIndex:longestEffectiveRange:inRange:';
+    function attribute_atIndex_longestEffectiveRange_inRange(attrName: NSString; location: culong; range: NSRangePointer; rangeLimit: NSRange): id; message 'attribute:atIndex:longestEffectiveRange:inRange:';
+    function isEqualToAttributedString(other: NSAttributedString): Boolean; message 'isEqualToAttributedString:';
+    function initWithString(str: NSString): id; message 'initWithString:';
+    function initWithString_attributes(str: NSString; attrs: NSDictionary): id; message 'initWithString:attributes:';
+    function initWithAttributedString(attrStr: NSAttributedString): id; message 'initWithAttributedString:';
+
+    { Category: NSAttributedStringKitAdditions }
+    function fontAttributesInRange(range: NSRange): NSDictionary; message 'fontAttributesInRange:';
+    function rulerAttributesInRange(range: NSRange): NSDictionary; message 'rulerAttributesInRange:';
+    function containsAttachments: Boolean; message 'containsAttachments';
+    function lineBreakBeforeIndex_withinRange(location: culong; aRange: NSRange): culong; message 'lineBreakBeforeIndex:withinRange:';
+    function lineBreakByHyphenatingBeforeIndex_withinRange(location: culong; aRange: NSRange): culong; message 'lineBreakByHyphenatingBeforeIndex:withinRange:';
+    function doubleClickAtIndex(location: culong): NSRange; message 'doubleClickAtIndex:';
+    function nextWordFromIndex_forward(location: culong; isForward: Boolean): culong; message 'nextWordFromIndex:forward:';
+    function URLAtIndex_effectiveRange(location: culong; effectiveRange: NSRangePointer): NSURL; message 'URLAtIndex:effectiveRange:';
+    class function textTypes: NSArray; message 'textTypes';
+    class function textUnfilteredTypes: NSArray; message 'textUnfilteredTypes';
+    function rangeOfTextBlock_atIndex(block: NSTextBlock; location: culong): NSRange; message 'rangeOfTextBlock:atIndex:';
+    function rangeOfTextTable_atIndex(table: NSTextTable; location: culong): NSRange; message 'rangeOfTextTable:atIndex:';
+    function rangeOfTextList_atIndex(list: NSTextList; location: culong): NSRange; message 'rangeOfTextList:atIndex:';
+    function itemNumberInTextList_atIndex(list: NSTextList; location: culong): clong; message 'itemNumberInTextList:atIndex:';
+    function initWithURL_options_documentAttributes_error(url: NSURL; options: NSDictionary; var dict: NSDictionary; var error: NSError): id; message 'initWithURL:options:documentAttributes:error:';
+    function initWithData_options_documentAttributes_error(data: NSData; options: NSDictionary; var dict: NSDictionary; var error: NSError): id; message 'initWithData:options:documentAttributes:error:';
+    function initWithPath_documentAttributes(path: NSString; var dict: NSDictionary): id; message 'initWithPath:documentAttributes:';
+    function initWithURL_documentAttributes(url: NSURL; var dict: NSDictionary): id; message 'initWithURL:documentAttributes:';
+    function initWithRTF_documentAttributes(data: NSData; var dict: NSDictionary): id; message 'initWithRTF:documentAttributes:';
+    function initWithRTFD_documentAttributes(data: NSData; var dict: NSDictionary): id; message 'initWithRTFD:documentAttributes:';
+    function initWithHTML_documentAttributes(data: NSData; var dict: NSDictionary): id; message 'initWithHTML:documentAttributes:';
+    function initWithHTML_baseURL_documentAttributes(data: NSData; base: NSURL; var dict: NSDictionary): id; message 'initWithHTML:baseURL:documentAttributes:';
+    function initWithDocFormat_documentAttributes(data: NSData; var dict: NSDictionary): id; message 'initWithDocFormat:documentAttributes:';
+    function initWithHTML_options_documentAttributes(data: NSData; options: NSDictionary; var dict: NSDictionary): id; message 'initWithHTML:options:documentAttributes:';
+    function initWithRTFDFileWrapper_documentAttributes(wrapper: NSFileWrapper; var dict: NSDictionary): id; message 'initWithRTFDFileWrapper:documentAttributes:';
+    function dataFromRange_documentAttributes_error(range: NSRange; dict: NSDictionary; var error: NSError): NSData; message 'dataFromRange:documentAttributes:error:';
+    function fileWrapperFromRange_documentAttributes_error(range: NSRange; dict: NSDictionary; var error: NSError): NSFileWrapper; message 'fileWrapperFromRange:documentAttributes:error:';
+    function RTFFromRange_documentAttributes(range: NSRange; dict: NSDictionary): NSData; message 'RTFFromRange:documentAttributes:';
+    function RTFDFromRange_documentAttributes(range: NSRange; dict: NSDictionary): NSData; message 'RTFDFromRange:documentAttributes:';
+    function RTFDFileWrapperFromRange_documentAttributes(range: NSRange; dict: NSDictionary): NSFileWrapper; message 'RTFDFileWrapperFromRange:documentAttributes:';
+    function docFormatFromRange_documentAttributes(range: NSRange; dict: NSDictionary): NSData; message 'docFormatFromRange:documentAttributes:';
+
+    { Category: NSDeprecatedKitAdditions }
+    class function textFileTypes: NSArray; message 'textFileTypes';
+    class function textPasteboardTypes: NSArray; message 'textPasteboardTypes';
+    class function textUnfilteredFileTypes: NSArray; message 'textUnfilteredFileTypes';
+    class function textUnfilteredPasteboardTypes: NSArray; message 'textUnfilteredPasteboardTypes';
+
+    { Category: NSAttributedStringAttachmentConveniences }
+    class function attributedStringWithAttachment(attachment: NSTextAttachment): NSAttributedString; message 'attributedStringWithAttachment:';
+
+    { Category: NSStringDrawing }
+    function size: NSSize; message 'size';
+    procedure drawAtPoint(point: NSPoint); message 'drawAtPoint:';
+    procedure drawInRect(rect: NSRect); message 'drawInRect:';
+
+    { Category: NSExtendedStringDrawing }
+    procedure drawWithRect_options(rect: NSRect; options: NSStringDrawingOptions); message 'drawWithRect:options:';
+    function boundingRectWithSize_options(size_: NSSize; options: NSStringDrawingOptions): NSRect; message 'boundingRectWithSize:options:';
+  end; external;
+
+{ NSMutableAttributedString }
+  NSMutableAttributedString = objcclass(NSAttributedString)
+    
+  public
+    class function alloc: NSMutableAttributedString; message 'alloc';
+
+    procedure replaceCharactersInRange_withString(range: NSRange; str: NSString); message 'replaceCharactersInRange:withString:';
+    procedure setAttributes_range(attrs: NSDictionary; range: NSRange); message 'setAttributes:range:';
+
+    { Category: NSExtendedMutableAttributedString }
+    function mutableString: NSMutableString; message 'mutableString';
+    procedure addAttribute_value_range(name: NSString; value: id; range: NSRange); message 'addAttribute:value:range:';
+    procedure addAttributes_range(attrs: NSDictionary; range: NSRange); message 'addAttributes:range:';
+    procedure removeAttribute_range(name: NSString; range: NSRange); message 'removeAttribute:range:';
+    procedure replaceCharactersInRange_withAttributedString(range: NSRange; attrString: NSAttributedString); message 'replaceCharactersInRange:withAttributedString:';
+    procedure insertAttributedString_atIndex(attrString: NSAttributedString; loc: culong); message 'insertAttributedString:atIndex:';
+    procedure appendAttributedString(attrString: NSAttributedString); message 'appendAttributedString:';
+    procedure deleteCharactersInRange(range: NSRange); message 'deleteCharactersInRange:';
+    procedure setAttributedString(attrString: NSAttributedString); message 'setAttributedString:';
+    procedure beginEditing; message 'beginEditing';
+    procedure endEditing; message 'endEditing';
+
+    { Category: NSMutableAttributedStringKitAdditions }
+    function readFromURL_options_documentAttributes_error(url: NSURL; opts: NSDictionary; var dict: NSDictionary; var error: NSError): Boolean; message 'readFromURL:options:documentAttributes:error:';
+    function readFromData_options_documentAttributes_error(data: NSData; opts: NSDictionary; var dict: NSDictionary; var error: NSError): Boolean; message 'readFromData:options:documentAttributes:error:';
+    function readFromURL_options_documentAttributes(url: NSURL; options: NSDictionary; var dict: NSDictionary): Boolean; message 'readFromURL:options:documentAttributes:';
+    function readFromData_options_documentAttributes(data: NSData; options: NSDictionary; var dict: NSDictionary): Boolean; message 'readFromData:options:documentAttributes:';
+    procedure superscriptRange(range: NSRange); message 'superscriptRange:';
+    procedure subscriptRange(range: NSRange); message 'subscriptRange:';
+    procedure unscriptRange(range: NSRange); message 'unscriptRange:';
+    procedure applyFontTraits_range(traitMask: NSFontTraitMask; range: NSRange); message 'applyFontTraits:range:';
+    procedure setAlignment_range(alignment: NSTextAlignment; range: NSRange); message 'setAlignment:range:';
+    procedure setBaseWritingDirection_range(writingDirection: NSWritingDirection; range: NSRange); message 'setBaseWritingDirection:range:';
+    procedure fixAttributesInRange(range: NSRange); message 'fixAttributesInRange:';
+    procedure fixFontAttributeInRange(range: NSRange); message 'fixFontAttributeInRange:';
+    procedure fixParagraphStyleAttributeInRange(range: NSRange); message 'fixParagraphStyleAttributeInRange:';
+    procedure fixAttachmentAttributeInRange(range: NSRange); message 'fixAttachmentAttributeInRange:';
+
+    { Category: NSMutableAttributedStringAttachmentConveniences }
+    procedure updateAttachmentsFromPath(path: NSString); message 'updateAttachmentsFromPath:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSBezierPath.inc b/packages/cocoaint/src/appkit/NSBezierPath.inc
new file mode 100644
index 0000000000..a367a200d0
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSBezierPath.inc
@@ -0,0 +1,174 @@
+{ Parsed from Appkit.framework NSBezierPath.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSBEZIERPATH_PAS_H}
+{$define NSBEZIERPATH_PAS_H}
+type
+  NSBezierPathPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSBEZIERPATH_PAS_T}
+{$define NSBEZIERPATH_PAS_T}
+
+{ Constants }
+
+const
+  NSButtLineCapStyle = 0;
+  NSRoundLineCapStyle = 1;
+  NSSquareLineCapStyle = 2;
+
+const
+  NSMiterLineJoinStyle = 0;
+  NSRoundLineJoinStyle = 1;
+  NSBevelLineJoinStyle = 2;
+
+const
+  NSNonZeroWindingRule = 0;
+  NSEvenOddWindingRule = 1;
+
+const
+  NSMoveToBezierPathElement = 0;
+  NSLineToBezierPathElement = 1;
+  NSCurveToBezierPathElement = 2;
+  NSClosePathBezierPathElement = 3;
+
+{ Types }
+type
+  NSLineCapStyle = culong;
+  NSLineJoinStyle = culong;
+  NSWindingRule = culong;
+  NSBezierPathElement = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSBEZIERPATH_PAS_R}
+{$define NSBEZIERPATH_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSBEZIERPATH_PAS_F}
+{$define NSBEZIERPATH_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSBEZIERPATH_PAS_T}
+{$define NSBEZIERPATH_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSBezierPath = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSBEZIERPATH_PAS_C}
+{$define NSBEZIERPATH_PAS_C}
+
+{ NSBezierPath }
+  NSBezierPath = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __segmentCount: clong;
+    __segmentMax: clong;
+    __head: PATHSEGMENT;
+    __lastSubpathIndex: clong;
+    __elementCount: clong;
+    __lineWidth: CGFloat;
+    __controlPointBounds: NSRect;
+    __miterLimit: CGFloat;
+    __flatness: CGFloat;
+    __dashedLinePattern: CGFloat;
+    __dashedLineCount: culong;
+    __dashedLinePhase: CGFloat;
+    __path: Pointer;
+    __private: id;
+    __bpFlags: bitpacked record
+        _flags: 0..((1 shl 8)-1);
+        _pathState: 0..((1 shl 2)-1);
+        
+        _unused: 0..((1 shl 22)-1);
+      end;
+    
+  public
+    class function alloc: NSBezierPath; message 'alloc';
+
+    class function bezierPath: NSBezierPath; message 'bezierPath';
+    class function bezierPathWithRect(rect: NSRect): NSBezierPath; message 'bezierPathWithRect:';
+    class function bezierPathWithOvalInRect(rect: NSRect): NSBezierPath; message 'bezierPathWithOvalInRect:';
+    class function bezierPathWithRoundedRect_xRadius_yRadius(rect: NSRect; xRadius: CGFloat; yRadius: CGFloat): NSBezierPath; message 'bezierPathWithRoundedRect:xRadius:yRadius:';
+    class procedure fillRect(rect: NSRect); message 'fillRect:';
+    class procedure strokeRect(rect: NSRect); message 'strokeRect:';
+    class procedure clipRect(rect: NSRect); message 'clipRect:';
+    class procedure strokeLineFromPoint_toPoint(point: NSPoint; point1: NSPoint); message 'strokeLineFromPoint:toPoint:';
+    class procedure drawPackedGlyphs_atPoint(packedGlyphs: PChar; point: NSPoint); message 'drawPackedGlyphs:atPoint:';
+    class procedure setDefaultMiterLimit(limit: CGFloat); message 'setDefaultMiterLimit:';
+    class function defaultMiterLimit: CGFloat; message 'defaultMiterLimit';
+    class procedure setDefaultFlatness(flatness_: CGFloat); message 'setDefaultFlatness:';
+    class function defaultFlatness: CGFloat; message 'defaultFlatness';
+    class procedure setDefaultWindingRule(windingRule_: NSWindingRule); message 'setDefaultWindingRule:';
+    class function defaultWindingRule: NSWindingRule; message 'defaultWindingRule';
+    class procedure setDefaultLineCapStyle(lineCapStyle_: NSLineCapStyle); message 'setDefaultLineCapStyle:';
+    class function defaultLineCapStyle: NSLineCapStyle; message 'defaultLineCapStyle';
+    class procedure setDefaultLineJoinStyle(lineJoinStyle_: NSLineJoinStyle); message 'setDefaultLineJoinStyle:';
+    class function defaultLineJoinStyle: NSLineJoinStyle; message 'defaultLineJoinStyle';
+    class procedure setDefaultLineWidth(lineWidth_: CGFloat); message 'setDefaultLineWidth:';
+    class function defaultLineWidth: CGFloat; message 'defaultLineWidth';
+    procedure moveToPoint(point: NSPoint); message 'moveToPoint:';
+    procedure lineToPoint(point: NSPoint); message 'lineToPoint:';
+    procedure closePath; message 'closePath';
+    procedure removeAllPoints; message 'removeAllPoints';
+    procedure relativeMoveToPoint(point: NSPoint); message 'relativeMoveToPoint:';
+    procedure relativeLineToPoint(point: NSPoint); message 'relativeLineToPoint:';
+    function lineWidth: CGFloat; message 'lineWidth';
+    procedure setLineWidth(lineWidth_: CGFloat); message 'setLineWidth:';
+    function lineCapStyle: NSLineCapStyle; message 'lineCapStyle';
+    procedure setLineCapStyle(lineCapStyle_: NSLineCapStyle); message 'setLineCapStyle:';
+    function lineJoinStyle: NSLineJoinStyle; message 'lineJoinStyle';
+    procedure setLineJoinStyle(lineJoinStyle_: NSLineJoinStyle); message 'setLineJoinStyle:';
+    function windingRule: NSWindingRule; message 'windingRule';
+    procedure setWindingRule(windingRule_: NSWindingRule); message 'setWindingRule:';
+    function miterLimit: CGFloat; message 'miterLimit';
+    procedure setMiterLimit(miterLimit_: CGFloat); message 'setMiterLimit:';
+    function flatness: CGFloat; message 'flatness';
+    procedure setFlatness(flatness_: CGFloat); message 'setFlatness:';
+    procedure getLineDash_count_phase(var pattern: CGFloat; var count: clong; var phase: CGFloat); message 'getLineDash:count:phase:';
+    procedure setLineDash_count_phase(var pattern: CGFloat; count: clong; phase: CGFloat); message 'setLineDash:count:phase:';
+    procedure stroke; message 'stroke';
+    procedure fill; message 'fill';
+    procedure addClip; message 'addClip';
+    procedure setClip; message 'setClip';
+    function bezierPathByFlatteningPath: NSBezierPath; message 'bezierPathByFlatteningPath';
+    function bezierPathByReversingPath: NSBezierPath; message 'bezierPathByReversingPath';
+    procedure transformUsingAffineTransform(transform: NSAffineTransform); message 'transformUsingAffineTransform:';
+    function isEmpty: Boolean; message 'isEmpty';
+    function currentPoint: NSPoint; message 'currentPoint';
+    function controlPointBounds: NSRect; message 'controlPointBounds';
+    function bounds: NSRect; message 'bounds';
+    function elementCount: clong; message 'elementCount';
+    function elementAtIndex(index: clong): NSBezierPathElement; message 'elementAtIndex:';
+    procedure setAssociatedPoints_atIndex(points: NSPointArray; index: clong); message 'setAssociatedPoints:atIndex:';
+    procedure appendBezierPath(path: NSBezierPath); message 'appendBezierPath:';
+    procedure appendBezierPathWithRect(rect: NSRect); message 'appendBezierPathWithRect:';
+    procedure appendBezierPathWithPoints_count(points: NSPointArray; count: clong); message 'appendBezierPathWithPoints:count:';
+    procedure appendBezierPathWithOvalInRect(rect: NSRect); message 'appendBezierPathWithOvalInRect:';
+    procedure appendBezierPathWithGlyph_inFont(glyph: NSGlyph; font: NSFont); message 'appendBezierPathWithGlyph:inFont:';
+    procedure appendBezierPathWithPackedGlyphs(packedGlyphs: PChar); message 'appendBezierPathWithPackedGlyphs:';
+    procedure appendBezierPathWithRoundedRect_xRadius_yRadius(rect: NSRect; xRadius: CGFloat; yRadius: CGFloat); message 'appendBezierPathWithRoundedRect:xRadius:yRadius:';
+    function containsPoint(point: NSPoint): Boolean; message 'containsPoint:';
+    function cachesBezierPath: Boolean; message 'cachesBezierPath';
+    procedure setCachesBezierPath(flag: Boolean); message 'setCachesBezierPath:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSBitmapImageRep.inc b/packages/cocoaint/src/appkit/NSBitmapImageRep.inc
new file mode 100644
index 0000000000..527fb74486
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSBitmapImageRep.inc
@@ -0,0 +1,150 @@
+{ Parsed from Appkit.framework NSBitmapImageRep.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSBITMAPIMAGEREP_PAS_H}
+{$define NSBITMAPIMAGEREP_PAS_H}
+type
+  NSBitmapImageRepPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSBITMAPIMAGEREP_PAS_T}
+{$define NSBITMAPIMAGEREP_PAS_T}
+
+{ Constants }
+
+const
+  NSTIFFCompressionNone = 1;
+  NSTIFFCompressionCCITTFAX3 = 3;
+  NSTIFFCompressionCCITTFAX4 = 4;
+  NSTIFFCompressionLZW = 5;
+  NSTIFFCompressionJPEG = 6;
+  NSTIFFCompressionNEXT = 32766;
+  NSTIFFCompressionPackBits = 32773;
+  NSTIFFCompressionOldJPEG = 32865;
+
+const
+  NSTIFFFileType = 0;
+  NSBMPFileType = 1;
+  NSGIFFileType = 2;
+  NSJPEGFileType = 3;
+  NSPNGFileType = 4;
+  NSJPEG2000FileType = 5;
+
+const
+  NSAlphaFirstBitmapFormat = 1  shl  0;
+  NSAlphaNonpremultipliedBitmapFormat = 1  shl  1;
+  NSFloatingPointSamplesBitmapFormat = 1  shl  2;
+
+{ Types }
+type
+  NSTIFFCompression = culong;
+  NSBitmapImageFileType = culong;
+  NSImageRepLoadStatus = clong;
+  NSBitmapFormat = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSBITMAPIMAGEREP_PAS_R}
+{$define NSBITMAPIMAGEREP_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSBITMAPIMAGEREP_PAS_F}
+{$define NSBITMAPIMAGEREP_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSBITMAPIMAGEREP_PAS_T}
+{$define NSBITMAPIMAGEREP_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSBitmapImageRep = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSBITMAPIMAGEREP_PAS_C}
+{$define NSBITMAPIMAGEREP_PAS_C}
+
+{ NSBitmapImageRep }
+  NSBitmapImageRep = objcclass(NSImageRep)
+  private
+    __moreRepFlags: bitpacked record
+        bitsPerPixel: cuint;
+        isPlanar: 0..1;
+        explicitPlanes: 0..1;
+        isUnpacked: 0..1;
+        dataLoaded: 0..1;
+        numColors: cuint;
+        memory: 0..((1 shl 2)-1);
+        compressionFactor: 0..((1 shl 14)-1);
+        imageNumber: 0..((1 shl 8)-1);
+        bitmapFormat: 0..((1 shl 3)-1);
+        cgImageIsPrimary: 0..1;
+        compression: 0..((1 shl 20)-1);
+      end;
+    __bytesPerRow: cuint;
+    __data: char;
+    __tiffData: NSData;
+    __properties: id;
+    
+  public
+    class function alloc: NSBitmapImageRep; message 'alloc';
+
+    function initWithFocusedViewRect(rect: NSRect): id; message 'initWithFocusedViewRect:';
+    function initWithBitmapDataPlanes_pixelsWide_pixelsHigh_bitsPerSample_samplesPerPixel_hasAlpha_isPlanar_colorSpaceName_bytesPerRow_bitsPerPixel(var planes: char; width: clong; height: clong; bps: clong; spp: clong; alpha: Boolean; isPlanar_: Boolean; colorSpaceName_: NSString; rBytes: clong; pBits: clong): id; message 'initWithBitmapDataPlanes:pixelsWide:pixelsHigh:bitsPerSample:samplesPerPixel:hasAlpha:isPlanar:colorSpaceName:bytesPerRow:bitsPerPixel:';
+    function initWithBitmapDataPlanes_pixelsWide_pixelsHigh_bitsPerSample_samplesPerPixel_hasAlpha_isPlanar_colorSpaceName_bitmapFormat_bytesPerRow_bitsPerPixel(var planes: char; width: clong; height: clong; bps: clong; spp: clong; alpha: Boolean; isPlanar_: Boolean; colorSpaceName_: NSString; bitmapFormat_: NSBitmapFormat; rBytes: clong; pBits: clong): id; message 'initWithBitmapDataPlanes:pixelsWide:pixelsHigh:bitsPerSample:samplesPerPixel:hasAlpha:isPlanar:colorSpaceName:bitmapFormat:bytesPerRow:bitsPerPixel:';
+    function initWithCGImage(CGImage_: CGImageRef): id; message 'initWithCGImage:';
+    function initWithCIImage(var ciImage: CIImage): id; message 'initWithCIImage:';
+    class function imageRepsWithData(data: NSData): NSArray; message 'imageRepsWithData:';
+    class function imageRepWithData_initWithData(data: NSData): id; message 'imageRepWithData:';
+    function initWithData(data: NSData): id; message 'initWithData:';
+    function bitmapData: Pointer; message 'bitmapData';
+    procedure getBitmapDataPlanes(var data: char); message 'getBitmapDataPlanes:';
+    function isPlanar: Boolean; message 'isPlanar';
+    function samplesPerPixel: clong; message 'samplesPerPixel';
+    function bitsPerPixel: clong; message 'bitsPerPixel';
+    function bytesPerRow: clong; message 'bytesPerRow';
+    function bytesPerPlane: clong; message 'bytesPerPlane';
+    function numberOfPlanes: clong; message 'numberOfPlanes';
+    function bitmapFormat: NSBitmapFormat; message 'bitmapFormat';
+    procedure getCompression_factor(var compression: NSTIFFCompression; var factor: single); message 'getCompression:factor:';
+    procedure setCompression_factor(compression: NSTIFFCompression; factor: single); message 'setCompression:factor:';
+    function TIFFRepresentation: NSData; message 'TIFFRepresentation';
+    function TIFFRepresentationUsingCompression_factor(comp: NSTIFFCompression; factor: single): NSData; message 'TIFFRepresentationUsingCompression:factor:';
+    class function TIFFRepresentationOfImageRepsInArray(array_: NSArray): NSData; message 'TIFFRepresentationOfImageRepsInArray:';
+    class function TIFFRepresentationOfImageRepsInArray_usingCompression_factor(array_: NSArray; comp: NSTIFFCompression; factor: single): NSData; message 'TIFFRepresentationOfImageRepsInArray:usingCompression:factor:';
+    class procedure getTIFFCompressionTypes_count(var list: NSTIFFCompression; var numTypes: clong); message 'getTIFFCompressionTypes:count:';
+    class function localizedNameForTIFFCompressionType(compression: NSTIFFCompression): NSString; message 'localizedNameForTIFFCompressionType:';
+    function canBeCompressedUsing(compression: NSTIFFCompression): Boolean; message 'canBeCompressedUsing:';
+    procedure colorizeByMappingGray_toColor_blackMapping_whiteMapping(midPoint: CGFloat; midPointColor: NSColor; shadowColor: NSColor; lightColor: NSColor); message 'colorizeByMappingGray:toColor:blackMapping:whiteMapping:';
+    function initForIncrementalLoad: id; message 'initForIncrementalLoad';
+    function incrementalLoadFromData_complete(data: NSData; complete: Boolean): clong; message 'incrementalLoadFromData:complete:';
+    procedure setColor_atX_y(color: NSColor; x: clong; y: clong); message 'setColor:atX:y:';
+    function colorAtX_y(x: clong; y: clong): NSColor; message 'colorAtX:y:';
+    procedure getPixel_atX_y(p: culong; x: clong; y: clong); message 'getPixel:atX:y:';
+    procedure setPixel_atX_y(p: culong; x: clong; y: clong); message 'setPixel:atX:y:';
+    function CGImage: CGImageRef; message 'CGImage';
+
+    { Category: NSBitmapImageFileTypeExtensions }
+    class function representationOfImageRepsInArray_usingType_properties(imageReps: NSArray; storageType: NSBitmapImageFileType; properties: NSDictionary): NSData; message 'representationOfImageRepsInArray:usingType:properties:';
+    function representationUsingType_properties(storageType: NSBitmapImageFileType; properties: NSDictionary): NSData; message 'representationUsingType:properties:';
+    procedure setProperty_withValue(property_: NSString; value: id); message 'setProperty:withValue:';
+    function valueForProperty(property_: NSString): id; message 'valueForProperty:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSBox.inc b/packages/cocoaint/src/appkit/NSBox.inc
new file mode 100644
index 0000000000..186fbf71b5
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSBox.inc
@@ -0,0 +1,127 @@
+{ Parsed from Appkit.framework NSBox.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSBOX_PAS_H}
+{$define NSBOX_PAS_H}
+type
+  NSBoxPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSBOX_PAS_T}
+{$define NSBOX_PAS_T}
+
+{ Constants }
+
+const
+  NSNoTitle = 0;
+  NSAboveTop = 1;
+  NSAtTop = 2;
+  NSBelowTop = 3;
+  NSAboveBottom = 4;
+  NSAtBottom = 5;
+  NSBelowBottom = 6;
+
+{ Types }
+type
+  NSTitlePosition = culong;
+  NSBoxType = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSBOX_PAS_R}
+{$define NSBOX_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSBOX_PAS_F}
+{$define NSBOX_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSBOX_PAS_T}
+{$define NSBOX_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSBox = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSBOX_PAS_C}
+{$define NSBOX_PAS_C}
+
+{ NSBox }
+  NSBox = objcclass(NSView)
+  private
+    __titleCell: id;
+    __contentView: id;
+    __offsets: NSSize;
+    __borderRect: NSRect;
+    __titleRect: NSRect;
+    __bFlags: bitpacked record
+        borderType: 0..((1 shl 2)-1);
+        titlePosition: 0..((1 shl 3)-1);
+        backgroundTransparent: 0..1;
+        reserved: 0..((1 shl 2)-1);
+        needsTile: 0..1;
+        transparent: 0..1;
+        colorAltInterpretation: 0..1;
+        boxType: 0..((1 shl 3)-1);
+        _RESERVED: 0..((1 shl 18)-1);
+      end;
+    __unused: id;
+    
+  public
+    class function alloc: NSBox; message 'alloc';
+
+    function borderType: NSBorderType; message 'borderType';
+    function titlePosition: NSTitlePosition; message 'titlePosition';
+    procedure setBorderType(aType: NSBorderType); message 'setBorderType:';
+    procedure setBoxType(boxType_: NSBoxType); message 'setBoxType:';
+    function boxType: NSBoxType; message 'boxType';
+    procedure setTitlePosition(aPosition: NSTitlePosition); message 'setTitlePosition:';
+    function title: NSString; message 'title';
+    procedure setTitle(aString: NSString); message 'setTitle:';
+    function titleFont: NSFont; message 'titleFont';
+    procedure setTitleFont(fontObj: NSFont); message 'setTitleFont:';
+    function borderRect: NSRect; message 'borderRect';
+    function titleRect: NSRect; message 'titleRect';
+    function titleCell: id; message 'titleCell';
+    procedure sizeToFit; message 'sizeToFit';
+    function contentViewMargins: NSSize; message 'contentViewMargins';
+    procedure setContentViewMargins(offsetSize: NSSize); message 'setContentViewMargins:';
+    procedure setFrameFromContentFrame(contentFrame: NSRect); message 'setFrameFromContentFrame:';
+    function contentView: id; message 'contentView';
+    procedure setContentView(aView: NSView); message 'setContentView:';
+    function isTransparent: Boolean; message 'isTransparent';
+    procedure setTransparent(flag: Boolean); message 'setTransparent:';
+
+    { Category: NSKeyboardUI }
+    procedure setTitleWithMnemonic(stringWithAmpersand: NSString); message 'setTitleWithMnemonic:';
+
+    { Category: NSCustomBoxTypeProperties }
+    function borderWidth: CGFloat; message 'borderWidth';
+    procedure setBorderWidth(borderWidth_: CGFloat); message 'setBorderWidth:';
+    function cornerRadius: CGFloat; message 'cornerRadius';
+    procedure setCornerRadius(cornerRadius_: CGFloat); message 'setCornerRadius:';
+    function borderColor: NSColor; message 'borderColor';
+    procedure setBorderColor(borderColor_: NSColor); message 'setBorderColor:';
+    function fillColor: NSColor; message 'fillColor';
+    procedure setFillColor(fillColor_: NSColor); message 'setFillColor:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSBrowser.inc b/packages/cocoaint/src/appkit/NSBrowser.inc
new file mode 100644
index 0000000000..80125541be
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSBrowser.inc
@@ -0,0 +1,256 @@
+{ Parsed from Appkit.framework NSBrowser.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSBROWSER_PAS_H}
+{$define NSBROWSER_PAS_H}
+type
+  NSBrowserPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSBROWSER_PAS_T}
+{$define NSBROWSER_PAS_T}
+
+{ Defines }
+const
+  NSAppKitVersionNumberWithContinuousScrollingBrowser = 680.0;
+  NSAppKitVersionNumberWithColumnResizingBrowser = 685.0;
+
+{ Constants }
+
+const
+  NSBrowserNoColumnResizing = 0;
+  NSBrowserAutoColumnResizing = 1;
+  NSBrowserUserColumnResizing = 2;
+
+{ Types }
+type
+  NSBrowserColumnResizingType = culong;
+  NSBrowserDropOperation = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSBROWSER_PAS_R}
+{$define NSBROWSER_PAS_R}
+
+{ Records }
+type
+  __Brflags = record
+{$ifdef fpc_big_endian}
+    allowsMultipleSelection: cuint;
+    allowsBranchSelection: cuint;
+    reuseColumns: cuint;
+    isTitled: cuint;
+    titleFromPrevious: cuint;
+    separateColumns: cuint;
+    delegateImplementsWillDisplayCell: cuint;
+    delegateSetsTitles: cuint;
+    delegateSelectsCellsByString: cuint;
+    delegateDoesNotCreateRowsInMatrix: cuint;
+    delegateValidatesColumns: cuint;
+    acceptArrowKeys: cuint;
+    dontDrawTitles: cuint;
+    sendActionOnArrowKeys: cuint;
+    prohibitEmptySel: cuint;
+    hasHorizontalScroller: cuint;
+    time: cuint;
+    allowsIncrementalSearching: cuint;
+    delegateSelectsCellsByRow: cuint;
+    disableCompositing: cuint;
+    refusesFirstResponder: cuint;
+    acceptsFirstMouse: cuint;
+    actionNeedsToBeSent: cuint;
+    usesSmallSizeTitleFont: cuint;
+    usesSmallScrollers: cuint;
+    prefersAllColumnUserResizing: cuint;
+    firstVisibleCalculationDisabled: cuint;
+{$else}
+    firstVisibleCalculationDisabled: cuint;
+    prefersAllColumnUserResizing: cuint;
+    usesSmallScrollers: cuint;
+    usesSmallSizeTitleFont: cuint;
+    actionNeedsToBeSent: cuint;
+    acceptsFirstMouse: cuint;
+    refusesFirstResponder: cuint;
+    disableCompositing: cuint;
+    delegateSelectsCellsByRow: cuint;
+    allowsIncrementalSearching: cuint;
+    time: cuint;
+    hasHorizontalScroller: cuint;
+    prohibitEmptySel: cuint;
+    sendActionOnArrowKeys: cuint;
+    dontDrawTitles: cuint;
+    acceptArrowKeys: cuint;
+    delegateValidatesColumns: cuint;
+    delegateDoesNotCreateRowsInMatrix: cuint;
+    delegateSelectsCellsByString: cuint;
+    delegateSetsTitles: cuint;
+    delegateImplementsWillDisplayCell: cuint;
+    separateColumns: cuint;
+    titleFromPrevious: cuint;
+    isTitled: cuint;
+    reuseColumns: cuint;
+    allowsBranchSelection: cuint;
+    allowsMultipleSelection: cuint;
+{$endif}
+  end;
+_Brflags = __Brflags;
+
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSBROWSER_PAS_F}
+{$define NSBROWSER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSBROWSER_PAS_T}
+{$define NSBROWSER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSBrowser = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSBROWSER_PAS_C}
+{$define NSBROWSER_PAS_C}
+
+{ NSBrowser }
+  NSBrowser = objcclass(NSControl)
+  private
+    __target: id;
+    __action: SEL;
+    __delegate: id;
+    __doubleAction: SEL;
+    __matrixClass: Pobjc_class;
+    __cellPrototype: id;
+    __columnSize: NSSize;
+    __numberOfVisibleColumns: cshort;
+    __minColumnWidth: cshort;
+    __firstVisibleColumn: cshort;
+    __maxVisibleColumns: cshort;
+    __titles: NSMutableArray;
+    __pathSeparator: NSString;
+    __columns: NSMutableArray;
+    __brAuxiliaryStorage: id;
+    __firstColumnTitle: NSString;
+    __scroller: NSScroller;
+    __brflags: _Brflags;
+    
+  public
+    class function alloc: NSBrowser; message 'alloc';
+
+    class function cellClass: Pobjc_class; message 'cellClass';
+    procedure loadColumnZero; message 'loadColumnZero';
+    function isLoaded: Boolean; message 'isLoaded';
+    procedure setDoubleAction(aSelector: SEL); message 'setDoubleAction:';
+    function doubleAction: SEL; message 'doubleAction';
+    procedure setMatrixClass(factoryId: Pobjc_class); message 'setMatrixClass:';
+    function matrixClass: Pobjc_class; message 'matrixClass';
+    procedure setCellClass(factoryId: Pobjc_class); message 'setCellClass:';
+    procedure setCellPrototype(aCell: NSCell); message 'setCellPrototype:';
+    function cellPrototype: id; message 'cellPrototype';
+    procedure setDelegate(anObject: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
+    procedure setReusesColumns(flag: Boolean); message 'setReusesColumns:';
+    function reusesColumns: Boolean; message 'reusesColumns';
+    procedure setHasHorizontalScroller(flag: Boolean); message 'setHasHorizontalScroller:';
+    function hasHorizontalScroller: Boolean; message 'hasHorizontalScroller';
+    procedure setSeparatesColumns(flag: Boolean); message 'setSeparatesColumns:';
+    function separatesColumns: Boolean; message 'separatesColumns';
+    procedure setTitled(flag: Boolean); message 'setTitled:';
+    function isTitled: Boolean; message 'isTitled';
+    procedure setMinColumnWidth(columnWidth: CGFloat); message 'setMinColumnWidth:';
+    function minColumnWidth: CGFloat; message 'minColumnWidth';
+    procedure setMaxVisibleColumns(columnCount: clong); message 'setMaxVisibleColumns:';
+    function maxVisibleColumns: clong; message 'maxVisibleColumns';
+    procedure setAllowsMultipleSelection(flag: Boolean); message 'setAllowsMultipleSelection:';
+    function allowsMultipleSelection: Boolean; message 'allowsMultipleSelection';
+    procedure setAllowsBranchSelection(flag: Boolean); message 'setAllowsBranchSelection:';
+    function allowsBranchSelection: Boolean; message 'allowsBranchSelection';
+    procedure setAllowsEmptySelection(flag: Boolean); message 'setAllowsEmptySelection:';
+    function allowsEmptySelection: Boolean; message 'allowsEmptySelection';
+    procedure setTakesTitleFromPreviousColumn(flag: Boolean); message 'setTakesTitleFromPreviousColumn:';
+    function takesTitleFromPreviousColumn: Boolean; message 'takesTitleFromPreviousColumn';
+    procedure setAcceptsArrowKeys(flag: Boolean); message 'setAcceptsArrowKeys:';
+    function acceptsArrowKeys: Boolean; message 'acceptsArrowKeys';
+    procedure setSendsActionOnArrowKeys(flag: Boolean); message 'setSendsActionOnArrowKeys:';
+    function sendsActionOnArrowKeys: Boolean; message 'sendsActionOnArrowKeys';
+    procedure setTitle_ofColumn(aString: NSString; column: clong); message 'setTitle:ofColumn:';
+    function titleOfColumn(column: clong): NSString; message 'titleOfColumn:';
+    procedure setPathSeparator(newString: NSString); message 'setPathSeparator:';
+    function pathSeparator: NSString; message 'pathSeparator';
+    function setPath(path_: NSString): Boolean; message 'setPath:';
+    function path: NSString; message 'path';
+    function pathToColumn(column: clong): NSString; message 'pathToColumn:';
+    function selectedColumn: clong; message 'selectedColumn';
+    function selectedCell: id; message 'selectedCell';
+    function selectedCellInColumn(column: clong): id; message 'selectedCellInColumn:';
+    function selectedCells: NSArray; message 'selectedCells';
+    procedure selectRow_inColumn(row: clong; column: clong); message 'selectRow:inColumn:';
+    function selectedRowInColumn(column: clong): clong; message 'selectedRowInColumn:';
+    procedure selectRowIndexes_inColumn(indexes: NSIndexSet; column: clong); message 'selectRowIndexes:inColumn:';
+    function selectedRowIndexesInColumn(column: clong): NSIndexSet; message 'selectedRowIndexesInColumn:';
+    procedure reloadColumn(column: clong); message 'reloadColumn:';
+    procedure validateVisibleColumns; message 'validateVisibleColumns';
+    procedure scrollColumnsRightBy(shiftAmount: clong); message 'scrollColumnsRightBy:';
+    procedure scrollColumnsLeftBy(shiftAmount: clong); message 'scrollColumnsLeftBy:';
+    procedure scrollColumnToVisible(column: clong); message 'scrollColumnToVisible:';
+    procedure setLastColumn(column: clong); message 'setLastColumn:';
+    function lastColumn: clong; message 'lastColumn';
+    procedure addColumn; message 'addColumn';
+    function numberOfVisibleColumns: clong; message 'numberOfVisibleColumns';
+    function firstVisibleColumn: clong; message 'firstVisibleColumn';
+    function lastVisibleColumn: clong; message 'lastVisibleColumn';
+    function columnOfMatrix(matrix: NSMatrix): clong; message 'columnOfMatrix:';
+    function matrixInColumn(column: clong): NSMatrix; message 'matrixInColumn:';
+    function loadedCellAtRow_column(row: clong; col: clong): id; message 'loadedCellAtRow:column:';
+    procedure selectAll(sender: id); message 'selectAll:';
+    procedure tile; message 'tile';
+    procedure doClick(sender: id); message 'doClick:';
+    procedure doDoubleClick(sender: id); message 'doDoubleClick:';
+    function sendAction: Boolean; message 'sendAction';
+    function titleFrameOfColumn(column: clong): NSRect; message 'titleFrameOfColumn:';
+    procedure drawTitleOfColumn_inRect(column: clong; aRect: NSRect); message 'drawTitleOfColumn:inRect:';
+    function titleHeight: CGFloat; message 'titleHeight';
+    function frameOfColumn(column: clong): NSRect; message 'frameOfColumn:';
+    function frameOfInsideOfColumn(column: clong): NSRect; message 'frameOfInsideOfColumn:';
+    function columnWidthForColumnContentWidth(columnContentWidth: CGFloat): CGFloat; message 'columnWidthForColumnContentWidth:';
+    function columnContentWidthForColumnWidth(columnWidth: CGFloat): CGFloat; message 'columnContentWidthForColumnWidth:';
+    procedure setColumnResizingType(columnResizingType_: NSBrowserColumnResizingType); message 'setColumnResizingType:';
+    function columnResizingType: NSBrowserColumnResizingType; message 'columnResizingType';
+    procedure setPrefersAllColumnUserResizing(prefersAllColumnResizing: Boolean); message 'setPrefersAllColumnUserResizing:';
+    function prefersAllColumnUserResizing: Boolean; message 'prefersAllColumnUserResizing';
+    procedure setWidth_ofColumn(columnWidth: CGFloat; columnIndex: clong); message 'setWidth:ofColumn:';
+    function widthOfColumn(column: clong): CGFloat; message 'widthOfColumn:';
+    procedure setColumnsAutosaveName(name: NSString); message 'setColumnsAutosaveName:';
+    function columnsAutosaveName: NSString; message 'columnsAutosaveName';
+    class procedure removeSavedColumnsWithAutosaveName(name: NSString); message 'removeSavedColumnsWithAutosaveName:';
+    function canDragRowsWithIndexes_inColumn_withEvent(rowIndexes: NSIndexSet; column: clong; event: NSEvent): Boolean; message 'canDragRowsWithIndexes:inColumn:withEvent:';
+    function draggingImageForRowsWithIndexes_inColumn_withEvent_offset(rowIndexes: NSIndexSet; column: clong; event: NSEvent; dragImageOffset: NSPointPointer): NSImage; message 'draggingImageForRowsWithIndexes:inColumn:withEvent:offset:';
+    procedure setDraggingSourceOperationMask_forLocal(mask: NSDragOperation; isLocal: Boolean); message 'setDraggingSourceOperationMask:forLocal:';
+    function allowsTypeSelect: Boolean; message 'allowsTypeSelect';
+    procedure setAllowsTypeSelect(value: Boolean); message 'setAllowsTypeSelect:';
+    procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
+    function backgroundColor: NSColor; message 'backgroundColor';
+    procedure displayColumn(column: clong); message 'displayColumn:';
+    procedure displayAllColumns; message 'displayAllColumns';
+    procedure scrollViaScroller(sender: NSScroller); message 'scrollViaScroller:';
+    procedure updateScroller; message 'updateScroller';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSBrowserCell.inc b/packages/cocoaint/src/appkit/NSBrowserCell.inc
new file mode 100644
index 0000000000..81d86335e1
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSBrowserCell.inc
@@ -0,0 +1,72 @@
+{ Parsed from Appkit.framework NSBrowserCell.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSBROWSERCELL_PAS_H}
+{$define NSBROWSERCELL_PAS_H}
+type
+  NSBrowserCellPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSBROWSERCELL_PAS_T}
+{$define NSBROWSERCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSBROWSERCELL_PAS_R}
+{$define NSBROWSERCELL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSBROWSERCELL_PAS_F}
+{$define NSBROWSERCELL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSBROWSERCELL_PAS_T}
+{$define NSBROWSERCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSBrowserCell = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSBROWSERCELL_PAS_C}
+{$define NSBROWSERCELL_PAS_C}
+
+{ NSBrowserCell }
+  NSBrowserCell = objcclass(NSCell)
+    
+  public
+    class function alloc: NSBrowserCell; message 'alloc';
+
+    class function branchImage: NSImage; message 'branchImage';
+    class function highlightedBranchImage: NSImage; message 'highlightedBranchImage';
+    function highlightColorInView(controlView_: NSView): NSColor; message 'highlightColorInView:';
+    function isLeaf: Boolean; message 'isLeaf';
+    procedure setLeaf(flag: Boolean); message 'setLeaf:';
+    function isLoaded: Boolean; message 'isLoaded';
+    procedure setLoaded(flag: Boolean); message 'setLoaded:';
+    procedure reset; message 'reset';
+    procedure set_; message 'set';
+    procedure setImage(image_: NSImage); message 'setImage:';
+    function image: NSImage; message 'image';
+    procedure setAlternateImage(newAltImage: NSImage); message 'setAlternateImage:';
+    function alternateImage: NSImage; message 'alternateImage';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSButton.inc b/packages/cocoaint/src/appkit/NSButton.inc
new file mode 100644
index 0000000000..e12dcf5fa1
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSButton.inc
@@ -0,0 +1,110 @@
+{ Parsed from Appkit.framework NSButton.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSBUTTON_PAS_H}
+{$define NSBUTTON_PAS_H}
+type
+  NSButtonPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSBUTTON_PAS_T}
+{$define NSBUTTON_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSBUTTON_PAS_R}
+{$define NSBUTTON_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSBUTTON_PAS_F}
+{$define NSBUTTON_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSBUTTON_PAS_T}
+{$define NSBUTTON_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSButton = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSBUTTON_PAS_C}
+{$define NSBUTTON_PAS_C}
+
+{ NSButton }
+  NSButton = objcclass(NSControl, NSUserInterfaceValidationsProtocol)
+    
+  public
+    class function alloc: NSButton; message 'alloc';
+
+    function title: NSString; message 'title';
+    procedure setTitle(aString: NSString); message 'setTitle:';
+    function alternateTitle: NSString; message 'alternateTitle';
+    procedure setAlternateTitle(aString: NSString); message 'setAlternateTitle:';
+    function image: NSImage; message 'image';
+    procedure setImage(image_: NSImage); message 'setImage:';
+    function alternateImage: NSImage; message 'alternateImage';
+    procedure setAlternateImage(image_: NSImage); message 'setAlternateImage:';
+    function imagePosition: NSCellImagePosition; message 'imagePosition';
+    procedure setImagePosition(aPosition: NSCellImagePosition); message 'setImagePosition:';
+    procedure setButtonType(aType: NSButtonType); message 'setButtonType:';
+    function state: clong; message 'state';
+    procedure setState(value: clong); message 'setState:';
+    function isBordered: Boolean; message 'isBordered';
+    procedure setBordered(flag: Boolean); message 'setBordered:';
+    function isTransparent: Boolean; message 'isTransparent';
+    procedure setTransparent(flag: Boolean); message 'setTransparent:';
+    procedure setPeriodicDelay_interval(delay: single; interval: single); message 'setPeriodicDelay:interval:';
+    procedure getPeriodicDelay_interval(var delay: single; var interval: single); message 'getPeriodicDelay:interval:';
+    function keyEquivalent: NSString; message 'keyEquivalent';
+    procedure setKeyEquivalent(charCode: NSString); message 'setKeyEquivalent:';
+    function keyEquivalentModifierMask: culong; message 'keyEquivalentModifierMask';
+    procedure setKeyEquivalentModifierMask(mask: culong); message 'setKeyEquivalentModifierMask:';
+    procedure highlight(flag: Boolean); message 'highlight:';
+    function performKeyEquivalent(key: NSEvent): Boolean; message 'performKeyEquivalent:';
+
+    { Category: NSKeyboardUI }
+    procedure setTitleWithMnemonic(stringWithAmpersand: NSString); message 'setTitleWithMnemonic:';
+
+    { Category: NSButtonAttributedStringMethods }
+    function attributedTitle: NSAttributedString; message 'attributedTitle';
+    procedure setAttributedTitle(aString: NSAttributedString); message 'setAttributedTitle:';
+    function attributedAlternateTitle: NSAttributedString; message 'attributedAlternateTitle';
+    procedure setAttributedAlternateTitle(obj: NSAttributedString); message 'setAttributedAlternateTitle:';
+
+    { Category: NSButtonBezelStyles }
+    procedure setBezelStyle(bezelStyle_: NSBezelStyle); message 'setBezelStyle:';
+    function bezelStyle: NSBezelStyle; message 'bezelStyle';
+
+    { Category: NSButtonMixedState }
+    procedure setAllowsMixedState(flag: Boolean); message 'setAllowsMixedState:';
+    function allowsMixedState: Boolean; message 'allowsMixedState';
+    procedure setNextState; message 'setNextState';
+
+    { Category: NSButtonBorder }
+    procedure setShowsBorderOnlyWhileMouseInside(show: Boolean); message 'setShowsBorderOnlyWhileMouseInside:';
+    function showsBorderOnlyWhileMouseInside: Boolean; message 'showsBorderOnlyWhileMouseInside';
+
+    { Category: NSButtonSoundExtensions }
+    procedure setSound(aSound: NSSound); message 'setSound:';
+    function sound: NSSound; message 'sound';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSButtonCell.inc b/packages/cocoaint/src/appkit/NSButtonCell.inc
new file mode 100644
index 0000000000..a87255ad40
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSButtonCell.inc
@@ -0,0 +1,250 @@
+{ Parsed from Appkit.framework NSButtonCell.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSBUTTONCELL_PAS_H}
+{$define NSBUTTONCELL_PAS_H}
+type
+  NSButtonCellPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSBUTTONCELL_PAS_T}
+{$define NSBUTTONCELL_PAS_T}
+
+{ Constants }
+
+const
+  NSPushOnPushOffButton = 1;
+  NSToggleButton = 2;
+  NSSwitchButton = 3;
+  NSRadioButton = 4;
+  NSMomentaryChangeButton = 5;
+  NSOnOffButton = 6;
+  NSMomentaryPushButton = 0;
+  NSMomentaryLight = 7;
+
+const
+  NSRoundedBezelStyle = 1;
+  NSRegularSquareBezelStyle = 2;
+  NSThickSquareBezelStyle = 3;
+  NSThickerSquareBezelStyle = 4;
+  NSDisclosureBezelStyle = 5;
+  NSShadowlessSquareBezelStyle = 6;
+  NSCircularBezelStyle = 7;
+  NSTexturedSquareBezelStyle = 8;
+  NSHelpButtonBezelStyle = 9;
+  NSSmallSquareBezelStyle = 10;
+  NSTexturedRoundedBezelStyle = 11;
+  NSRoundRectBezelStyle = 12;
+  NSRecessedBezelStyle = 13;
+  NSRoundedDisclosureBezelStyle = 14;
+  NSSmallIconButtonBezelStyle = 2;
+
+const
+  NSGradientNone = 0;
+  NSGradientConcaveWeak = 1;
+  NSGradientConcaveStrong = 2;
+  NSGradientConvexWeak = 3;
+  NSGradientConvexStrong = 4;
+
+{ Types }
+type
+  NSButtonType = culong;
+  NSBezelStyle = culong;
+  NSGradientType = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSBUTTONCELL_PAS_R}
+{$define NSBUTTONCELL_PAS_R}
+
+{ Records }
+type
+  __BCFlags = record
+{$ifdef fpc_big_endian}
+    pushIn: cuint;
+    changeContents: cuint;
+    changeBackground: cuint;
+    changeGray: cuint;
+    lightByContents: cuint;
+    lightByBackground: cuint;
+    lightByGray: cuint;
+    drawing: cuint;
+    bordered: cuint;
+    imageOverlaps: cuint;
+    horizontal: cuint;
+    bottomOrLeft: cuint;
+    imageAndText: cuint;
+    imageSizeDiff: cuint;
+    hasKeyEquivalentInsteadOfImage: cuint;
+    lastState: cuint;
+    transparent: cuint;
+    inset: cuint;
+    doesNotDimImage: cuint;
+    gradientType: cuint;
+    useButtonImageSource: cuint;
+    alternateMnemonicLocation: cuint;
+{$else}
+    alternateMnemonicLocation: cuint;
+    useButtonImageSource: cuint;
+    gradientType: cuint;
+    doesNotDimImage: cuint;
+    inset: cuint;
+    transparent: cuint;
+    lastState: cuint;
+    hasKeyEquivalentInsteadOfImage: cuint;
+    imageSizeDiff: cuint;
+    imageAndText: cuint;
+    bottomOrLeft: cuint;
+    horizontal: cuint;
+    imageOverlaps: cuint;
+    bordered: cuint;
+    drawing: cuint;
+    lightByGray: cuint;
+    lightByBackground: cuint;
+    lightByContents: cuint;
+    changeGray: cuint;
+    changeBackground: cuint;
+    changeContents: cuint;
+    pushIn: cuint;
+{$endif}
+  end;
+_BCFlags = __BCFlags;
+
+type
+  __BCFlags2 = record
+{$ifdef fpc_big_endian}
+    keyEquivalentModifierMask: cuint;
+    imageScaling: cuint;
+    bezelStyle2: cuint;
+    mouseInside: cuint;
+    showsBorderOnlyWhileMouseInside: cuint;
+    bezelStyle: cuint;
+{$else}
+    bezelStyle: cuint;
+    showsBorderOnlyWhileMouseInside: cuint;
+    mouseInside: cuint;
+    bezelStyle2: cuint;
+    imageScaling: cuint;
+    keyEquivalentModifierMask: cuint;
+{$endif}
+  end;
+_BCFlags2 = __BCFlags2;
+
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSBUTTONCELL_PAS_F}
+{$define NSBUTTONCELL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSBUTTONCELL_PAS_T}
+{$define NSBUTTONCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSButtonCell = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSBUTTONCELL_PAS_C}
+{$define NSBUTTONCELL_PAS_C}
+
+{ NSButtonCell }
+  NSButtonCell = objcclass(NSActionCell)
+  private
+    __altContents: NSString;
+    __sound: id;
+    __keyEquivalent: NSString;
+    __bcFlags2: _BCFlags2;
+    __periodicDelay: cushort;
+    __periodicInterval: cushort;
+    __bcFlags: _BCFlags;
+    __normalImage: NSImage;
+    __alternateImageOrKeyEquivalentFont: id;
+    
+  public
+    class function alloc: NSButtonCell; message 'alloc';
+
+    function title: NSString; message 'title';
+    procedure setTitle(aString: NSString); message 'setTitle:';
+    function alternateTitle: NSString; message 'alternateTitle';
+    procedure setAlternateTitle(aString: NSString); message 'setAlternateTitle:';
+    function alternateImage: NSImage; message 'alternateImage';
+    procedure setAlternateImage(image_: NSImage); message 'setAlternateImage:';
+    function imagePosition: NSCellImagePosition; message 'imagePosition';
+    procedure setImagePosition(aPosition: NSCellImagePosition); message 'setImagePosition:';
+    function imageScaling: NSImageScaling; message 'imageScaling';
+    procedure setImageScaling(scaling: NSImageScaling); message 'setImageScaling:';
+    function highlightsBy: clong; message 'highlightsBy';
+    procedure setHighlightsBy(aType: clong); message 'setHighlightsBy:';
+    function showsStateBy: clong; message 'showsStateBy';
+    procedure setShowsStateBy(aType: clong); message 'setShowsStateBy:';
+    procedure setButtonType(aType: NSButtonType); message 'setButtonType:';
+    function isOpaque: Boolean; message 'isOpaque';
+    procedure setFont(fontObj: NSFont); message 'setFont:';
+    function isTransparent: Boolean; message 'isTransparent';
+    procedure setTransparent(flag: Boolean); message 'setTransparent:';
+    procedure setPeriodicDelay_interval(delay: single; interval: single); message 'setPeriodicDelay:interval:';
+    procedure getPeriodicDelay_interval(var delay: single; var interval: single); message 'getPeriodicDelay:interval:';
+    function keyEquivalent: NSString; message 'keyEquivalent';
+    procedure setKeyEquivalent(aKeyEquivalent: NSString); message 'setKeyEquivalent:';
+    function keyEquivalentModifierMask: culong; message 'keyEquivalentModifierMask';
+    procedure setKeyEquivalentModifierMask(mask: culong); message 'setKeyEquivalentModifierMask:';
+    function keyEquivalentFont: NSFont; message 'keyEquivalentFont';
+    procedure setKeyEquivalentFont(fontObj: NSFont); message 'setKeyEquivalentFont:';
+    procedure setKeyEquivalentFont_size(fontName: NSString; fontSize: CGFloat); message 'setKeyEquivalentFont:size:';
+    procedure performClick(sender: id); message 'performClick:';
+    procedure drawImage_withFrame_inView(image_: NSImage; frame: NSRect; controlView_: NSView); message 'drawImage:withFrame:inView:';
+    function drawTitle_withFrame_inView(title_: NSAttributedString; frame: NSRect; controlView_: NSView): NSRect; message 'drawTitle:withFrame:inView:';
+    procedure drawBezelWithFrame_inView(frame: NSRect; controlView_: NSView); message 'drawBezelWithFrame:inView:';
+
+    { Category: NSKeyboardUI }
+    procedure setTitleWithMnemonic(stringWithAmpersand: NSString); message 'setTitleWithMnemonic:';
+    procedure setAlternateTitleWithMnemonic(stringWithAmpersand: NSString); message 'setAlternateTitleWithMnemonic:';
+    procedure setAlternateMnemonicLocation(location: culong); message 'setAlternateMnemonicLocation:';
+    function alternateMnemonicLocation: culong; message 'alternateMnemonicLocation';
+    function alternateMnemonic: NSString; message 'alternateMnemonic';
+
+    { Category: NSButtonCellExtensions }
+    function gradientType: NSGradientType; message 'gradientType';
+    procedure setGradientType(type__: NSGradientType); message 'setGradientType:';
+    procedure setImageDimsWhenDisabled(flag: Boolean); message 'setImageDimsWhenDisabled:';
+    function imageDimsWhenDisabled: Boolean; message 'imageDimsWhenDisabled';
+    procedure setShowsBorderOnlyWhileMouseInside(show: Boolean); message 'setShowsBorderOnlyWhileMouseInside:';
+    function showsBorderOnlyWhileMouseInside: Boolean; message 'showsBorderOnlyWhileMouseInside';
+    procedure mouseEntered(event: NSEvent); message 'mouseEntered:';
+    procedure mouseExited(event: NSEvent); message 'mouseExited:';
+    function backgroundColor: NSColor; message 'backgroundColor';
+    procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
+
+    { Category: NSButtonCellAttributedStringMethods }
+    function attributedTitle: NSAttributedString; message 'attributedTitle';
+    procedure setAttributedTitle(obj: NSAttributedString); message 'setAttributedTitle:';
+    function attributedAlternateTitle: NSAttributedString; message 'attributedAlternateTitle';
+    procedure setAttributedAlternateTitle(obj: NSAttributedString); message 'setAttributedAlternateTitle:';
+
+    { Category: NSButtonCellBezelStyles }
+    procedure setBezelStyle(bezelStyle_: NSBezelStyle); message 'setBezelStyle:';
+    function bezelStyle: NSBezelStyle; message 'bezelStyle';
+
+    { Category: NSButtonCellSoundExtensions }
+    procedure setSound(aSound: NSSound); message 'setSound:';
+    function sound: NSSound; message 'sound';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSCIImageRep.inc b/packages/cocoaint/src/appkit/NSCIImageRep.inc
new file mode 100644
index 0000000000..2da3a90eed
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSCIImageRep.inc
@@ -0,0 +1,64 @@
+{ Parsed from Appkit.framework NSCIImageRep.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCIIMAGEREP_PAS_H}
+{$define NSCIIMAGEREP_PAS_H}
+type
+  NSCIImageRepPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCIIMAGEREP_PAS_T}
+{$define NSCIIMAGEREP_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCIIMAGEREP_PAS_R}
+{$define NSCIIMAGEREP_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCIIMAGEREP_PAS_F}
+{$define NSCIIMAGEREP_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCIIMAGEREP_PAS_T}
+{$define NSCIIMAGEREP_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSCIImageRep = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCIIMAGEREP_PAS_C}
+{$define NSCIIMAGEREP_PAS_C}
+
+{ NSCIImageRep }
+  NSCIImageRep = objcclass(NSImageRep)
+  private
+    __ciImage: CIImage;
+    
+  public
+    class function alloc: NSCIImageRep; message 'alloc';
+
+    class function imageRepWithCIImage(var image: CIImage_): id; message 'imageRepWithCIImage:';
+    function initWithCIImage(var image: CIImage_): id; message 'initWithCIImage:';
+    function CIImage: CIImage_; message 'CIImage';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSCachedImageRep.inc b/packages/cocoaint/src/appkit/NSCachedImageRep.inc
new file mode 100644
index 0000000000..bf4aa37690
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSCachedImageRep.inc
@@ -0,0 +1,67 @@
+{ Parsed from Appkit.framework NSCachedImageRep.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCACHEDIMAGEREP_PAS_H}
+{$define NSCACHEDIMAGEREP_PAS_H}
+type
+  NSCachedImageRepPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCACHEDIMAGEREP_PAS_T}
+{$define NSCACHEDIMAGEREP_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCACHEDIMAGEREP_PAS_R}
+{$define NSCACHEDIMAGEREP_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCACHEDIMAGEREP_PAS_F}
+{$define NSCACHEDIMAGEREP_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCACHEDIMAGEREP_PAS_T}
+{$define NSCACHEDIMAGEREP_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSCachedImageRep = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCACHEDIMAGEREP_PAS_C}
+{$define NSCACHEDIMAGEREP_PAS_C}
+
+{ NSCachedImageRep }
+  NSCachedImageRep = objcclass(NSImageRep)
+  private
+    __origin: NSPoint;
+    __window: NSWindow;
+    __cache: Pointer; {garbage collector: __strong }
+    
+  public
+    class function alloc: NSCachedImageRep; message 'alloc';
+
+    function initWithWindow_rect(win: NSWindow; rect_: NSRect): id; message 'initWithWindow:rect:';
+    function initWithSize_depth_separate_alpha(size_: NSSize; depth: NSWindowDepth; flag: Boolean; alpha: Boolean): id; message 'initWithSize:depth:separate:alpha:';
+    function window: NSWindow; message 'window';
+    function rect: NSRect; message 'rect';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSCell.inc b/packages/cocoaint/src/appkit/NSCell.inc
new file mode 100644
index 0000000000..69d0e831e2
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSCell.inc
@@ -0,0 +1,361 @@
+{ Parsed from Appkit.framework NSCell.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCELL_PAS_H}
+{$define NSCELL_PAS_H}
+type
+  NSCellPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCELL_PAS_T}
+{$define NSCELL_PAS_T}
+
+{ Constants }
+
+const
+  NSAnyType = 0;
+  NSIntType = 1;
+  NSPositiveIntType = 2;
+  NSFloatType = 3;
+  NSPositiveFloatType = 4;
+  NSDoubleType = 6;
+  NSPositiveDoubleType = 7;
+
+const
+  NSNullCellType = 0;
+  NSTextCellType = 1;
+  NSImageCellType = 2;
+
+const
+  NSCellDisabled = 0;
+  NSCellState = 1;
+  NSPushInCell = 2;
+  NSCellEditable = 3;
+  NSChangeGrayCell = 4;
+  NSCellHighlighted = 5;
+  NSCellLightsByContents = 6;
+  NSCellLightsByGray = 7;
+  NSChangeBackgroundCell = 8;
+  NSCellLightsByBackground = 9;
+  NSCellIsBordered = 10;
+  NSCellHasOverlappingImage = 11;
+  NSCellHasImageHorizontal = 12;
+  NSCellHasImageOnLeftOrBottom = 13;
+  NSCellChangesContents = 14;
+  NSCellIsInsetButton = 15;
+  NSCellAllowsMixedState = 16;
+
+const
+  NSNoImage = 0;
+  NSImageOnly = 1;
+  NSImageLeft = 2;
+  NSImageRight = 3;
+  NSImageBelow = 4;
+  NSImageAbove = 5;
+  NSImageOverlaps = 6;
+
+const
+  NSMixedState = -1;
+  NSOffState = 0;
+  NSOnState = 1;
+
+const
+  NSNoCellMask = 0;
+  NSContentsCellMask = 1;
+  NSPushInCellMask = 2;
+  NSChangeGrayCellMask = 4;
+  NSChangeBackgroundCellMask = 8;
+
+const
+  NSBlueControlTint = 1;
+  NSGraphiteControlTint = 6;
+  NSClearControlTint = 7;
+
+const
+  NSRegularControlSize = 0;
+  NSSmallControlSize = 1;
+
+const
+  NSCellHitNone = 0;
+  NSCellHitContentArea = 1  shl  0;
+  NSCellHitEditableTextArea = 1  shl  1;
+  NSCellHitTrackableArea = 1  shl  2;
+
+{ Types }
+type
+  NSCellType = culong;
+  NSCellAttribute = culong;
+  NSCellImagePosition = culong;
+  NSImageScaling = culong;
+  NSCellStateValue = clong;
+  NSControlTint = culong;
+  NSControlSize = culong;
+  NSBackgroundStyle = clong;
+
+{ CFString constants }
+var
+  NSControlTintDidChangeNotification: CFStringRef; external name '_NSControlTintDidChangeNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCELL_PAS_R}
+{$define NSCELL_PAS_R}
+
+{ Records }
+type
+  __CFlags = record
+    state: cuint;
+    highlighted: cuint;
+    disabled: cuint;
+    editable: cuint;
+    type_: NSCellType;
+    vCentered: cuint;
+    hCentered: cuint;
+    bordered: cuint;
+    bezeled: cuint;
+    selectable: cuint;
+    scrollable: cuint;
+    continuous: cuint;
+    actOnMouseDown: cuint;
+    isLeaf: cuint;
+    invalidObjectValue: cuint;
+    invalidFont: cuint;
+    lineBreakMode: NSLineBreakMode;
+    backgroundStyle: cuint;
+    reserved1: cuint;
+    actOnMouseDragged: cuint;
+    isLoaded: cuint;
+    truncateLastLine: cuint;
+    dontActOnMouseUp: cuint;
+    isWhite: cuint;
+    useUserKeyEquivalent: cuint;
+    showsFirstResponder: cuint;
+    focusRingType: cuint;
+    wasSelectable: cuint;
+    hasInvalidObject: cuint;
+    allowsEditingTextAttributes: cuint;
+    importsGraphics: cuint;
+    alignment: NSTextAlignment;
+    reserved: cuint;
+    refusesFirstResponder: cuint;
+    needsHighlightedText: cuint;
+    dontAllowsUndo: cuint;
+    currentlyEditing: cuint;
+    allowsMixedState: cuint;
+    inMixedState: cuint;
+    sendsActionOnEndEditing: cuint;
+    inSendAction: cuint;
+    menuWasSet: cuint;
+    controlTint: cuint;
+    controlSize: cuint;
+    branchImageDisabled: cuint;
+    drawingInRevealover: cuint;
+    needsHighlightedTextHint: cuint;
+  end;
+_CFlags = __CFlags;
+
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCELL_PAS_F}
+{$define NSCELL_PAS_F}
+
+{ Functions }
+procedure NSDrawThreePartImage(frame: NSRect; var startCap: NSImage; var centerFill: NSImage; var endCap: NSImage; vertical: Boolean; op: NSCompositingOperation; alphaFraction: CGFloat; flipped: Boolean); cdecl; external name 'NSDrawThreePartImage';
+procedure NSDrawNinePartImage(frame: NSRect; var topLeftCorner: NSImage; var topEdgeFill: NSImage; var topRightCorner: NSImage; var leftEdgeFill: NSImage; var centerFill: NSImage; var rightEdgeFill: NSImage; var bottomLeftCorner: NSImage; var bottomEdgeFill: NSImage; var bottomRightCorner: NSImage; op: NSCompositingOperation; alphaFraction: CGFloat; flipped: Boolean); cdecl; external name 'NSDrawNinePartImage';
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCELL_PAS_T}
+{$define NSCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSCell = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCELL_PAS_C}
+{$define NSCELL_PAS_C}
+
+{ NSCell }
+  NSCell = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __contents: id;
+    __cFlags: _CFlags;
+    __support: id;
+    
+  public
+    class function alloc: NSCell; message 'alloc';
+
+    class function prefersTrackingUntilMouseUp: Boolean; message 'prefersTrackingUntilMouseUp';
+    function initTextCell(aString: NSString): id; message 'initTextCell:';
+    function initImageCell(image_: NSImage): id; message 'initImageCell:';
+    function controlView: NSView; message 'controlView';
+    procedure setControlView(view: NSView); message 'setControlView:';
+    function type_: NSCellType; message 'type';
+    procedure setType(aType: NSCellType); message 'setType:';
+    function state: clong; message 'state';
+    procedure setState(value: clong); message 'setState:';
+    function target: id; message 'target';
+    procedure setTarget(anObject: id); message 'setTarget:';
+    function action: SEL; message 'action';
+    procedure setAction(aSelector: SEL); message 'setAction:';
+    function tag: clong; message 'tag';
+    procedure setTag(anInt: clong); message 'setTag:';
+    function title: NSString; message 'title';
+    procedure setTitle(aString: NSString); message 'setTitle:';
+    function isOpaque: Boolean; message 'isOpaque';
+    function isEnabled: Boolean; message 'isEnabled';
+    procedure setEnabled(flag: Boolean); message 'setEnabled:';
+    function sendActionOn(mask: clong): clong; message 'sendActionOn:';
+    function isContinuous: Boolean; message 'isContinuous';
+    procedure setContinuous(flag: Boolean); message 'setContinuous:';
+    function isEditable: Boolean; message 'isEditable';
+    procedure setEditable(flag: Boolean); message 'setEditable:';
+    function isSelectable: Boolean; message 'isSelectable';
+    procedure setSelectable(flag: Boolean); message 'setSelectable:';
+    function isBordered: Boolean; message 'isBordered';
+    procedure setBordered(flag: Boolean); message 'setBordered:';
+    function isBezeled: Boolean; message 'isBezeled';
+    procedure setBezeled(flag: Boolean); message 'setBezeled:';
+    function isScrollable: Boolean; message 'isScrollable';
+    procedure setScrollable(flag: Boolean); message 'setScrollable:';
+    function isHighlighted: Boolean; message 'isHighlighted';
+    procedure setHighlighted(flag: Boolean); message 'setHighlighted:';
+    function alignment: NSTextAlignment; message 'alignment';
+    procedure setAlignment(mode: NSTextAlignment); message 'setAlignment:';
+    function wraps: Boolean; message 'wraps';
+    procedure setWraps(flag: Boolean); message 'setWraps:';
+    function font: NSFont; message 'font';
+    procedure setFont(fontObj: NSFont); message 'setFont:';
+    function entryType: clong; message 'entryType';
+    procedure setEntryType(aType: clong); message 'setEntryType:';
+    function isEntryAcceptable(aString: NSString): Boolean; message 'isEntryAcceptable:';
+    procedure setFloatingPointFormat_left_right(autoRange: Boolean; leftDigits: culong; rightDigits: culong); message 'setFloatingPointFormat:left:right:';
+    function keyEquivalent: NSString; message 'keyEquivalent';
+    procedure setFormatter(newFormatter: NSFormatter); message 'setFormatter:';
+    function formatter: id; message 'formatter';
+    function objectValue: id; message 'objectValue';
+    procedure setObjectValue(obj: id); message 'setObjectValue:';
+    function hasValidObjectValue: Boolean; message 'hasValidObjectValue';
+    function stringValue: NSString; message 'stringValue';
+    procedure setStringValue(aString: NSString); message 'setStringValue:';
+    function compare(otherCell: id): NSComparisonResult; message 'compare:';
+    function intValue: cint; message 'intValue';
+    procedure setIntValue(anInt: cint); message 'setIntValue:';
+    function floatValue: single; message 'floatValue';
+    procedure setFloatValue(aFloat: single); message 'setFloatValue:';
+    function doubleValue: double; message 'doubleValue';
+    procedure setDoubleValue(aDouble: double); message 'setDoubleValue:';
+    procedure takeIntValueFrom(sender: id); message 'takeIntValueFrom:';
+    procedure takeFloatValueFrom(sender: id); message 'takeFloatValueFrom:';
+    procedure takeDoubleValueFrom(sender: id); message 'takeDoubleValueFrom:';
+    procedure takeStringValueFrom(sender: id); message 'takeStringValueFrom:';
+    procedure takeObjectValueFrom(sender: id); message 'takeObjectValueFrom:';
+    function image: NSImage; message 'image';
+    procedure setImage(image_: NSImage); message 'setImage:';
+    procedure setControlTint(controlTint_: NSControlTint); message 'setControlTint:';
+    function controlTint: NSControlTint; message 'controlTint';
+    procedure setControlSize(size: NSControlSize); message 'setControlSize:';
+    function controlSize: NSControlSize; message 'controlSize';
+    function representedObject: id; message 'representedObject';
+    procedure setRepresentedObject(anObject: id); message 'setRepresentedObject:';
+    function cellAttribute(aParameter: NSCellAttribute): clong; message 'cellAttribute:';
+    procedure setCellAttribute_to(aParameter: NSCellAttribute; value: clong); message 'setCellAttribute:to:';
+    function imageRectForBounds(theRect: NSRect): NSRect; message 'imageRectForBounds:';
+    function titleRectForBounds(theRect: NSRect): NSRect; message 'titleRectForBounds:';
+    function drawingRectForBounds(theRect: NSRect): NSRect; message 'drawingRectForBounds:';
+    function cellSize: NSSize; message 'cellSize';
+    function cellSizeForBounds(aRect: NSRect): NSSize; message 'cellSizeForBounds:';
+    function highlightColorWithFrame_inView(cellFrame: NSRect; controlView_: NSView): NSColor; message 'highlightColorWithFrame:inView:';
+    procedure calcDrawInfo(aRect: NSRect); message 'calcDrawInfo:';
+    function setUpFieldEditorAttributes(textObj: NSText): NSText; message 'setUpFieldEditorAttributes:';
+    procedure drawInteriorWithFrame_inView(cellFrame: NSRect; controlView_: NSView); message 'drawInteriorWithFrame:inView:';
+    procedure drawWithFrame_inView(cellFrame: NSRect; controlView_: NSView); message 'drawWithFrame:inView:';
+    procedure highlight_withFrame_inView(flag: Boolean; cellFrame: NSRect; controlView_: NSView); message 'highlight:withFrame:inView:';
+    function mouseDownFlags: clong; message 'mouseDownFlags';
+    procedure getPeriodicDelay_interval(var delay: single; var interval: single); message 'getPeriodicDelay:interval:';
+    function startTrackingAt_inView(startPoint: NSPoint; controlView_: NSView): Boolean; message 'startTrackingAt:inView:';
+    function continueTracking_at_inView(lastPoint: NSPoint; currentPoint: NSPoint; controlView_: NSView): Boolean; message 'continueTracking:at:inView:';
+    procedure stopTracking_at_inView_mouseIsUp(lastPoint: NSPoint; stopPoint: NSPoint; controlView_: NSView; flag: Boolean); message 'stopTracking:at:inView:mouseIsUp:';
+    function trackMouse_inRect_ofView_untilMouseUp(theEvent: NSEvent; cellFrame: NSRect; controlView_: NSView; flag: Boolean): Boolean; message 'trackMouse:inRect:ofView:untilMouseUp:';
+    procedure editWithFrame_inView_editor_delegate_event(aRect: NSRect; controlView_: NSView; textObj: NSText; anObject: id; theEvent: NSEvent); message 'editWithFrame:inView:editor:delegate:event:';
+    procedure selectWithFrame_inView_editor_delegate_start_length(aRect: NSRect; controlView_: NSView; textObj: NSText; anObject: id; selStart: clong; selLength: clong); message 'selectWithFrame:inView:editor:delegate:start:length:';
+    procedure endEditing(textObj: NSText); message 'endEditing:';
+    procedure resetCursorRect_inView(cellFrame: NSRect; controlView_: NSView); message 'resetCursorRect:inView:';
+    procedure setMenu(aMenu: NSMenu); message 'setMenu:';
+    function menu: NSMenu; message 'menu';
+    function menuForEvent_inRect_ofView(event: NSEvent; cellFrame: NSRect; view: NSView): NSMenu; message 'menuForEvent:inRect:ofView:';
+    class function defaultMenu: NSMenu; message 'defaultMenu';
+    procedure setSendsActionOnEndEditing(flag: Boolean); message 'setSendsActionOnEndEditing:';
+    function sendsActionOnEndEditing: Boolean; message 'sendsActionOnEndEditing';
+    function baseWritingDirection: NSWritingDirection; message 'baseWritingDirection';
+    procedure setBaseWritingDirection(writingDirection: NSWritingDirection); message 'setBaseWritingDirection:';
+    procedure setLineBreakMode(mode: NSLineBreakMode); message 'setLineBreakMode:';
+    function lineBreakMode: NSLineBreakMode; message 'lineBreakMode';
+    procedure setAllowsUndo(allowsUndo_: Boolean); message 'setAllowsUndo:';
+    function allowsUndo: Boolean; message 'allowsUndo';
+    function integerValue: clong; message 'integerValue';
+    procedure setIntegerValue(anInteger: clong); message 'setIntegerValue:';
+    procedure takeIntegerValueFrom(sender: id); message 'takeIntegerValueFrom:';
+    procedure setTruncatesLastVisibleLine(flag: Boolean); message 'setTruncatesLastVisibleLine:';
+
+    { Category: NSKeyboardUI }
+    procedure setRefusesFirstResponder(flag: Boolean); message 'setRefusesFirstResponder:';
+    function refusesFirstResponder: Boolean; message 'refusesFirstResponder';
+    function acceptsFirstResponder: Boolean; message 'acceptsFirstResponder';
+    procedure setShowsFirstResponder(showFR: Boolean); message 'setShowsFirstResponder:';
+    function showsFirstResponder: Boolean; message 'showsFirstResponder';
+    procedure setMnemonicLocation(location: culong); message 'setMnemonicLocation:';
+    function mnemonicLocation: culong; message 'mnemonicLocation';
+    function mnemonic: NSString; message 'mnemonic';
+    procedure setTitleWithMnemonic(stringWithAmpersand: NSString); message 'setTitleWithMnemonic:';
+    procedure performClick(sender: id); message 'performClick:';
+    procedure setFocusRingType(focusRingType_: NSFocusRingType); message 'setFocusRingType:';
+    function focusRingType: NSFocusRingType; message 'focusRingType';
+    class function defaultFocusRingType: NSFocusRingType; message 'defaultFocusRingType';
+    function wantsNotificationForMarkedText: Boolean; message 'wantsNotificationForMarkedText';
+
+    { Category: NSCellAttributedStringMethods }
+    function attributedStringValue: NSAttributedString; message 'attributedStringValue';
+    procedure setAttributedStringValue(obj: NSAttributedString); message 'setAttributedStringValue:';
+    function allowsEditingTextAttributes: Boolean; message 'allowsEditingTextAttributes';
+    procedure setAllowsEditingTextAttributes_setImportsGraphics(flag: Boolean); message 'setAllowsEditingTextAttributes:';
+    function importsGraphics: Boolean; message 'importsGraphics';
+    procedure setImportsGraphics_setAllowsEditingTextAttributes(flag: Boolean); message 'setImportsGraphics:';
+
+    { Category: NSCellMixedState }
+    procedure setAllowsMixedState(flag: Boolean); message 'setAllowsMixedState:';
+    function allowsMixedState: Boolean; message 'allowsMixedState';
+    function nextState: clong; message 'nextState';
+    procedure setNextState; message 'setNextState';
+
+    { Category: NSCellHitTest }
+    function hitTestForEvent_inRect_ofView(event: NSEvent; cellFrame: NSRect; controlView_: NSView): culong; message 'hitTestForEvent:inRect:ofView:';
+
+    { Category: NSCellExpansion }
+    function expansionFrameWithFrame_inView(cellFrame: NSRect; view: NSView): NSRect; message 'expansionFrameWithFrame:inView:';
+    procedure drawWithExpansionFrame_inView(cellFrame: NSRect; view: NSView); message 'drawWithExpansionFrame:inView:';
+
+    { Category: NSCellBackgroundStyle }
+    function backgroundStyle: NSBackgroundStyle; message 'backgroundStyle';
+    procedure setBackgroundStyle(style: NSBackgroundStyle); message 'setBackgroundStyle:';
+    function interiorBackgroundStyle: NSBackgroundStyle; message 'interiorBackgroundStyle';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSClipView.inc b/packages/cocoaint/src/appkit/NSClipView.inc
new file mode 100644
index 0000000000..6276925e15
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSClipView.inc
@@ -0,0 +1,101 @@
+{ Parsed from Appkit.framework NSClipView.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCLIPVIEW_PAS_H}
+{$define NSCLIPVIEW_PAS_H}
+type
+  NSClipViewPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCLIPVIEW_PAS_T}
+{$define NSCLIPVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCLIPVIEW_PAS_R}
+{$define NSCLIPVIEW_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCLIPVIEW_PAS_F}
+{$define NSCLIPVIEW_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCLIPVIEW_PAS_T}
+{$define NSCLIPVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSClipView = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCLIPVIEW_PAS_C}
+{$define NSCLIPVIEW_PAS_C}
+
+{ NSClipView }
+  NSClipView = objcclass(NSView)
+  private
+    __backgroundColor: NSColor;
+    __docView: NSView;
+    __docRect: NSRect;
+    __oldDocFrame: NSRect;
+    __cursor: NSCursor;
+    __scrollAnimationHelper: id;
+    __cvFlags: bitpacked record
+        isFlipped: 0..1;
+        onlyUncovered: 0..1;
+        reflectScroll: 0..1;
+        usedByCell: 0..1;
+        scrollClipTo: 0..1;
+        noCopyOnScroll: 0..1;
+        drawsBackground: 0..1;
+        scrollInProgress: 0..1;
+        skipRemoveSuperviewCheck: 0..1;
+        animateCurrentScroll: 0..1;
+        canAnimateScrolls: 0..1;
+        nextScrollRelativeToCurrentPosition: 0..1;
+        viewBoundsChangedOverridden: 0..1;
+        viewFrameChangedOverridden: 0..1;
+        documentViewAlignment: 0..((1 shl 4)-1);
+        RESERVED: 0..((1 shl 14)-1);
+      end;
+    
+  public
+    class function alloc: NSClipView; message 'alloc';
+
+    procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
+    function backgroundColor: NSColor; message 'backgroundColor';
+    procedure setDrawsBackground(flag: Boolean); message 'setDrawsBackground:';
+    function drawsBackground: Boolean; message 'drawsBackground';
+    procedure setDocumentView(aView: NSView); message 'setDocumentView:';
+    function documentView: id; message 'documentView';
+    function documentRect: NSRect; message 'documentRect';
+    procedure setDocumentCursor(anObj: NSCursor); message 'setDocumentCursor:';
+    function documentCursor: NSCursor; message 'documentCursor';
+    function documentVisibleRect: NSRect; message 'documentVisibleRect';
+    procedure viewFrameChanged(notification: NSNotification); message 'viewFrameChanged:';
+    procedure viewBoundsChanged(notification: NSNotification); message 'viewBoundsChanged:';
+    procedure setCopiesOnScroll(flag: Boolean); message 'setCopiesOnScroll:';
+    function copiesOnScroll: Boolean; message 'copiesOnScroll';
+    function autoscroll(theEvent: NSEvent): Boolean; message 'autoscroll:';
+    function constrainScrollPoint(newOrigin: NSPoint): NSPoint; message 'constrainScrollPoint:';
+    procedure scrollToPoint(newOrigin: NSPoint); message 'scrollToPoint:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSCollectionView.inc b/packages/cocoaint/src/appkit/NSCollectionView.inc
new file mode 100644
index 0000000000..a59871f905
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSCollectionView.inc
@@ -0,0 +1,154 @@
+{ Parsed from Appkit.framework NSCollectionView.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCOLLECTIONVIEW_PAS_H}
+{$define NSCOLLECTIONVIEW_PAS_H}
+type
+  NSCollectionViewItemPointer = Pointer;
+  NSCollectionViewPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCOLLECTIONVIEW_PAS_T}
+{$define NSCOLLECTIONVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCOLLECTIONVIEW_PAS_R}
+{$define NSCOLLECTIONVIEW_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCOLLECTIONVIEW_PAS_F}
+{$define NSCOLLECTIONVIEW_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCOLLECTIONVIEW_PAS_T}
+{$define NSCOLLECTIONVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSCollectionViewItem = objcclass;
+  NSCollectionView = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCOLLECTIONVIEW_PAS_C}
+{$define NSCOLLECTIONVIEW_PAS_C}
+
+{ NSCollectionViewItem }
+  NSCollectionViewItem = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __reserved: Pointer;
+    __archive: NSMutableData;
+    __ownerView: NSCollectionView;
+    __representedObject: id;
+    __view: NSView;
+    __itemFlags: bitpacked record
+        _selected: 0..1;
+        _removalNeeded: 0..1;
+        _suppressSelectionChangeNotification: 0..1;
+        _reservedAnimationContainer: 0..((1 shl 29)-1);
+      end;
+    __targetViewFrameRect: NSRect;
+    __appliedViewFrameRect: NSRect;
+    __containerReferenceCounter: culong;
+    
+  public
+    class function alloc: NSCollectionViewItem; message 'alloc';
+
+    function collectionView: NSCollectionView; message 'collectionView';
+    procedure setRepresentedObject(object_: id); message 'setRepresentedObject:';
+    function representedObject: id; message 'representedObject';
+    procedure setView(view_: NSView); message 'setView:';
+    function view: NSView; message 'view';
+    procedure setSelected(flag: Boolean); message 'setSelected:';
+    function isSelected: Boolean; message 'isSelected';
+  end; external;
+
+{ NSCollectionView }
+  NSCollectionView = objcclass(NSView)
+  private
+    __reserved: Pointer;
+    __backgroundLayers: NSMutableArray;
+    __content: NSArray;
+    __selectionIndexes: NSMutableIndexSet;
+    __itemPrototype: NSCollectionViewItem;
+    __minGridSize: NSSize;
+    __maxGridSize: NSSize;
+    __minGridRows: culong;
+    __maxGridRows: culong;
+    __minGridColumns: culong;
+    __maxGridColumns: culong;
+    __backgroundColors: NSArray;
+    __animationContainerFlags: bitpacked record
+        _ignoreFrameSizeChanges: 0..1;
+        _selectable: 0..1;
+        _allowsMultipleSelection: 0..1;
+        _avoidsEmptySelection: 0..1;
+        _superviewIsClipView: 0..1;
+        _gridParametersReadFromPrototype: 0..1;
+        _isFirstResponder: 0..1;
+        _reservedAnimationContainer: 0..((1 shl 25)-1);
+      end;
+    __targetFrameSize: NSSize;
+    __targetGridSize: NSSize;
+    __targetUnfilledViewSpace: NSSize;
+    __targetNumberOfGridRows: culong;
+    __targetNumberOfGridColumns: culong;
+    __targetItems: NSMutableArray;
+    __appliedFrameSize: NSSize;
+    __appliedGridSize: NSSize;
+    __appliedUnfilledViewSpace: NSSize;
+    __appliedNumberOfGridRows: culong;
+    __appliedNumberOfGridColumns: culong;
+    __appliedItems: NSMutableArray;
+    __appliedItemsAsSet: NSMutableSet;
+    __appliedRemovedItemsAsSet: NSMutableSet;
+    __animationDuration: NSTimeInterval;
+    __animation: NSViewAnimation;
+    __hideItems: NSMutableArray;
+    __showItems: NSMutableArray;
+    
+  public
+    class function alloc: NSCollectionView; message 'alloc';
+
+    function isFirstResponder: Boolean; message 'isFirstResponder';
+    procedure setContent(content_: NSArray); message 'setContent:';
+    function content: NSArray; message 'content';
+    procedure setSelectable(flag: Boolean); message 'setSelectable:';
+    function isSelectable: Boolean; message 'isSelectable';
+    procedure setAllowsMultipleSelection(flag: Boolean); message 'setAllowsMultipleSelection:';
+    function allowsMultipleSelection: Boolean; message 'allowsMultipleSelection';
+    procedure setSelectionIndexes(indexes: NSIndexSet); message 'setSelectionIndexes:';
+    function selectionIndexes: NSIndexSet; message 'selectionIndexes';
+    function newItemForRepresentedObject(object_: id): NSCollectionViewItem; message 'newItemForRepresentedObject:';
+    procedure setItemPrototype(prototype: NSCollectionViewItem); message 'setItemPrototype:';
+    function itemPrototype: NSCollectionViewItem; message 'itemPrototype';
+    procedure setMaxNumberOfRows(number: culong); message 'setMaxNumberOfRows:';
+    function maxNumberOfRows: culong; message 'maxNumberOfRows';
+    procedure setMaxNumberOfColumns(number: culong); message 'setMaxNumberOfColumns:';
+    function maxNumberOfColumns: culong; message 'maxNumberOfColumns';
+    procedure setMinItemSize(size: NSSize); message 'setMinItemSize:';
+    function minItemSize: NSSize; message 'minItemSize';
+    procedure setMaxItemSize(size: NSSize); message 'setMaxItemSize:';
+    function maxItemSize: NSSize; message 'maxItemSize';
+    procedure setBackgroundColors(colors: NSArray); message 'setBackgroundColors:';
+    function backgroundColors: NSArray; message 'backgroundColors';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSColor.inc b/packages/cocoaint/src/appkit/NSColor.inc
new file mode 100644
index 0000000000..ae0163664f
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSColor.inc
@@ -0,0 +1,169 @@
+{ Parsed from Appkit.framework NSColor.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCOLOR_PAS_H}
+{$define NSCOLOR_PAS_H}
+type
+  NSColorPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCOLOR_PAS_T}
+{$define NSCOLOR_PAS_T}
+
+{ Defines }
+const
+  NSAppKitVersionNumberWithPatternColorLeakFix = 641.0;
+
+{ CFString constants }
+var
+  NSSystemColorsDidChangeNotification: CFStringRef; external name '_NSSystemColorsDidChangeNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCOLOR_PAS_R}
+{$define NSCOLOR_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCOLOR_PAS_F}
+{$define NSCOLOR_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCOLOR_PAS_T}
+{$define NSCOLOR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSColor = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCOLOR_PAS_C}
+{$define NSCOLOR_PAS_C}
+
+{ NSColor }
+  NSColor = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+    
+  public
+    class function alloc: NSColor; message 'alloc';
+
+    class function colorWithCalibratedWhite_alpha(white: CGFloat; alpha: CGFloat): NSColor; message 'colorWithCalibratedWhite:alpha:';
+    class function colorWithCalibratedHue_saturation_brightness_alpha(hue: CGFloat; saturation: CGFloat; brightness: CGFloat; alpha: CGFloat): NSColor; message 'colorWithCalibratedHue:saturation:brightness:alpha:';
+    class function colorWithCalibratedRed_green_blue_alpha(red: CGFloat; green: CGFloat; blue: CGFloat; alpha: CGFloat): NSColor; message 'colorWithCalibratedRed:green:blue:alpha:';
+    class function colorWithDeviceWhite_alpha(white: CGFloat; alpha: CGFloat): NSColor; message 'colorWithDeviceWhite:alpha:';
+    class function colorWithDeviceHue_saturation_brightness_alpha(hue: CGFloat; saturation: CGFloat; brightness: CGFloat; alpha: CGFloat): NSColor; message 'colorWithDeviceHue:saturation:brightness:alpha:';
+    class function colorWithDeviceRed_green_blue_alpha(red: CGFloat; green: CGFloat; blue: CGFloat; alpha: CGFloat): NSColor; message 'colorWithDeviceRed:green:blue:alpha:';
+    class function colorWithDeviceCyan_magenta_yellow_black_alpha(cyan: CGFloat; magenta: CGFloat; yellow: CGFloat; black: CGFloat; alpha: CGFloat): NSColor; message 'colorWithDeviceCyan:magenta:yellow:black:alpha:';
+    class function colorWithCatalogName_colorName(listName: NSString; colorName: NSString): NSColor; message 'colorWithCatalogName:colorName:';
+    class function colorWithColorSpace_components_count(space: NSColorSpace; var components: CGFloat; numberOfComponents_: clong): NSColor; message 'colorWithColorSpace:components:count:';
+    class function blackColor: NSColor; message 'blackColor';
+    class function darkGrayColor: NSColor; message 'darkGrayColor';
+    class function lightGrayColor: NSColor; message 'lightGrayColor';
+    class function whiteColor: NSColor; message 'whiteColor';
+    class function grayColor: NSColor; message 'grayColor';
+    class function redColor: NSColor; message 'redColor';
+    class function greenColor: NSColor; message 'greenColor';
+    class function blueColor: NSColor; message 'blueColor';
+    class function cyanColor: NSColor; message 'cyanColor';
+    class function yellowColor: NSColor; message 'yellowColor';
+    class function magentaColor: NSColor; message 'magentaColor';
+    class function orangeColor: NSColor; message 'orangeColor';
+    class function purpleColor: NSColor; message 'purpleColor';
+    class function brownColor: NSColor; message 'brownColor';
+    class function clearColor: NSColor; message 'clearColor';
+    class function controlShadowColor: NSColor; message 'controlShadowColor';
+    class function controlDarkShadowColor: NSColor; message 'controlDarkShadowColor';
+    class function controlColor: NSColor; message 'controlColor';
+    class function controlHighlightColor: NSColor; message 'controlHighlightColor';
+    class function controlLightHighlightColor: NSColor; message 'controlLightHighlightColor';
+    class function controlTextColor: NSColor; message 'controlTextColor';
+    class function controlBackgroundColor: NSColor; message 'controlBackgroundColor';
+    class function selectedControlColor: NSColor; message 'selectedControlColor';
+    class function secondarySelectedControlColor: NSColor; message 'secondarySelectedControlColor';
+    class function selectedControlTextColor: NSColor; message 'selectedControlTextColor';
+    class function disabledControlTextColor: NSColor; message 'disabledControlTextColor';
+    class function textColor: NSColor; message 'textColor';
+    class function textBackgroundColor: NSColor; message 'textBackgroundColor';
+    class function selectedTextColor: NSColor; message 'selectedTextColor';
+    class function selectedTextBackgroundColor: NSColor; message 'selectedTextBackgroundColor';
+    class function gridColor: NSColor; message 'gridColor';
+    class function keyboardFocusIndicatorColor: NSColor; message 'keyboardFocusIndicatorColor';
+    class function windowBackgroundColor: NSColor; message 'windowBackgroundColor';
+    class function scrollBarColor: NSColor; message 'scrollBarColor';
+    class function knobColor: NSColor; message 'knobColor';
+    class function selectedKnobColor: NSColor; message 'selectedKnobColor';
+    class function windowFrameColor: NSColor; message 'windowFrameColor';
+    class function windowFrameTextColor: NSColor; message 'windowFrameTextColor';
+    class function selectedMenuItemColor: NSColor; message 'selectedMenuItemColor';
+    class function selectedMenuItemTextColor: NSColor; message 'selectedMenuItemTextColor';
+    class function highlightColor: NSColor; message 'highlightColor';
+    class function shadowColor: NSColor; message 'shadowColor';
+    class function headerColor: NSColor; message 'headerColor';
+    class function headerTextColor: NSColor; message 'headerTextColor';
+    class function alternateSelectedControlColor: NSColor; message 'alternateSelectedControlColor';
+    class function alternateSelectedControlTextColor: NSColor; message 'alternateSelectedControlTextColor';
+    class function controlAlternatingRowBackgroundColors: NSArray; message 'controlAlternatingRowBackgroundColors';
+    function highlightWithLevel(val: CGFloat): NSColor; message 'highlightWithLevel:';
+    function shadowWithLevel(val: CGFloat): NSColor; message 'shadowWithLevel:';
+    class function colorForControlTint(controlTint: NSControlTint): NSColor; message 'colorForControlTint:';
+    class function currentControlTint: NSControlTint; message 'currentControlTint';
+    procedure set_; message 'set';
+    procedure setFill; message 'setFill';
+    procedure setStroke; message 'setStroke';
+    function colorSpaceName: NSString; message 'colorSpaceName';
+    function colorUsingColorSpaceName(colorSpace_: NSString): NSColor; message 'colorUsingColorSpaceName:';
+    function colorUsingColorSpaceName_device(colorSpace_: NSString; deviceDescription: NSDictionary): NSColor; message 'colorUsingColorSpaceName:device:';
+    function colorUsingColorSpace(space: NSColorSpace): NSColor; message 'colorUsingColorSpace:';
+    function blendedColorWithFraction_ofColor(fraction: CGFloat; color: NSColor): NSColor; message 'blendedColorWithFraction:ofColor:';
+    function colorWithAlphaComponent(alpha: CGFloat): NSColor; message 'colorWithAlphaComponent:';
+    function catalogNameComponent: NSString; message 'catalogNameComponent';
+    function colorNameComponent: NSString; message 'colorNameComponent';
+    function localizedCatalogNameComponent: NSString; message 'localizedCatalogNameComponent';
+    function localizedColorNameComponent: NSString; message 'localizedColorNameComponent';
+    function redComponent: CGFloat; message 'redComponent';
+    function greenComponent: CGFloat; message 'greenComponent';
+    function blueComponent: CGFloat; message 'blueComponent';
+    procedure getRed_green_blue_alpha(var red: CGFloat; var green: CGFloat; var blue: CGFloat; var alpha: CGFloat); message 'getRed:green:blue:alpha:';
+    function hueComponent: CGFloat; message 'hueComponent';
+    function saturationComponent: CGFloat; message 'saturationComponent';
+    function brightnessComponent: CGFloat; message 'brightnessComponent';
+    procedure getHue_saturation_brightness_alpha(var hue: CGFloat; var saturation: CGFloat; var brightness: CGFloat; var alpha: CGFloat); message 'getHue:saturation:brightness:alpha:';
+    function whiteComponent: CGFloat; message 'whiteComponent';
+    procedure getWhite_alpha(var white: CGFloat; var alpha: CGFloat); message 'getWhite:alpha:';
+    function cyanComponent: CGFloat; message 'cyanComponent';
+    function magentaComponent: CGFloat; message 'magentaComponent';
+    function yellowComponent: CGFloat; message 'yellowComponent';
+    function blackComponent: CGFloat; message 'blackComponent';
+    procedure getCyan_magenta_yellow_black_alpha(var cyan: CGFloat; var magenta: CGFloat; var yellow: CGFloat; var black: CGFloat; var alpha: CGFloat); message 'getCyan:magenta:yellow:black:alpha:';
+    function colorSpace: NSColorSpace; message 'colorSpace';
+    function numberOfComponents: clong; message 'numberOfComponents';
+    procedure getComponents(var components: CGFloat); message 'getComponents:';
+    function alphaComponent: CGFloat; message 'alphaComponent';
+    class function colorFromPasteboard(pasteBoard: NSPasteboard): NSColor; message 'colorFromPasteboard:';
+    procedure writeToPasteboard(pasteBoard: NSPasteboard); message 'writeToPasteboard:';
+    class function colorWithPatternImage(image: NSImage): NSColor; message 'colorWithPatternImage:';
+    function patternImage: NSImage; message 'patternImage';
+    procedure drawSwatchInRect(rect: NSRect); message 'drawSwatchInRect:';
+    class procedure setIgnoresAlpha(flag: Boolean); message 'setIgnoresAlpha:';
+    class function ignoresAlpha: Boolean; message 'ignoresAlpha';
+
+    { Category: NSQuartzCoreAdditions }
+    class function colorWithCIColor(var color: CIColor): NSColor; message 'colorWithCIColor:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSColorList.inc b/packages/cocoaint/src/appkit/NSColorList.inc
new file mode 100644
index 0000000000..4449015b19
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSColorList.inc
@@ -0,0 +1,98 @@
+{ Parsed from Appkit.framework NSColorList.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCOLORLIST_PAS_H}
+{$define NSCOLORLIST_PAS_H}
+type
+  NSColorListPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCOLORLIST_PAS_T}
+{$define NSCOLORLIST_PAS_T}
+
+{ CFString constants }
+var
+  NSColorListDidChangeNotification: CFStringRef; external name '_NSColorListDidChangeNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCOLORLIST_PAS_R}
+{$define NSCOLORLIST_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCOLORLIST_PAS_F}
+{$define NSCOLORLIST_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCOLORLIST_PAS_T}
+{$define NSCOLORLIST_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSColorList = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCOLORLIST_PAS_C}
+{$define NSCOLORLIST_PAS_C}
+
+{ NSColorList }
+  NSColorList = objcclass(NSObject, NSCodingProtocol)
+  private
+    __keyArray: NSMutableArray;
+    __colorArray: NSMutableArray;
+    __keyToIndexTable: CFMutableDictionaryRef;
+    __name: NSString;
+    __printerType: NSString;
+    __fileName: NSString;
+    __flags: bitpacked record
+        colorsLoaded: 0..1;
+        editable: 0..1;
+        hasDeviceSpecificLists: 0..1;
+        dirty: 0..1;
+        hasFrozen: 0..1;
+        notificationsDisabled: 0..1;
+        hasAttemptedLoadingBundleForDirectory: 0..1;
+        isProfileBased: 0..1;
+        int: 0..((1 shl 24)-1);
+        {$ifdef cpu64}
+        int: 0..((1 shl 32)-1);
+        {$endif}
+      end;
+    __clAuxiliaryStorage: id;
+    
+  public
+    class function alloc: NSColorList; message 'alloc';
+
+    class function availableColorLists: NSArray; message 'availableColorLists';
+    class function colorListNamed(name_: NSString): NSColorList; message 'colorListNamed:';
+    function initWithName(name_: NSString): id; message 'initWithName:';
+    function initWithName_fromFile(name_: NSString; path: NSString): id; message 'initWithName:fromFile:';
+    function name: NSString; message 'name';
+    procedure setColor_forKey(color: NSColor; key: NSString); message 'setColor:forKey:';
+    procedure insertColor_key_atIndex(color: NSColor; key: NSString; loc: culong); message 'insertColor:key:atIndex:';
+    procedure removeColorWithKey(key: NSString); message 'removeColorWithKey:';
+    function colorWithKey(key: NSString): NSColor; message 'colorWithKey:';
+    function allKeys: NSArray; message 'allKeys';
+    function isEditable: Boolean; message 'isEditable';
+    function writeToFile(path: NSString): Boolean; message 'writeToFile:';
+    procedure removeFile; message 'removeFile';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSColorPanel.inc b/packages/cocoaint/src/appkit/NSColorPanel.inc
new file mode 100644
index 0000000000..c58cec13c1
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSColorPanel.inc
@@ -0,0 +1,143 @@
+{ Parsed from Appkit.framework NSColorPanel.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCOLORPANEL_PAS_H}
+{$define NSCOLORPANEL_PAS_H}
+type
+  NSColorPanelPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCOLORPANEL_PAS_T}
+{$define NSCOLORPANEL_PAS_T}
+
+{ Types }
+type
+  NSColorPanelMode = clong;
+
+{ Constants }
+
+const
+  NSNoModeColorPanel = -1;
+  NSGrayModeColorPanel = 0;
+  NSRGBModeColorPanel = 1;
+  NSCMYKModeColorPanel = 2;
+  NSHSBModeColorPanel = 3;
+  NSCustomPaletteModeColorPanel = 4;
+  NSColorListModeColorPanel = 5;
+  NSWheelModeColorPanel = 6;
+  NSCrayonModeColorPanel = 7;
+
+const
+  NSColorPanelGrayModeMask = $00000001;
+  NSColorPanelRGBModeMask = $00000002;
+  NSColorPanelCMYKModeMask = $00000004;
+  NSColorPanelHSBModeMask = $00000008;
+  NSColorPanelCustomPaletteModeMask = $00000010;
+  NSColorPanelColorListModeMask = $00000020;
+  NSColorPanelWheelModeMask = $00000040;
+  NSColorPanelCrayonModeMask = $00000080;
+  NSColorPanelAllModesMask = $0000ffff;
+
+{ CFString constants }
+var
+  NSColorPanelColorDidChangeNotification: CFStringRef; external name '_NSColorPanelColorDidChangeNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCOLORPANEL_PAS_R}
+{$define NSCOLORPANEL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCOLORPANEL_PAS_F}
+{$define NSCOLORPANEL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCOLORPANEL_PAS_T}
+{$define NSCOLORPANEL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSColorPanel = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCOLORPANEL_PAS_C}
+{$define NSCOLORPANEL_PAS_C}
+
+{ NSColorPanel }
+  NSColorPanel = objcclass(NSPanel)
+  private
+    __colorSwatch: id;
+    __reserved1: id;
+    __colorWell: id;
+    __pickersWithLoadedViews: NSMutableArray;
+    __magnifyButton: id;
+    __middleView: id;
+    __opacitySlider: id;
+    __opacityText: id;
+    __opacityView: id;
+    __modalButtons: id;
+    __pickerView: id;
+    __customViewsList: id;
+    __customPickerList: id;
+    __currViewObject: id;
+    __boxAboveSwatch: id;
+    __target: id;
+    __accessoryView: id;
+    __action: SEL;
+    __minColorPanelSize: NSSize;
+    __maxColorPanelSize: NSSize;
+    __reserved2: NSSize;
+    __reserved3: NSSize;
+    __resizeDimple: id;
+    __reserved5: Boolean;
+    __reserved6: Boolean;
+    __handlingOpacityMoveAction: Boolean;
+    __ignoreConstraints: Boolean;
+    __continuous: Boolean;
+    __allowColorSetting: Boolean;
+    __stillInitializing: Boolean;
+    __opacityTextController: id;
+    
+  public
+    class function alloc: NSColorPanel; message 'alloc';
+
+    class function sharedColorPanel: NSColorPanel; message 'sharedColorPanel';
+    class function sharedColorPanelExists: Boolean; message 'sharedColorPanelExists';
+    class function dragColor_withEvent_fromView(color_: NSColor; theEvent: NSEvent; sourceView: NSView): Boolean; message 'dragColor:withEvent:fromView:';
+    class procedure setPickerMask(mask: culong); message 'setPickerMask:';
+    class procedure setPickerMode(mode_: NSColorPanelMode); message 'setPickerMode:';
+    procedure setAccessoryView(aView: NSView); message 'setAccessoryView:';
+    function accessoryView: NSView; message 'accessoryView';
+    procedure setContinuous(flag: Boolean); message 'setContinuous:';
+    function isContinuous: Boolean; message 'isContinuous';
+    procedure setShowsAlpha(flag: Boolean); message 'setShowsAlpha:';
+    function showsAlpha: Boolean; message 'showsAlpha';
+    procedure setMode(mode_: NSColorPanelMode); message 'setMode:';
+    function mode: NSColorPanelMode; message 'mode';
+    procedure setColor(color_: NSColor); message 'setColor:';
+    function color: NSColor; message 'color';
+    function alpha: CGFloat; message 'alpha';
+    procedure setAction(aSelector: SEL); message 'setAction:';
+    procedure setTarget(anObject: id); message 'setTarget:';
+    procedure attachColorList(colorList: NSColorList); message 'attachColorList:';
+    procedure detachColorList(colorList: NSColorList); message 'detachColorList:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSColorPicker.inc b/packages/cocoaint/src/appkit/NSColorPicker.inc
new file mode 100644
index 0000000000..f519160ee6
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSColorPicker.inc
@@ -0,0 +1,73 @@
+{ Parsed from Appkit.framework NSColorPicker.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCOLORPICKER_PAS_H}
+{$define NSCOLORPICKER_PAS_H}
+type
+  NSColorPickerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCOLORPICKER_PAS_T}
+{$define NSCOLORPICKER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCOLORPICKER_PAS_R}
+{$define NSCOLORPICKER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCOLORPICKER_PAS_F}
+{$define NSCOLORPICKER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCOLORPICKER_PAS_T}
+{$define NSCOLORPICKER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSColorPicker = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCOLORPICKER_PAS_C}
+{$define NSCOLORPICKER_PAS_C}
+
+{ NSColorPicker }
+  NSColorPicker = objcclass(NSObject, NSColorPickingDefaultProtocol)
+  private
+    __imageObject: id;
+    __colorPanel: NSColorPanel;
+    __buttonToolTip: NSString;
+    
+  public
+    class function alloc: NSColorPicker; message 'alloc';
+
+    function initWithPickerMask_colorPanel(mask: culong; owningColorPanel: NSColorPanel): id; message 'initWithPickerMask:colorPanel:';
+    function colorPanel: NSColorPanel; message 'colorPanel';
+    function provideNewButtonImage: NSImage; message 'provideNewButtonImage';
+    procedure insertNewButtonImage_in(newButtonImage: NSImage; buttonCell: NSButtonCell); message 'insertNewButtonImage:in:';
+    procedure viewSizeChanged(sender: id); message 'viewSizeChanged:';
+    procedure attachColorList(colorList: NSColorList); message 'attachColorList:';
+    procedure detachColorList(colorList: NSColorList); message 'detachColorList:';
+    procedure setMode(mode: NSColorPanelMode); message 'setMode:';
+    function buttonToolTip: NSString; message 'buttonToolTip';
+    function minContentSize: NSSize; message 'minContentSize';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSColorPicking.inc b/packages/cocoaint/src/appkit/NSColorPicking.inc
new file mode 100644
index 0000000000..568c8bb77a
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSColorPicking.inc
@@ -0,0 +1,64 @@
+{ Parsed from Appkit.framework NSColorPicking.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSCOLORPICKING_PAS_T}
+{$define NSCOLORPICKING_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCOLORPICKING_PAS_R}
+{$define NSCOLORPICKING_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCOLORPICKING_PAS_F}
+{$define NSCOLORPICKING_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCOLORPICKING_PAS_T}
+{$define NSCOLORPICKING_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSColorPickingDefaultProtocol = objcprotocol;
+  NSColorPickingCustomProtocol = objcprotocol;
+
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSCOLORPICKING_PAS_P}
+{$define NSCOLORPICKING_PAS_P}
+  
+{ NSColorPickingDefault Protocol }
+  NSColorPickingDefaultProtocol = objcprotocol
+    function initWithPickerMask_colorPanel(mask: culong; owningColorPanel: NSColorPanel): id; message 'initWithPickerMask:colorPanel:';
+    function provideNewButtonImage: NSImage; message 'provideNewButtonImage';
+    procedure insertNewButtonImage_in(newButtonImage: NSImage; buttonCell: NSButtonCell); message 'insertNewButtonImage:in:';
+    procedure viewSizeChanged(sender: id); message 'viewSizeChanged:';
+    procedure alphaControlAddedOrRemoved(sender: id); message 'alphaControlAddedOrRemoved:';
+    procedure attachColorList(colorList: NSColorList); message 'attachColorList:';
+    procedure detachColorList(colorList: NSColorList); message 'detachColorList:';
+    procedure setMode(mode: NSColorPanelMode); message 'setMode:';
+    function buttonToolTip: NSString; message 'buttonToolTip';
+    function minContentSize: NSSize; message 'minContentSize';
+  end; external name 'NSColorPickingDefault';
+  
+{ NSColorPickingCustom Protocol }
+  NSColorPickingCustomProtocol = objcprotocol
+    function supportsMode(mode: NSColorPanelMode): Boolean; message 'supportsMode:';
+    function currentMode: NSColorPanelMode; message 'currentMode';
+    function provideNewView(initialRequest: Boolean): NSView; message 'provideNewView:';
+    procedure setColor(newColor: NSColor); message 'setColor:';
+  end; external name 'NSColorPickingCustom';
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSColorSpace.inc b/packages/cocoaint/src/appkit/NSColorSpace.inc
new file mode 100644
index 0000000000..9f4cfaaf5e
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSColorSpace.inc
@@ -0,0 +1,105 @@
+{ Parsed from Appkit.framework NSColorSpace.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCOLORSPACE_PAS_H}
+{$define NSCOLORSPACE_PAS_H}
+type
+  NSColorSpacePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCOLORSPACE_PAS_T}
+{$define NSCOLORSPACE_PAS_T}
+
+{ Constants }
+
+const
+  NSUnknownColorSpaceModel = -1;
+  NSGrayColorSpaceModel = 0;
+  NSRGBColorSpaceModel = 1;
+  NSCMYKColorSpaceModel = 2;
+  NSLABColorSpaceModel = 3;
+  NSDeviceNColorSpaceModel = 4;
+  NSIndexedColorSpaceModel = 5;
+  NSPatternColorSpaceModel = 6;
+
+{ Types }
+type
+  NSColorSpaceModel = clong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCOLORSPACE_PAS_R}
+{$define NSCOLORSPACE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCOLORSPACE_PAS_F}
+{$define NSCOLORSPACE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCOLORSPACE_PAS_T}
+{$define NSCOLORSPACE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSColorSpace = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCOLORSPACE_PAS_C}
+{$define NSCOLORSPACE_PAS_C}
+
+{ NSColorSpace }
+  NSColorSpace = objcclass(NSObject, NSCodingProtocol)
+  private
+    __profile: id;
+    __flags: bitpacked record
+        colorSpaceID: 0..((1 shl 8)-1);
+        storageType: 0..((1 shl 3)-1);
+        replacedDuringUnarchiving: 0..1;
+        int: 0..((1 shl 20)-1);
+        {$ifdef cpu64}
+        int: 0..((1 shl 32)-1);
+        {$endif}
+      end;
+    ___cgColorSpace: Pointer;
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSColorSpace; message 'alloc';
+
+    function initWithICCProfileData(iccData: NSData): id; message 'initWithICCProfileData:';
+    function ICCProfileData: NSData; message 'ICCProfileData';
+    function initWithColorSyncProfile(prof: Pointer): id; message 'initWithColorSyncProfile:';
+    function colorSyncProfile: Pointer; message 'colorSyncProfile';
+    function initWithCGColorSpace(CGColorSpace_: CGColorSpaceRef): id; message 'initWithCGColorSpace:';
+    function CGColorSpace: CGColorSpaceRef; message 'CGColorSpace';
+    function numberOfColorComponents: clong; message 'numberOfColorComponents';
+    function colorSpaceModel: NSColorSpaceModel; message 'colorSpaceModel';
+    function localizedName: NSString; message 'localizedName';
+    class function genericRGBColorSpace: NSColorSpace; message 'genericRGBColorSpace';
+    class function genericGrayColorSpace: NSColorSpace; message 'genericGrayColorSpace';
+    class function genericCMYKColorSpace: NSColorSpace; message 'genericCMYKColorSpace';
+    class function deviceRGBColorSpace: NSColorSpace; message 'deviceRGBColorSpace';
+    class function deviceGrayColorSpace: NSColorSpace; message 'deviceGrayColorSpace';
+    class function deviceCMYKColorSpace: NSColorSpace; message 'deviceCMYKColorSpace';
+    class function sRGBColorSpace: NSColorSpace; message 'sRGBColorSpace';
+    class function adobeRGB1998ColorSpace: NSColorSpace; message 'adobeRGB1998ColorSpace';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSColorWell.inc b/packages/cocoaint/src/appkit/NSColorWell.inc
new file mode 100644
index 0000000000..9359860cd9
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSColorWell.inc
@@ -0,0 +1,79 @@
+{ Parsed from Appkit.framework NSColorWell.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCOLORWELL_PAS_H}
+{$define NSCOLORWELL_PAS_H}
+type
+  NSColorWellPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCOLORWELL_PAS_T}
+{$define NSCOLORWELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCOLORWELL_PAS_R}
+{$define NSCOLORWELL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCOLORWELL_PAS_F}
+{$define NSCOLORWELL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCOLORWELL_PAS_T}
+{$define NSCOLORWELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSColorWell = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCOLORWELL_PAS_C}
+{$define NSCOLORWELL_PAS_C}
+
+{ NSColorWell }
+  NSColorWell = objcclass(NSControl)
+  private
+    __color: NSColor;
+    __target: id;
+    __action: SEL;
+    __cwFlags: bitpacked record
+        isActive: 0..1;
+        isBordered: 0..1;
+        cantDraw: 0..1;
+        isNotContinuous: 0..1;
+        reservedColorWell: 0..((1 shl 28)-1);
+      end;
+    
+  public
+    class function alloc: NSColorWell; message 'alloc';
+
+    procedure deactivate; message 'deactivate';
+    procedure activate(exclusive: Boolean); message 'activate:';
+    function isActive: Boolean; message 'isActive';
+    procedure drawWellInside(insideRect: NSRect); message 'drawWellInside:';
+    function isBordered: Boolean; message 'isBordered';
+    procedure setBordered(flag: Boolean); message 'setBordered:';
+    procedure takeColorFrom(sender: id); message 'takeColorFrom:';
+    procedure setColor(color_: NSColor); message 'setColor:';
+    function color: NSColor; message 'color';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSComboBox.inc b/packages/cocoaint/src/appkit/NSComboBox.inc
new file mode 100644
index 0000000000..ac745a3850
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSComboBox.inc
@@ -0,0 +1,103 @@
+{ Parsed from Appkit.framework NSComboBox.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCOMBOBOX_PAS_H}
+{$define NSCOMBOBOX_PAS_H}
+type
+  NSComboBoxPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCOMBOBOX_PAS_T}
+{$define NSCOMBOBOX_PAS_T}
+
+{ CFString constants }
+var
+  NSComboBoxWillPopUpNotification: CFStringRef; external name '_NSComboBoxWillPopUpNotification';
+  NSComboBoxWillDismissNotification: CFStringRef; external name '_NSComboBoxWillDismissNotification';
+  NSComboBoxSelectionDidChangeNotification: CFStringRef; external name '_NSComboBoxSelectionDidChangeNotification';
+  NSComboBoxSelectionIsChangingNotification: CFStringRef; external name '_NSComboBoxSelectionIsChangingNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCOMBOBOX_PAS_R}
+{$define NSCOMBOBOX_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCOMBOBOX_PAS_F}
+{$define NSCOMBOBOX_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCOMBOBOX_PAS_T}
+{$define NSCOMBOBOX_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSComboBox = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCOMBOBOX_PAS_C}
+{$define NSCOMBOBOX_PAS_C}
+
+{ NSComboBox }
+  NSComboBox = objcclass(NSTextField)
+  private
+    __dataSource: id;
+    
+  public
+    class function alloc: NSComboBox; message 'alloc';
+
+    function hasVerticalScroller: Boolean; message 'hasVerticalScroller';
+    procedure setHasVerticalScroller(flag: Boolean); message 'setHasVerticalScroller:';
+    function intercellSpacing: NSSize; message 'intercellSpacing';
+    procedure setIntercellSpacing(aSize: NSSize); message 'setIntercellSpacing:';
+    function itemHeight: CGFloat; message 'itemHeight';
+    procedure setItemHeight(itemHeight_: CGFloat); message 'setItemHeight:';
+    function numberOfVisibleItems: clong; message 'numberOfVisibleItems';
+    procedure setNumberOfVisibleItems(visibleItems: clong); message 'setNumberOfVisibleItems:';
+    procedure setButtonBordered(flag: Boolean); message 'setButtonBordered:';
+    function isButtonBordered: Boolean; message 'isButtonBordered';
+    procedure reloadData; message 'reloadData';
+    procedure noteNumberOfItemsChanged; message 'noteNumberOfItemsChanged';
+    procedure setUsesDataSource(flag: Boolean); message 'setUsesDataSource:';
+    function usesDataSource: Boolean; message 'usesDataSource';
+    procedure scrollItemAtIndexToTop(index: clong); message 'scrollItemAtIndexToTop:';
+    procedure scrollItemAtIndexToVisible(index: clong); message 'scrollItemAtIndexToVisible:';
+    procedure selectItemAtIndex(index: clong); message 'selectItemAtIndex:';
+    procedure deselectItemAtIndex(index: clong); message 'deselectItemAtIndex:';
+    function indexOfSelectedItem: clong; message 'indexOfSelectedItem';
+    function numberOfItems: clong; message 'numberOfItems';
+    function completes: Boolean; message 'completes';
+    procedure setCompletes(completes_: Boolean); message 'setCompletes:';
+    function dataSource: id; message 'dataSource';
+    procedure setDataSource(aSource: id); message 'setDataSource:';
+    procedure addItemWithObjectValue(object_: id); message 'addItemWithObjectValue:';
+    procedure addItemsWithObjectValues(objects: NSArray); message 'addItemsWithObjectValues:';
+    procedure insertItemWithObjectValue_atIndex(object_: id; index: clong); message 'insertItemWithObjectValue:atIndex:';
+    procedure removeItemWithObjectValue(object_: id); message 'removeItemWithObjectValue:';
+    procedure removeItemAtIndex(index: clong); message 'removeItemAtIndex:';
+    procedure removeAllItems; message 'removeAllItems';
+    procedure selectItemWithObjectValue(object_: id); message 'selectItemWithObjectValue:';
+    function itemObjectValueAtIndex(index: clong): id; message 'itemObjectValueAtIndex:';
+    function objectValueOfSelectedItem: id; message 'objectValueOfSelectedItem';
+    function indexOfItemWithObjectValue(object_: id): clong; message 'indexOfItemWithObjectValue:';
+    function objectValues: NSArray; message 'objectValues';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSComboBoxCell.inc b/packages/cocoaint/src/appkit/NSComboBoxCell.inc
new file mode 100644
index 0000000000..693883311c
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSComboBoxCell.inc
@@ -0,0 +1,80 @@
+{ Parsed from Appkit.framework NSComboBoxCell.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCOMBOBOXCELL_PAS_H}
+{$define NSCOMBOBOXCELL_PAS_H}
+type
+  NSComboBoxCellPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCOMBOBOXCELL_PAS_T}
+{$define NSCOMBOBOXCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCOMBOBOXCELL_PAS_R}
+{$define NSCOMBOBOXCELL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCOMBOBOXCELL_PAS_F}
+{$define NSCOMBOBOXCELL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCOMBOBOXCELL_PAS_T}
+{$define NSCOMBOBOXCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSComboBoxCell = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCOMBOBOXCELL_PAS_C}
+{$define NSCOMBOBOXCELL_PAS_C}
+
+{ NSComboBoxCell }
+  NSComboBoxCell = objcclass(NSTextFieldCell)
+  private
+    __delegate: id;
+    __dataSource: id;
+    __cbcFlags: bitpacked record
+        usesDataSource: 0..1;
+        completes: 0..1;
+        buttonBordered: 0..1;
+        popUpIsUp: 0..1;
+        filteringEvents: 0..1;
+        drawing: 0..1;
+        synchronizingSelection: 0..1;
+        subclassOverridesBoundsForButtonCell: 0..1;
+        reserved: 0..((1 shl 8)-1);
+        visibleItems: 0..((1 shl 16)-1);
+      end;
+    __buttonCell: NSButtonCell;
+    __tableView: NSTableView;
+    __scrollView: NSScrollView;
+    __popUp: NSWindow;
+    __popUpList: NSMutableArray;
+    __cellFrame: NSRect; {garbage collector: __strong }
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSComboBoxCell; message 'alloc';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSControl.inc b/packages/cocoaint/src/appkit/NSControl.inc
new file mode 100644
index 0000000000..f858b6208e
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSControl.inc
@@ -0,0 +1,146 @@
+{ Parsed from Appkit.framework NSControl.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCONTROL_PAS_H}
+{$define NSCONTROL_PAS_H}
+type
+  NSControlPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCONTROL_PAS_T}
+{$define NSCONTROL_PAS_T}
+
+{ CFString constants }
+var
+  NSControlTextDidBeginEditingNotification: CFStringRef; external name '_NSControlTextDidBeginEditingNotification';
+  NSControlTextDidEndEditingNotification: CFStringRef; external name '_NSControlTextDidEndEditingNotification';
+  NSControlTextDidChangeNotification: CFStringRef; external name '_NSControlTextDidChangeNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCONTROL_PAS_R}
+{$define NSCONTROL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCONTROL_PAS_F}
+{$define NSCONTROL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCONTROL_PAS_T}
+{$define NSCONTROL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSControl = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCONTROL_PAS_C}
+{$define NSCONTROL_PAS_C}
+
+{ NSControl }
+  NSControl = objcclass(NSView)
+  private
+    __tag: clong;
+    __cell: id;
+    __conFlags: bitpacked record
+        enabled: 0..1;
+        ignoreMultiClick: 0..1;
+        calcSize: 0..1;
+        drawingAncestor: 0..1;
+        ibReserved: 0..1;
+        updateCellFocus: 0..1;
+        reserved: 0..((1 shl 26)-1);
+      end;
+    
+  public
+    class function alloc: NSControl; message 'alloc';
+
+    class procedure setCellClass(factoryId: Pobjc_class); message 'setCellClass:';
+    class function cellClass: Pobjc_class; message 'cellClass';
+    function initWithFrame(frameRect: NSRect): id; message 'initWithFrame:';
+    procedure sizeToFit; message 'sizeToFit';
+    procedure calcSize; message 'calcSize';
+    function cell: id; message 'cell';
+    procedure setCell(aCell: NSCell); message 'setCell:';
+    function selectedCell: id; message 'selectedCell';
+    function target: id; message 'target';
+    procedure setTarget(anObject: id); message 'setTarget:';
+    function action: SEL; message 'action';
+    procedure setAction(aSelector: SEL); message 'setAction:';
+    function tag: clong; message 'tag';
+    procedure setTag(anInt: clong); message 'setTag:';
+    function selectedTag: clong; message 'selectedTag';
+    procedure setIgnoresMultiClick(flag: Boolean); message 'setIgnoresMultiClick:';
+    function ignoresMultiClick: Boolean; message 'ignoresMultiClick';
+    function sendActionOn(mask: clong): clong; message 'sendActionOn:';
+    function isContinuous: Boolean; message 'isContinuous';
+    procedure setContinuous(flag: Boolean); message 'setContinuous:';
+    function isEnabled: Boolean; message 'isEnabled';
+    procedure setEnabled(flag: Boolean); message 'setEnabled:';
+    procedure setFloatingPointFormat_left_right(autoRange: Boolean; leftDigits: culong; rightDigits: culong); message 'setFloatingPointFormat:left:right:';
+    function alignment: NSTextAlignment; message 'alignment';
+    procedure setAlignment(mode: NSTextAlignment); message 'setAlignment:';
+    function font: NSFont; message 'font';
+    procedure setFont(fontObj: NSFont); message 'setFont:';
+    procedure setFormatter(newFormatter: NSFormatter); message 'setFormatter:';
+    function formatter: id; message 'formatter';
+    procedure setObjectValue(obj: id); message 'setObjectValue:';
+    procedure setStringValue(aString: NSString); message 'setStringValue:';
+    procedure setIntValue(anInt: cint); message 'setIntValue:';
+    procedure setFloatValue(aFloat: single); message 'setFloatValue:';
+    procedure setDoubleValue(aDouble: double); message 'setDoubleValue:';
+    function objectValue: id; message 'objectValue';
+    function stringValue: NSString; message 'stringValue';
+    function intValue: cint; message 'intValue';
+    function floatValue: single; message 'floatValue';
+    function doubleValue: double; message 'doubleValue';
+    procedure setNeedsDisplay; message 'setNeedsDisplay';
+    procedure updateCell(aCell: NSCell); message 'updateCell:';
+    procedure updateCellInside(aCell: NSCell); message 'updateCellInside:';
+    procedure drawCellInside(aCell: NSCell); message 'drawCellInside:';
+    procedure drawCell(aCell: NSCell); message 'drawCell:';
+    procedure selectCell(aCell: NSCell); message 'selectCell:';
+    function sendAction_to(theAction: SEL; theTarget: id): Boolean; message 'sendAction:to:';
+    procedure takeIntValueFrom(sender: id); message 'takeIntValueFrom:';
+    procedure takeFloatValueFrom(sender: id); message 'takeFloatValueFrom:';
+    procedure takeDoubleValueFrom(sender: id); message 'takeDoubleValueFrom:';
+    procedure takeStringValueFrom(sender: id); message 'takeStringValueFrom:';
+    procedure takeObjectValueFrom(sender: id); message 'takeObjectValueFrom:';
+    function currentEditor: NSText; message 'currentEditor';
+    function abortEditing: Boolean; message 'abortEditing';
+    procedure validateEditing; message 'validateEditing';
+    procedure mouseDown(theEvent: NSEvent); message 'mouseDown:';
+    function baseWritingDirection: NSWritingDirection; message 'baseWritingDirection';
+    procedure setBaseWritingDirection(writingDirection: NSWritingDirection); message 'setBaseWritingDirection:';
+    function integerValue: clong; message 'integerValue';
+    procedure setIntegerValue(anInteger: clong); message 'setIntegerValue:';
+    procedure takeIntegerValueFrom(sender: id); message 'takeIntegerValueFrom:';
+
+    { Category: NSKeyboardUI }
+    procedure performClick(sender: id); message 'performClick:';
+    procedure setRefusesFirstResponder(flag: Boolean); message 'setRefusesFirstResponder:';
+    function refusesFirstResponder: Boolean; message 'refusesFirstResponder';
+
+    { Category: NSControlAttributedStringMethods }
+    function attributedStringValue: NSAttributedString; message 'attributedStringValue';
+    procedure setAttributedStringValue(obj: NSAttributedString); message 'setAttributedStringValue:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSController.inc b/packages/cocoaint/src/appkit/NSController.inc
new file mode 100644
index 0000000000..847133404b
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSController.inc
@@ -0,0 +1,86 @@
+{ Parsed from Appkit.framework NSController.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCONTROLLER_PAS_H}
+{$define NSCONTROLLER_PAS_H}
+type
+  NSControllerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCONTROLLER_PAS_T}
+{$define NSCONTROLLER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCONTROLLER_PAS_R}
+{$define NSCONTROLLER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCONTROLLER_PAS_F}
+{$define NSCONTROLLER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCONTROLLER_PAS_T}
+{$define NSCONTROLLER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSController = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCONTROLLER_PAS_C}
+{$define NSCONTROLLER_PAS_C}
+
+{ NSController }
+  NSController = objcclass(NSObject, NSCodingProtocol)
+  private
+    __reserved: Pointer;
+    __reserved2: Pointer;
+    __specialPurposeType: cint;
+    __bindingAdaptor: id;
+    __editors: NSMutableArray;
+    __declaredKeys: NSMutableArray;
+    __dependentKeyToModelKeyTable: NSMutableDictionary;
+    __modelKeyToDependentKeyTable: NSMutableDictionary;
+    __modelKeysToRefreshEachTime: NSMutableArray;
+    __bindingsControllerFlags: bitpacked record
+        _alwaysPresentsApplicationModalAlerts: 0..1;
+        _refreshesAllModelKeys: 0..1;
+        _multipleObservedModelObjects: 0..1;
+        _isEditing: 0..1;
+        _reservedController: 0..((1 shl 28)-1);
+      end;
+    __reservedOther: NSMutableDictionary;
+    __modelObservingTracker: id;
+    __expectedObservingInfo: id;
+    __singleValueAccessor: id;
+    
+  public
+    class function alloc: NSController; message 'alloc';
+
+    procedure objectDidBeginEditing(editor: id); message 'objectDidBeginEditing:';
+    procedure objectDidEndEditing(editor: id); message 'objectDidEndEditing:';
+    procedure discardEditing; message 'discardEditing';
+    function commitEditing: Boolean; message 'commitEditing';
+    procedure commitEditingWithDelegate_didCommitSelector_contextInfo(delegate: id; didCommitSelector: SEL; contextInfo: Pointer); message 'commitEditingWithDelegate:didCommitSelector:contextInfo:';
+    function isEditing: Boolean; message 'isEditing';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSCursor.inc b/packages/cocoaint/src/appkit/NSCursor.inc
new file mode 100644
index 0000000000..4bf2b6b033
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSCursor.inc
@@ -0,0 +1,102 @@
+{ Parsed from Appkit.framework NSCursor.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCURSOR_PAS_H}
+{$define NSCURSOR_PAS_H}
+type
+  NSCursorPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCURSOR_PAS_T}
+{$define NSCURSOR_PAS_T}
+
+{ Defines }
+const
+  NSAppKitVersionNumberWithCursorSizeSupport = 682.0;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCURSOR_PAS_R}
+{$define NSCURSOR_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCURSOR_PAS_F}
+{$define NSCURSOR_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCURSOR_PAS_T}
+{$define NSCURSOR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSCursor = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCURSOR_PAS_C}
+{$define NSCURSOR_PAS_C}
+
+{ NSCursor }
+  NSCursor = objcclass(NSObject, NSCodingProtocol)
+  private
+    __hotSpot: NSPoint;
+    __flags: bitpacked record
+        onMouseExited: 0..1;
+        onMouseEntered: 0..1;
+        cursorType: 0..((1 shl 8)-1);
+        int: 0..((1 shl 22)-1);
+      end;
+    __image: id;
+    
+  public
+    class function alloc: NSCursor; message 'alloc';
+
+    class function currentCursor: NSCursor; message 'currentCursor';
+    class function arrowCursor: NSCursor; message 'arrowCursor';
+    class function IBeamCursor: NSCursor; message 'IBeamCursor';
+    class function pointingHandCursor: NSCursor; message 'pointingHandCursor';
+    class function closedHandCursor: NSCursor; message 'closedHandCursor';
+    class function openHandCursor: NSCursor; message 'openHandCursor';
+    class function resizeLeftCursor: NSCursor; message 'resizeLeftCursor';
+    class function resizeRightCursor: NSCursor; message 'resizeRightCursor';
+    class function resizeLeftRightCursor: NSCursor; message 'resizeLeftRightCursor';
+    class function resizeUpCursor: NSCursor; message 'resizeUpCursor';
+    class function resizeDownCursor: NSCursor; message 'resizeDownCursor';
+    class function resizeUpDownCursor: NSCursor; message 'resizeUpDownCursor';
+    class function crosshairCursor: NSCursor; message 'crosshairCursor';
+    class function disappearingItemCursor: NSCursor; message 'disappearingItemCursor';
+    function initWithImage_hotSpot(newImage: NSImage; aPoint: NSPoint): id; message 'initWithImage:hotSpot:';
+    function initWithImage_foregroundColorHint_backgroundColorHint_hotSpot(newImage: NSImage; fg: NSColor; bg: NSColor; hotSpot_: NSPoint): id; message 'initWithImage:foregroundColorHint:backgroundColorHint:hotSpot:';
+    class procedure hide; message 'hide';
+    class procedure unhide; message 'unhide';
+    class procedure setHiddenUntilMouseMoves(flag: Boolean); message 'setHiddenUntilMouseMoves:';
+    class procedure pop; message 'pop';
+    function image: NSImage; message 'image';
+    function hotSpot: NSPoint; message 'hotSpot';
+    procedure push; message 'push';
+    procedure set_; message 'set';
+    procedure setOnMouseExited(flag: Boolean); message 'setOnMouseExited:';
+    procedure setOnMouseEntered(flag: Boolean); message 'setOnMouseEntered:';
+    function isSetOnMouseExited: Boolean; message 'isSetOnMouseExited';
+    function isSetOnMouseEntered: Boolean; message 'isSetOnMouseEntered';
+    procedure mouseEntered(theEvent: NSEvent); message 'mouseEntered:';
+    procedure mouseExited(theEvent: NSEvent); message 'mouseExited:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSCustomImageRep.inc b/packages/cocoaint/src/appkit/NSCustomImageRep.inc
new file mode 100644
index 0000000000..41d22658d6
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSCustomImageRep.inc
@@ -0,0 +1,66 @@
+{ Parsed from Appkit.framework NSCustomImageRep.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCUSTOMIMAGEREP_PAS_H}
+{$define NSCUSTOMIMAGEREP_PAS_H}
+type
+  NSCustomImageRepPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCUSTOMIMAGEREP_PAS_T}
+{$define NSCUSTOMIMAGEREP_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCUSTOMIMAGEREP_PAS_R}
+{$define NSCUSTOMIMAGEREP_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCUSTOMIMAGEREP_PAS_F}
+{$define NSCUSTOMIMAGEREP_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCUSTOMIMAGEREP_PAS_T}
+{$define NSCUSTOMIMAGEREP_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSCustomImageRep = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCUSTOMIMAGEREP_PAS_C}
+{$define NSCUSTOMIMAGEREP_PAS_C}
+
+{ NSCustomImageRep }
+  NSCustomImageRep = objcclass(NSImageRep)
+  private
+    __drawMethod: SEL;
+    __drawObject: id;
+    __reserved: cuint;
+    
+  public
+    class function alloc: NSCustomImageRep; message 'alloc';
+
+    function initWithDrawSelector_delegate(aMethod: SEL; anObject: id): id; message 'initWithDrawSelector:delegate:';
+    function drawSelector: SEL; message 'drawSelector';
+    function delegate: id; message 'delegate';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSDatePicker.inc b/packages/cocoaint/src/appkit/NSDatePicker.inc
new file mode 100644
index 0000000000..f97afca8bf
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSDatePicker.inc
@@ -0,0 +1,91 @@
+{ Parsed from Appkit.framework NSDatePicker.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSDATEPICKER_PAS_H}
+{$define NSDATEPICKER_PAS_H}
+type
+  NSDatePickerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSDATEPICKER_PAS_T}
+{$define NSDATEPICKER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSDATEPICKER_PAS_R}
+{$define NSDATEPICKER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSDATEPICKER_PAS_F}
+{$define NSDATEPICKER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSDATEPICKER_PAS_T}
+{$define NSDATEPICKER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSDatePicker = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSDATEPICKER_PAS_C}
+{$define NSDATEPICKER_PAS_C}
+
+{ NSDatePicker }
+  NSDatePicker = objcclass(NSControl)
+    
+  public
+    class function alloc: NSDatePicker; message 'alloc';
+
+    function datePickerStyle: NSDatePickerStyle; message 'datePickerStyle';
+    procedure setDatePickerStyle(newStyle: NSDatePickerStyle); message 'setDatePickerStyle:';
+    function isBezeled: Boolean; message 'isBezeled';
+    procedure setBezeled(flag: Boolean); message 'setBezeled:';
+    function isBordered: Boolean; message 'isBordered';
+    procedure setBordered(flag: Boolean); message 'setBordered:';
+    function drawsBackground: Boolean; message 'drawsBackground';
+    procedure setDrawsBackground(flag: Boolean); message 'setDrawsBackground:';
+    function backgroundColor: NSColor; message 'backgroundColor';
+    procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
+    function textColor: NSColor; message 'textColor';
+    procedure setTextColor(color: NSColor); message 'setTextColor:';
+    function datePickerMode: NSDatePickerMode; message 'datePickerMode';
+    procedure setDatePickerMode(newMode: NSDatePickerMode); message 'setDatePickerMode:';
+    function datePickerElements: NSDatePickerElementFlags; message 'datePickerElements';
+    procedure setDatePickerElements(elementFlags: NSDatePickerElementFlags); message 'setDatePickerElements:';
+    function calendar: NSCalendar; message 'calendar';
+    procedure setCalendar(newCalendar: NSCalendar); message 'setCalendar:';
+    function locale: NSLocale; message 'locale';
+    procedure setLocale(newLocale: NSLocale); message 'setLocale:';
+    function timeZone: NSTimeZone; message 'timeZone';
+    procedure setTimeZone(newTimeZone: NSTimeZone); message 'setTimeZone:';
+    function dateValue: NSDate; message 'dateValue';
+    procedure setDateValue(newStartDate: NSDate); message 'setDateValue:';
+    function timeInterval: NSTimeInterval; message 'timeInterval';
+    procedure setTimeInterval(newTimeInterval: NSTimeInterval); message 'setTimeInterval:';
+    function minDate: NSDate; message 'minDate';
+    procedure setMinDate(date: NSDate); message 'setMinDate:';
+    function maxDate: NSDate; message 'maxDate';
+    procedure setMaxDate(date: NSDate); message 'setMaxDate:';
+    function delegate: id; message 'delegate';
+    procedure setDelegate(anObject: id); message 'setDelegate:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSDatePickerCell.inc b/packages/cocoaint/src/appkit/NSDatePickerCell.inc
new file mode 100644
index 0000000000..8faba1a8f3
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSDatePickerCell.inc
@@ -0,0 +1,139 @@
+{ Parsed from Appkit.framework NSDatePickerCell.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSDATEPICKERCELL_PAS_H}
+{$define NSDATEPICKERCELL_PAS_H}
+type
+  NSDatePickerCellPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSDATEPICKERCELL_PAS_T}
+{$define NSDATEPICKERCELL_PAS_T}
+
+{ Constants }
+
+const
+  NSTextFieldAndStepperDatePickerStyle = 0;
+  NSClockAndCalendarDatePickerStyle = 1;
+  NSTextFieldDatePickerStyle = 2;
+
+const
+  NSSingleDateMode = 0;
+  NSRangeDateMode = 1;
+
+const
+  NSHourMinuteDatePickerElementFlag = $000c;
+  NSHourMinuteSecondDatePickerElementFlag = $000e;
+  NSTimeZoneDatePickerElementFlag = $0010;
+  NSYearMonthDatePickerElementFlag = $00c0;
+  NSYearMonthDayDatePickerElementFlag = $00e0;
+  NSEraDatePickerElementFlag = $0100;
+
+{ Types }
+type
+  NSDatePickerStyle = culong;
+  NSDatePickerMode = culong;
+  NSDatePickerElementFlags = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSDATEPICKERCELL_PAS_R}
+{$define NSDATEPICKERCELL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSDATEPICKERCELL_PAS_F}
+{$define NSDATEPICKERCELL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSDATEPICKERCELL_PAS_T}
+{$define NSDATEPICKERCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSDatePickerCell = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSDATEPICKERCELL_PAS_C}
+{$define NSDATEPICKERCELL_PAS_C}
+
+{ NSDatePickerCell }
+  NSDatePickerCell = objcclass(NSActionCell)
+  private
+    __timeInterval: NSTimeInterval;
+    __minDate: NSDate;
+    __maxDate: NSDate;
+    __dcFlags: bitpacked record
+        elements: 0..((1 shl 16)-1);
+        controlStyle: 0..((1 shl 3)-1);
+        controlMode: 0..((1 shl 2)-1);
+        trackingHand: 0..((1 shl 2)-1);
+        reserved2: 0..((1 shl 4)-1);
+        drawsBackground: 0..1;
+        digitsEntered: 0..((1 shl 2)-1);
+        forcesLeadingZeroes: 0..1;
+        wrapsDateComponentArithmetic: 0..1;
+      end;
+    __delegate: id;
+    __calendar: NSCalendar;
+    __locale: NSLocale;
+    __timeZone: NSTimeZone;
+    __backgroundColor: NSColor;
+    __textColor: NSColor;
+    __indexOfSelectedSubfield: cint;
+    __reserved0: cint;
+    __reserved1: id;
+    __reserved2: id;
+    __reserved3: id;
+    __reserved4: id;
+    
+  public
+    class function alloc: NSDatePickerCell; message 'alloc';
+
+    function datePickerStyle: NSDatePickerStyle; message 'datePickerStyle';
+    procedure setDatePickerStyle(newStyle: NSDatePickerStyle); message 'setDatePickerStyle:';
+    function drawsBackground: Boolean; message 'drawsBackground';
+    procedure setDrawsBackground(flag: Boolean); message 'setDrawsBackground:';
+    function backgroundColor: NSColor; message 'backgroundColor';
+    procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
+    function textColor: NSColor; message 'textColor';
+    procedure setTextColor(color: NSColor); message 'setTextColor:';
+    function datePickerMode: NSDatePickerMode; message 'datePickerMode';
+    procedure setDatePickerMode(newMode: NSDatePickerMode); message 'setDatePickerMode:';
+    function datePickerElements: NSDatePickerElementFlags; message 'datePickerElements';
+    procedure setDatePickerElements(elementFlags: NSDatePickerElementFlags); message 'setDatePickerElements:';
+    function calendar: NSCalendar; message 'calendar';
+    procedure setCalendar(newCalendar: NSCalendar); message 'setCalendar:';
+    function locale: NSLocale; message 'locale';
+    procedure setLocale(newLocale: NSLocale); message 'setLocale:';
+    function timeZone: NSTimeZone; message 'timeZone';
+    procedure setTimeZone(newTimeZone: NSTimeZone); message 'setTimeZone:';
+    function dateValue: NSDate; message 'dateValue';
+    procedure setDateValue(newStartDate: NSDate); message 'setDateValue:';
+    function timeInterval: NSTimeInterval; message 'timeInterval';
+    procedure setTimeInterval(newTimeInterval: NSTimeInterval); message 'setTimeInterval:';
+    function minDate: NSDate; message 'minDate';
+    procedure setMinDate(date: NSDate); message 'setMinDate:';
+    function maxDate: NSDate; message 'maxDate';
+    procedure setMaxDate(date: NSDate); message 'setMaxDate:';
+    function delegate: id; message 'delegate';
+    procedure setDelegate(anObject: id); message 'setDelegate:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSDictionaryController.inc b/packages/cocoaint/src/appkit/NSDictionaryController.inc
new file mode 100644
index 0000000000..8d0aae5945
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSDictionaryController.inc
@@ -0,0 +1,90 @@
+{ Parsed from Appkit.framework NSDictionaryController.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSDICTIONARYCONTROLLER_PAS_H}
+{$define NSDICTIONARYCONTROLLER_PAS_H}
+type
+  NSDictionaryControllerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSDICTIONARYCONTROLLER_PAS_T}
+{$define NSDICTIONARYCONTROLLER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSDICTIONARYCONTROLLER_PAS_R}
+{$define NSDICTIONARYCONTROLLER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSDICTIONARYCONTROLLER_PAS_F}
+{$define NSDICTIONARYCONTROLLER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSDICTIONARYCONTROLLER_PAS_T}
+{$define NSDICTIONARYCONTROLLER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSDictionaryController = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSDICTIONARYCONTROLLER_PAS_C}
+{$define NSDICTIONARYCONTROLLER_PAS_C}
+
+{ NSDictionaryController }
+  NSDictionaryController = objcclass(NSArrayController)
+  private
+    __reserved5: Pointer;
+    __reserved6: Pointer;
+    __reserved7: Pointer;
+    __contentDictionary: id;
+    __initialKey: NSString;
+    __initialValue: id;
+    __minimumInsertionKeyIndex: culong;
+    __localizedKeyStringsFileName: NSString;
+    __localizedKeyForKeyDictionary: NSDictionary;
+    __keyForLocalizedKeyDictionary: NSDictionary;
+    __includedKeys: NSArray;
+    __excludedKeys: NSArray;
+    __dictionaryControllerFlags: bitpacked record
+        _deepCopiesValues: 0..1;
+        _suppressBuildingDictionary: 0..1;
+        _reservedDictionaryController: 0..((1 shl 30)-1);
+      end;
+    
+  public
+    class function alloc: NSDictionaryController; message 'alloc';
+
+    function newObject: id; message 'newObject';
+    procedure setInitialKey(key: NSString); message 'setInitialKey:';
+    function initialKey: NSString; message 'initialKey';
+    procedure setInitialValue(value: id); message 'setInitialValue:';
+    function initialValue: id; message 'initialValue';
+    procedure setIncludedKeys(keys: NSArray); message 'setIncludedKeys:';
+    function includedKeys: NSArray; message 'includedKeys';
+    procedure setExcludedKeys(keys: NSArray); message 'setExcludedKeys:';
+    function excludedKeys: NSArray; message 'excludedKeys';
+    procedure setLocalizedKeyDictionary(dictionary: NSDictionary); message 'setLocalizedKeyDictionary:';
+    function localizedKeyDictionary: NSDictionary; message 'localizedKeyDictionary';
+    procedure setLocalizedKeyTable(stringsFileName: NSString); message 'setLocalizedKeyTable:';
+    function localizedKeyTable: NSString; message 'localizedKeyTable';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSDockTile.inc b/packages/cocoaint/src/appkit/NSDockTile.inc
new file mode 100644
index 0000000000..46bd81d785
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSDockTile.inc
@@ -0,0 +1,81 @@
+{ Parsed from Appkit.framework NSDockTile.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSDOCKTILE_PAS_H}
+{$define NSDOCKTILE_PAS_H}
+type
+  NSDockTilePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSDOCKTILE_PAS_T}
+{$define NSDOCKTILE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSDOCKTILE_PAS_R}
+{$define NSDOCKTILE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSDOCKTILE_PAS_F}
+{$define NSDOCKTILE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSDOCKTILE_PAS_T}
+{$define NSDOCKTILE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSDockTile = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSDOCKTILE_PAS_C}
+{$define NSDOCKTILE_PAS_C}
+
+{ NSDockTile }
+  NSDockTile = objcclass(NSObject)
+  private
+    __owner: id;
+    __dockContextRef: Pointer;
+    __contentView: NSView;
+    __frameView: NSView;
+    __backstopView: NSView;
+    __badgeLabel: NSString;
+    __dFlags: bitpacked record
+        showsAppBadge: 0..1;
+        reserved: 0..((1 shl 31)-1);
+      end;
+    __dockTileSize: NSSize;
+    _reserved: id;
+    
+  public
+    class function alloc: NSDockTile; message 'alloc';
+
+    function size: NSSize; message 'size';
+    procedure setContentView(view: NSView); message 'setContentView:';
+    function contentView: NSView; message 'contentView';
+    procedure display; message 'display';
+    procedure setShowsApplicationBadge(flag: Boolean); message 'setShowsApplicationBadge:';
+    function showsApplicationBadge: Boolean; message 'showsApplicationBadge';
+    procedure setBadgeLabel(string_: NSString); message 'setBadgeLabel:';
+    function badgeLabel: NSString; message 'badgeLabel';
+    function owner: id; message 'owner';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSDocument.inc b/packages/cocoaint/src/appkit/NSDocument.inc
new file mode 100644
index 0000000000..84d1282051
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSDocument.inc
@@ -0,0 +1,211 @@
+{ Parsed from Appkit.framework NSDocument.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSDOCUMENT_PAS_H}
+{$define NSDOCUMENT_PAS_H}
+type
+  NSDocumentPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSDOCUMENT_PAS_T}
+{$define NSDOCUMENT_PAS_T}
+
+{ Constants }
+
+const
+  NSChangeDone = 0;
+  NSChangeUndone = 1;
+  NSChangeCleared = 2;
+  NSChangeRedone = 5;
+  NSChangeReadOtherContents = 3;
+  NSChangeAutosaved = 4;
+
+const
+  NSSaveOperation = 0;
+  NSSaveAsOperation = 1;
+  NSSaveToOperation = 2;
+  NSAutosaveOperation = 3;
+
+{ Types }
+type
+  NSDocumentChangeType = culong;
+  NSSaveOperationType = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSDOCUMENT_PAS_R}
+{$define NSDOCUMENT_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSDOCUMENT_PAS_F}
+{$define NSDOCUMENT_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSDOCUMENT_PAS_T}
+{$define NSDOCUMENT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSDocument = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSDOCUMENT_PAS_C}
+{$define NSDOCUMENT_PAS_C}
+
+{ NSDocument }
+  NSDocument = objcclass(NSObject, NSUserInterfaceValidationsProtocol)
+  private
+    __window: NSWindow;
+    __windowControllers: id;
+    __fileURL: NSURL;
+    __fileType: NSString;
+    __printInfo: NSPrintInfo;
+    __changeCount: clong;
+    _savePanelAccessory: NSView;
+    __displayName: id;
+    __privateData: id;
+    __undoManager: NSUndoManager;
+    __docFlags: bitpacked record
+        inClose: 0..1;
+        hasUndoManager: 0..1;
+        isShowingPageLayout: 0..1;
+        isRunningPrintOperation: 0..1;
+        savePanelNameExtensionHidden: 0..1;
+        reconciledToFileName: 0..1;
+        checkingDisplayName: 0..1;
+        definitelyHasUnsavedChanges: 0..1;
+        definitelyHasUnautosavedChanges: 0..1;
+        RESERVED: 0..((1 shl 23)-1);
+      end;
+    __savePanelSaveType: NSString;
+    
+  public
+    class function alloc: NSDocument; message 'alloc';
+
+    function init: id; message 'init';
+    function initWithType_error(typeName: NSString; var outError: NSError): id; message 'initWithType:error:';
+    function initWithContentsOfURL_ofType_error(absoluteURL: NSURL; typeName: NSString; var outError: NSError): id; message 'initWithContentsOfURL:ofType:error:';
+    function initForURL_withContentsOfURL_ofType_error(absoluteDocumentURL: NSURL; absoluteDocumentContentsURL: NSURL; typeName: NSString; var outError: NSError): id; message 'initForURL:withContentsOfURL:ofType:error:';
+    procedure setFileType(typeName: NSString); message 'setFileType:';
+    function fileType: NSString; message 'fileType';
+    procedure setFileURL(absoluteURL: NSURL); message 'setFileURL:';
+    function fileURL: NSURL; message 'fileURL';
+    procedure setFileModificationDate(modificationDate: NSDate); message 'setFileModificationDate:';
+    function fileModificationDate: NSDate; message 'fileModificationDate';
+    procedure revertDocumentToSaved(sender: id); message 'revertDocumentToSaved:';
+    function revertToContentsOfURL_ofType_error(absoluteURL: NSURL; typeName: NSString; var outError: NSError): Boolean; message 'revertToContentsOfURL:ofType:error:';
+    function readFromURL_ofType_error(absoluteURL: NSURL; typeName: NSString; var outError: NSError): Boolean; message 'readFromURL:ofType:error:';
+    function readFromFileWrapper_ofType_error(fileWrapper: NSFileWrapper; typeName: NSString; var outError: NSError): Boolean; message 'readFromFileWrapper:ofType:error:';
+    function readFromData_ofType_error(data: NSData; typeName: NSString; var outError: NSError): Boolean; message 'readFromData:ofType:error:';
+    function writeToURL_ofType_error(absoluteURL: NSURL; typeName: NSString; var outError: NSError): Boolean; message 'writeToURL:ofType:error:';
+    function fileWrapperOfType_error(typeName: NSString; var outError: NSError): NSFileWrapper; message 'fileWrapperOfType:error:';
+    function dataOfType_error(typeName: NSString; var outError: NSError): NSData; message 'dataOfType:error:';
+    function writeSafelyToURL_ofType_forSaveOperation_error(absoluteURL: NSURL; typeName: NSString; saveOperation: NSSaveOperationType; var outError: NSError): Boolean; message 'writeSafelyToURL:ofType:forSaveOperation:error:';
+    function writeToURL_ofType_forSaveOperation_originalContentsURL_error(absoluteURL: NSURL; typeName: NSString; saveOperation: NSSaveOperationType; absoluteOriginalContentsURL: NSURL; var outError: NSError): Boolean; message 'writeToURL:ofType:forSaveOperation:originalContentsURL:error:';
+    function fileAttributesToWriteToURL_ofType_forSaveOperation_originalContentsURL_error(absoluteURL: NSURL; typeName: NSString; saveOperation: NSSaveOperationType; absoluteOriginalContentsURL: NSURL; var outError: NSError): NSDictionary; message 'fileAttributesToWriteToURL:ofType:forSaveOperation:originalContentsURL:error:';
+    function keepBackupFile: Boolean; message 'keepBackupFile';
+    procedure saveDocument(sender: id); message 'saveDocument:';
+    procedure saveDocumentAs(sender: id); message 'saveDocumentAs:';
+    procedure saveDocumentTo(sender: id); message 'saveDocumentTo:';
+    procedure saveDocumentWithDelegate_didSaveSelector_contextInfo(delegate: id; didSaveSelector: SEL; contextInfo: Pointer); message 'saveDocumentWithDelegate:didSaveSelector:contextInfo:';
+    procedure runModalSavePanelForSaveOperation_delegate_didSaveSelector_contextInfo(saveOperation: NSSaveOperationType; delegate: id; didSaveSelector: SEL; contextInfo: Pointer); message 'runModalSavePanelForSaveOperation:delegate:didSaveSelector:contextInfo:';
+    function shouldRunSavePanelWithAccessoryView: Boolean; message 'shouldRunSavePanelWithAccessoryView';
+    function prepareSavePanel(savePanel: NSSavePanel): Boolean; message 'prepareSavePanel:';
+    function fileNameExtensionWasHiddenInLastRunSavePanel: Boolean; message 'fileNameExtensionWasHiddenInLastRunSavePanel';
+    function fileTypeFromLastRunSavePanel: NSString; message 'fileTypeFromLastRunSavePanel';
+    procedure saveToURL_ofType_forSaveOperation_delegate_didSaveSelector_contextInfo(absoluteURL: NSURL; typeName: NSString; saveOperation: NSSaveOperationType; delegate: id; didSaveSelector: SEL; contextInfo: Pointer); message 'saveToURL:ofType:forSaveOperation:delegate:didSaveSelector:contextInfo:';
+    function saveToURL_ofType_forSaveOperation_error(absoluteURL: NSURL; typeName: NSString; saveOperation: NSSaveOperationType; var outError: NSError): Boolean; message 'saveToURL:ofType:forSaveOperation:error:';
+    function hasUnautosavedChanges: Boolean; message 'hasUnautosavedChanges';
+    procedure autosaveDocumentWithDelegate_didAutosaveSelector_contextInfo(delegate: id; didAutosaveSelector: SEL; contextInfo: Pointer); message 'autosaveDocumentWithDelegate:didAutosaveSelector:contextInfo:';
+    function autosavingFileType: NSString; message 'autosavingFileType';
+    procedure setAutosavedContentsFileURL(absoluteURL: NSURL); message 'setAutosavedContentsFileURL:';
+    function autosavedContentsFileURL: NSURL; message 'autosavedContentsFileURL';
+    procedure canCloseDocumentWithDelegate_shouldCloseSelector_contextInfo(delegate: id; shouldCloseSelector: SEL; contextInfo: Pointer); message 'canCloseDocumentWithDelegate:shouldCloseSelector:contextInfo:';
+    procedure close; message 'close';
+    procedure runPageLayout(sender: id); message 'runPageLayout:';
+    procedure runModalPageLayoutWithPrintInfo_delegate_didRunSelector_contextInfo(printInfo_: NSPrintInfo; delegate: id; didRunSelector: SEL; contextInfo: Pointer); message 'runModalPageLayoutWithPrintInfo:delegate:didRunSelector:contextInfo:';
+    function preparePageLayout(pageLayout: NSPageLayout): Boolean; message 'preparePageLayout:';
+    function shouldChangePrintInfo(newPrintInfo: NSPrintInfo): Boolean; message 'shouldChangePrintInfo:';
+    procedure setPrintInfo(printInfo_: NSPrintInfo); message 'setPrintInfo:';
+    function printInfo: NSPrintInfo; message 'printInfo';
+    procedure printDocument(sender: id); message 'printDocument:';
+    procedure printDocumentWithSettings_showPrintPanel_delegate_didPrintSelector_contextInfo(printSettings: NSDictionary; showPrintPanel: Boolean; delegate: id; didPrintSelector: SEL; contextInfo: Pointer); message 'printDocumentWithSettings:showPrintPanel:delegate:didPrintSelector:contextInfo:';
+    function printOperationWithSettings_error(printSettings: NSDictionary; var outError: NSError): NSPrintOperation; message 'printOperationWithSettings:error:';
+    procedure runModalPrintOperation_delegate_didRunSelector_contextInfo(printOperation: NSPrintOperation; delegate: id; didRunSelector: SEL; contextInfo: Pointer); message 'runModalPrintOperation:delegate:didRunSelector:contextInfo:';
+    function isDocumentEdited: Boolean; message 'isDocumentEdited';
+    procedure updateChangeCount(change: NSDocumentChangeType); message 'updateChangeCount:';
+    procedure setUndoManager(undoManager_: NSUndoManager); message 'setUndoManager:';
+    function undoManager: NSUndoManager; message 'undoManager';
+    procedure setHasUndoManager(hasUndoManager_: Boolean); message 'setHasUndoManager:';
+    function hasUndoManager: Boolean; message 'hasUndoManager';
+    procedure presentError_modalForWindow_delegate_didPresentSelector_contextInfo(error: NSError; window: NSWindow; delegate: id; didPresentSelector: SEL; contextInfo: Pointer); message 'presentError:modalForWindow:delegate:didPresentSelector:contextInfo:';
+    function presentError(error: NSError): Boolean; message 'presentError:';
+    function willPresentError(error: NSError): NSError; message 'willPresentError:';
+    procedure makeWindowControllers; message 'makeWindowControllers';
+    function windowNibName: NSString; message 'windowNibName';
+    procedure windowControllerWillLoadNib(windowController: NSWindowController); message 'windowControllerWillLoadNib:';
+    procedure windowControllerDidLoadNib(windowController: NSWindowController); message 'windowControllerDidLoadNib:';
+    procedure setWindow(window: NSWindow); message 'setWindow:';
+    procedure addWindowController(windowController: NSWindowController); message 'addWindowController:';
+    procedure removeWindowController(windowController: NSWindowController); message 'removeWindowController:';
+    procedure showWindows; message 'showWindows';
+    function windowControllers: NSArray; message 'windowControllers';
+    procedure shouldCloseWindowController_delegate_shouldCloseSelector_contextInfo(windowController: NSWindowController; delegate: id; shouldCloseSelector: SEL; contextInfo: Pointer); message 'shouldCloseWindowController:delegate:shouldCloseSelector:contextInfo:';
+    function displayName: NSString; message 'displayName';
+    function windowForSheet: NSWindow; message 'windowForSheet';
+    class function readableTypes: NSArray; message 'readableTypes';
+    class function writableTypes: NSArray; message 'writableTypes';
+    class function isNativeType(type_: NSString): Boolean; message 'isNativeType:';
+    function writableTypesForSaveOperation(saveOperation: NSSaveOperationType): NSArray; message 'writableTypesForSaveOperation:';
+    function fileNameExtensionForType_saveOperation(typeName: NSString; saveOperation: NSSaveOperationType): NSString; message 'fileNameExtensionForType:saveOperation:';
+    function validateUserInterfaceItem(anItem: id): Boolean; message 'validateUserInterfaceItem:';
+
+    { Category: NSDeprecated }
+    function dataRepresentationOfType(type_: NSString): NSData; message 'dataRepresentationOfType:';
+    function fileAttributesToWriteToFile_ofType_saveOperation(fullDocumentPath: NSString; documentTypeName: NSString; saveOperationType: NSSaveOperationType): NSDictionary; message 'fileAttributesToWriteToFile:ofType:saveOperation:';
+    function fileName: NSString; message 'fileName';
+    function fileWrapperRepresentationOfType(type_: NSString): NSFileWrapper; message 'fileWrapperRepresentationOfType:';
+    function initWithContentsOfFile_ofType(absolutePath: NSString; typeName: NSString): id; message 'initWithContentsOfFile:ofType:';
+    function initWithContentsOfURL_ofType(absoluteURL: NSURL; typeName: NSString): id; message 'initWithContentsOfURL:ofType:';
+    function loadDataRepresentation_ofType(data: NSData; type_: NSString): Boolean; message 'loadDataRepresentation:ofType:';
+    function loadFileWrapperRepresentation_ofType(wrapper: NSFileWrapper; type_: NSString): Boolean; message 'loadFileWrapperRepresentation:ofType:';
+    procedure printShowingPrintPanel(flag: Boolean); message 'printShowingPrintPanel:';
+    function readFromFile_ofType(fileName_: NSString; type_: NSString): Boolean; message 'readFromFile:ofType:';
+    function readFromURL_ofType(url: NSURL; type_: NSString): Boolean; message 'readFromURL:ofType:';
+    function revertToSavedFromFile_ofType(fileName_: NSString; type_: NSString): Boolean; message 'revertToSavedFromFile:ofType:';
+    function revertToSavedFromURL_ofType(url: NSURL; type_: NSString): Boolean; message 'revertToSavedFromURL:ofType:';
+    function runModalPageLayoutWithPrintInfo(printInfo_: NSPrintInfo): clong; message 'runModalPageLayoutWithPrintInfo:';
+    procedure saveToFile_saveOperation_delegate_didSaveSelector_contextInfo(fileName_: NSString; saveOperation: NSSaveOperationType; delegate: id; didSaveSelector: SEL; contextInfo: Pointer); message 'saveToFile:saveOperation:delegate:didSaveSelector:contextInfo:';
+    procedure setFileName(fileName_: NSString); message 'setFileName:';
+    function writeToFile_ofType(fileName_: NSString; type_: NSString): Boolean; message 'writeToFile:ofType:';
+    function writeToFile_ofType_originalFile_saveOperation(fullDocumentPath: NSString; documentTypeName: NSString; fullOriginalDocumentPath: NSString; saveOperationType: NSSaveOperationType): Boolean; message 'writeToFile:ofType:originalFile:saveOperation:';
+    function writeToURL_ofType(url: NSURL; type_: NSString): Boolean; message 'writeToURL:ofType:';
+    function writeWithBackupToFile_ofType_saveOperation(fullDocumentPath: NSString; documentTypeName: NSString; saveOperationType: NSSaveOperationType): Boolean; message 'writeWithBackupToFile:ofType:saveOperation:';
+
+    { Category: NSScripting }
+    function lastComponentOfFileName: NSString; message 'lastComponentOfFileName';
+    procedure setLastComponentOfFileName(str: NSString); message 'setLastComponentOfFileName:';
+    function handleSaveScriptCommand(command: NSScriptCommand): id; message 'handleSaveScriptCommand:';
+    function handleCloseScriptCommand(command: NSCloseCommand): id; message 'handleCloseScriptCommand:';
+    function handlePrintScriptCommand(command: NSScriptCommand): id; message 'handlePrintScriptCommand:';
+    function objectSpecifier: NSScriptObjectSpecifier; message 'objectSpecifier';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSDocumentController.inc b/packages/cocoaint/src/appkit/NSDocumentController.inc
new file mode 100644
index 0000000000..b3f81fc75f
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSDocumentController.inc
@@ -0,0 +1,118 @@
+{ Parsed from Appkit.framework NSDocumentController.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSDOCUMENTCONTROLLER_PAS_H}
+{$define NSDOCUMENTCONTROLLER_PAS_H}
+type
+  NSDocumentControllerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSDOCUMENTCONTROLLER_PAS_T}
+{$define NSDOCUMENTCONTROLLER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSDOCUMENTCONTROLLER_PAS_R}
+{$define NSDOCUMENTCONTROLLER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSDOCUMENTCONTROLLER_PAS_F}
+{$define NSDOCUMENTCONTROLLER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSDOCUMENTCONTROLLER_PAS_T}
+{$define NSDOCUMENTCONTROLLER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSDocumentController = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSDOCUMENTCONTROLLER_PAS_C}
+{$define NSDOCUMENTCONTROLLER_PAS_C}
+
+{ NSDocumentController }
+  NSDocumentController = objcclass(NSObject, NSCodingProtocol, NSUserInterfaceValidationsProtocol)
+  private
+    __documents: id;
+    __moreVars: id;
+    __cachedTypeDescriptions: NSArray;
+    __recents: NSMutableDictionary;
+    __recentsLimit: cint;
+    
+  public
+    class function alloc: NSDocumentController; message 'alloc';
+
+    class function sharedDocumentController: id; message 'sharedDocumentController';
+    function init: id; message 'init';
+    function documents: NSArray; message 'documents';
+    function currentDocument: id; message 'currentDocument';
+    function currentDirectory: NSString; message 'currentDirectory';
+    function documentForURL(absoluteURL: NSURL): id; message 'documentForURL:';
+    function documentForWindow(window: NSWindow): id; message 'documentForWindow:';
+    procedure addDocument(document: NSDocument); message 'addDocument:';
+    procedure removeDocument(document: NSDocument); message 'removeDocument:';
+    procedure newDocument(sender: id); message 'newDocument:';
+    function openUntitledDocumentAndDisplay_error(displayDocument: Boolean; var outError: NSError): id; message 'openUntitledDocumentAndDisplay:error:';
+    function makeUntitledDocumentOfType_error(typeName: NSString; var outError: NSError): id; message 'makeUntitledDocumentOfType:error:';
+    procedure openDocument(sender: id); message 'openDocument:';
+    function URLsFromRunningOpenPanel: NSArray; message 'URLsFromRunningOpenPanel';
+    function runModalOpenPanel_forTypes(openPanel: NSOpenPanel; types: NSArray): clong; message 'runModalOpenPanel:forTypes:';
+    function openDocumentWithContentsOfURL_display_error(absoluteURL: NSURL; displayDocument: Boolean; var outError: NSError): id; message 'openDocumentWithContentsOfURL:display:error:';
+    function makeDocumentWithContentsOfURL_ofType_error(absoluteURL: NSURL; typeName: NSString; var outError: NSError): id; message 'makeDocumentWithContentsOfURL:ofType:error:';
+    function reopenDocumentForURL_withContentsOfURL_error(absoluteDocumentURL: NSURL; absoluteDocumentContentsURL: NSURL; var outError: NSError): Boolean; message 'reopenDocumentForURL:withContentsOfURL:error:';
+    function makeDocumentForURL_withContentsOfURL_ofType_error(absoluteDocumentURL: NSURL; absoluteDocumentContentsURL: NSURL; typeName: NSString; var outError: NSError): id; message 'makeDocumentForURL:withContentsOfURL:ofType:error:';
+    procedure setAutosavingDelay(autosavingDelay_: NSTimeInterval); message 'setAutosavingDelay:';
+    function autosavingDelay: NSTimeInterval; message 'autosavingDelay';
+    procedure saveAllDocuments(sender: id); message 'saveAllDocuments:';
+    function hasEditedDocuments: Boolean; message 'hasEditedDocuments';
+    procedure reviewUnsavedDocumentsWithAlertTitle_cancellable_delegate_didReviewAllSelector_contextInfo(title: NSString; cancellable: Boolean; delegate: id; didReviewAllSelector: SEL; contextInfo: Pointer); message 'reviewUnsavedDocumentsWithAlertTitle:cancellable:delegate:didReviewAllSelector:contextInfo:';
+    procedure closeAllDocumentsWithDelegate_didCloseAllSelector_contextInfo(delegate: id; didCloseAllSelector: SEL; contextInfo: Pointer); message 'closeAllDocumentsWithDelegate:didCloseAllSelector:contextInfo:';
+    procedure presentError_modalForWindow_delegate_didPresentSelector_contextInfo(error: NSError; window: NSWindow; delegate: id; didPresentSelector: SEL; contextInfo: Pointer); message 'presentError:modalForWindow:delegate:didPresentSelector:contextInfo:';
+    function presentError(error: NSError): Boolean; message 'presentError:';
+    function willPresentError(error: NSError): NSError; message 'willPresentError:';
+    function maximumRecentDocumentCount: culong; message 'maximumRecentDocumentCount';
+    procedure clearRecentDocuments(sender: id); message 'clearRecentDocuments:';
+    procedure noteNewRecentDocument(document: NSDocument); message 'noteNewRecentDocument:';
+    procedure noteNewRecentDocumentURL(absoluteURL: NSURL); message 'noteNewRecentDocumentURL:';
+    function recentDocumentURLs: NSArray; message 'recentDocumentURLs';
+    function defaultType: NSString; message 'defaultType';
+    function typeForContentsOfURL_error(inAbsoluteURL: NSURL; var outError: NSError): NSString; message 'typeForContentsOfURL:error:';
+    function documentClassNames: NSArray; message 'documentClassNames';
+    function documentClassForType(typeName: NSString): Pobjc_class; message 'documentClassForType:';
+    function displayNameForType(typeName: NSString): NSString; message 'displayNameForType:';
+    function validateUserInterfaceItem(anItem: id): Boolean; message 'validateUserInterfaceItem:';
+
+    { Category: NSDeprecated }
+    function fileExtensionsFromType(typeName: NSString): NSArray; message 'fileExtensionsFromType:';
+    function typeFromFileExtension(fileNameExtensionOrHFSFileType: NSString): NSString; message 'typeFromFileExtension:';
+    function documentForFileName(fileName: NSString): id; message 'documentForFileName:';
+    function fileNamesFromRunningOpenPanel: NSArray; message 'fileNamesFromRunningOpenPanel';
+    function makeDocumentWithContentsOfFile_ofType(fileName: NSString; type_: NSString): id; message 'makeDocumentWithContentsOfFile:ofType:';
+    function makeDocumentWithContentsOfURL_ofType(url: NSURL; type_: NSString): id; message 'makeDocumentWithContentsOfURL:ofType:';
+    function makeUntitledDocumentOfType(type_: NSString): id; message 'makeUntitledDocumentOfType:';
+    function openDocumentWithContentsOfFile_display(fileName: NSString; display: Boolean): id; message 'openDocumentWithContentsOfFile:display:';
+    function openDocumentWithContentsOfURL_display(url: NSURL; display: Boolean): id; message 'openDocumentWithContentsOfURL:display:';
+    function openUntitledDocumentOfType_display(type_: NSString; display: Boolean): id; message 'openUntitledDocumentOfType:display:';
+    procedure setShouldCreateUI(flag: Boolean); message 'setShouldCreateUI:';
+    function shouldCreateUI: Boolean; message 'shouldCreateUI';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSDocumentScripting.inc b/packages/cocoaint/src/appkit/NSDocumentScripting.inc
new file mode 100644
index 0000000000..a0feb1fa71
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSDocumentScripting.inc
@@ -0,0 +1,31 @@
+{ Parsed from Appkit.framework NSDocumentScripting.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSDOCUMENTSCRIPTING_PAS_T}
+{$define NSDOCUMENTSCRIPTING_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSDOCUMENTSCRIPTING_PAS_R}
+{$define NSDOCUMENTSCRIPTING_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSDOCUMENTSCRIPTING_PAS_F}
+{$define NSDOCUMENTSCRIPTING_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSDOCUMENTSCRIPTING_PAS_T}
+{$define NSDOCUMENTSCRIPTING_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSDragging.inc b/packages/cocoaint/src/appkit/NSDragging.inc
new file mode 100644
index 0000000000..c3848e7c20
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSDragging.inc
@@ -0,0 +1,72 @@
+{ Parsed from Appkit.framework NSDragging.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSDRAGGING_PAS_T}
+{$define NSDRAGGING_PAS_T}
+
+{ Types }
+type
+  NSDragOperation = culong;
+
+{ Constants }
+
+const
+  NSDragOperationNone = 0;
+  NSDragOperationCopy = 1;
+  NSDragOperationLink = 2;
+  NSDragOperationGeneric = 4;
+  NSDragOperationPrivate = 8;
+  NSDragOperationAll_Obsolete = 15;
+  NSDragOperationMove = 16;
+  NSDragOperationDelete = 32;
+  NSDragOperationEvery = NSUIntegerMax;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSDRAGGING_PAS_R}
+{$define NSDRAGGING_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSDRAGGING_PAS_F}
+{$define NSDRAGGING_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSDRAGGING_PAS_T}
+{$define NSDRAGGING_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSDraggingInfoProtocol = objcprotocol;
+
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSDRAGGING_PAS_P}
+{$define NSDRAGGING_PAS_P}
+  
+{ NSDraggingInfo Protocol }
+  NSDraggingInfoProtocol = objcprotocol
+    function draggingDestinationWindow: NSWindow; message 'draggingDestinationWindow';
+    function draggingSourceOperationMask: NSDragOperation; message 'draggingSourceOperationMask';
+    function draggingLocation: NSPoint; message 'draggingLocation';
+    function draggedImageLocation: NSPoint; message 'draggedImageLocation';
+    function draggedImage: NSImage; message 'draggedImage';
+    function draggingPasteboard: NSPasteboard; message 'draggingPasteboard';
+    function draggingSource: id; message 'draggingSource';
+    function draggingSequenceNumber: clong; message 'draggingSequenceNumber';
+    procedure slideDraggedImageTo(screenPoint: NSPoint); message 'slideDraggedImageTo:';
+    function namesOfPromisedFilesDroppedAtDestination(dropDestination: NSURL): NSArray; message 'namesOfPromisedFilesDroppedAtDestination:';
+  end; external name 'NSDraggingInfo';
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSDrawer.inc b/packages/cocoaint/src/appkit/NSDrawer.inc
new file mode 100644
index 0000000000..36ff137819
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSDrawer.inc
@@ -0,0 +1,125 @@
+{ Parsed from Appkit.framework NSDrawer.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSDRAWER_PAS_H}
+{$define NSDRAWER_PAS_H}
+type
+  NSDrawerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSDRAWER_PAS_T}
+{$define NSDRAWER_PAS_T}
+
+{ Constants }
+
+const
+  NSDrawerClosedState = 0;
+  NSDrawerOpeningState = 1;
+  NSDrawerOpenState = 2;
+  NSDrawerClosingState = 3;
+
+{ Types }
+type
+  NSDrawerState = culong;
+
+{ CFString constants }
+var
+  NSDrawerWillOpenNotification: CFStringRef; external name '_NSDrawerWillOpenNotification';
+  NSDrawerDidOpenNotification: CFStringRef; external name '_NSDrawerDidOpenNotification';
+  NSDrawerWillCloseNotification: CFStringRef; external name '_NSDrawerWillCloseNotification';
+  NSDrawerDidCloseNotification: CFStringRef; external name '_NSDrawerDidCloseNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSDRAWER_PAS_R}
+{$define NSDRAWER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSDRAWER_PAS_F}
+{$define NSDRAWER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSDRAWER_PAS_T}
+{$define NSDRAWER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSDrawer = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSDRAWER_PAS_C}
+{$define NSDRAWER_PAS_C}
+
+{ NSDrawer }
+  NSDrawer = objcclass(NSResponder)
+  private
+    __drawerState: NSDrawerState;
+    __drawerNextState: NSDrawerState;
+    __drawerEdge: NSRectEdge;
+    __drawerNextEdge: NSRectEdge;
+    __drawerPreferredEdge: NSRectEdge;
+    __drawerPercent: single;
+    __drawerPercentSaved: single;
+    __drawerLeadingOffset: CGFloat;
+    __drawerTrailingOffset: CGFloat;
+    __drawerLock: NSLock;
+    __drawerWindow: NSWindow;
+    __drawerParentWindow: NSWindow;
+    __drawerNextParentWindow: NSWindow;
+    __drawerSaveName: NSString;
+    __drawerStartTime: CFAbsoluteTime;
+    __drawerTotalTime: CFTimeInterval;
+    __drawerLoop: CFRunLoopRef;
+    __drawerTimer: CFRunLoopTimerRef; {garbage collector: __strong }
+    __drawerDelegate: id;
+    __drawerFlags: cuint;
+    __drawerObserver: CFRunLoopObserverRef; {garbage collector: __strong }
+    
+  public
+    class function alloc: NSDrawer; message 'alloc';
+
+    function initWithContentSize_preferredEdge(contentSize_: NSSize; edge_: NSRectEdge): id; message 'initWithContentSize:preferredEdge:';
+    procedure setParentWindow(parent: NSWindow); message 'setParentWindow:';
+    function parentWindow: NSWindow; message 'parentWindow';
+    procedure setContentView(aView: NSView); message 'setContentView:';
+    function contentView: NSView; message 'contentView';
+    procedure setPreferredEdge(edge_: NSRectEdge); message 'setPreferredEdge:';
+    function preferredEdge: NSRectEdge; message 'preferredEdge';
+    procedure setDelegate(anObject: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
+    procedure open; message 'open';
+    procedure openOnEdge(edge_: NSRectEdge); message 'openOnEdge:';
+    procedure close; message 'close';
+    procedure toggle(sender: id); message 'toggle:';
+    function state: clong; message 'state';
+    function edge: NSRectEdge; message 'edge';
+    procedure setContentSize(size: NSSize); message 'setContentSize:';
+    function contentSize: NSSize; message 'contentSize';
+    procedure setMinContentSize(size: NSSize); message 'setMinContentSize:';
+    function minContentSize: NSSize; message 'minContentSize';
+    procedure setMaxContentSize(size: NSSize); message 'setMaxContentSize:';
+    function maxContentSize: NSSize; message 'maxContentSize';
+    procedure setLeadingOffset(offset: CGFloat); message 'setLeadingOffset:';
+    function leadingOffset: CGFloat; message 'leadingOffset';
+    procedure setTrailingOffset(offset: CGFloat); message 'setTrailingOffset:';
+    function trailingOffset: CGFloat; message 'trailingOffset';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSEPSImageRep.inc b/packages/cocoaint/src/appkit/NSEPSImageRep.inc
new file mode 100644
index 0000000000..d96e12830b
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSEPSImageRep.inc
@@ -0,0 +1,68 @@
+{ Parsed from Appkit.framework NSEPSImageRep.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSEPSIMAGEREP_PAS_H}
+{$define NSEPSIMAGEREP_PAS_H}
+type
+  NSEPSImageRepPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSEPSIMAGEREP_PAS_T}
+{$define NSEPSIMAGEREP_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSEPSIMAGEREP_PAS_R}
+{$define NSEPSIMAGEREP_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSEPSIMAGEREP_PAS_F}
+{$define NSEPSIMAGEREP_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSEPSIMAGEREP_PAS_T}
+{$define NSEPSIMAGEREP_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSEPSImageRep = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSEPSIMAGEREP_PAS_C}
+{$define NSEPSIMAGEREP_PAS_C}
+
+{ NSEPSImageRep }
+  NSEPSImageRep = objcclass(NSImageRep)
+  private
+    __bBoxOrigin: NSPoint;
+    __epsData: NSData;
+    __pdfImageRep: NSPDFImageRep;
+    
+  public
+    class function alloc: NSEPSImageRep; message 'alloc';
+
+    class function imageRepWithData_initWithData(epsData: NSData): id; message 'imageRepWithData:';
+    function initWithData(epsData: NSData): id; message 'initWithData:';
+    procedure prepareGState; message 'prepareGState';
+    function EPSRepresentation: NSData; message 'EPSRepresentation';
+    function boundingBox: NSRect; message 'boundingBox';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSErrors.inc b/packages/cocoaint/src/appkit/NSErrors.inc
new file mode 100644
index 0000000000..eb51d24a0f
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSErrors.inc
@@ -0,0 +1,70 @@
+{ Parsed from Appkit.framework NSErrors.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSERRORS_PAS_T}
+{$define NSERRORS_PAS_T}
+
+{ CFString constants }
+var
+  NSTextLineTooLongException: CFStringRef; external name '_NSTextLineTooLongException';
+  NSTextNoSelectionException: CFStringRef; external name '_NSTextNoSelectionException';
+  NSWordTablesWriteException: CFStringRef; external name '_NSWordTablesWriteException';
+  NSWordTablesReadException: CFStringRef; external name '_NSWordTablesReadException';
+  NSTextReadException: CFStringRef; external name '_NSTextReadException';
+  NSTextWriteException: CFStringRef; external name '_NSTextWriteException';
+  NSPasteboardCommunicationException: CFStringRef; external name '_NSPasteboardCommunicationException';
+  NSPrintingCommunicationException: CFStringRef; external name '_NSPrintingCommunicationException';
+  NSAbortModalException: CFStringRef; external name '_NSAbortModalException';
+  NSAbortPrintingException: CFStringRef; external name '_NSAbortPrintingException';
+  NSIllegalSelectorException: CFStringRef; external name '_NSIllegalSelectorException';
+  NSAppKitVirtualMemoryException: CFStringRef; external name '_NSAppKitVirtualMemoryException';
+  NSBadRTFDirectiveException: CFStringRef; external name '_NSBadRTFDirectiveException';
+  NSBadRTFFontTableException: CFStringRef; external name '_NSBadRTFFontTableException';
+  NSBadRTFStyleSheetException: CFStringRef; external name '_NSBadRTFStyleSheetException';
+  NSTypedStreamVersionException: CFStringRef; external name '_NSTypedStreamVersionException';
+  NSTIFFException: CFStringRef; external name '_NSTIFFException';
+  NSPrintPackageException: CFStringRef; external name '_NSPrintPackageException';
+  NSBadRTFColorTableException: CFStringRef; external name '_NSBadRTFColorTableException';
+  NSDraggingException: CFStringRef; external name '_NSDraggingException';
+  NSColorListIOException: CFStringRef; external name '_NSColorListIOException';
+  NSColorListNotEditableException: CFStringRef; external name '_NSColorListNotEditableException';
+  NSBadBitmapParametersException: CFStringRef; external name '_NSBadBitmapParametersException';
+  NSWindowServerCommunicationException: CFStringRef; external name '_NSWindowServerCommunicationException';
+  NSFontUnavailableException: CFStringRef; external name '_NSFontUnavailableException';
+  NSPPDIncludeNotFoundException: CFStringRef; external name '_NSPPDIncludeNotFoundException';
+  NSPPDParseException: CFStringRef; external name '_NSPPDParseException';
+  NSPPDIncludeStackOverflowException: CFStringRef; external name '_NSPPDIncludeStackOverflowException';
+  NSPPDIncludeStackUnderflowException: CFStringRef; external name '_NSPPDIncludeStackUnderflowException';
+  NSRTFPropertyStackOverflowException: CFStringRef; external name '_NSRTFPropertyStackOverflowException';
+  NSAppKitIgnoredException: CFStringRef; external name '_NSAppKitIgnoredException';
+  NSBadComparisonException: CFStringRef; external name '_NSBadComparisonException';
+  NSImageCacheException: CFStringRef; external name '_NSImageCacheException';
+  NSNibLoadingException: CFStringRef; external name '_NSNibLoadingException';
+  NSBrowserIllegalDelegateException: CFStringRef; external name '_NSBrowserIllegalDelegateException';
+  NSAccessibilityException: CFStringRef; external name '_NSAccessibilityException';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSERRORS_PAS_R}
+{$define NSERRORS_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSERRORS_PAS_F}
+{$define NSERRORS_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSERRORS_PAS_T}
+{$define NSERRORS_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSEvent.inc b/packages/cocoaint/src/appkit/NSEvent.inc
new file mode 100644
index 0000000000..27fa02ee04
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSEvent.inc
@@ -0,0 +1,330 @@
+{ Parsed from Appkit.framework NSEvent.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSEVENT_PAS_H}
+{$define NSEVENT_PAS_H}
+type
+  NSEventPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSEVENT_PAS_T}
+{$define NSEVENT_PAS_T}
+
+{ Constants }
+
+const
+  NSLeftMouseDown = 1;
+  NSLeftMouseUp = 2;
+  NSRightMouseDown = 3;
+  NSRightMouseUp = 4;
+  NSMouseMoved = 5;
+  NSLeftMouseDragged = 6;
+  NSRightMouseDragged = 7;
+  NSMouseEntered = 8;
+  NSMouseExited = 9;
+  NSKeyDown = 10;
+  NSKeyUp = 11;
+  NSFlagsChanged = 12;
+  NSAppKitDefined = 13;
+  NSSystemDefined = 14;
+  NSApplicationDefined = 15;
+  NSPeriodic = 16;
+  NSCursorUpdate = 17;
+  NSScrollWheel = 22;
+  NSTabletPoint = 23;
+  NSTabletProximity = 24;
+  NSOtherMouseDown = 25;
+  NSOtherMouseUp = 26;
+  NSOtherMouseDragged = 27;
+
+const
+  NSAnyEventMask = NSUIntegerMax;
+
+const
+  NSAlphaShiftKeyMask = 1  shl  16;
+  NSShiftKeyMask = 1  shl  17;
+  NSControlKeyMask = 1  shl  18;
+  NSAlternateKeyMask = 1  shl  19;
+  NSCommandKeyMask = 1  shl  20;
+  NSNumericPadKeyMask = 1  shl  21;
+  NSHelpKeyMask = 1  shl  22;
+  NSFunctionKeyMask = 1  shl  23;
+  NSDeviceIndependentModifierFlagsMask = $ffff0000;
+
+const
+  NSUnknownPointingDevice = NX_TABLET_POINTER_UNKNOWN;
+  NSPenPointingDevice = NX_TABLET_POINTER_PEN;
+  NSCursorPointingDevice = NX_TABLET_POINTER_CURSOR;
+  NSEraserPointingDevice = NX_TABLET_POINTER_ERASER;
+
+const
+  NSPenTipMask = NX_TABLET_BUTTON_PENTIPMASK;
+  NSPenLowerSideMask = NX_TABLET_BUTTON_PENLOWERSIDEMASK;
+  NSPenUpperSideMask = NX_TABLET_BUTTON_PENUPPERSIDEMASK;
+
+const
+  NSUpArrowFunctionKey = $F700;
+  NSDownArrowFunctionKey = $F701;
+  NSLeftArrowFunctionKey = $F702;
+  NSRightArrowFunctionKey = $F703;
+  NSF1FunctionKey = $F704;
+  NSF2FunctionKey = $F705;
+  NSF3FunctionKey = $F706;
+  NSF4FunctionKey = $F707;
+  NSF5FunctionKey = $F708;
+  NSF6FunctionKey = $F709;
+  NSF7FunctionKey = $F70A;
+  NSF8FunctionKey = $F70B;
+  NSF9FunctionKey = $F70C;
+  NSF10FunctionKey = $F70D;
+  NSF11FunctionKey = $F70E;
+  NSF12FunctionKey = $F70F;
+  NSF13FunctionKey = $F710;
+  NSF14FunctionKey = $F711;
+  NSF15FunctionKey = $F712;
+  NSF16FunctionKey = $F713;
+  NSF17FunctionKey = $F714;
+  NSF18FunctionKey = $F715;
+  NSF19FunctionKey = $F716;
+  NSF20FunctionKey = $F717;
+  NSF21FunctionKey = $F718;
+  NSF22FunctionKey = $F719;
+  NSF23FunctionKey = $F71A;
+  NSF24FunctionKey = $F71B;
+  NSF25FunctionKey = $F71C;
+  NSF26FunctionKey = $F71D;
+  NSF27FunctionKey = $F71E;
+  NSF28FunctionKey = $F71F;
+  NSF29FunctionKey = $F720;
+  NSF30FunctionKey = $F721;
+  NSF31FunctionKey = $F722;
+  NSF32FunctionKey = $F723;
+  NSF33FunctionKey = $F724;
+  NSF34FunctionKey = $F725;
+  NSF35FunctionKey = $F726;
+  NSInsertFunctionKey = $F727;
+  NSDeleteFunctionKey = $F728;
+  NSHomeFunctionKey = $F729;
+  NSBeginFunctionKey = $F72A;
+  NSEndFunctionKey = $F72B;
+  NSPageUpFunctionKey = $F72C;
+  NSPageDownFunctionKey = $F72D;
+  NSPrintScreenFunctionKey = $F72E;
+  NSScrollLockFunctionKey = $F72F;
+  NSPauseFunctionKey = $F730;
+  NSSysReqFunctionKey = $F731;
+  NSBreakFunctionKey = $F732;
+  NSResetFunctionKey = $F733;
+  NSStopFunctionKey = $F734;
+  NSMenuFunctionKey = $F735;
+  NSUserFunctionKey = $F736;
+  NSSystemFunctionKey = $F737;
+  NSPrintFunctionKey = $F738;
+  NSClearLineFunctionKey = $F739;
+  NSClearDisplayFunctionKey = $F73A;
+  NSInsertLineFunctionKey = $F73B;
+  NSDeleteLineFunctionKey = $F73C;
+  NSInsertCharFunctionKey = $F73D;
+  NSDeleteCharFunctionKey = $F73E;
+  NSPrevFunctionKey = $F73F;
+  NSNextFunctionKey = $F740;
+  NSSelectFunctionKey = $F741;
+  NSExecuteFunctionKey = $F742;
+  NSUndoFunctionKey = $F743;
+  NSRedoFunctionKey = $F744;
+  NSFindFunctionKey = $F745;
+  NSHelpFunctionKey = $F746;
+  NSModeSwitchFunctionKey = $F747;
+
+const
+  NSWindowExposedEventType = 0;
+  NSApplicationActivatedEventType = 1;
+  NSApplicationDeactivatedEventType = 2;
+  NSWindowMovedEventType = 4;
+  NSScreenChangedEventType = 8;
+  NSAWTEventType = 16;
+
+const
+  NSPowerOffEventType = 1;
+
+const
+  NSMouseEventSubtype = NX_SUBTYPE_DEFAULT;
+  NSTabletPointEventSubtype = NX_SUBTYPE_TABLET_POINT;
+  NSTabletProximityEventSubtype = NX_SUBTYPE_TABLET_PROXIMITY;
+
+{ Types }
+type
+  NSEventType = culong;
+  NSPointingDeviceType = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSEVENT_PAS_R}
+{$define NSEVENT_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSEVENT_PAS_F}
+{$define NSEVENT_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSEVENT_PAS_T}
+{$define NSEVENT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSEvent = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSEVENT_PAS_C}
+{$define NSEVENT_PAS_C}
+
+{ NSEvent }
+  NSEvent = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __type: NSEventType;
+    __location: NSPoint;
+    __modifierFlags: cuint;
+    __WSTimestamp: clong;
+    __timestamp: NSTimeInterval;
+    __windowNumber: clong;
+    __window: NSWindow;
+    __context: NSGraphicsContext;
+    _mouse: record
+        eventNumber: cint;
+        clickCount: cint;
+        pressure: single;
+        {$ifdef cpu64}
+        deltaX: CGFloat;
+        deltaY: CGFloat;
+        subtype: cint;
+        buttonNumber: cshort;
+        reserved1: cshort;
+        reserved2: cint;
+        {$endif}
+      end;
+    _key: record
+        keys: NSString;
+        unmodKeys: NSString;
+        keyCode: cushort;
+        isARepeat: Boolean;
+        {$ifdef cpu64}
+        reserved: cint;
+        {$endif}
+      end;
+    _tracking: record
+        eventNumber: cint;
+        trackingNumber: clong;
+        userData: Pointer;
+        {$ifdef cpu64}
+        reserved: cint;
+        {$endif}
+      end;
+    _scrollWheel: record
+        deltaX: CGFloat;
+        deltaY: CGFloat;
+        deltaZ: CGFloat;
+        {$ifdef cpu64}
+        subtype: cshort;
+        reserved1: cshort;
+        reserved2: cint;
+        {$endif}
+      end;
+    _misc: record
+        subtype: cint;
+        data1: clong;
+        data2: clong;
+        {$ifdef cpu64}
+        reserved: cint;
+        {$endif}
+      end;
+    {$ifdef cpu64}
+    _tabletPointData: cint;
+    _tabletProximityData: cint;
+    {$endif}
+    __data: record
+      end;
+    __eventRef: Pointer;
+    {$ifdef cpu64}
+    _reserved1: Pointer;
+    _reserved2: Pointer;
+    {$endif}
+    
+  public
+    class function alloc: NSEvent; message 'alloc';
+
+    function type_: NSEventType; message 'type';
+    function modifierFlags: culong; message 'modifierFlags';
+    function timestamp: NSTimeInterval; message 'timestamp';
+    function window: NSWindow; message 'window';
+    function windowNumber: clong; message 'windowNumber';
+    function context: NSGraphicsContext; message 'context';
+    function clickCount: clong; message 'clickCount';
+    function buttonNumber: clong; message 'buttonNumber';
+    function eventNumber: clong; message 'eventNumber';
+    function pressure: single; message 'pressure';
+    function locationInWindow: NSPoint; message 'locationInWindow';
+    function deltaX: CGFloat; message 'deltaX';
+    function deltaY: CGFloat; message 'deltaY';
+    function deltaZ: CGFloat; message 'deltaZ';
+    function characters: NSString; message 'characters';
+    function charactersIgnoringModifiers: NSString; message 'charactersIgnoringModifiers';
+    function isARepeat: Boolean; message 'isARepeat';
+    function keyCode: cushort; message 'keyCode';
+    function trackingNumber: clong; message 'trackingNumber';
+    function userData: Pointer; message 'userData';
+    function trackingArea: NSTrackingArea; message 'trackingArea';
+    function subtype: cshort; message 'subtype';
+    function data1: clong; message 'data1';
+    function data2: clong; message 'data2';
+    function eventRef: Pointer; message 'eventRef';
+    class function eventWithEventRef(eventRef_: Pointer): NSEvent; message 'eventWithEventRef:';
+    function CGEvent: CGEventRef; message 'CGEvent';
+    class function eventWithCGEvent(CGEvent_: CGEventRef): NSEvent; message 'eventWithCGEvent:';
+    class procedure setMouseCoalescingEnabled(flag: Boolean); message 'setMouseCoalescingEnabled:';
+    class function isMouseCoalescingEnabled: Boolean; message 'isMouseCoalescingEnabled';
+    function deviceID: culong; message 'deviceID';
+    function absoluteX: clong; message 'absoluteX';
+    function absoluteY: clong; message 'absoluteY';
+    function absoluteZ: clong; message 'absoluteZ';
+    function buttonMask: culong; message 'buttonMask';
+    function tilt: NSPoint; message 'tilt';
+    function rotation: single; message 'rotation';
+    function tangentialPressure: single; message 'tangentialPressure';
+    function vendorDefined: id; message 'vendorDefined';
+    function vendorID: culong; message 'vendorID';
+    function tabletID: culong; message 'tabletID';
+    function pointingDeviceID: culong; message 'pointingDeviceID';
+    function systemTabletID: culong; message 'systemTabletID';
+    function vendorPointingDeviceType: culong; message 'vendorPointingDeviceType';
+    function pointingDeviceSerialNumber: culong; message 'pointingDeviceSerialNumber';
+    function uniqueID: culonglong; message 'uniqueID';
+    function capabilityMask: culong; message 'capabilityMask';
+    function pointingDeviceType: NSPointingDeviceType; message 'pointingDeviceType';
+    function isEnteringProximity: Boolean; message 'isEnteringProximity';
+    class procedure startPeriodicEventsAfterDelay_withPeriod(delay: NSTimeInterval; period: NSTimeInterval); message 'startPeriodicEventsAfterDelay:withPeriod:';
+    class procedure stopPeriodicEvents; message 'stopPeriodicEvents';
+    class function mouseEventWithType_location_modifierFlags_timestamp_windowNumber_context_eventNumber_clickCount_pressure(type__: NSEventType; location: NSPoint; flags: culong; time: NSTimeInterval; wNum: clong; context_: NSGraphicsContext; eNum: clong; cNum: clong; pressure_: single): NSEvent; message 'mouseEventWithType:location:modifierFlags:timestamp:windowNumber:context:eventNumber:clickCount:pressure:';
+    class function keyEventWithType_location_modifierFlags_timestamp_windowNumber_context_characters_charactersIgnoringModifiers_isARepeat_keyCode(type__: NSEventType; location: NSPoint; flags: culong; time: NSTimeInterval; wNum: clong; context_: NSGraphicsContext; keys: NSString; ukeys: NSString; flag: Boolean; code: cushort): NSEvent; message 'keyEventWithType:location:modifierFlags:timestamp:windowNumber:context:characters:charactersIgnoringModifiers:isARepeat:keyCode:';
+    class function enterExitEventWithType_location_modifierFlags_timestamp_windowNumber_context_eventNumber_trackingNumber_userData(type__: NSEventType; location: NSPoint; flags: culong; time: NSTimeInterval; wNum: clong; context_: NSGraphicsContext; eNum: clong; tNum: clong; data: Pointer): NSEvent; message 'enterExitEventWithType:location:modifierFlags:timestamp:windowNumber:context:eventNumber:trackingNumber:userData:';
+    class function otherEventWithType_location_modifierFlags_timestamp_windowNumber_context_subtype_data1_data2(type__: NSEventType; location: NSPoint; flags: culong; time: NSTimeInterval; wNum: clong; context_: NSGraphicsContext; subtype_: cshort; d: clong; d1: clong): NSEvent; message 'otherEventWithType:location:modifierFlags:timestamp:windowNumber:context:subtype:data1:data2:';
+    class function mouseLocation: NSPoint; message 'mouseLocation';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSFileWrapper.inc b/packages/cocoaint/src/appkit/NSFileWrapper.inc
new file mode 100644
index 0000000000..3028a5c8b7
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSFileWrapper.inc
@@ -0,0 +1,95 @@
+{ Parsed from Appkit.framework NSFileWrapper.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSFILEWRAPPER_PAS_H}
+{$define NSFILEWRAPPER_PAS_H}
+type
+  NSFileWrapperPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSFILEWRAPPER_PAS_T}
+{$define NSFILEWRAPPER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSFILEWRAPPER_PAS_R}
+{$define NSFILEWRAPPER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSFILEWRAPPER_PAS_F}
+{$define NSFILEWRAPPER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSFILEWRAPPER_PAS_T}
+{$define NSFILEWRAPPER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSFileWrapper = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSFILEWRAPPER_PAS_C}
+{$define NSFILEWRAPPER_PAS_C}
+
+{ NSFileWrapper }
+  NSFileWrapper = objcclass(NSObject, NSCodingProtocol)
+  private
+    __impl: id;
+    __fileName: NSString;
+    __preferredFileName: NSString;
+    __fileAttributes: NSDictionary;
+    __image: NSImage;
+    __moreVars: id;
+    
+  public
+    class function alloc: NSFileWrapper; message 'alloc';
+
+    function initDirectoryWithFileWrappers(docs: NSDictionary): id; message 'initDirectoryWithFileWrappers:';
+    function initRegularFileWithContents(data: NSData): id; message 'initRegularFileWithContents:';
+    function initSymbolicLinkWithDestination(path: NSString): id; message 'initSymbolicLinkWithDestination:';
+    function initWithPath(path: NSString): id; message 'initWithPath:';
+    function initWithSerializedRepresentation(data: NSData): id; message 'initWithSerializedRepresentation:';
+    function writeToFile_atomically_updateFilenames(path: NSString; atomicFlag: Boolean; updateFilenamesFlag: Boolean): Boolean; message 'writeToFile:atomically:updateFilenames:';
+    function serializedRepresentation: NSData; message 'serializedRepresentation';
+    procedure setFilename(filename_: NSString); message 'setFilename:';
+    function filename: NSString; message 'filename';
+    procedure setPreferredFilename(filename_: NSString); message 'setPreferredFilename:';
+    function preferredFilename: NSString; message 'preferredFilename';
+    procedure setFileAttributes(attributes: NSDictionary); message 'setFileAttributes:';
+    function fileAttributes: NSDictionary; message 'fileAttributes';
+    function isRegularFile: Boolean; message 'isRegularFile';
+    function isDirectory: Boolean; message 'isDirectory';
+    function isSymbolicLink: Boolean; message 'isSymbolicLink';
+    procedure setIcon(icon_: NSImage); message 'setIcon:';
+    function icon: NSImage; message 'icon';
+    function needsToBeUpdatedFromPath(path: NSString): Boolean; message 'needsToBeUpdatedFromPath:';
+    function updateFromPath(path: NSString): Boolean; message 'updateFromPath:';
+    function addFileWrapper(doc: NSFileWrapper): NSString; message 'addFileWrapper:';
+    procedure removeFileWrapper(doc: NSFileWrapper); message 'removeFileWrapper:';
+    function fileWrappers: NSDictionary; message 'fileWrappers';
+    function keyForFileWrapper(doc: NSFileWrapper): NSString; message 'keyForFileWrapper:';
+    function addFileWithPath(path: NSString): NSString; message 'addFileWithPath:';
+    function addRegularFileWithContents_preferredFilename(data: NSData; filename_: NSString): NSString; message 'addRegularFileWithContents:preferredFilename:';
+    function addSymbolicLinkWithDestination_preferredFilename(path: NSString; filename_: NSString): NSString; message 'addSymbolicLinkWithDestination:preferredFilename:';
+    function regularFileContents: NSData; message 'regularFileContents';
+    function symbolicLinkDestination: NSString; message 'symbolicLinkDestination';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSFont.inc b/packages/cocoaint/src/appkit/NSFont.inc
new file mode 100644
index 0000000000..4acc322f3e
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSFont.inc
@@ -0,0 +1,165 @@
+{ Parsed from Appkit.framework NSFont.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSFONT_PAS_H}
+{$define NSFONT_PAS_H}
+type
+  NSFontPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSFONT_PAS_T}
+{$define NSFONT_PAS_T}
+
+{ Types }
+type
+  NSGlyph = cuint;
+  NSMultibyteGlyphPacking = culong;
+  NSFontRenderingMode = culong;
+  NSGlyphRelation = culong;
+
+{ Constants }
+
+const
+  NSControlGlyph = $00FFFFFF;
+  NSNullGlyph = $0;
+
+const
+  NSNativeShortGlyphPacking = 5;
+
+const
+  NSOneByteGlyphPacking = 0;
+  NSJapaneseEUCGlyphPacking = 1;
+  NSAsciiWithDoubleByteEUCGlyphPacking = 2;
+  NSTwoByteGlyphPacking = 3;
+  NSFourByteGlyphPacking = 4;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSFONT_PAS_R}
+{$define NSFONT_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSFONT_PAS_F}
+{$define NSFONT_PAS_F}
+
+{ Functions }
+function NSConvertGlyphsToPackedGlyphs(var glBuf: NSGlyph; count: clong; packing: NSMultibyteGlyphPacking; var packedGlyphs: char): clong; cdecl; external name 'NSConvertGlyphsToPackedGlyphs';
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSFONT_PAS_T}
+{$define NSFONT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSFont = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSFONT_PAS_C}
+{$define NSFONT_PAS_C}
+
+{ NSFont }
+  NSFont = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __name: NSString;
+    __size: CGFloat;
+    __reservedFont1: Pointer;
+    __fFlags: bitpacked record
+        _isScreenFont: 0..1;
+        _systemFontType: 0..((1 shl 8)-1);
+        _reserved1: 0..((1 shl 4)-1);
+        _matrixIsIdentity: 0..1;
+        _renderingMode: 0..((1 shl 3)-1);
+        _reserved2: 0..((1 shl 15)-1);
+      end;
+    __private: id;
+    
+  public
+    class function alloc: NSFont; message 'alloc';
+
+    class function fontWithName_size(fontName_: NSString; fontSize: CGFloat): NSFont; message 'fontWithName:size:';
+    class function fontWithName_matrix(fontName_: NSString; var fontMatrix: CGFloat): NSFont; message 'fontWithName:matrix:';
+    class function fontWithDescriptor_size(fontDescriptor_: NSFontDescriptor; fontSize: CGFloat): NSFont; message 'fontWithDescriptor:size:';
+    class function fontWithDescriptor_textTransform(fontDescriptor_: NSFontDescriptor; textTransform_: NSAffineTransform): NSFont; message 'fontWithDescriptor:textTransform:';
+    class function userFontOfSize(fontSize: CGFloat): NSFont; message 'userFontOfSize:';
+    class function userFixedPitchFontOfSize(fontSize: CGFloat): NSFont; message 'userFixedPitchFontOfSize:';
+    class procedure setUserFont(aFont: NSFont); message 'setUserFont:';
+    class procedure setUserFixedPitchFont(aFont: NSFont); message 'setUserFixedPitchFont:';
+    class function systemFontOfSize(fontSize: CGFloat): NSFont; message 'systemFontOfSize:';
+    class function boldSystemFontOfSize(fontSize: CGFloat): NSFont; message 'boldSystemFontOfSize:';
+    class function labelFontOfSize(fontSize: CGFloat): NSFont; message 'labelFontOfSize:';
+    class function titleBarFontOfSize(fontSize: CGFloat): NSFont; message 'titleBarFontOfSize:';
+    class function menuFontOfSize(fontSize: CGFloat): NSFont; message 'menuFontOfSize:';
+    class function menuBarFontOfSize(fontSize: CGFloat): NSFont; message 'menuBarFontOfSize:';
+    class function messageFontOfSize(fontSize: CGFloat): NSFont; message 'messageFontOfSize:';
+    class function paletteFontOfSize(fontSize: CGFloat): NSFont; message 'paletteFontOfSize:';
+    class function toolTipsFontOfSize(fontSize: CGFloat): NSFont; message 'toolTipsFontOfSize:';
+    class function controlContentFontOfSize(fontSize: CGFloat): NSFont; message 'controlContentFontOfSize:';
+    class function systemFontSize: CGFloat; message 'systemFontSize';
+    class function smallSystemFontSize: CGFloat; message 'smallSystemFontSize';
+    class function labelFontSize: CGFloat; message 'labelFontSize';
+    class function systemFontSizeForControlSize(controlSize: NSControlSize): CGFloat; message 'systemFontSizeForControlSize:';
+    function fontName: NSString; message 'fontName';
+    function pointSize: CGFloat; message 'pointSize';
+    function matrix: CGFloat; message 'matrix';
+    function familyName: NSString; message 'familyName';
+    function displayName: NSString; message 'displayName';
+    function fontDescriptor: NSFontDescriptor; message 'fontDescriptor';
+    function textTransform: NSAffineTransform; message 'textTransform';
+    function numberOfGlyphs: culong; message 'numberOfGlyphs';
+    function mostCompatibleStringEncoding: NSStringEncoding; message 'mostCompatibleStringEncoding';
+    function glyphWithName(aName: NSString): NSGlyph; message 'glyphWithName:';
+    function coveredCharacterSet: NSCharacterSet; message 'coveredCharacterSet';
+    function boundingRectForFont: NSRect; message 'boundingRectForFont';
+    function maximumAdvancement: NSSize; message 'maximumAdvancement';
+    function ascender: CGFloat; message 'ascender';
+    function descender: CGFloat; message 'descender';
+    function leading: CGFloat; message 'leading';
+    function underlinePosition: CGFloat; message 'underlinePosition';
+    function underlineThickness: CGFloat; message 'underlineThickness';
+    function italicAngle: CGFloat; message 'italicAngle';
+    function capHeight: CGFloat; message 'capHeight';
+    function xHeight: CGFloat; message 'xHeight';
+    function isFixedPitch: Boolean; message 'isFixedPitch';
+    function boundingRectForGlyph(aGlyph: NSGlyph): NSRect; message 'boundingRectForGlyph:';
+    function advancementForGlyph(ag: NSGlyph): NSSize; message 'advancementForGlyph:';
+    procedure getBoundingRects_forGlyphs_count(bounds: NSRectArray; var glyphs: NSGlyph; glyphCount: culong); message 'getBoundingRects:forGlyphs:count:';
+    procedure getAdvancements_forGlyphs_count(advancements: NSSizeArray; var glyphs: NSGlyph; glyphCount: culong); message 'getAdvancements:forGlyphs:count:';
+    procedure getAdvancements_forPackedGlyphs_length(advancements: NSSizeArray; packedGlyphs: Pointer; length: culong); message 'getAdvancements:forPackedGlyphs:length:';
+    procedure set_; message 'set';
+    procedure setInContext(graphicsContext: NSGraphicsContext); message 'setInContext:';
+    function printerFont: NSFont; message 'printerFont';
+    function screenFont: NSFont; message 'screenFont';
+    function screenFontWithRenderingMode(renderingMode_: NSFontRenderingMode): NSFont; message 'screenFontWithRenderingMode:';
+    function renderingMode: NSFontRenderingMode; message 'renderingMode';
+
+    { Category: NSFontDeprecated }
+    class procedure useFont(fontName_: NSString); message 'useFont:';
+    function widthOfString(string_: NSString): CGFloat; message 'widthOfString:';
+    function glyphIsEncoded(aGlyph: NSGlyph): Boolean; message 'glyphIsEncoded:';
+    class procedure setPreferredFontNames(fontNameArray: NSArray); message 'setPreferredFontNames:';
+    function positionOfGlyph_precededByGlyph_isNominal(curGlyph: NSGlyph; prevGlyph: NSGlyph; var nominal: Boolean): NSPoint; message 'positionOfGlyph:precededByGlyph:isNominal:';
+    function positionsForCompositeSequence_numberOfGlyphs_pointArray(var someGlyphs: NSGlyph; numGlyphs: clong; points: NSPointArray): clong; message 'positionsForCompositeSequence:numberOfGlyphs:pointArray:';
+    function positionOfGlyph_struckOverGlyph_metricsExist(curGlyph: NSGlyph; prevGlyph: NSGlyph; var exist: Boolean): NSPoint; message 'positionOfGlyph:struckOverGlyph:metricsExist:';
+    function positionOfGlyph_struckOverRect_metricsExist(aGlyph: NSGlyph; aRect: NSRect; var exist: Boolean): NSPoint; message 'positionOfGlyph:struckOverRect:metricsExist:';
+    function positionOfGlyph_forCharacter_struckOverRect(aGlyph: NSGlyph; aChar: unichar; aRect: NSRect): NSPoint; message 'positionOfGlyph:forCharacter:struckOverRect:';
+    function positionOfGlyph_withRelation_toBaseGlyph_totalAdvancement_metricsExist(thisGlyph: NSGlyph; rel: NSGlyphRelation; baseGlyph: NSGlyph; adv: NSSizePointer; var exist: Boolean): NSPoint; message 'positionOfGlyph:withRelation:toBaseGlyph:totalAdvancement:metricsExist:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSFontDescriptor.inc b/packages/cocoaint/src/appkit/NSFontDescriptor.inc
new file mode 100644
index 0000000000..f5b0404d8e
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSFontDescriptor.inc
@@ -0,0 +1,116 @@
+{ Parsed from Appkit.framework NSFontDescriptor.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSFONTDESCRIPTOR_PAS_H}
+{$define NSFONTDESCRIPTOR_PAS_H}
+type
+  NSFontDescriptorPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSFONTDESCRIPTOR_PAS_T}
+{$define NSFONTDESCRIPTOR_PAS_T}
+
+{ Types }
+type
+  NSFontSymbolicTraits = cardinal;
+  NSFontFamilyClass = cardinal;
+
+{ Constants }
+
+const
+  NSFontUnknownClass = 0  shl  28;
+  NSFontOldStyleSerifsClass = 1  shl  28;
+  NSFontTransitionalSerifsClass = 2  shl  28;
+  NSFontModernSerifsClass = 3  shl  28;
+  NSFontClarendonSerifsClass = 4  shl  28;
+  NSFontSlabSerifsClass = 5  shl  28;
+  NSFontFreeformSerifsClass = 7  shl  28;
+  NSFontSansSerifClass = 8  shl  28;
+  NSFontOrnamentalsClass = 9  shl  28;
+  NSFontScriptsClass = 10  shl  28;
+  NSFontSymbolicClass = 12  shl  28;
+
+const
+  NSFontFamilyClassMask = $F0000000;
+
+const
+  NSFontItalicTrait = 1  shl  0;
+  NSFontBoldTrait = 1  shl  1;
+  NSFontExpandedTrait = 1  shl  5;
+  NSFontCondensedTrait = 1  shl  6;
+  NSFontMonoSpaceTrait = 1  shl  10;
+  NSFontVerticalTrait = 1  shl  11;
+  NSFontUIOptimizedTrait = 1  shl  12;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSFONTDESCRIPTOR_PAS_R}
+{$define NSFONTDESCRIPTOR_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSFONTDESCRIPTOR_PAS_F}
+{$define NSFONTDESCRIPTOR_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSFONTDESCRIPTOR_PAS_T}
+{$define NSFONTDESCRIPTOR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSFontDescriptor = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSFONTDESCRIPTOR_PAS_C}
+{$define NSFONTDESCRIPTOR_PAS_C}
+
+{ NSFontDescriptor }
+  NSFontDescriptor = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __attributes: NSMutableDictionary;
+    __reserved1: id;
+    __reserved2: id;
+    __reserved3: id;
+    __reserved4: id;
+    __reserved5: id;
+    
+  public
+    class function alloc: NSFontDescriptor; message 'alloc';
+
+    function postscriptName: NSString; message 'postscriptName';
+    function pointSize: CGFloat; message 'pointSize';
+    function matrix: NSAffineTransform; message 'matrix';
+    function symbolicTraits: NSFontSymbolicTraits; message 'symbolicTraits';
+    function objectForKey(anAttribute: NSString): id; message 'objectForKey:';
+    function fontAttributes: NSDictionary; message 'fontAttributes';
+    class function fontDescriptorWithFontAttributes(attributes: NSDictionary): NSFontDescriptor; message 'fontDescriptorWithFontAttributes:';
+    class function fontDescriptorWithName_size(fontName: NSString; size: CGFloat): NSFontDescriptor; message 'fontDescriptorWithName:size:';
+    class function fontDescriptorWithName_matrix(fontName: NSString; matrix_: NSAffineTransform): NSFontDescriptor; message 'fontDescriptorWithName:matrix:';
+    function initWithFontAttributes(attributes: NSDictionary): id; message 'initWithFontAttributes:';
+    function matchingFontDescriptorsWithMandatoryKeys(mandatoryKeys: NSSet): NSArray; message 'matchingFontDescriptorsWithMandatoryKeys:';
+    function matchingFontDescriptorWithMandatoryKeys(mandatoryKeys: NSSet): NSFontDescriptor; message 'matchingFontDescriptorWithMandatoryKeys:';
+    function fontDescriptorByAddingAttributes(attributes: NSDictionary): NSFontDescriptor; message 'fontDescriptorByAddingAttributes:';
+    function fontDescriptorWithSymbolicTraits(symbolicTraits_: NSFontSymbolicTraits): NSFontDescriptor; message 'fontDescriptorWithSymbolicTraits:';
+    function fontDescriptorWithSize(newPointSize: CGFloat): NSFontDescriptor; message 'fontDescriptorWithSize:';
+    function fontDescriptorWithMatrix(matrix_: NSAffineTransform): NSFontDescriptor; message 'fontDescriptorWithMatrix:';
+    function fontDescriptorWithFace(newFace: NSString): NSFontDescriptor; message 'fontDescriptorWithFace:';
+    function fontDescriptorWithFamily(newFamily: NSString): NSFontDescriptor; message 'fontDescriptorWithFamily:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSFontManager.inc b/packages/cocoaint/src/appkit/NSFontManager.inc
new file mode 100644
index 0000000000..a45ca82fff
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSFontManager.inc
@@ -0,0 +1,164 @@
+{ Parsed from Appkit.framework NSFontManager.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSFONTMANAGER_PAS_H}
+{$define NSFONTMANAGER_PAS_H}
+type
+  NSFontManagerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSFONTMANAGER_PAS_T}
+{$define NSFONTMANAGER_PAS_T}
+
+{ Types }
+type
+  NSFontTraitMask = culong;
+  NSFontAction = culong;
+
+{ Constants }
+
+const
+  NSItalicFontMask = $00000001;
+  NSBoldFontMask = $00000002;
+  NSUnboldFontMask = $00000004;
+  NSNonStandardCharacterSetFontMask = $00000008;
+  NSNarrowFontMask = $00000010;
+  NSExpandedFontMask = $00000020;
+  NSCondensedFontMask = $00000040;
+  NSSmallCapsFontMask = $00000080;
+  NSPosterFontMask = $00000100;
+  NSCompressedFontMask = $00000200;
+  NSFixedPitchFontMask = $00000400;
+  NSUnitalicFontMask = $01000000;
+
+const
+  NSFontCollectionApplicationOnlyMask = 1  shl  0;
+
+const
+  NSNoFontChangeAction = 0;
+  NSViaPanelFontAction = 1;
+  NSAddTraitFontAction = 2;
+  NSSizeUpFontAction = 3;
+  NSSizeDownFontAction = 4;
+  NSHeavierFontAction = 5;
+  NSLighterFontAction = 6;
+  NSRemoveTraitFontAction = 7;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSFONTMANAGER_PAS_R}
+{$define NSFONTMANAGER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSFONTMANAGER_PAS_F}
+{$define NSFONTMANAGER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSFONTMANAGER_PAS_T}
+{$define NSFONTMANAGER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSFontManager = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSFONTMANAGER_PAS_C}
+{$define NSFONTMANAGER_PAS_C}
+
+{ NSFontManager }
+  NSFontManager = objcclass(NSObject)
+  private
+    __panel: NSFontPanel;
+    __fmReserved1: cuint;
+    __action: SEL;
+    __actionOrigin: id;
+    __target: id;
+    __selFont: NSFont;
+    __fmFlags: bitpacked record
+        multipleFont: 0..1;
+        disabled: 0..1;
+        senderTagMode: 0..((1 shl 2)-1);
+        _RESERVED: 0..((1 shl 12)-1);
+      end;
+    __fmReserved3: cushort;
+    __delegate: id;
+    __collections: id;
+    __hiddenCollections: id;
+    __fmReserved4: culong;
+    
+  public
+    class function alloc: NSFontManager; message 'alloc';
+
+    class procedure setFontPanelFactory(factoryId: Pobjc_class); message 'setFontPanelFactory:';
+    class procedure setFontManagerFactory(factoryId: Pobjc_class); message 'setFontManagerFactory:';
+    class function sharedFontManager: NSFontManager; message 'sharedFontManager';
+    function isMultiple: Boolean; message 'isMultiple';
+    function selectedFont: NSFont; message 'selectedFont';
+    procedure setSelectedFont_isMultiple(fontObj: NSFont; flag: Boolean); message 'setSelectedFont:isMultiple:';
+    procedure setFontMenu(newMenu: NSMenu); message 'setFontMenu:';
+    function fontMenu(create_: Boolean): NSMenu; message 'fontMenu:';
+    function fontPanel(create_: Boolean): NSFontPanel; message 'fontPanel:';
+    function fontWithFamily_traits_weight_size(family: NSString; traits: NSFontTraitMask; weight: clong; size: CGFloat): NSFont; message 'fontWithFamily:traits:weight:size:';
+    function traitsOfFont(fontObj: NSFont): NSFontTraitMask; message 'traitsOfFont:';
+    function weightOfFont(fontObj: NSFont): clong; message 'weightOfFont:';
+    function availableFonts: NSArray; message 'availableFonts';
+    function availableFontFamilies: NSArray; message 'availableFontFamilies';
+    function availableMembersOfFontFamily(fam: NSString): NSArray; message 'availableMembersOfFontFamily:';
+    function convertFont(fontObj: NSFont): NSFont; message 'convertFont:';
+    function convertFont_toSize(fontObj: NSFont; size: CGFloat): NSFont; message 'convertFont:toSize:';
+    function convertFont_toFace(fontObj: NSFont; typeface: NSString): NSFont; message 'convertFont:toFace:';
+    function convertFont_toFamily(fontObj: NSFont; family: NSString): NSFont; message 'convertFont:toFamily:';
+    function convertFont_toHaveTrait(fontObj: NSFont; trait: NSFontTraitMask): NSFont; message 'convertFont:toHaveTrait:';
+    function convertFont_toNotHaveTrait(fontObj: NSFont; trait: NSFontTraitMask): NSFont; message 'convertFont:toNotHaveTrait:';
+    function convertWeight_ofFont(upFlag: Boolean; fontObj: NSFont): NSFont; message 'convertWeight:ofFont:';
+    function isEnabled: Boolean; message 'isEnabled';
+    procedure setEnabled(flag: Boolean); message 'setEnabled:';
+    function action: SEL; message 'action';
+    procedure setAction(aSelector: SEL); message 'setAction:';
+    function sendAction: Boolean; message 'sendAction';
+    procedure setDelegate(anObject: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
+    function localizedNameForFamily_face(family: NSString; faceKey: NSString): NSString; message 'localizedNameForFamily:face:';
+    procedure setSelectedAttributes_isMultiple(attributes: NSDictionary; flag: Boolean); message 'setSelectedAttributes:isMultiple:';
+    function convertAttributes(attributes: NSDictionary): NSDictionary; message 'convertAttributes:';
+    function availableFontNamesMatchingFontDescriptor(descriptor: NSFontDescriptor): NSArray; message 'availableFontNamesMatchingFontDescriptor:';
+    function collectionNames: NSArray; message 'collectionNames';
+    function fontDescriptorsInCollection(collectionNames_: NSString): NSArray; message 'fontDescriptorsInCollection:';
+    function addCollection_options(collectionName: NSString; collectionOptions: clong): Boolean; message 'addCollection:options:';
+    function removeCollection(collectionName: NSString): Boolean; message 'removeCollection:';
+    procedure addFontDescriptors_toCollection(descriptors: NSArray; collectionName: NSString); message 'addFontDescriptors:toCollection:';
+    procedure removeFontDescriptor_fromCollection(descriptor: NSFontDescriptor; collection: NSString); message 'removeFontDescriptor:fromCollection:';
+    function currentFontAction: NSFontAction; message 'currentFontAction';
+    function convertFontTraits(traits: NSFontTraitMask): NSFontTraitMask; message 'convertFontTraits:';
+    procedure setTarget(aTarget: id); message 'setTarget:';
+    function target: id; message 'target';
+
+    { Category: NSFontManagerMenuActionMethods }
+    function fontNamed_hasTraits(fName: NSString; someTraits: NSFontTraitMask): Boolean; message 'fontNamed:hasTraits:';
+    function availableFontNamesWithTraits(someTraits: NSFontTraitMask): NSArray; message 'availableFontNamesWithTraits:';
+    procedure addFontTrait(sender: id); message 'addFontTrait:';
+    procedure removeFontTrait(sender: id); message 'removeFontTrait:';
+    procedure modifyFontViaPanel(sender: id); message 'modifyFontViaPanel:';
+    procedure modifyFont(sender: id); message 'modifyFont:';
+    procedure orderFrontFontPanel(sender: id); message 'orderFrontFontPanel:';
+    procedure orderFrontStylesPanel(sender: id); message 'orderFrontStylesPanel:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSFontPanel.inc b/packages/cocoaint/src/appkit/NSFontPanel.inc
new file mode 100644
index 0000000000..226911e20b
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSFontPanel.inc
@@ -0,0 +1,158 @@
+{ Parsed from Appkit.framework NSFontPanel.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSFONTPANEL_PAS_H}
+{$define NSFONTPANEL_PAS_H}
+type
+  NSFontPanelPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSFONTPANEL_PAS_T}
+{$define NSFONTPANEL_PAS_T}
+
+{ Constants }
+
+const
+  NSFPPreviewButton = 131;
+  NSFPRevertButton = 130;
+  NSFPSetButton = 132;
+  NSFPPreviewField = 128;
+  NSFPSizeField = 129;
+  NSFPSizeTitle = 133;
+  NSFPCurrentField = 134;
+
+const
+  NSFontPanelFaceModeMask = 1  shl  0;
+  NSFontPanelSizeModeMask = 1  shl  1;
+  NSFontPanelCollectionModeMask = 1  shl  2;
+  NSFontPanelUnderlineEffectModeMask = 1 shl 8;
+  NSFontPanelStrikethroughEffectModeMask = 1 shl 9;
+  NSFontPanelTextColorEffectModeMask = 1 shl  10;
+  NSFontPanelDocumentColorEffectModeMask = 1 shl 11;
+  NSFontPanelShadowEffectModeMask = 1 shl 12;
+  NSFontPanelAllEffectsModeMask = $FFF00;
+  NSFontPanelStandardModesMask = $FFFF;
+  NSFontPanelAllModesMask = $FFFFFFFF;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSFONTPANEL_PAS_R}
+{$define NSFONTPANEL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSFONTPANEL_PAS_F}
+{$define NSFONTPANEL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSFONTPANEL_PAS_T}
+{$define NSFONTPANEL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSFontPanel = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSFONTPANEL_PAS_C}
+{$define NSFONTPANEL_PAS_C}
+
+{ NSFontPanel }
+  NSFontPanel = objcclass(NSPanel)
+  private
+    __manager: NSFontManager;
+    __collectionNames: NSArray;
+    __selection: id;
+    __carbonNotification: Pointer;
+    __targetObject: id;
+    __familyList: id;
+    __faceList: id;
+    __sizeList: id;
+    __mainCollectionList: id;
+    __sizeField: id;
+    __sizeSlider: id;
+    __sizeSliderBox: id;
+    __preview: id;
+    __previewCaption: id;
+    __mainSplitView: id;
+    __mmCollectionList: id;
+    __mmFamilyList: id;
+    __mmFaceList: id;
+    __mmSizeList: id;
+    __extrasPopup: id;
+    __searchField: id;
+    __fixedListButton: id;
+    __sliderButton: id;
+    __accessoryView: id;
+    __fpFlags: bitpacked record
+        setFontChange: 0..1;
+        setFontAttributeChange: 0..1;
+        _delRespFamily: 0..1;
+        _delRespFace: 0..1;
+        _delRespSize: 0..1;
+        _delRespColl: 0..1;
+        _collectionDisabled: 0..1;
+        _sizeDisabled: 0..1;
+        _faceDisabled: 0..1;
+        showEffects: 0..1;
+        _uiMode: 0..((1 shl 8)-1);
+        _reserved: 0..((1 shl 14)-1);
+      end;
+    __regularModeBox: id;
+    __miniModeBox: id;
+    __modeBoxSuperview: id;
+    __collectionLabel: id;
+    __sizeLabel: id;
+    __faceLabel: id;
+    __familyLabel: id;
+    __sizeStyleButton: id;
+    __newSizeField: id;
+    __editSizeList: id;
+    __editSizeListBox: id;
+    __editSizeSliderBox: id;
+    __editSizeSliderMaxField: id;
+    __editSizeSliderMinField: id;
+    __sizeEditWindow: id;
+    __availableSizes: id;
+    __addCollectionButton: id;
+    __removeCollectionButton: id;
+    __fontPanelPreviewHeight: CGFloat;
+    __typographyPanel: id;
+    __actionButton: id;
+    __fontEffectsBox: id;
+    __sizeStyle: cint;
+    {$ifndef cpu64}
+    __fpUnused: id;
+    {$endif}
+    
+  public
+    class function alloc: NSFontPanel; message 'alloc';
+
+    class function sharedFontPanel: NSFontPanel; message 'sharedFontPanel';
+    class function sharedFontPanelExists: Boolean; message 'sharedFontPanelExists';
+    function accessoryView: NSView; message 'accessoryView';
+    procedure setAccessoryView(aView: NSView); message 'setAccessoryView:';
+    procedure setPanelFont_isMultiple(fontObj: NSFont; flag: Boolean); message 'setPanelFont:isMultiple:';
+    function panelConvertFont(fontObj: NSFont): NSFont; message 'panelConvertFont:';
+    function worksWhenModal: Boolean; message 'worksWhenModal';
+    function isEnabled: Boolean; message 'isEnabled';
+    procedure setEnabled(flag: Boolean); message 'setEnabled:';
+    procedure reloadDefaultFontFamilies; message 'reloadDefaultFontFamilies';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSForm.inc b/packages/cocoaint/src/appkit/NSForm.inc
new file mode 100644
index 0000000000..c021d19b46
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSForm.inc
@@ -0,0 +1,31 @@
+{ Parsed from Appkit.framework NSForm.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSFORM_PAS_T}
+{$define NSFORM_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSFORM_PAS_R}
+{$define NSFORM_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSFORM_PAS_F}
+{$define NSFORM_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSFORM_PAS_T}
+{$define NSFORM_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSFormCell.inc b/packages/cocoaint/src/appkit/NSFormCell.inc
new file mode 100644
index 0000000000..22b9cd694d
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSFormCell.inc
@@ -0,0 +1,86 @@
+{ Parsed from Appkit.framework NSFormCell.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSFORMCELL_PAS_H}
+{$define NSFORMCELL_PAS_H}
+type
+  NSFormCellPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSFORMCELL_PAS_T}
+{$define NSFORMCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSFORMCELL_PAS_R}
+{$define NSFORMCELL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSFORMCELL_PAS_F}
+{$define NSFORMCELL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSFORMCELL_PAS_T}
+{$define NSFORMCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSFormCell = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSFORMCELL_PAS_C}
+{$define NSFORMCELL_PAS_C}
+
+{ NSFormCell }
+  NSFormCell = objcclass(NSActionCell)
+  private
+    __titleWidth: CGFloat;
+    __titleCell: id;
+    __titleEndPoint: CGFloat;
+    
+  public
+    class function alloc: NSFormCell; message 'alloc';
+
+    function initTextCell(aString: NSString): id; message 'initTextCell:';
+    function titleWidth(aSize: NSSize): CGFloat; message 'titleWidth:';
+    procedure setTitleWidth(width: CGFloat); message 'setTitleWidth:';
+    function title: NSString; message 'title';
+    procedure setTitle(aString: NSString); message 'setTitle:';
+    function titleFont: NSFont; message 'titleFont';
+    procedure setTitleFont(fontObj: NSFont); message 'setTitleFont:';
+    function titleAlignment: NSTextAlignment; message 'titleAlignment';
+    procedure setTitleAlignment(mode: NSTextAlignment); message 'setTitleAlignment:';
+    function isOpaque: Boolean; message 'isOpaque';
+    procedure setPlaceholderString(string_: NSString); message 'setPlaceholderString:';
+    function placeholderString: NSString; message 'placeholderString';
+    procedure setPlaceholderAttributedString(string_: NSAttributedString); message 'setPlaceholderAttributedString:';
+    function placeholderAttributedString: NSAttributedString; message 'placeholderAttributedString';
+    function titleBaseWritingDirection: NSWritingDirection; message 'titleBaseWritingDirection';
+    procedure setTitleBaseWritingDirection(writingDirection: NSWritingDirection); message 'setTitleBaseWritingDirection:';
+
+    { Category: NSKeyboardUI }
+    procedure setTitleWithMnemonic(stringWithAmpersand: NSString); message 'setTitleWithMnemonic:';
+
+    { Category: NSFormCellAttributedStringMethods }
+    function attributedTitle: NSAttributedString; message 'attributedTitle';
+    procedure setAttributedTitle(obj: NSAttributedString); message 'setAttributedTitle:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSGlyphGenerator.inc b/packages/cocoaint/src/appkit/NSGlyphGenerator.inc
new file mode 100644
index 0000000000..c224005b2b
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSGlyphGenerator.inc
@@ -0,0 +1,82 @@
+{ Parsed from Appkit.framework NSGlyphGenerator.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSGLYPHGENERATOR_PAS_H}
+{$define NSGLYPHGENERATOR_PAS_H}
+type
+  NSGlyphGeneratorPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSGLYPHGENERATOR_PAS_T}
+{$define NSGLYPHGENERATOR_PAS_T}
+
+{ Constants }
+
+const
+  NSShowControlGlyphs = 1  shl  0;
+  NSShowInvisibleGlyphs = 1  shl  1;
+  NSWantsBidiLevels = 1  shl  2;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSGLYPHGENERATOR_PAS_R}
+{$define NSGLYPHGENERATOR_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSGLYPHGENERATOR_PAS_F}
+{$define NSGLYPHGENERATOR_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSGLYPHGENERATOR_PAS_T}
+{$define NSGLYPHGENERATOR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSGlyphStorageProtocol = objcprotocol;
+  NSGlyphGenerator = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSGLYPHGENERATOR_PAS_C}
+{$define NSGLYPHGENERATOR_PAS_C}
+
+{ NSGlyphGenerator }
+  NSGlyphGenerator = objcclass(NSObject)
+    
+  public
+    class function alloc: NSGlyphGenerator; message 'alloc';
+
+    procedure generateGlyphsForGlyphStorage_desiredNumberOfCharacters_glyphIndex_characterIndex(glyphStorage: id; nChars: culong; var glyphIndex: culong; var charIndex: culong); message 'generateGlyphsForGlyphStorage:desiredNumberOfCharacters:glyphIndex:characterIndex:';
+    class function sharedGlyphGenerator: id; message 'sharedGlyphGenerator';
+  end; external;
+
+{$endif}
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSGLYPHGENERATOR_PAS_P}
+{$define NSGLYPHGENERATOR_PAS_P}
+  
+{ NSGlyphStorage Protocol }
+  NSGlyphStorageProtocol = objcprotocol
+    procedure insertGlyphs_length_forStartingGlyphAtIndex_characterIndex(var glyphs: NSGlyph; length: culong; glyphIndex: culong; charIndex: culong); message 'insertGlyphs:length:forStartingGlyphAtIndex:characterIndex:';
+    procedure setIntAttribute_value_forGlyphAtIndex(attributeTag: clong; val: clong; glyphIndex: culong); message 'setIntAttribute:value:forGlyphAtIndex:';
+    function attributedString: NSAttributedString; message 'attributedString';
+    function layoutOptions: culong; message 'layoutOptions';
+  end; external name 'NSGlyphStorage';
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSGlyphInfo.inc b/packages/cocoaint/src/appkit/NSGlyphInfo.inc
new file mode 100644
index 0000000000..33185a5b6e
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSGlyphInfo.inc
@@ -0,0 +1,71 @@
+{ Parsed from Appkit.framework NSGlyphInfo.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSGLYPHINFO_PAS_H}
+{$define NSGLYPHINFO_PAS_H}
+type
+  NSGlyphInfoPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSGLYPHINFO_PAS_T}
+{$define NSGLYPHINFO_PAS_T}
+
+{ Types }
+type
+  NSCharacterCollection = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSGLYPHINFO_PAS_R}
+{$define NSGLYPHINFO_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSGLYPHINFO_PAS_F}
+{$define NSGLYPHINFO_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSGLYPHINFO_PAS_T}
+{$define NSGLYPHINFO_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSGlyphInfo = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSGLYPHINFO_PAS_C}
+{$define NSGLYPHINFO_PAS_C}
+
+{ NSGlyphInfo }
+  NSGlyphInfo = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __baseString: NSString;
+    
+  public
+    class function alloc: NSGlyphInfo; message 'alloc';
+
+    class function glyphInfoWithGlyphName_forFont_baseString(glyphName_: NSString; font: NSFont; theString: NSString): NSGlyphInfo; message 'glyphInfoWithGlyphName:forFont:baseString:';
+    class function glyphInfoWithGlyph_forFont_baseString(glyph: NSGlyph; font: NSFont; theString: NSString): NSGlyphInfo; message 'glyphInfoWithGlyph:forFont:baseString:';
+    class function glyphInfoWithCharacterIdentifier_collection_baseString(cid: culong; characterCollection_: NSCharacterCollection; theString: NSString): NSGlyphInfo; message 'glyphInfoWithCharacterIdentifier:collection:baseString:';
+    function glyphName: NSString; message 'glyphName';
+    function characterIdentifier: culong; message 'characterIdentifier';
+    function characterCollection: NSCharacterCollection; message 'characterCollection';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSGradient.inc b/packages/cocoaint/src/appkit/NSGradient.inc
new file mode 100644
index 0000000000..e2a338ff16
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSGradient.inc
@@ -0,0 +1,91 @@
+{ Parsed from Appkit.framework NSGradient.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSGRADIENT_PAS_H}
+{$define NSGRADIENT_PAS_H}
+type
+  NSGradientPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSGRADIENT_PAS_T}
+{$define NSGRADIENT_PAS_T}
+
+{ Types }
+type
+  NSGradientDrawingOptions = culong;
+
+{ Constants }
+
+const
+  NSGradientDrawsBeforeStartingLocation = 1  shl  0;
+  NSGradientDrawsAfterEndingLocation = 1  shl  1;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSGRADIENT_PAS_R}
+{$define NSGRADIENT_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSGRADIENT_PAS_F}
+{$define NSGRADIENT_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSGRADIENT_PAS_T}
+{$define NSGRADIENT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSGradient = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSGRADIENT_PAS_C}
+{$define NSGRADIENT_PAS_C}
+
+{ NSGradient }
+  NSGradient = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __colorArray: NSArray;
+    __colorSpace: NSColorSpace;
+    __functionRef: Pointer; {garbage collector: __strong }
+    __componentArray: Pointer;
+    __reserved1: Pointer;
+    __reserved2: Pointer;
+    __reserved3: Pointer;
+    
+  public
+    class function alloc: NSGradient; message 'alloc';
+
+    function initWithStartingColor_endingColor(startingColor: NSColor; endingColor: NSColor): id; message 'initWithStartingColor:endingColor:';
+    function initWithColors(colorArray: NSArray): id; message 'initWithColors:';
+    function initWithColorsAndLocations(firstColor: NSColor): id; message 'initWithColorsAndLocations:';
+    function initWithColors_atLocations_colorSpace(colorArray: NSArray; var locations: CGFloat; colorSpace_: NSColorSpace): id; message 'initWithColors:atLocations:colorSpace:';
+    procedure drawFromPoint_toPoint_options(startingPoint: NSPoint; endingPoint: NSPoint; options: NSGradientDrawingOptions); message 'drawFromPoint:toPoint:options:';
+    procedure drawInRect_angle(rect: NSRect; angle: CGFloat); message 'drawInRect:angle:';
+    procedure drawInBezierPath_angle(path: NSBezierPath; angle: CGFloat); message 'drawInBezierPath:angle:';
+    procedure drawFromCenter_radius_toCenter_radius_options(startCenter: NSPoint; startRadius: CGFloat; endCenter: NSPoint; endRadius: CGFloat; options: NSGradientDrawingOptions); message 'drawFromCenter:radius:toCenter:radius:options:';
+    procedure drawInRect_relativeCenterPosition(rect: NSRect; relativeCenterPosition: NSPoint); message 'drawInRect:relativeCenterPosition:';
+    procedure drawInBezierPath_relativeCenterPosition(path: NSBezierPath; relativeCenterPosition: NSPoint); message 'drawInBezierPath:relativeCenterPosition:';
+    function colorSpace: NSColorSpace; message 'colorSpace';
+    function numberOfColorStops: clong; message 'numberOfColorStops';
+    procedure getColor_location_atIndex(var color: NSColor; var location: CGFloat; index: clong); message 'getColor:location:atIndex:';
+    function interpolatedColorAtLocation(location: CGFloat): NSColor; message 'interpolatedColorAtLocation:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSGraphics.inc b/packages/cocoaint/src/appkit/NSGraphics.inc
new file mode 100644
index 0000000000..6becd91ae2
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSGraphics.inc
@@ -0,0 +1,151 @@
+{ Parsed from Appkit.framework NSGraphics.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSGRAPHICS_PAS_T}
+{$define NSGRAPHICS_PAS_T}
+
+{ Constants }
+
+const
+  NSCompositeClear = 0;
+  NSCompositeCopy = 1;
+  NSCompositeSourceOver = 2;
+  NSCompositeSourceIn = 3;
+  NSCompositeSourceOut = 4;
+  NSCompositeSourceAtop = 5;
+  NSCompositeDestinationOver = 6;
+  NSCompositeDestinationIn = 7;
+  NSCompositeDestinationOut = 8;
+  NSCompositeDestinationAtop = 9;
+  NSCompositeXOR = 10;
+  NSCompositePlusDarker = 11;
+  NSCompositeHighlight = 12;
+  NSCompositePlusLighter = 13;
+
+const
+  NSBackingStoreRetained = 0;
+  NSBackingStoreNonretained = 1;
+  NSBackingStoreBuffered = 2;
+
+const
+  NSWindowAbove = 1;
+  NSWindowBelow = -1;
+  NSWindowOut = 0;
+
+const
+  NSFocusRingOnly = 0;
+  NSFocusRingBelow = 1;
+  NSFocusRingAbove = 2;
+
+const
+  NSFocusRingTypeDefault = 0;
+  NSFocusRingTypeNone = 1;
+  NSFocusRingTypeExterior = 2;
+
+const
+  NSAnimationEffectDisappearingItemDefault = 0;
+  NSAnimationEffectPoof = 10;
+
+{ Types }
+type
+  NSCompositingOperation = culong;
+  NSBackingStoreType = culong;
+  NSWindowOrderingMode = clong;
+  NSFocusRingPlacement = culong;
+  NSFocusRingType = culong;
+  NSWindowDepth = cint;
+  NSAnimationEffect = culong;
+
+{ CFString constants }
+var
+  NSCalibratedWhiteColorSpace: CFStringRef; external name '_NSCalibratedWhiteColorSpace';
+  NSCalibratedBlackColorSpace: CFStringRef; external name '_NSCalibratedBlackColorSpace';
+  NSCalibratedRGBColorSpace: CFStringRef; external name '_NSCalibratedRGBColorSpace';
+  NSDeviceWhiteColorSpace: CFStringRef; external name '_NSDeviceWhiteColorSpace';
+  NSDeviceBlackColorSpace: CFStringRef; external name '_NSDeviceBlackColorSpace';
+  NSDeviceRGBColorSpace: CFStringRef; external name '_NSDeviceRGBColorSpace';
+  NSDeviceCMYKColorSpace: CFStringRef; external name '_NSDeviceCMYKColorSpace';
+  NSNamedColorSpace: CFStringRef; external name '_NSNamedColorSpace';
+  NSPatternColorSpace: CFStringRef; external name '_NSPatternColorSpace';
+  NSCustomColorSpace: CFStringRef; external name '_NSCustomColorSpace';
+  NSDeviceResolution: CFStringRef; external name '_NSDeviceResolution';
+  NSDeviceColorSpaceName: CFStringRef; external name '_NSDeviceColorSpaceName';
+  NSDeviceBitsPerSample: CFStringRef; external name '_NSDeviceBitsPerSample';
+  NSDeviceIsScreen: CFStringRef; external name '_NSDeviceIsScreen';
+  NSDeviceIsPrinter: CFStringRef; external name '_NSDeviceIsPrinter';
+  NSDeviceSize: CFStringRef; external name '_NSDeviceSize';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSGRAPHICS_PAS_R}
+{$define NSGRAPHICS_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSGRAPHICS_PAS_F}
+{$define NSGRAPHICS_PAS_F}
+
+{ Functions }
+function NSBitsPerSampleFromDepth(depth: NSWindowDepth): clong; cdecl; external name 'NSBitsPerSampleFromDepth';
+function NSBitsPerPixelFromDepth(depth: NSWindowDepth): clong; cdecl; external name 'NSBitsPerPixelFromDepth';
+function NSNumberOfColorComponents(var colorSpaceName: NSString): clong; cdecl; external name 'NSNumberOfColorComponents';
+procedure NSRectFill(aRect: NSRect); cdecl; external name 'NSRectFill';
+procedure NSRectFillList(var rects: NSRect; count: clong); cdecl; external name 'NSRectFillList';
+procedure NSRectFillListWithGrays(var rects: NSRect; var grays: CGFloat; num: clong); cdecl; external name 'NSRectFillListWithGrays';
+procedure NSRectFillListWithColors(var rects: NSRect; colors: Pointer {NSColor}; num: clong); cdecl; external name 'NSRectFillListWithColors';
+procedure NSRectFillUsingOperation(aRect: NSRect; op: NSCompositingOperation); cdecl; external name 'NSRectFillUsingOperation';
+procedure NSRectFillListUsingOperation(var rects: NSRect; count: clong; op: NSCompositingOperation); cdecl; external name 'NSRectFillListUsingOperation';
+procedure NSRectFillListWithColorsUsingOperation(var rects: NSRect; colors: Pointer {NSColor}; num: clong; op: NSCompositingOperation); cdecl; external name 'NSRectFillListWithColorsUsingOperation';
+procedure NSFrameRect(aRect: NSRect); cdecl; external name 'NSFrameRect';
+procedure NSFrameRectWithWidth(aRect: NSRect; frameWidth: CGFloat); cdecl; external name 'NSFrameRectWithWidth';
+procedure NSFrameRectWithWidthUsingOperation(aRect: NSRect; frameWidth: CGFloat; op: NSCompositingOperation); cdecl; external name 'NSFrameRectWithWidthUsingOperation';
+procedure NSRectClip(aRect: NSRect); cdecl; external name 'NSRectClip';
+procedure NSRectClipList(var rects: NSRect; count: clong); cdecl; external name 'NSRectClipList';
+function NSDrawTiledRects(boundsRect: NSRect; clipRect: NSRect; var sides: NSRectEdge; var grays: CGFloat; count: clong): NSRect; cdecl; external name 'NSDrawTiledRects';
+procedure NSDrawGrayBezel(aRect: NSRect; clipRect: NSRect); cdecl; external name 'NSDrawGrayBezel';
+procedure NSDrawGroove(aRect: NSRect; clipRect: NSRect); cdecl; external name 'NSDrawGroove';
+procedure NSDrawWhiteBezel(aRect: NSRect; clipRect: NSRect); cdecl; external name 'NSDrawWhiteBezel';
+procedure NSDrawButton(aRect: NSRect; clipRect: NSRect); cdecl; external name 'NSDrawButton';
+procedure NSEraseRect(aRect: NSRect); cdecl; external name 'NSEraseRect';
+function NSReadPixel(passedPoint: NSPoint): NSColor; cdecl; external name 'NSReadPixel';
+procedure NSDrawBitmap(rect: NSRect; width: clong; height: clong; bps: clong; spp: clong; bpp: clong; bpr: clong; isPlanar: Boolean; hasAlpha: Boolean; var colorSpaceName: NSString; char_: cuint); cdecl; external name 'NSDrawBitmap';
+procedure NSCopyBits(srcGState: clong; srcRect: NSRect; destPoint: NSPoint); cdecl; external name 'NSCopyBits';
+procedure NSHighlightRect(aRect: NSRect); cdecl; external name 'NSHighlightRect';
+procedure NSBeep; cdecl; external name 'NSBeep';
+procedure NSCountWindows(var count: clong); cdecl; external name 'NSCountWindows';
+procedure NSWindowList(size: clong; list: Pointer {array of clong}); cdecl; external name 'NSWindowList';
+procedure NSCountWindowsForContext(context: clong; var count: clong); cdecl; external name 'NSCountWindowsForContext';
+procedure NSWindowListForContext(context: clong; size: clong; list: Pointer {array of clong}); cdecl; external name 'NSWindowListForContext';
+function NSGetWindowServerMemory(context: clong; var virtualMemory: clong; var windowBackingMemory: clong; windowDumpString: Pointer {NSString}): clong; cdecl; external name 'NSGetWindowServerMemory';
+function NSDrawColorTiledRects(boundsRect: NSRect; clipRect: NSRect; var sides: NSRectEdge; colors: Pointer {NSColor}; count: clong): NSRect; cdecl; external name 'NSDrawColorTiledRects';
+procedure NSDrawDarkBezel(aRect: NSRect; clipRect: NSRect); cdecl; external name 'NSDrawDarkBezel';
+procedure NSDrawLightBezel(aRect: NSRect; clipRect: NSRect); cdecl; external name 'NSDrawLightBezel';
+procedure NSDottedFrameRect(aRect: NSRect); cdecl; external name 'NSDottedFrameRect';
+procedure NSDrawWindowBackground(aRect: NSRect); cdecl; external name 'NSDrawWindowBackground';
+procedure NSSetFocusRingStyle(placement: NSFocusRingPlacement); cdecl; external name 'NSSetFocusRingStyle';
+procedure NSDisableScreenUpdates; cdecl; external name 'NSDisableScreenUpdates';
+procedure NSEnableScreenUpdates; cdecl; external name 'NSEnableScreenUpdates';
+procedure NSShowAnimationEffect(animationEffect: NSAnimationEffect; centerLocation: NSPoint; size: NSSize; animationDelegate: id; didEndSelector: SEL; var contextInfo: Pointer); cdecl; external name 'NSShowAnimationEffect';
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSGRAPHICS_PAS_T}
+{$define NSGRAPHICS_PAS_T}
+
+{ External symbols }
+var
+  NSWhite: CGFloat; external name '_NSWhite';
+  NSLightGray: CGFloat; external name '_NSLightGray';
+  NSDarkGray: CGFloat; external name '_NSDarkGray';
+  NSBlack: CGFloat; external name '_NSBlack';
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSGraphicsContext.inc b/packages/cocoaint/src/appkit/NSGraphicsContext.inc
new file mode 100644
index 0000000000..babf154747
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSGraphicsContext.inc
@@ -0,0 +1,106 @@
+{ Parsed from Appkit.framework NSGraphicsContext.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSGRAPHICSCONTEXT_PAS_H}
+{$define NSGRAPHICSCONTEXT_PAS_H}
+type
+  NSGraphicsContextPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSGRAPHICSCONTEXT_PAS_T}
+{$define NSGRAPHICSCONTEXT_PAS_T}
+
+{ CFString constants }
+var
+  NSGraphicsContextDestinationAttributeName: CFStringRef; external name '_NSGraphicsContextDestinationAttributeName';
+  NSGraphicsContextRepresentationFormatAttributeName: CFStringRef; external name '_NSGraphicsContextRepresentationFormatAttributeName';
+  NSGraphicsContextPSFormat: CFStringRef; external name '_NSGraphicsContextPSFormat';
+  NSGraphicsContextPDFFormat: CFStringRef; external name '_NSGraphicsContextPDFFormat';
+
+{ Constants }
+
+const
+  NSImageInterpolationDefault = 0;
+  NSImageInterpolationNone = 1;
+  NSImageInterpolationLow = 2;
+  NSImageInterpolationHigh = 3;
+
+const
+  NSColorRenderingIntentDefault = 0;
+  NSColorRenderingIntentAbsoluteColorimetric = 1;
+  NSColorRenderingIntentRelativeColorimetric = 2;
+  NSColorRenderingIntentPerceptual = 3;
+  NSColorRenderingIntentSaturation = 4;
+
+{ Types }
+type
+  NSImageInterpolation = culong;
+  NSColorRenderingIntent = clong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSGRAPHICSCONTEXT_PAS_R}
+{$define NSGRAPHICSCONTEXT_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSGRAPHICSCONTEXT_PAS_F}
+{$define NSGRAPHICSCONTEXT_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSGRAPHICSCONTEXT_PAS_T}
+{$define NSGRAPHICSCONTEXT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSGraphicsContext = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSGRAPHICSCONTEXT_PAS_C}
+{$define NSGRAPHICSCONTEXT_PAS_C}
+
+{ NSGraphicsContext }
+  NSGraphicsContext = objcclass(NSObject)
+    
+  public
+    class function alloc: NSGraphicsContext; message 'alloc';
+
+    class function graphicsContextWithAttributes(attributes_: NSDictionary): NSGraphicsContext; message 'graphicsContextWithAttributes:';
+    class function graphicsContextWithWindow(window: NSWindow): NSGraphicsContext; message 'graphicsContextWithWindow:';
+    class function graphicsContextWithBitmapImageRep(bitmapRep: NSBitmapImageRep): NSGraphicsContext; message 'graphicsContextWithBitmapImageRep:';
+    class function graphicsContextWithGraphicsPort_flipped(graphicsPort_: Pointer; initialFlippedState: Boolean): NSGraphicsContext; message 'graphicsContextWithGraphicsPort:flipped:';
+    class function currentContext: NSGraphicsContext; message 'currentContext';
+    class procedure setCurrentContext(context: NSGraphicsContext); message 'setCurrentContext:';
+    class function currentContextDrawingToScreen: Boolean; message 'currentContextDrawingToScreen';
+    class procedure saveGraphicsState; message 'saveGraphicsState';
+    class procedure restoreGraphicsState; message 'restoreGraphicsState';
+    class procedure setGraphicsState(gState: clong); message 'setGraphicsState:';
+    function attributes: NSDictionary; message 'attributes';
+    function isDrawingToScreen: Boolean; message 'isDrawingToScreen';
+    procedure flushGraphics; message 'flushGraphics';
+    function focusStack: id; message 'focusStack';
+    procedure setFocusStack(stack: id); message 'setFocusStack:';
+    function graphicsPort: Pointer; message 'graphicsPort';
+    function isFlipped: Boolean; message 'isFlipped';
+
+    { Category: NSQuartzCoreAdditions }
+    function CIContext: CIContext_; message 'CIContext';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSHelpManager.inc b/packages/cocoaint/src/appkit/NSHelpManager.inc
new file mode 100644
index 0000000000..86f9bbb5d0
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSHelpManager.inc
@@ -0,0 +1,81 @@
+{ Parsed from Appkit.framework NSHelpManager.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSHELPMANAGER_PAS_H}
+{$define NSHELPMANAGER_PAS_H}
+type
+  NSHelpManagerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSHELPMANAGER_PAS_T}
+{$define NSHELPMANAGER_PAS_T}
+
+{ CFString constants }
+var
+  NSContextHelpModeDidActivateNotification: CFStringRef; external name '_NSContextHelpModeDidActivateNotification';
+  NSContextHelpModeDidDeactivateNotification: CFStringRef; external name '_NSContextHelpModeDidDeactivateNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSHELPMANAGER_PAS_R}
+{$define NSHELPMANAGER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSHELPMANAGER_PAS_F}
+{$define NSHELPMANAGER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSHELPMANAGER_PAS_T}
+{$define NSHELPMANAGER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSHelpManager = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSHELPMANAGER_PAS_C}
+{$define NSHELPMANAGER_PAS_C}
+
+{ NSHelpManager }
+  NSHelpManager = objcclass(NSObject)
+  private
+    __helpMapTable: NSMapTable;
+    __keyMapTable: NSMapTable;
+    __bundleMapTable: NSMapTable;
+    __helpWindow: NSWindow;
+    __shadowWindow: NSWindow;
+    __evtWindow: NSWindow;
+    __helpBundle: NSBundle;
+    
+  public
+    class function alloc: NSHelpManager; message 'alloc';
+
+    class function sharedHelpManager: NSHelpManager; message 'sharedHelpManager';
+    class procedure setContextHelpModeActive(active: Boolean); message 'setContextHelpModeActive:';
+    class function isContextHelpModeActive: Boolean; message 'isContextHelpModeActive';
+    procedure setContextHelp_forObject(attrString: NSAttributedString; object_: id); message 'setContextHelp:forObject:';
+    procedure removeContextHelpForObject(object_: id); message 'removeContextHelpForObject:';
+    function contextHelpForObject(object_: id): NSAttributedString; message 'contextHelpForObject:';
+    function showContextHelpForObject_locationHint(object_: id; pt: NSPoint): Boolean; message 'showContextHelpForObject:locationHint:';
+    procedure openHelpAnchor_inBook(anchor: NSString; book: NSString); message 'openHelpAnchor:inBook:';
+    procedure findString_inBook(query: NSString; book: NSString); message 'findString:inBook:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSImage.inc b/packages/cocoaint/src/appkit/NSImage.inc
new file mode 100644
index 0000000000..0e968230d1
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSImage.inc
@@ -0,0 +1,170 @@
+{ Parsed from Appkit.framework NSImage.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSIMAGE_PAS_H}
+{$define NSIMAGE_PAS_H}
+type
+  NSImagePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSIMAGE_PAS_T}
+{$define NSIMAGE_PAS_T}
+
+{ Constants }
+
+const
+  NSImageLoadStatusCompleted = 0;
+  NSImageLoadStatusCancelled = 1;
+  NSImageLoadStatusInvalidData = 2;
+  NSImageLoadStatusUnexpectedEOF = 3;
+  NSImageLoadStatusReadError = 4;
+
+{ Types }
+type
+  NSImageLoadStatus = culong;
+  NSImageCacheMode = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSIMAGE_PAS_R}
+{$define NSIMAGE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSIMAGE_PAS_F}
+{$define NSIMAGE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSIMAGE_PAS_T}
+{$define NSIMAGE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSImage = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSIMAGE_PAS_C}
+{$define NSIMAGE_PAS_C}
+
+{ NSImage }
+  NSImage = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __name: NSString;
+    __size: NSSize;
+    __flags: bitpacked record
+        scalable: 0..1;
+        dataRetained: 0..1;
+        uniqueWindow: 0..1;
+        sizeWasExplicitlySet: 0..1;
+        builtIn: 0..1;
+        needsToExpand: 0..1;
+        useEPSOnResolutionMismatch: 0..1;
+        colorMatchPreferred: 0..1;
+        multipleResolutionMatching: 0..1;
+        subImage: 0..1;
+        archiveByName: 0..1;
+        unboundedCacheDepth: 0..1;
+        flipped: 0..1;
+        aliased: 0..1;
+        dirtied: 0..1;
+        cacheMode: 0..((1 shl 2)-1);
+        sampleMode: 0..((1 shl 2)-1);
+        focusedWhilePrinting: 0..1;
+        imageEffectsRequested: 0..1;
+        isTemplate: 0..1;
+        failedToExpand: 0..1;
+        reserved1: 0..((1 shl 9)-1);
+      end;
+    __reps: id;
+    __imageAuxiliary: _NSImageAuxiliary;
+    
+  public
+    class function alloc: NSImage; message 'alloc';
+
+    class function imageNamed(name_: NSString): id; message 'imageNamed:';
+    function initWithSize(aSize: NSSize): id; message 'initWithSize:';
+    function initWithData(data: NSData): id; message 'initWithData:';
+    function initWithContentsOfFile(fileName: NSString): id; message 'initWithContentsOfFile:';
+    function initWithContentsOfURL(url: NSURL): id; message 'initWithContentsOfURL:';
+    function initByReferencingFile(fileName: NSString): id; message 'initByReferencingFile:';
+    function initByReferencingURL(url: NSURL): id; message 'initByReferencingURL:';
+    function initWithIconRef(iconRef: IconRef): id; message 'initWithIconRef:';
+    function initWithPasteboard(pasteboard: NSPasteboard): id; message 'initWithPasteboard:';
+    procedure setSize(aSize: NSSize); message 'setSize:';
+    function size: NSSize; message 'size';
+    function setName(string_: NSString): Boolean; message 'setName:';
+    function name: NSString; message 'name';
+    procedure setScalesWhenResized(flag: Boolean); message 'setScalesWhenResized:';
+    function scalesWhenResized: Boolean; message 'scalesWhenResized';
+    procedure setDataRetained(flag: Boolean); message 'setDataRetained:';
+    function isDataRetained: Boolean; message 'isDataRetained';
+    procedure setCachedSeparately(flag: Boolean); message 'setCachedSeparately:';
+    function isCachedSeparately: Boolean; message 'isCachedSeparately';
+    procedure setCacheDepthMatchesImageDepth(flag: Boolean); message 'setCacheDepthMatchesImageDepth:';
+    function cacheDepthMatchesImageDepth: Boolean; message 'cacheDepthMatchesImageDepth';
+    procedure setBackgroundColor(aColor: NSColor); message 'setBackgroundColor:';
+    function backgroundColor: NSColor; message 'backgroundColor';
+    procedure setUsesEPSOnResolutionMismatch(flag: Boolean); message 'setUsesEPSOnResolutionMismatch:';
+    function usesEPSOnResolutionMismatch: Boolean; message 'usesEPSOnResolutionMismatch';
+    procedure setPrefersColorMatch(flag: Boolean); message 'setPrefersColorMatch:';
+    function prefersColorMatch: Boolean; message 'prefersColorMatch';
+    procedure setMatchesOnMultipleResolution(flag: Boolean); message 'setMatchesOnMultipleResolution:';
+    function matchesOnMultipleResolution: Boolean; message 'matchesOnMultipleResolution';
+    procedure dissolveToPoint_fraction(point: NSPoint; aFloat: CGFloat); message 'dissolveToPoint:fraction:';
+    procedure dissolveToPoint_fromRect_fraction(point: NSPoint; rect: NSRect; aFloat: CGFloat); message 'dissolveToPoint:fromRect:fraction:';
+    procedure compositeToPoint_operation(point: NSPoint; op: NSCompositingOperation); message 'compositeToPoint:operation:';
+    procedure compositeToPoint_fromRect_operation(point: NSPoint; rect: NSRect; op: NSCompositingOperation); message 'compositeToPoint:fromRect:operation:';
+    procedure compositeToPoint_operation_fraction(point: NSPoint; op: NSCompositingOperation; delta: CGFloat); message 'compositeToPoint:operation:fraction:';
+    procedure compositeToPoint_fromRect_operation_fraction(point: NSPoint; rect: NSRect; op: NSCompositingOperation; delta: CGFloat); message 'compositeToPoint:fromRect:operation:fraction:';
+    procedure drawAtPoint_fromRect_operation_fraction(point: NSPoint; fromRect: NSRect; op: NSCompositingOperation; delta: CGFloat); message 'drawAtPoint:fromRect:operation:fraction:';
+    procedure drawInRect_fromRect_operation_fraction(rect: NSRect; fromRect: NSRect; op: NSCompositingOperation; delta: CGFloat); message 'drawInRect:fromRect:operation:fraction:';
+    function drawRepresentation_inRect(imageRep: NSImageRep; rect: NSRect): Boolean; message 'drawRepresentation:inRect:';
+    procedure recache; message 'recache';
+    function TIFFRepresentation: NSData; message 'TIFFRepresentation';
+    function TIFFRepresentationUsingCompression_factor(comp: NSTIFFCompression; aFloat: single): NSData; message 'TIFFRepresentationUsingCompression:factor:';
+    function representations: NSArray; message 'representations';
+    procedure addRepresentations(imageReps: NSArray); message 'addRepresentations:';
+    procedure addRepresentation(imageRep: NSImageRep); message 'addRepresentation:';
+    procedure removeRepresentation(imageRep: NSImageRep); message 'removeRepresentation:';
+    function isValid: Boolean; message 'isValid';
+    procedure lockFocus; message 'lockFocus';
+    procedure lockFocusOnRepresentation(imageRepresentation: NSImageRep); message 'lockFocusOnRepresentation:';
+    procedure unlockFocus; message 'unlockFocus';
+    function bestRepresentationForDevice(deviceDescription: NSDictionary): NSImageRep; message 'bestRepresentationForDevice:';
+    procedure setDelegate(anObject: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
+    class function imageUnfilteredFileTypes: NSArray; message 'imageUnfilteredFileTypes';
+    class function imageUnfilteredPasteboardTypes: NSArray; message 'imageUnfilteredPasteboardTypes';
+    class function imageFileTypes: NSArray; message 'imageFileTypes';
+    class function imagePasteboardTypes: NSArray; message 'imagePasteboardTypes';
+    class function imageTypes: NSArray; message 'imageTypes';
+    class function imageUnfilteredTypes: NSArray; message 'imageUnfilteredTypes';
+    class function canInitWithPasteboard(pasteboard: NSPasteboard): Boolean; message 'canInitWithPasteboard:';
+    procedure setFlipped(flag: Boolean); message 'setFlipped:';
+    function isFlipped: Boolean; message 'isFlipped';
+    procedure cancelIncrementalLoad; message 'cancelIncrementalLoad';
+    procedure setCacheMode(mode: NSImageCacheMode); message 'setCacheMode:';
+    function cacheMode: NSImageCacheMode; message 'cacheMode';
+    function alignmentRect: NSRect; message 'alignmentRect';
+    procedure setAlignmentRect(rect: NSRect); message 'setAlignmentRect:';
+    function isTemplate: Boolean; message 'isTemplate';
+    procedure setTemplate(isTemplate_: Boolean); message 'setTemplate:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSImageCell.inc b/packages/cocoaint/src/appkit/NSImageCell.inc
new file mode 100644
index 0000000000..758c9308f7
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSImageCell.inc
@@ -0,0 +1,101 @@
+{ Parsed from Appkit.framework NSImageCell.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSIMAGECELL_PAS_H}
+{$define NSIMAGECELL_PAS_H}
+type
+  NSImageCellPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSIMAGECELL_PAS_T}
+{$define NSIMAGECELL_PAS_T}
+
+{ Constants }
+
+const
+  NSImageAlignCenter = 0;
+  NSImageAlignTop = 0;
+  NSImageAlignTopLeft = 1;
+  NSImageAlignTopRight = 2;
+  NSImageAlignLeft = 3;
+  NSImageAlignBottom = 4;
+  NSImageAlignBottomLeft = 5;
+  NSImageAlignBottomRight = 6;
+  NSImageAlignRight = 7;
+
+const
+  NSImageFrameNone = 0;
+  NSImageFramePhoto = 0;
+  NSImageFrameGrayBezel = 1;
+  NSImageFrameGroove = 2;
+  NSImageFrameButton = 3;
+
+{ Types }
+type
+  NSImageAlignment = culong;
+  NSImageFrameStyle = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSIMAGECELL_PAS_R}
+{$define NSIMAGECELL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSIMAGECELL_PAS_F}
+{$define NSIMAGECELL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSIMAGECELL_PAS_T}
+{$define NSIMAGECELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSImageCell = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSIMAGECELL_PAS_C}
+{$define NSIMAGECELL_PAS_C}
+
+{ NSImageCell }
+  NSImageCell = objcclass(NSCell, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __controlView: id;
+    __icFlags: bitpacked record
+        _unused: 0..((1 shl 22)-1);
+        _animates: 0..1;
+        _align: 0..((1 shl 4)-1);
+        _scale: 0..((1 shl 2)-1);
+        _style: 0..((1 shl 3)-1);
+      end;
+    __animationState: _NSImageCellAnimationState;
+    __scaledImage: NSImage;
+    
+  public
+    class function alloc: NSImageCell; message 'alloc';
+
+    function imageAlignment: NSImageAlignment; message 'imageAlignment';
+    procedure setImageAlignment(newAlign: NSImageAlignment); message 'setImageAlignment:';
+    function imageScaling: NSImageScaling; message 'imageScaling';
+    procedure setImageScaling(newScaling: NSImageScaling); message 'setImageScaling:';
+    function imageFrameStyle: NSImageFrameStyle; message 'imageFrameStyle';
+    procedure setImageFrameStyle(newStyle: NSImageFrameStyle); message 'setImageFrameStyle:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSImageRep.inc b/packages/cocoaint/src/appkit/NSImageRep.inc
new file mode 100644
index 0000000000..3a71142683
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSImageRep.inc
@@ -0,0 +1,122 @@
+{ Parsed from Appkit.framework NSImageRep.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSIMAGEREP_PAS_H}
+{$define NSIMAGEREP_PAS_H}
+type
+  NSImageRepPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSIMAGEREP_PAS_T}
+{$define NSIMAGEREP_PAS_T}
+
+{ Constants }
+
+const
+  NSImageRepMatchesDevice = 0;
+
+{ CFString constants }
+var
+  NSImageRepRegistryDidChangeNotification: CFStringRef; external name '_NSImageRepRegistryDidChangeNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSIMAGEREP_PAS_R}
+{$define NSIMAGEREP_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSIMAGEREP_PAS_F}
+{$define NSIMAGEREP_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSIMAGEREP_PAS_T}
+{$define NSIMAGEREP_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSImageRep = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSIMAGEREP_PAS_C}
+{$define NSIMAGEREP_PAS_C}
+
+{ NSImageRep }
+  NSImageRep = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __repFlags: bitpacked record
+        hasAlpha: 0..1;
+        isOpaque: 0..1;
+        cacheParamsComputed: 0..1;
+        cacheAlphaComputed: 0..1;
+        loadState: 0..((1 shl 2)-1);
+        keepCacheWindow: 0..1;
+        reserved: 0..1;
+        bitsPerSample: 0..((1 shl 8)-1);
+        gsaved: 0..((1 shl 16)-1);
+      end;
+    __colorSpaceName: NSString;
+    __size: NSSize;
+    __pixelsWide: cint;
+    __pixelsHigh: cint;
+    
+  public
+    class function alloc: NSImageRep; message 'alloc';
+
+    function draw: Boolean; message 'draw';
+    function drawAtPoint(point: NSPoint): Boolean; message 'drawAtPoint:';
+    function drawInRect(rect: NSRect): Boolean; message 'drawInRect:';
+    procedure setSize(aSize: NSSize); message 'setSize:';
+    function size: NSSize; message 'size';
+    procedure setAlpha(flag: Boolean); message 'setAlpha:';
+    function hasAlpha: Boolean; message 'hasAlpha';
+    procedure setOpaque(flag: Boolean); message 'setOpaque:';
+    function isOpaque: Boolean; message 'isOpaque';
+    procedure setColorSpaceName(string_: NSString); message 'setColorSpaceName:';
+    function colorSpaceName: NSString; message 'colorSpaceName';
+    procedure setBitsPerSample(anInt: clong); message 'setBitsPerSample:';
+    function bitsPerSample: clong; message 'bitsPerSample';
+    procedure setPixelsWide(anInt: clong); message 'setPixelsWide:';
+    function pixelsWide: clong; message 'pixelsWide';
+    procedure setPixelsHigh(anInt: clong); message 'setPixelsHigh:';
+    function pixelsHigh: clong; message 'pixelsHigh';
+    class procedure registerImageRepClass(imageRepClass: Pobjc_class); message 'registerImageRepClass:';
+    class procedure unregisterImageRepClass(imageRepClass: Pobjc_class); message 'unregisterImageRepClass:';
+    class function registeredImageRepClasses: NSArray; message 'registeredImageRepClasses';
+    class function imageRepClassForFileType(type_: NSString): Pobjc_class; message 'imageRepClassForFileType:';
+    class function imageRepClassForPasteboardType(type_: NSString): Pobjc_class; message 'imageRepClassForPasteboardType:';
+    class function imageRepClassForType(type_: NSString): Pobjc_class; message 'imageRepClassForType:';
+    class function imageRepClassForData(data: NSData): Pobjc_class; message 'imageRepClassForData:';
+    class function canInitWithData(data: NSData): Boolean; message 'canInitWithData:';
+    class function imageUnfilteredFileTypes: NSArray; message 'imageUnfilteredFileTypes';
+    class function imageUnfilteredPasteboardTypes: NSArray; message 'imageUnfilteredPasteboardTypes';
+    class function imageFileTypes: NSArray; message 'imageFileTypes';
+    class function imagePasteboardTypes: NSArray; message 'imagePasteboardTypes';
+    class function imageUnfilteredTypes: NSArray; message 'imageUnfilteredTypes';
+    class function imageTypes: NSArray; message 'imageTypes';
+    class function canInitWithPasteboard(pasteboard: NSPasteboard): Boolean; message 'canInitWithPasteboard:';
+    class function imageRepsWithContentsOfFile(filename: NSString): NSArray; message 'imageRepsWithContentsOfFile:';
+    class function imageRepWithContentsOfFile(filename: NSString): id; message 'imageRepWithContentsOfFile:';
+    class function imageRepsWithContentsOfURL(url: NSURL): NSArray; message 'imageRepsWithContentsOfURL:';
+    class function imageRepWithContentsOfURL(url: NSURL): id; message 'imageRepWithContentsOfURL:';
+    class function imageRepsWithPasteboard(pasteboard: NSPasteboard): NSArray; message 'imageRepsWithPasteboard:';
+    class function imageRepWithPasteboard(pasteboard: NSPasteboard): id; message 'imageRepWithPasteboard:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSImageView.inc b/packages/cocoaint/src/appkit/NSImageView.inc
new file mode 100644
index 0000000000..4fd03ed2a2
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSImageView.inc
@@ -0,0 +1,84 @@
+{ Parsed from Appkit.framework NSImageView.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSIMAGEVIEW_PAS_H}
+{$define NSIMAGEVIEW_PAS_H}
+type
+  NSImageViewPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSIMAGEVIEW_PAS_T}
+{$define NSIMAGEVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSIMAGEVIEW_PAS_R}
+{$define NSIMAGEVIEW_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSIMAGEVIEW_PAS_F}
+{$define NSIMAGEVIEW_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSIMAGEVIEW_PAS_T}
+{$define NSIMAGEVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSImageView = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSIMAGEVIEW_PAS_C}
+{$define NSIMAGEVIEW_PAS_C}
+
+{ NSImageView }
+  NSImageView = objcclass(NSControl)
+  private
+    __ivFlags: bitpacked record
+        _unused: 0..((1 shl 27)-1);
+        _compatibleScalingAndAlignment: 0..1;
+        _compatibleImage: 0..1;
+        _overridesDrawing: 0..1;
+        _allowsCutCopyPaste: 0..1;
+        _editable: 0..1;
+      end;
+    __target: id;
+    __action: SEL;
+    
+  public
+    class function alloc: NSImageView; message 'alloc';
+
+    function image: NSImage; message 'image';
+    procedure setImage(newImage: NSImage); message 'setImage:';
+    function imageAlignment: NSImageAlignment; message 'imageAlignment';
+    procedure setImageAlignment(newAlign: NSImageAlignment); message 'setImageAlignment:';
+    function imageScaling: NSImageScaling; message 'imageScaling';
+    procedure setImageScaling(newScaling: NSImageScaling); message 'setImageScaling:';
+    function imageFrameStyle: NSImageFrameStyle; message 'imageFrameStyle';
+    procedure setImageFrameStyle(newStyle: NSImageFrameStyle); message 'setImageFrameStyle:';
+    procedure setEditable(yn: Boolean); message 'setEditable:';
+    function isEditable: Boolean; message 'isEditable';
+    procedure setAnimates(flag: Boolean); message 'setAnimates:';
+    function animates: Boolean; message 'animates';
+    function allowsCutCopyPaste: Boolean; message 'allowsCutCopyPaste';
+    procedure setAllowsCutCopyPaste(allow: Boolean); message 'setAllowsCutCopyPaste:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSInputManager.inc b/packages/cocoaint/src/appkit/NSInputManager.inc
new file mode 100644
index 0000000000..8465e11ad3
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSInputManager.inc
@@ -0,0 +1,111 @@
+{ Parsed from Appkit.framework NSInputManager.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSINPUTMANAGER_PAS_H}
+{$define NSINPUTMANAGER_PAS_H}
+type
+  NSInputManagerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSINPUTMANAGER_PAS_T}
+{$define NSINPUTMANAGER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSINPUTMANAGER_PAS_R}
+{$define NSINPUTMANAGER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSINPUTMANAGER_PAS_F}
+{$define NSINPUTMANAGER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSINPUTMANAGER_PAS_T}
+{$define NSINPUTMANAGER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTextInputProtocol = objcprotocol;
+  NSInputManager = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSINPUTMANAGER_PAS_C}
+{$define NSINPUTMANAGER_PAS_C}
+
+{ NSInputManager }
+  NSInputManager = objcclass(NSObject, NSTextInputProtocol)
+  private
+    __currentClient: id;
+    __server: id;
+    __bundleObj: id;
+    __keybindings: id;
+    __trueName: NSString;
+    __connectionName: NSString;
+    __hostName: NSString;
+    __procToExec: NSString;
+    __visibleName: NSString;
+    __bundleName: NSString;
+    __language: NSString;
+    __image: NSImage;
+    __flags: cuint;
+    __keyBindingsName: NSString;
+    __reservedInputManager2: cint;
+    
+  public
+    class function alloc: NSInputManager; message 'alloc';
+
+    class function currentInputManager: NSInputManager; message 'currentInputManager';
+    class procedure cycleToNextInputLanguage(sender: id); message 'cycleToNextInputLanguage:';
+    class procedure cycleToNextInputServerInLanguage(sender: id); message 'cycleToNextInputServerInLanguage:';
+    function initWithName_host(inputServerName: NSString; hostName: NSString): NSInputManager; message 'initWithName:host:';
+    function localizedInputManagerName: NSString; message 'localizedInputManagerName';
+    procedure markedTextAbandoned(cli: id); message 'markedTextAbandoned:';
+    procedure markedTextSelectionChanged_client(newSel: NSRange; cli: id); message 'markedTextSelectionChanged:client:';
+    function wantsToInterpretAllKeystrokes: Boolean; message 'wantsToInterpretAllKeystrokes';
+    function language: NSString; message 'language';
+    function image: NSImage; message 'image';
+    function server: NSInputServer; message 'server';
+    function wantsToHandleMouseEvents: Boolean; message 'wantsToHandleMouseEvents';
+    function handleMouseEvent(theMouseEvent: NSEvent): Boolean; message 'handleMouseEvent:';
+    function wantsToDelayTextChangeNotifications: Boolean; message 'wantsToDelayTextChangeNotifications';
+  end; external;
+
+{$endif}
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSINPUTMANAGER_PAS_P}
+{$define NSINPUTMANAGER_PAS_P}
+  
+{ NSTextInput Protocol }
+  NSTextInputProtocol = objcprotocol
+    procedure insertText(aString: id); message 'insertText:';
+    procedure doCommandBySelector(aSelector: SEL); message 'doCommandBySelector:';
+    procedure setMarkedText_selectedRange(aString: id; selRange: NSRange); message 'setMarkedText:selectedRange:';
+    procedure unmarkText; message 'unmarkText';
+    function hasMarkedText: Boolean; message 'hasMarkedText';
+    function conversationIdentifier: clong; message 'conversationIdentifier';
+    function attributedSubstringFromRange(theRange: NSRange): NSAttributedString; message 'attributedSubstringFromRange:';
+    function markedRange: NSRange; message 'markedRange';
+    function selectedRange: NSRange; message 'selectedRange';
+    function firstRectForCharacterRange(theRange: NSRange): NSRect; message 'firstRectForCharacterRange:';
+    function characterIndexForPoint(thePoint: NSPoint): culong; message 'characterIndexForPoint:';
+    function validAttributesForMarkedText: NSArray; message 'validAttributesForMarkedText';
+  end; external name 'NSTextInput';
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSInputServer.inc b/packages/cocoaint/src/appkit/NSInputServer.inc
new file mode 100644
index 0000000000..ee577efc8a
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSInputServer.inc
@@ -0,0 +1,94 @@
+{ Parsed from Appkit.framework NSInputServer.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSINPUTSERVER_PAS_H}
+{$define NSINPUTSERVER_PAS_H}
+type
+  NSInputServerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSINPUTSERVER_PAS_T}
+{$define NSINPUTSERVER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSINPUTSERVER_PAS_R}
+{$define NSINPUTSERVER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSINPUTSERVER_PAS_F}
+{$define NSINPUTSERVER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSINPUTSERVER_PAS_T}
+{$define NSINPUTSERVER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSInputServiceProviderProtocol = objcprotocol;
+  NSInputServerMouseTrackerProtocol = objcprotocol;
+  NSInputServer = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSINPUTSERVER_PAS_C}
+{$define NSINPUTSERVER_PAS_C}
+
+{ NSInputServer }
+  NSInputServer = objcclass(NSObject, NSInputServiceProviderProtocol, NSInputServerMouseTrackerProtocol)
+  private
+    __name: NSString;
+    __delegate: id;
+    
+  public
+    class function alloc: NSInputServer; message 'alloc';
+  end; external;
+
+{$endif}
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSINPUTSERVER_PAS_P}
+{$define NSINPUTSERVER_PAS_P}
+  
+{ NSInputServiceProvider Protocol }
+  NSInputServiceProviderProtocol = objcprotocol
+    procedure insertText_client(aString: id; sender: id); message 'insertText:client:';
+    procedure doCommandBySelector_client(aSelector: SEL; sender: id); message 'doCommandBySelector:client:';
+    procedure markedTextAbandoned(sender: id); message 'markedTextAbandoned:';
+    procedure markedTextSelectionChanged_client(newSel: NSRange; sender: id); message 'markedTextSelectionChanged:client:';
+    procedure terminate(sender: id); message 'terminate:';
+    function canBeDisabled: Boolean; message 'canBeDisabled';
+    function wantsToInterpretAllKeystrokes: Boolean; message 'wantsToInterpretAllKeystrokes';
+    function wantsToHandleMouseEvents: Boolean; message 'wantsToHandleMouseEvents';
+    function wantsToDelayTextChangeNotifications: Boolean; message 'wantsToDelayTextChangeNotifications';
+    procedure inputClientBecomeActive(sender: id); message 'inputClientBecomeActive:';
+    procedure inputClientResignActive(sender: id); message 'inputClientResignActive:';
+    procedure inputClientEnabled(sender: id); message 'inputClientEnabled:';
+    procedure inputClientDisabled(sender: id); message 'inputClientDisabled:';
+    procedure activeConversationWillChange_fromOldConversation(sender: id; oldConversation: clong); message 'activeConversationWillChange:fromOldConversation:';
+    procedure activeConversationChanged_toNewConversation(sender: id; newConversation: clong); message 'activeConversationChanged:toNewConversation:';
+  end; external name 'NSInputServiceProvider';
+  
+{ NSInputServerMouseTracker Protocol }
+  NSInputServerMouseTrackerProtocol = objcprotocol
+    function mouseDownOnCharacterIndex_atCoordinate_withModifier_client(theIndex: culong; thePoint: NSPoint; theFlags: culong; sender: id): Boolean; message 'mouseDownOnCharacterIndex:atCoordinate:withModifier:client:';
+    function mouseDraggedOnCharacterIndex_atCoordinate_withModifier_client(theIndex: culong; thePoint: NSPoint; theFlags: culong; sender: id): Boolean; message 'mouseDraggedOnCharacterIndex:atCoordinate:withModifier:client:';
+    procedure mouseUpOnCharacterIndex_atCoordinate_withModifier_client(theIndex: culong; thePoint: NSPoint; theFlags: culong; sender: id); message 'mouseUpOnCharacterIndex:atCoordinate:withModifier:client:';
+  end; external name 'NSInputServerMouseTracker';
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSInterfaceStyle.inc b/packages/cocoaint/src/appkit/NSInterfaceStyle.inc
new file mode 100644
index 0000000000..766efb8b9a
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSInterfaceStyle.inc
@@ -0,0 +1,49 @@
+{ Parsed from Appkit.framework NSInterfaceStyle.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSINTERFACESTYLE_PAS_T}
+{$define NSINTERFACESTYLE_PAS_T}
+
+{ Constants }
+
+const
+  NSNextStepInterfaceStyle = 1;
+  NSWindows95InterfaceStyle = 2;
+  NSMacintoshInterfaceStyle = 3;
+
+{ Types }
+type
+  NSInterfaceStyle = culong;
+
+{ CFString constants }
+var
+  NSInterfaceStyleDefault: CFStringRef; external name '_NSInterfaceStyleDefault';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSINTERFACESTYLE_PAS_R}
+{$define NSINTERFACESTYLE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSINTERFACESTYLE_PAS_F}
+{$define NSINTERFACESTYLE_PAS_F}
+
+{ Functions }
+function NSInterfaceStyleForKey(var key: NSString; var responder: NSResponder): NSInterfaceStyle; cdecl; external name 'NSInterfaceStyleForKey';
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSINTERFACESTYLE_PAS_T}
+{$define NSINTERFACESTYLE_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSKeyValueBinding.inc b/packages/cocoaint/src/appkit/NSKeyValueBinding.inc
new file mode 100644
index 0000000000..a1c605df32
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSKeyValueBinding.inc
@@ -0,0 +1,40 @@
+{ Parsed from Appkit.framework NSKeyValueBinding.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSKEYVALUEBINDING_PAS_T}
+{$define NSKEYVALUEBINDING_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSKEYVALUEBINDING_PAS_R}
+{$define NSKEYVALUEBINDING_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSKEYVALUEBINDING_PAS_F}
+{$define NSKEYVALUEBINDING_PAS_F}
+
+{ Functions }
+function NSIsControllerMarker(object_: id): Boolean; cdecl; external name 'NSIsControllerMarker';
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSKEYVALUEBINDING_PAS_T}
+{$define NSKEYVALUEBINDING_PAS_T}
+
+{ External symbols }
+var
+  NSMultipleValuesMarker: id; external name '_NSMultipleValuesMarker';
+  NSNoSelectionMarker: id; external name '_NSNoSelectionMarker';
+  NSNotApplicableMarker: id; external name '_NSNotApplicableMarker';
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSLayoutManager.inc b/packages/cocoaint/src/appkit/NSLayoutManager.inc
new file mode 100644
index 0000000000..b0a09eba2e
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSLayoutManager.inc
@@ -0,0 +1,296 @@
+{ Parsed from Appkit.framework NSLayoutManager.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSLAYOUTMANAGER_PAS_H}
+{$define NSLAYOUTMANAGER_PAS_H}
+type
+  NSLayoutManagerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSLAYOUTMANAGER_PAS_T}
+{$define NSLAYOUTMANAGER_PAS_T}
+
+{ Constants }
+
+const
+  NSGlyphAttributeSoft = 0;
+  NSGlyphAttributeElastic = 1;
+  NSGlyphAttributeBidiLevel = 2;
+  NSGlyphAttributeInscribe = 5;
+
+const
+  NSGlyphInscribeBase = 0;
+  NSGlyphInscribeBelow = 1;
+  NSGlyphInscribeAbove = 2;
+  NSGlyphInscribeOverstrike = 3;
+  NSGlyphInscribeOverBelow = 4;
+
+const
+  NSTypesetterLatestBehavior = -1;
+  NSTypesetterBehavior_10_2 = 2;
+  NSTypesetterBehavior_10_3 = 3;
+  NSTypesetterBehavior_10_4 = 4;
+
+{ Types }
+type
+  NSGlyphInscription = culong;
+  NSTypesetterBehavior = clong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSLAYOUTMANAGER_PAS_R}
+{$define NSLAYOUTMANAGER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSLAYOUTMANAGER_PAS_F}
+{$define NSLAYOUTMANAGER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSLAYOUTMANAGER_PAS_T}
+{$define NSLAYOUTMANAGER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSLayoutManager = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSLAYOUTMANAGER_PAS_C}
+{$define NSLAYOUTMANAGER_PAS_C}
+
+{ NSLayoutManager }
+  NSLayoutManager = objcclass(NSObject, NSCodingProtocol)
+  private
+    __textStorage: NSTextStorage;
+    __glyphGenerator: NSGlyphGenerator;
+    __typesetter: NSTypesetter;
+    __textContainers: NSMutableArray;
+    __containerUsedRects: NSStorage;
+    __glyphs: NSStorage;
+    __containerRuns: NSRunStorage;
+    __fragmentRuns: NSRunStorage;
+    __glyphLocations: NSRunStorage;
+    __glyphRotationRuns: NSRunStorage;
+    __extraLineFragmentRect: NSRect;
+    __extraLineFragmentUsedRect: NSRect;
+    __extraLineFragmentContainer: NSTextContainer;
+    __glyphHoles: NSSortedArray;
+    __layoutHoles: NSSortedArray;
+    __lmFlags: bitpacked record
+        containersAreFull: 0..1;
+        glyphsMightDrawOutsideLines: 0..1;
+        backgroundLayoutEnabled: 0..1;
+        resizingInProgress: 0..1;
+        allowScreenFonts: 0..1;
+        cachedRectArrayInUse: 0..1;
+        displayInvalidationInProgress: 0..1;
+        insertionPointNeedsUpdate: 0..1;
+        layoutManagerInDirtyList: 0..1;
+        usingGlyphCache: 0..1;
+        showInvisibleCharacters: 0..1;
+        showControlCharacters: 0..1;
+        delegateRespondsToDidInvalidate: 0..1;
+        delegateRespondsToDidComplete: 0..1;
+        glyphFormat: 0..((1 shl 2)-1);
+        textStorageRespondsToIsEditing: 0..1;
+        notifyEditedInProgress: 0..1;
+        containersChanged: 0..1;
+        isGeneratingGlyphs: 0..1;
+        hasNonGeneratedGlyphData: 0..1;
+        loggedBGLayoutException: 0..1;
+        isLayoutRequestedFromSubthread: 0..1;
+        defaultAttachmentScaling: 0..((1 shl 2)-1);
+        isInUILayoutMode: 0..1;
+        seenRightToLeft: 0..1;
+        ignoresViewTransformations: 0..1;
+        needToFlushGlyph: 0..1;
+        flipsIfNeeded: 0..1;
+        allowNonContig: 0..1;
+        useNonContig: 0..1;
+      end;
+    __delegate: id;
+    __textViewResizeDisableStack: cushort;
+    __displayInvalidationDisableStack: cushort;
+    __deferredDisplayCharRange: NSRange;
+    __firstTextView: NSTextView;
+    __cachedRectArray: NSRect; {garbage collector: __strong }
+    __cachedRectArrayCapacity: culong;
+    __glyphBuffer: char; {garbage collector: __strong }
+    __glyphBufferSize: culong;
+    __cachedLocationNominalGlyphRange: NSRange;
+    __cachedLocationGlyphIndex: culong;
+    __cachedLocation: NSPoint;
+    __cachedFontCharRange: NSRange;
+    __cachedFont: NSFont;
+    __firstUnlaidGlyphIndex: culong;
+    __firstUnlaidCharIndex: culong;
+    __rulerAccView: NSBox;
+    __rulerAccViewAlignmentButtons: id;
+    __rulerAccViewSpacing: id;
+    __rulerAccViewLeftTabWell: NSTabWell;
+    __rulerAccViewRightTabWell: NSTabWell;
+    __rulerAccViewCenterTabWell: NSTabWell;
+    __rulerAccViewDecimalTabWell: NSTabWell;
+    __rulerAccViewStyles: id;
+    __rulerAccViewLists: id;
+    __newlyFilledGlyphRange: NSRange;
+    __extraData: id;
+    
+  public
+    class function alloc: NSLayoutManager; message 'alloc';
+
+    function init: id; message 'init';
+    function textStorage: NSTextStorage; message 'textStorage';
+    procedure setTextStorage(textStorage_: NSTextStorage); message 'setTextStorage:';
+    function attributedString: NSAttributedString; message 'attributedString';
+    procedure replaceTextStorage(newTextStorage: NSTextStorage); message 'replaceTextStorage:';
+    function glyphGenerator: NSGlyphGenerator; message 'glyphGenerator';
+    procedure setGlyphGenerator(glyphGenerator_: NSGlyphGenerator); message 'setGlyphGenerator:';
+    function typesetter: NSTypesetter; message 'typesetter';
+    procedure setTypesetter(typesetter_: NSTypesetter); message 'setTypesetter:';
+    function delegate: id; message 'delegate';
+    procedure setDelegate(delegate_: id); message 'setDelegate:';
+    function textContainers: NSArray; message 'textContainers';
+    procedure addTextContainer(container: NSTextContainer); message 'addTextContainer:';
+    procedure insertTextContainer_atIndex(container: NSTextContainer; index: culong); message 'insertTextContainer:atIndex:';
+    procedure removeTextContainerAtIndex(index: culong); message 'removeTextContainerAtIndex:';
+    procedure textContainerChangedGeometry(container: NSTextContainer); message 'textContainerChangedGeometry:';
+    procedure textContainerChangedTextView(container: NSTextContainer); message 'textContainerChangedTextView:';
+    procedure setBackgroundLayoutEnabled(flag: Boolean); message 'setBackgroundLayoutEnabled:';
+    function backgroundLayoutEnabled: Boolean; message 'backgroundLayoutEnabled';
+    procedure setUsesScreenFonts(flag: Boolean); message 'setUsesScreenFonts:';
+    function usesScreenFonts: Boolean; message 'usesScreenFonts';
+    procedure setShowsInvisibleCharacters(flag: Boolean); message 'setShowsInvisibleCharacters:';
+    function showsInvisibleCharacters: Boolean; message 'showsInvisibleCharacters';
+    procedure setShowsControlCharacters(flag: Boolean); message 'setShowsControlCharacters:';
+    function showsControlCharacters: Boolean; message 'showsControlCharacters';
+    procedure setHyphenationFactor(factor: single); message 'setHyphenationFactor:';
+    function hyphenationFactor: single; message 'hyphenationFactor';
+    procedure setDefaultAttachmentScaling(scaling: NSImageScaling); message 'setDefaultAttachmentScaling:';
+    function defaultAttachmentScaling: NSImageScaling; message 'defaultAttachmentScaling';
+    procedure setTypesetterBehavior(theBehavior: NSTypesetterBehavior); message 'setTypesetterBehavior:';
+    function typesetterBehavior: NSTypesetterBehavior; message 'typesetterBehavior';
+    function layoutOptions: culong; message 'layoutOptions';
+    procedure setAllowsNonContiguousLayout(flag: Boolean); message 'setAllowsNonContiguousLayout:';
+    function allowsNonContiguousLayout: Boolean; message 'allowsNonContiguousLayout';
+    function hasNonContiguousLayout: Boolean; message 'hasNonContiguousLayout';
+    procedure invalidateGlyphsForCharacterRange_changeInLength_actualCharacterRange(charRange: NSRange; delta: clong; actualCharRange: NSRangePointer); message 'invalidateGlyphsForCharacterRange:changeInLength:actualCharacterRange:';
+    procedure invalidateLayoutForCharacterRange_actualCharacterRange(charRange: NSRange; actualCharRange: NSRangePointer); message 'invalidateLayoutForCharacterRange:actualCharacterRange:';
+    procedure invalidateLayoutForCharacterRange_isSoft_actualCharacterRange(charRange: NSRange; flag: Boolean; actualCharRange: NSRangePointer); message 'invalidateLayoutForCharacterRange:isSoft:actualCharacterRange:';
+    procedure invalidateDisplayForCharacterRange(charRange: NSRange); message 'invalidateDisplayForCharacterRange:';
+    procedure invalidateDisplayForGlyphRange(glyphRange: NSRange); message 'invalidateDisplayForGlyphRange:';
+    procedure textStorage_edited_range_changeInLength_invalidatedRange(str: NSTextStorage; editedMask: culong; newCharRange: NSRange; delta: clong; invalidatedCharRange: NSRange); message 'textStorage:edited:range:changeInLength:invalidatedRange:';
+    procedure ensureGlyphsForCharacterRange(charRange: NSRange); message 'ensureGlyphsForCharacterRange:';
+    procedure ensureGlyphsForGlyphRange(glyphRange: NSRange); message 'ensureGlyphsForGlyphRange:';
+    procedure ensureLayoutForCharacterRange(charRange: NSRange); message 'ensureLayoutForCharacterRange:';
+    procedure ensureLayoutForGlyphRange(glyphRange: NSRange); message 'ensureLayoutForGlyphRange:';
+    procedure ensureLayoutForTextContainer(container: NSTextContainer); message 'ensureLayoutForTextContainer:';
+    procedure ensureLayoutForBoundingRect_inTextContainer(bounds: NSRect; container: NSTextContainer); message 'ensureLayoutForBoundingRect:inTextContainer:';
+    procedure insertGlyphs_length_forStartingGlyphAtIndex_characterIndex(var glyphs: NSGlyph; length: culong; glyphIndex: culong; charIndex: culong); message 'insertGlyphs:length:forStartingGlyphAtIndex:characterIndex:';
+    procedure insertGlyph_atGlyphIndex_characterIndex(glyph: NSGlyph; glyphIndex: culong; charIndex: culong); message 'insertGlyph:atGlyphIndex:characterIndex:';
+    procedure replaceGlyphAtIndex_withGlyph(glyphIndex: culong; newGlyph: NSGlyph); message 'replaceGlyphAtIndex:withGlyph:';
+    procedure deleteGlyphsInRange(glyphRange: NSRange); message 'deleteGlyphsInRange:';
+    procedure setCharacterIndex_forGlyphAtIndex(charIndex: culong; glyphIndex: culong); message 'setCharacterIndex:forGlyphAtIndex:';
+    procedure setIntAttribute_value_forGlyphAtIndex(attributeTag: clong; val: clong; glyphIndex: culong); message 'setIntAttribute:value:forGlyphAtIndex:';
+    procedure invalidateGlyphsOnLayoutInvalidationForGlyphRange(glyphRange: NSRange); message 'invalidateGlyphsOnLayoutInvalidationForGlyphRange:';
+    function numberOfGlyphs: culong; message 'numberOfGlyphs';
+    function glyphAtIndex_isValidIndex(glyphIndex: culong; var isValidIndex: Boolean): NSGlyph; message 'glyphAtIndex:isValidIndex:';
+    function glyphAtIndex(glyphIndex: culong): NSGlyph; message 'glyphAtIndex:';
+    function isValidGlyphIndex(glyphIndex: culong): Boolean; message 'isValidGlyphIndex:';
+    function characterIndexForGlyphAtIndex(glyphIndex: culong): culong; message 'characterIndexForGlyphAtIndex:';
+    function glyphIndexForCharacterAtIndex(charIndex: culong): culong; message 'glyphIndexForCharacterAtIndex:';
+    function intAttribute_forGlyphAtIndex(attributeTag: clong; glyphIndex: culong): clong; message 'intAttribute:forGlyphAtIndex:';
+    function getGlyphsInRange_glyphs_characterIndexes_glyphInscriptions_elasticBits(glyphRange: NSRange; var glyphBuffer: NSGlyph; var charIndexBuffer: culong; var inscribeBuffer: NSGlyphInscription; var elasticBuffer: Boolean): culong; message 'getGlyphsInRange:glyphs:characterIndexes:glyphInscriptions:elasticBits:';
+    function getGlyphsInRange_glyphs_characterIndexes_glyphInscriptions_elasticBits_bidiLevels(glyphRange: NSRange; var glyphBuffer: NSGlyph; var charIndexBuffer: culong; var inscribeBuffer: NSGlyphInscription; var elasticBuffer: Boolean; bidiLevelBuffer: Pointer): culong; message 'getGlyphsInRange:glyphs:characterIndexes:glyphInscriptions:elasticBits:bidiLevels:';
+    function getGlyphs_range(var glyphArray: NSGlyph; glyphRange: NSRange): culong; message 'getGlyphs:range:';
+    procedure setTextContainer_forGlyphRange(container: NSTextContainer; glyphRange: NSRange); message 'setTextContainer:forGlyphRange:';
+    procedure setLineFragmentRect_forGlyphRange_usedRect(fragmentRect: NSRect; glyphRange: NSRange; usedRect: NSRect); message 'setLineFragmentRect:forGlyphRange:usedRect:';
+    procedure setExtraLineFragmentRect_usedRect_textContainer(fragmentRect: NSRect; usedRect: NSRect; container: NSTextContainer); message 'setExtraLineFragmentRect:usedRect:textContainer:';
+    procedure setLocation_forStartOfGlyphRange(location: NSPoint; glyphRange: NSRange); message 'setLocation:forStartOfGlyphRange:';
+    procedure setLocations_startingGlyphIndexes_count_forGlyphRange(locations: NSPointArray; var glyphIndexes: culong; count: culong; glyphRange: NSRange); message 'setLocations:startingGlyphIndexes:count:forGlyphRange:';
+    procedure setNotShownAttribute_forGlyphAtIndex(flag: Boolean; glyphIndex: culong); message 'setNotShownAttribute:forGlyphAtIndex:';
+    procedure setDrawsOutsideLineFragment_forGlyphAtIndex(flag: Boolean; glyphIndex: culong); message 'setDrawsOutsideLineFragment:forGlyphAtIndex:';
+    procedure setAttachmentSize_forGlyphRange(attachmentSize: NSSize; glyphRange: NSRange); message 'setAttachmentSize:forGlyphRange:';
+    procedure getFirstUnlaidCharacterIndex_glyphIndex(var charIndex: culong; var glyphIndex: culong); message 'getFirstUnlaidCharacterIndex:glyphIndex:';
+    function firstUnlaidCharacterIndex: culong; message 'firstUnlaidCharacterIndex';
+    function firstUnlaidGlyphIndex: culong; message 'firstUnlaidGlyphIndex';
+    function textContainerForGlyphAtIndex_effectiveRange(glyphIndex: culong; effectiveGlyphRange: NSRangePointer): NSTextContainer; message 'textContainerForGlyphAtIndex:effectiveRange:';
+    function usedRectForTextContainer(container: NSTextContainer): NSRect; message 'usedRectForTextContainer:';
+    function lineFragmentRectForGlyphAtIndex_effectiveRange(glyphIndex: culong; effectiveGlyphRange: NSRangePointer): NSRect; message 'lineFragmentRectForGlyphAtIndex:effectiveRange:';
+    function lineFragmentUsedRectForGlyphAtIndex_effectiveRange(glyphIndex: culong; effectiveGlyphRange: NSRangePointer): NSRect; message 'lineFragmentUsedRectForGlyphAtIndex:effectiveRange:';
+    function lineFragmentRectForGlyphAtIndex_effectiveRange_withoutAdditionalLayout(glyphIndex: culong; effectiveGlyphRange: NSRangePointer; flag: Boolean): NSRect; message 'lineFragmentRectForGlyphAtIndex:effectiveRange:withoutAdditionalLayout:';
+    function lineFragmentUsedRectForGlyphAtIndex_effectiveRange_withoutAdditionalLayout(glyphIndex: culong; effectiveGlyphRange: NSRangePointer; flag: Boolean): NSRect; message 'lineFragmentUsedRectForGlyphAtIndex:effectiveRange:withoutAdditionalLayout:';
+    function textContainerForGlyphAtIndex_effectiveRange_withoutAdditionalLayout(glyphIndex: culong; effectiveGlyphRange: NSRangePointer; flag: Boolean): NSTextContainer; message 'textContainerForGlyphAtIndex:effectiveRange:withoutAdditionalLayout:';
+    function extraLineFragmentRect: NSRect; message 'extraLineFragmentRect';
+    function extraLineFragmentUsedRect: NSRect; message 'extraLineFragmentUsedRect';
+    function extraLineFragmentTextContainer: NSTextContainer; message 'extraLineFragmentTextContainer';
+    function locationForGlyphAtIndex(glyphIndex: culong): NSPoint; message 'locationForGlyphAtIndex:';
+    function notShownAttributeForGlyphAtIndex(glyphIndex: culong): Boolean; message 'notShownAttributeForGlyphAtIndex:';
+    function drawsOutsideLineFragmentForGlyphAtIndex(glyphIndex: culong): Boolean; message 'drawsOutsideLineFragmentForGlyphAtIndex:';
+    function attachmentSizeForGlyphAtIndex(glyphIndex: culong): NSSize; message 'attachmentSizeForGlyphAtIndex:';
+    procedure setLayoutRect_forTextBlock_glyphRange(rect: NSRect; block: NSTextBlock; glyphRange: NSRange); message 'setLayoutRect:forTextBlock:glyphRange:';
+    procedure setBoundsRect_forTextBlock_glyphRange(rect: NSRect; block: NSTextBlock; glyphRange: NSRange); message 'setBoundsRect:forTextBlock:glyphRange:';
+    function layoutRectForTextBlock_glyphRange(block: NSTextBlock; glyphRange: NSRange): NSRect; message 'layoutRectForTextBlock:glyphRange:';
+    function boundsRectForTextBlock_glyphRange(block: NSTextBlock; glyphRange: NSRange): NSRect; message 'boundsRectForTextBlock:glyphRange:';
+    function layoutRectForTextBlock_atIndex_effectiveRange(block: NSTextBlock; glyphIndex: culong; effectiveGlyphRange: NSRangePointer): NSRect; message 'layoutRectForTextBlock:atIndex:effectiveRange:';
+    function boundsRectForTextBlock_atIndex_effectiveRange(block: NSTextBlock; glyphIndex: culong; effectiveGlyphRange: NSRangePointer): NSRect; message 'boundsRectForTextBlock:atIndex:effectiveRange:';
+    function glyphRangeForCharacterRange_actualCharacterRange(charRange: NSRange; actualCharRange: NSRangePointer): NSRange; message 'glyphRangeForCharacterRange:actualCharacterRange:';
+    function characterRangeForGlyphRange_actualGlyphRange(glyphRange: NSRange; actualGlyphRange: NSRangePointer): NSRange; message 'characterRangeForGlyphRange:actualGlyphRange:';
+    function glyphRangeForTextContainer(container: NSTextContainer): NSRange; message 'glyphRangeForTextContainer:';
+    function rangeOfNominallySpacedGlyphsContainingIndex(glyphIndex: culong): NSRange; message 'rangeOfNominallySpacedGlyphsContainingIndex:';
+    function rectArrayForCharacterRange_withinSelectedCharacterRange_inTextContainer_rectCount(charRange: NSRange; selCharRange: NSRange; container: NSTextContainer; var rectCount: culong): NSRectArray; message 'rectArrayForCharacterRange:withinSelectedCharacterRange:inTextContainer:rectCount:';
+    function rectArrayForGlyphRange_withinSelectedGlyphRange_inTextContainer_rectCount(glyphRange: NSRange; selGlyphRange: NSRange; container: NSTextContainer; var rectCount: culong): NSRectArray; message 'rectArrayForGlyphRange:withinSelectedGlyphRange:inTextContainer:rectCount:';
+    function boundingRectForGlyphRange_inTextContainer(glyphRange: NSRange; container: NSTextContainer): NSRect; message 'boundingRectForGlyphRange:inTextContainer:';
+    function glyphRangeForBoundingRect_inTextContainer(bounds: NSRect; container: NSTextContainer): NSRange; message 'glyphRangeForBoundingRect:inTextContainer:';
+    function glyphRangeForBoundingRectWithoutAdditionalLayout_inTextContainer(bounds: NSRect; container: NSTextContainer): NSRange; message 'glyphRangeForBoundingRectWithoutAdditionalLayout:inTextContainer:';
+    function glyphIndexForPoint_inTextContainer_fractionOfDistanceThroughGlyph(point: NSPoint; container: NSTextContainer; var partialFraction: CGFloat): culong; message 'glyphIndexForPoint:inTextContainer:fractionOfDistanceThroughGlyph:';
+    function glyphIndexForPoint_inTextContainer(point: NSPoint; container: NSTextContainer): culong; message 'glyphIndexForPoint:inTextContainer:';
+    function fractionOfDistanceThroughGlyphForPoint_inTextContainer(point: NSPoint; container: NSTextContainer): CGFloat; message 'fractionOfDistanceThroughGlyphForPoint:inTextContainer:';
+    function getLineFragmentInsertionPointsForCharacterAtIndex_alternatePositions_inDisplayOrder_positions_characterIndexes(charIndex: culong; aFlag: Boolean; dFlag: Boolean; var positions: CGFloat; var charIndexes: culong): culong; message 'getLineFragmentInsertionPointsForCharacterAtIndex:alternatePositions:inDisplayOrder:positions:characterIndexes:';
+    function temporaryAttributesAtCharacterIndex_effectiveRange(charIndex: culong; effectiveCharRange: NSRangePointer): NSDictionary; message 'temporaryAttributesAtCharacterIndex:effectiveRange:';
+    procedure setTemporaryAttributes_forCharacterRange(attrs: NSDictionary; charRange: NSRange); message 'setTemporaryAttributes:forCharacterRange:';
+    procedure addTemporaryAttributes_forCharacterRange(attrs: NSDictionary; charRange: NSRange); message 'addTemporaryAttributes:forCharacterRange:';
+    procedure removeTemporaryAttribute_forCharacterRange(attrName: NSString; charRange: NSRange); message 'removeTemporaryAttribute:forCharacterRange:';
+    function temporaryAttribute_atCharacterIndex_effectiveRange(attrName: NSString; location: culong; range: NSRangePointer): id; message 'temporaryAttribute:atCharacterIndex:effectiveRange:';
+    function temporaryAttribute_atCharacterIndex_longestEffectiveRange_inRange(attrName: NSString; location: culong; range: NSRangePointer; rangeLimit: NSRange): id; message 'temporaryAttribute:atCharacterIndex:longestEffectiveRange:inRange:';
+    function temporaryAttributesAtCharacterIndex_longestEffectiveRange_inRange(location: culong; range: NSRangePointer; rangeLimit: NSRange): NSDictionary; message 'temporaryAttributesAtCharacterIndex:longestEffectiveRange:inRange:';
+    procedure addTemporaryAttribute_value_forCharacterRange(attrName: NSString; value: id; charRange: NSRange); message 'addTemporaryAttribute:value:forCharacterRange:';
+    function substituteFontForFont(originalFont: NSFont): NSFont; message 'substituteFontForFont:';
+    function defaultLineHeightForFont(theFont: NSFont): CGFloat; message 'defaultLineHeightForFont:';
+    function defaultBaselineOffsetForFont(theFont: NSFont): CGFloat; message 'defaultBaselineOffsetForFont:';
+    function usesFontLeading: Boolean; message 'usesFontLeading';
+    procedure setUsesFontLeading(flag: Boolean); message 'setUsesFontLeading:';
+
+    { Category: NSTextViewSupport }
+    function rulerMarkersForTextView_paragraphStyle_ruler(view: NSTextView; style: NSParagraphStyle; ruler: NSRulerView): NSArray; message 'rulerMarkersForTextView:paragraphStyle:ruler:';
+    function rulerAccessoryViewForTextView_paragraphStyle_ruler_enabled(view: NSTextView; style: NSParagraphStyle; ruler: NSRulerView; isEnabled: Boolean): NSView; message 'rulerAccessoryViewForTextView:paragraphStyle:ruler:enabled:';
+    function layoutManagerOwnsFirstResponderInWindow(window: NSWindow): Boolean; message 'layoutManagerOwnsFirstResponderInWindow:';
+    function firstTextView: NSTextView; message 'firstTextView';
+    function textViewForBeginningOfSelection: NSTextView; message 'textViewForBeginningOfSelection';
+    procedure drawBackgroundForGlyphRange_atPoint(glyphsToShow: NSRange; origin: NSPoint); message 'drawBackgroundForGlyphRange:atPoint:';
+    procedure drawGlyphsForGlyphRange_atPoint(glyphsToShow: NSRange; origin: NSPoint); message 'drawGlyphsForGlyphRange:atPoint:';
+    procedure showPackedGlyphs_length_glyphRange_atPoint_font_color_printingAdjustment(glyphs: Pointer; glyphLen: culong; glyphRange: NSRange; point: NSPoint; font: NSFont; color: NSColor; printingAdjustment: NSSize); message 'showPackedGlyphs:length:glyphRange:atPoint:font:color:printingAdjustment:';
+    procedure showAttachmentCell_inRect_characterIndex(cell: NSCell; rect: NSRect; attachmentIndex: culong); message 'showAttachmentCell:inRect:characterIndex:';
+    procedure drawUnderlineForGlyphRange_underlineType_baselineOffset_lineFragmentRect_lineFragmentGlyphRange_containerOrigin(glyphRange: NSRange; underlineVal: clong; baselineOffset: CGFloat; lineRect: NSRect; lineGlyphRange: NSRange; containerOrigin: NSPoint); message 'drawUnderlineForGlyphRange:underlineType:baselineOffset:lineFragmentRect:lineFragmentGlyphRange:containerOrigin:';
+    procedure underlineGlyphRange_underlineType_lineFragmentRect_lineFragmentGlyphRange_containerOrigin(glyphRange: NSRange; underlineVal: clong; lineRect: NSRect; lineGlyphRange: NSRange; containerOrigin: NSPoint); message 'underlineGlyphRange:underlineType:lineFragmentRect:lineFragmentGlyphRange:containerOrigin:';
+    procedure drawStrikethroughForGlyphRange_strikethroughType_baselineOffset_lineFragmentRect_lineFragmentGlyphRange_containerOrigin(glyphRange: NSRange; strikethroughVal: clong; baselineOffset: CGFloat; lineRect: NSRect; lineGlyphRange: NSRange; containerOrigin: NSPoint); message 'drawStrikethroughForGlyphRange:strikethroughType:baselineOffset:lineFragmentRect:lineFragmentGlyphRange:containerOrigin:';
+    procedure strikethroughGlyphRange_strikethroughType_lineFragmentRect_lineFragmentGlyphRange_containerOrigin(glyphRange: NSRange; strikethroughVal: clong; lineRect: NSRect; lineGlyphRange: NSRange; containerOrigin: NSPoint); message 'strikethroughGlyphRange:strikethroughType:lineFragmentRect:lineFragmentGlyphRange:containerOrigin:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSLevelIndicator.inc b/packages/cocoaint/src/appkit/NSLevelIndicator.inc
new file mode 100644
index 0000000000..e424def0f1
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSLevelIndicator.inc
@@ -0,0 +1,75 @@
+{ Parsed from Appkit.framework NSLevelIndicator.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSLEVELINDICATOR_PAS_H}
+{$define NSLEVELINDICATOR_PAS_H}
+type
+  NSLevelIndicatorPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSLEVELINDICATOR_PAS_T}
+{$define NSLEVELINDICATOR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSLEVELINDICATOR_PAS_R}
+{$define NSLEVELINDICATOR_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSLEVELINDICATOR_PAS_F}
+{$define NSLEVELINDICATOR_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSLEVELINDICATOR_PAS_T}
+{$define NSLEVELINDICATOR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSLevelIndicator = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSLEVELINDICATOR_PAS_C}
+{$define NSLEVELINDICATOR_PAS_C}
+
+{ NSLevelIndicator }
+  NSLevelIndicator = objcclass(NSControl)
+    
+  public
+    class function alloc: NSLevelIndicator; message 'alloc';
+
+    function minValue: double; message 'minValue';
+    procedure setMinValue(minValue_: double); message 'setMinValue:';
+    function maxValue: double; message 'maxValue';
+    procedure setMaxValue(maxValue_: double); message 'setMaxValue:';
+    function warningValue: double; message 'warningValue';
+    procedure setWarningValue(warningValue_: double); message 'setWarningValue:';
+    function criticalValue: double; message 'criticalValue';
+    procedure setCriticalValue(criticalValue_: double); message 'setCriticalValue:';
+    function tickMarkPosition: NSTickMarkPosition; message 'tickMarkPosition';
+    procedure setTickMarkPosition(position: NSTickMarkPosition); message 'setTickMarkPosition:';
+    function numberOfTickMarks: clong; message 'numberOfTickMarks';
+    procedure setNumberOfTickMarks(count: clong); message 'setNumberOfTickMarks:';
+    function numberOfMajorTickMarks: clong; message 'numberOfMajorTickMarks';
+    procedure setNumberOfMajorTickMarks(count: clong); message 'setNumberOfMajorTickMarks:';
+    function tickMarkValueAtIndex(index: clong): double; message 'tickMarkValueAtIndex:';
+    function rectOfTickMarkAtIndex(index: clong): NSRect; message 'rectOfTickMarkAtIndex:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSLevelIndicatorCell.inc b/packages/cocoaint/src/appkit/NSLevelIndicatorCell.inc
new file mode 100644
index 0000000000..09c8865f53
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSLevelIndicatorCell.inc
@@ -0,0 +1,110 @@
+{ Parsed from Appkit.framework NSLevelIndicatorCell.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSLEVELINDICATORCELL_PAS_H}
+{$define NSLEVELINDICATORCELL_PAS_H}
+type
+  NSLevelIndicatorCellPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSLEVELINDICATORCELL_PAS_T}
+{$define NSLEVELINDICATORCELL_PAS_T}
+
+{ Constants }
+
+const
+  NSRelevancyLevelIndicatorStyle = 0;
+  NSContinuousCapacityLevelIndicatorStyle = 1;
+  NSDiscreteCapacityLevelIndicatorStyle = 2;
+  NSRatingLevelIndicatorStyle = 3;
+
+{ Types }
+type
+  NSLevelIndicatorStyle = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSLEVELINDICATORCELL_PAS_R}
+{$define NSLEVELINDICATORCELL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSLEVELINDICATORCELL_PAS_F}
+{$define NSLEVELINDICATORCELL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSLEVELINDICATORCELL_PAS_T}
+{$define NSLEVELINDICATORCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSLevelIndicatorCell = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSLEVELINDICATORCELL_PAS_C}
+{$define NSLEVELINDICATORCELL_PAS_C}
+
+{ NSLevelIndicatorCell }
+  NSLevelIndicatorCell = objcclass(NSActionCell)
+  private
+    __value: double;
+    __minValue: double;
+    __maxValue: double;
+    __warningValue: double;
+    __criticalValue: double;
+    __numberOfTickMarks: cint;
+    __numberOfMajorTickMarks: cint;
+    __liFlags: bitpacked record
+        indicatorStyle: 0..((1 shl 4)-1);
+        tickMarkPosition: 0..1;
+        selectable: 0..1;
+        reserved: 0..((1 shl 26)-1);
+      end;
+    __cellFrame: NSRect;
+    __reserved1: cint;
+    __reserved2: cint;
+    __reserved3: cint;
+    __reserved4: cint;
+    
+  public
+    class function alloc: NSLevelIndicatorCell; message 'alloc';
+
+    function initWithLevelIndicatorStyle(levelIndicatorStyle_: NSLevelIndicatorStyle): id; message 'initWithLevelIndicatorStyle:';
+    function levelIndicatorStyle: NSLevelIndicatorStyle; message 'levelIndicatorStyle';
+    procedure setLevelIndicatorStyle(levelIndicatorStyle_: NSLevelIndicatorStyle); message 'setLevelIndicatorStyle:';
+    function minValue: double; message 'minValue';
+    procedure setMinValue(minValue_: double); message 'setMinValue:';
+    function maxValue: double; message 'maxValue';
+    procedure setMaxValue(maxValue_: double); message 'setMaxValue:';
+    function warningValue: double; message 'warningValue';
+    procedure setWarningValue(warningValue_: double); message 'setWarningValue:';
+    function criticalValue: double; message 'criticalValue';
+    procedure setCriticalValue(criticalValue_: double); message 'setCriticalValue:';
+    procedure setTickMarkPosition(position: NSTickMarkPosition); message 'setTickMarkPosition:';
+    function tickMarkPosition: NSTickMarkPosition; message 'tickMarkPosition';
+    procedure setNumberOfTickMarks(count: clong); message 'setNumberOfTickMarks:';
+    function numberOfTickMarks: clong; message 'numberOfTickMarks';
+    procedure setNumberOfMajorTickMarks(count: clong); message 'setNumberOfMajorTickMarks:';
+    function numberOfMajorTickMarks: clong; message 'numberOfMajorTickMarks';
+    function rectOfTickMarkAtIndex(index: clong): NSRect; message 'rectOfTickMarkAtIndex:';
+    function tickMarkValueAtIndex(index: clong): double; message 'tickMarkValueAtIndex:';
+    procedure setImage(image_: NSImage); message 'setImage:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSMatrix.inc b/packages/cocoaint/src/appkit/NSMatrix.inc
new file mode 100644
index 0000000000..cbbf1e1dea
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSMatrix.inc
@@ -0,0 +1,256 @@
+{ Parsed from Appkit.framework NSMatrix.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSMATRIX_PAS_H}
+{$define NSMATRIX_PAS_H}
+type
+  NSMatrixPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSMATRIX_PAS_T}
+{$define NSMATRIX_PAS_T}
+
+{ Callbacks }
+type
+  NSMatrixCompare = function (param1: id; param2: id; param3: Pointer): NSInteger; cdecl;
+
+{ Constants }
+
+const
+  NSRadioModeMatrix = 0;
+  NSHighlightModeMatrix = 1;
+  NSListModeMatrix = 2;
+  NSTrackModeMatrix = 3;
+
+{ Types }
+type
+  NSMatrixMode = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSMATRIX_PAS_R}
+{$define NSMATRIX_PAS_R}
+
+{ Records }
+type
+  __MFlags = record
+{$ifdef fpc_big_endian}
+    highlightMode: cuint;
+    radioMode: cuint;
+    listMode: cuint;
+    allowEmptySel: cuint;
+    autoscroll: cuint;
+    selectionByRect: cuint;
+    drawsCellBackground: cuint;
+    drawsBackground: cuint;
+    autosizeCells: cuint;
+    drawingAncestor: cuint;
+    tabKeyTraversesCells: cuint;
+    tabKeyTraversesCellsExplicitlySet: cuint;
+    allowsIncrementalSearching: cuint;
+    currentlySelectingCell: cuint;
+    onlySetKeyCell: cuint;
+    changingSelectionWithKeyboard: cuint;
+    dontScroll: cuint;
+    refusesFirstResponder: cuint;
+    useSimpleTrackingMode: cuint;
+    checkForSimpleTrackingMode: cuint;
+    liveResizeImageCacheingEnabled: cuint;
+    hasCachedSubclassIsSafeForLiveResize: cuint;
+    subclassIsSafeForLiveResize: cuint;
+    tmpAllowNonVisibleCellsToBecomeFirstResponder: cuint;
+    needsRedrawBeforeFirstLiveResizeCache: cuint;
+    browserOptimizationsEnabled: cuint;
+    reservedMatrix: cuint;
+{$else}
+    reservedMatrix: cuint;
+    browserOptimizationsEnabled: cuint;
+    needsRedrawBeforeFirstLiveResizeCache: cuint;
+    tmpAllowNonVisibleCellsToBecomeFirstResponder: cuint;
+    subclassIsSafeForLiveResize: cuint;
+    hasCachedSubclassIsSafeForLiveResize: cuint;
+    liveResizeImageCacheingEnabled: cuint;
+    checkForSimpleTrackingMode: cuint;
+    useSimpleTrackingMode: cuint;
+    refusesFirstResponder: cuint;
+    dontScroll: cuint;
+    changingSelectionWithKeyboard: cuint;
+    onlySetKeyCell: cuint;
+    currentlySelectingCell: cuint;
+    allowsIncrementalSearching: cuint;
+    tabKeyTraversesCellsExplicitlySet: cuint;
+    tabKeyTraversesCells: cuint;
+    drawingAncestor: cuint;
+    autosizeCells: cuint;
+    drawsBackground: cuint;
+    drawsCellBackground: cuint;
+    selectionByRect: cuint;
+    autoscroll: cuint;
+    allowEmptySel: cuint;
+    listMode: cuint;
+    radioMode: cuint;
+    highlightMode: cuint;
+{$endif}
+  end;
+_MFlags = __MFlags;
+
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSMATRIX_PAS_F}
+{$define NSMATRIX_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSMATRIX_PAS_T}
+{$define NSMATRIX_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSMatrix = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSMATRIX_PAS_C}
+{$define NSMATRIX_PAS_C}
+
+{ NSMatrix }
+  NSMatrix = objcclass(NSControl, NSUserInterfaceValidationsProtocol)
+  private
+    __target: id;
+    __action: SEL;
+    __doubleAction: SEL;
+    __errorAction: SEL;
+    __delegate: id;
+    __selectedCell: id;
+    __selectedRow: clong;
+    __selectedCol: clong;
+    __numRows: clong;
+    __numCols: clong;
+    __cellSize: NSSize;
+    __intercell: NSSize;
+    __font: id;
+    __protoCell: id;
+    __cellClass: id;
+    __backgroundColor: NSColor;
+    __private: id;
+    __cells: NSMutableArray;
+    __mFlags: _MFlags;
+    
+  public
+    class function alloc: NSMatrix; message 'alloc';
+
+    function initWithFrame(frameRect: NSRect): id; message 'initWithFrame:';
+    function initWithFrame_mode_prototype_numberOfRows_numberOfColumns(frameRect: NSRect; aMode: NSMatrixMode; aCell: NSCell; rowsHigh: clong; colsWide: clong): id; message 'initWithFrame:mode:prototype:numberOfRows:numberOfColumns:';
+    function initWithFrame_mode_cellClass_numberOfRows_numberOfColumns(frameRect: NSRect; aMode: NSMatrixMode; factoryId: Pobjc_class; rowsHigh: clong; colsWide: clong): id; message 'initWithFrame:mode:cellClass:numberOfRows:numberOfColumns:';
+    procedure setCellClass(factoryId: Pobjc_class); message 'setCellClass:';
+    function cellClass: Pobjc_class; message 'cellClass';
+    function prototype: id; message 'prototype';
+    procedure setPrototype(aCell: NSCell); message 'setPrototype:';
+    function makeCellAtRow_column(row: clong; col: clong): NSCell; message 'makeCellAtRow:column:';
+    function mode: NSMatrixMode; message 'mode';
+    procedure setMode(aMode: NSMatrixMode); message 'setMode:';
+    procedure setAllowsEmptySelection(flag: Boolean); message 'setAllowsEmptySelection:';
+    function allowsEmptySelection: Boolean; message 'allowsEmptySelection';
+    procedure sendAction_to_forAllCells(aSelector: SEL; anObject: id; flag: Boolean); message 'sendAction:to:forAllCells:';
+    function cells: NSArray; message 'cells';
+    procedure sortUsingSelector(comparator: SEL); message 'sortUsingSelector:';
+    procedure sortUsingFunction_context(compare: NSMatrixCompare; context: Pointer); message 'sortUsingFunction:context:';
+    function selectedCell: id; message 'selectedCell';
+    function selectedCells: NSArray; message 'selectedCells';
+    function selectedRow: clong; message 'selectedRow';
+    function selectedColumn: clong; message 'selectedColumn';
+    procedure setSelectionByRect(flag: Boolean); message 'setSelectionByRect:';
+    function isSelectionByRect: Boolean; message 'isSelectionByRect';
+    procedure setSelectionFrom_to_anchor_highlight(startPos: clong; endPos: clong; anchorPos: clong; lit: Boolean); message 'setSelectionFrom:to:anchor:highlight:';
+    procedure deselectSelectedCell; message 'deselectSelectedCell';
+    procedure deselectAllCells; message 'deselectAllCells';
+    procedure selectCellAtRow_column(row: clong; col: clong); message 'selectCellAtRow:column:';
+    procedure selectAll(sender: id); message 'selectAll:';
+    function selectCellWithTag(anInt: clong): Boolean; message 'selectCellWithTag:';
+    function cellSize: NSSize; message 'cellSize';
+    procedure setCellSize(aSize: NSSize); message 'setCellSize:';
+    function intercellSpacing: NSSize; message 'intercellSpacing';
+    procedure setIntercellSpacing(aSize: NSSize); message 'setIntercellSpacing:';
+    procedure setScrollable(flag: Boolean); message 'setScrollable:';
+    procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
+    function backgroundColor: NSColor; message 'backgroundColor';
+    procedure setCellBackgroundColor(color: NSColor); message 'setCellBackgroundColor:';
+    function cellBackgroundColor: NSColor; message 'cellBackgroundColor';
+    procedure setDrawsCellBackground(flag: Boolean); message 'setDrawsCellBackground:';
+    function drawsCellBackground: Boolean; message 'drawsCellBackground';
+    procedure setDrawsBackground(flag: Boolean); message 'setDrawsBackground:';
+    function drawsBackground: Boolean; message 'drawsBackground';
+    procedure setState_atRow_column(value: clong; row: clong; col: clong); message 'setState:atRow:column:';
+    procedure getNumberOfRows_columns(var rowCount: clong; var colCount: clong); message 'getNumberOfRows:columns:';
+    function numberOfRows: clong; message 'numberOfRows';
+    function numberOfColumns: clong; message 'numberOfColumns';
+    function cellAtRow_column(row: clong; col: clong): id; message 'cellAtRow:column:';
+    function cellFrameAtRow_column(row: clong; col: clong): NSRect; message 'cellFrameAtRow:column:';
+    function getRow_column_ofCell(var row: clong; var col: clong; aCell: NSCell): Boolean; message 'getRow:column:ofCell:';
+    function getRow_column_forPoint(var row: clong; var col: clong; aPoint: NSPoint): Boolean; message 'getRow:column:forPoint:';
+    procedure renewRows_columns(newRows: clong; newCols: clong); message 'renewRows:columns:';
+    procedure putCell_atRow_column(newCell: NSCell; row: clong; col: clong); message 'putCell:atRow:column:';
+    procedure addRow; message 'addRow';
+    procedure addRowWithCells(newCells: NSArray); message 'addRowWithCells:';
+    procedure insertRow(row: clong); message 'insertRow:';
+    procedure insertRow_withCells(row: clong; newCells: NSArray); message 'insertRow:withCells:';
+    procedure removeRow(row: clong); message 'removeRow:';
+    procedure addColumn; message 'addColumn';
+    procedure addColumnWithCells(newCells: NSArray); message 'addColumnWithCells:';
+    procedure insertColumn(column: clong); message 'insertColumn:';
+    procedure insertColumn_withCells(column: clong; newCells: NSArray); message 'insertColumn:withCells:';
+    procedure removeColumn(col: clong); message 'removeColumn:';
+    function cellWithTag(anInt: clong): id; message 'cellWithTag:';
+    function doubleAction: SEL; message 'doubleAction';
+    procedure setDoubleAction(aSelector: SEL); message 'setDoubleAction:';
+    procedure setAutosizesCells(flag: Boolean); message 'setAutosizesCells:';
+    function autosizesCells: Boolean; message 'autosizesCells';
+    procedure sizeToCells; message 'sizeToCells';
+    procedure setValidateSize(flag: Boolean); message 'setValidateSize:';
+    procedure drawCellAtRow_column(row: clong; col: clong); message 'drawCellAtRow:column:';
+    procedure highlightCell_atRow_column(flag: Boolean; row: clong; col: clong); message 'highlightCell:atRow:column:';
+    procedure setAutoscroll(flag: Boolean); message 'setAutoscroll:';
+    function isAutoscroll: Boolean; message 'isAutoscroll';
+    procedure scrollCellToVisibleAtRow_column(row: clong; col: clong); message 'scrollCellToVisibleAtRow:column:';
+    function mouseDownFlags: clong; message 'mouseDownFlags';
+    procedure mouseDown(theEvent: NSEvent); message 'mouseDown:';
+    function performKeyEquivalent(theEvent: NSEvent): Boolean; message 'performKeyEquivalent:';
+    function sendAction: Boolean; message 'sendAction';
+    procedure sendDoubleAction; message 'sendDoubleAction';
+    function delegate: id; message 'delegate';
+    procedure setDelegate(anObject: id); message 'setDelegate:';
+    function textShouldBeginEditing(textObject: NSText): Boolean; message 'textShouldBeginEditing:';
+    function textShouldEndEditing(textObject: NSText): Boolean; message 'textShouldEndEditing:';
+    procedure textDidBeginEditing(notification: NSNotification); message 'textDidBeginEditing:';
+    procedure textDidEndEditing(notification: NSNotification); message 'textDidEndEditing:';
+    procedure textDidChange(notification: NSNotification); message 'textDidChange:';
+    procedure selectText(sender: id); message 'selectText:';
+    function selectTextAtRow_column(row: clong; col: clong): id; message 'selectTextAtRow:column:';
+    function acceptsFirstMouse(theEvent: NSEvent): Boolean; message 'acceptsFirstMouse:';
+    procedure resetCursorRects; message 'resetCursorRects';
+    procedure setToolTip_forCell(toolTipString: NSString; cell_: NSCell); message 'setToolTip:forCell:';
+    function toolTipForCell(cell_: NSCell): NSString; message 'toolTipForCell:';
+
+    { Category: NSKeyboardUI }
+    procedure setTabKeyTraversesCells(flag: Boolean); message 'setTabKeyTraversesCells:';
+    function tabKeyTraversesCells: Boolean; message 'tabKeyTraversesCells';
+    procedure setKeyCell(keyCell_: NSCell); message 'setKeyCell:';
+    function keyCell: id; message 'keyCell';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSMenu.inc b/packages/cocoaint/src/appkit/NSMenu.inc
new file mode 100644
index 0000000000..e3a72dfe37
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSMenu.inc
@@ -0,0 +1,149 @@
+{ Parsed from Appkit.framework NSMenu.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSMENU_PAS_H}
+{$define NSMENU_PAS_H}
+type
+  NSMenuPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSMENU_PAS_T}
+{$define NSMENU_PAS_T}
+
+{ CFString constants }
+var
+  NSMenuWillSendActionNotification: CFStringRef; external name '_NSMenuWillSendActionNotification';
+  NSMenuDidSendActionNotification: CFStringRef; external name '_NSMenuDidSendActionNotification';
+  NSMenuDidAddItemNotification: CFStringRef; external name '_NSMenuDidAddItemNotification';
+  NSMenuDidRemoveItemNotification: CFStringRef; external name '_NSMenuDidRemoveItemNotification';
+  NSMenuDidChangeItemNotification: CFStringRef; external name '_NSMenuDidChangeItemNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSMENU_PAS_R}
+{$define NSMENU_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSMENU_PAS_F}
+{$define NSMENU_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSMENU_PAS_T}
+{$define NSMENU_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSMenu = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSMENU_PAS_C}
+{$define NSMENU_PAS_C}
+
+{ NSMenu }
+  NSMenu = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __supermenu: NSMenu;
+    __title: NSString;
+    __itemArray: id;
+    __menuImpl: id;
+    __mFlags: bitpacked record
+        noAutoenable: 0..1;
+        menuChangedMessagesDisabled: 0..1;
+        needsMenuChangedMessage: 0..1;
+        suppressAutoenable: 0..1;
+        disabled: 0..1;
+        ownedByPopUp: 0..1;
+        delegateNeedsUpdate: 0..1;
+        delegateUpdateItem: 0..1;
+        delegateHasKeyEquiv: 0..1;
+        delegateHasAltKeyEquiv: 0..1;
+        keyEquivalentMapIsDirty: 0..1;
+        excludeMarkColumn: 0..1;
+        isContextualMenu: 0..1;
+        RESERVED: 0..((1 shl 19)-1);
+        
+      end;
+    __name: NSString;
+    
+  public
+    class function alloc: NSMenu; message 'alloc';
+
+    class procedure setMenuZone(var aZone: NSZone); message 'setMenuZone:';
+    class function menuZone: NSZone; message 'menuZone';
+    class procedure popUpContextMenu_withEvent_forView(menu: NSMenu; event: NSEvent; view: NSView); message 'popUpContextMenu:withEvent:forView:';
+    class procedure popUpContextMenu_withEvent_forView_withFont(menu: NSMenu; event: NSEvent; view: NSView; font: NSFont); message 'popUpContextMenu:withEvent:forView:withFont:';
+    class procedure setMenuBarVisible(visible: Boolean); message 'setMenuBarVisible:';
+    class function menuBarVisible: Boolean; message 'menuBarVisible';
+    function initWithTitle(aTitle: NSString): id; message 'initWithTitle:';
+    procedure setTitle(aString: NSString); message 'setTitle:';
+    function title: NSString; message 'title';
+    procedure setSupermenu(supermenu_: NSMenu); message 'setSupermenu:';
+    function supermenu: NSMenu; message 'supermenu';
+    procedure insertItem_atIndex(newItem: NSMenuItem; index: clong); message 'insertItem:atIndex:';
+    procedure addItem(newItem: NSMenuItem); message 'addItem:';
+    function insertItemWithTitle_action_keyEquivalent_atIndex(aString: NSString; aSelector: SEL; charCode: NSString; index: clong): NSMenuItem; message 'insertItemWithTitle:action:keyEquivalent:atIndex:';
+    function addItemWithTitle_action_keyEquivalent(aString: NSString; aSelector: SEL; charCode: NSString): NSMenuItem; message 'addItemWithTitle:action:keyEquivalent:';
+    procedure removeItemAtIndex(index: clong); message 'removeItemAtIndex:';
+    procedure removeItem(item: NSMenuItem); message 'removeItem:';
+    procedure setSubmenu_forItem(aMenu: NSMenu; anItem: NSMenuItem); message 'setSubmenu:forItem:';
+    function itemArray: NSArray; message 'itemArray';
+    function numberOfItems: clong; message 'numberOfItems';
+    function indexOfItem(index: NSMenuItem): clong; message 'indexOfItem:';
+    function indexOfItemWithTitle(aTitle: NSString): clong; message 'indexOfItemWithTitle:';
+    function indexOfItemWithTag(aTag: clong): clong; message 'indexOfItemWithTag:';
+    function indexOfItemWithRepresentedObject(object_: id): clong; message 'indexOfItemWithRepresentedObject:';
+    function indexOfItemWithSubmenu(submenu: NSMenu): clong; message 'indexOfItemWithSubmenu:';
+    function indexOfItemWithTarget_andAction(target: id; actionSelector: SEL): clong; message 'indexOfItemWithTarget:andAction:';
+    function itemAtIndex(index: clong): NSMenuItem; message 'itemAtIndex:';
+    function itemWithTitle(aTitle: NSString): NSMenuItem; message 'itemWithTitle:';
+    function itemWithTag(tag: clong): NSMenuItem; message 'itemWithTag:';
+    procedure setAutoenablesItems(flag: Boolean); message 'setAutoenablesItems:';
+    function autoenablesItems: Boolean; message 'autoenablesItems';
+    function performKeyEquivalent(theEvent: NSEvent): Boolean; message 'performKeyEquivalent:';
+    procedure update; message 'update';
+    procedure setMenuChangedMessagesEnabled(flag: Boolean); message 'setMenuChangedMessagesEnabled:';
+    function menuChangedMessagesEnabled: Boolean; message 'menuChangedMessagesEnabled';
+    procedure itemChanged(item: NSMenuItem); message 'itemChanged:';
+    procedure helpRequested(eventPtr: NSEventPointer); message 'helpRequested:';
+    procedure setMenuRepresentation(menuRep: id); message 'setMenuRepresentation:';
+    function menuRepresentation: id; message 'menuRepresentation';
+    procedure setContextMenuRepresentation(menuRep: id); message 'setContextMenuRepresentation:';
+    function contextMenuRepresentation: id; message 'contextMenuRepresentation';
+    procedure setTearOffMenuRepresentation(menuRep: id); message 'setTearOffMenuRepresentation:';
+    function tearOffMenuRepresentation: id; message 'tearOffMenuRepresentation';
+    function isTornOff: Boolean; message 'isTornOff';
+    function attachedMenu: NSMenu; message 'attachedMenu';
+    function isAttached: Boolean; message 'isAttached';
+    procedure sizeToFit; message 'sizeToFit';
+    function locationForSubmenu(aSubmenu: NSMenu): NSPoint; message 'locationForSubmenu:';
+    procedure performActionForItemAtIndex(index: clong); message 'performActionForItemAtIndex:';
+    procedure setDelegate(anObject: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
+    function menuBarHeight: CGFloat; message 'menuBarHeight';
+    procedure cancelTracking; message 'cancelTracking';
+    function highlightedItem: NSMenuItem; message 'highlightedItem';
+    procedure setShowsStateColumn(showsState: Boolean); message 'setShowsStateColumn:';
+    function showsStateColumn: Boolean; message 'showsStateColumn';
+
+    { Category: NSSubmenuAction }
+    procedure submenuAction(sender: id); message 'submenuAction:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSMenuItem.inc b/packages/cocoaint/src/appkit/NSMenuItem.inc
new file mode 100644
index 0000000000..2e25444c2b
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSMenuItem.inc
@@ -0,0 +1,140 @@
+{ Parsed from Appkit.framework NSMenuItem.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSMENUITEM_PAS_H}
+{$define NSMENUITEM_PAS_H}
+type
+  NSMenuItemPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSMENUITEM_PAS_T}
+{$define NSMENUITEM_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSMENUITEM_PAS_R}
+{$define NSMENUITEM_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSMENUITEM_PAS_F}
+{$define NSMENUITEM_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSMENUITEM_PAS_T}
+{$define NSMENUITEM_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSMenuItem = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSMENUITEM_PAS_C}
+{$define NSMENUITEM_PAS_C}
+
+{ NSMenuItem }
+  NSMenuItem = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol, NSValidatedUserInterfaceItemProtocol)
+  private
+    __menu: NSMenu;
+    __title: NSString;
+    __keyEquivalent: NSString;
+    __keyEquivalentModifierMask: culong;
+    __mnemonicLocation: clong;
+    __state: clong;
+    __image: NSImage;
+    __onStateImage: NSImage;
+    __offStateImage: NSImage;
+    __mixedStateImage: NSImage;
+    __target: id;
+    __action: SEL;
+    __tag: clong;
+    __extraData: id;
+    __miFlags: bitpacked record
+        disabled: 0..1;
+        isSeparator: 0..1;
+        hidden: 0..1;
+        alternate: 0..1;
+        indent: 0..((1 shl 4)-1);
+        changed: 0..((1 shl 16)-1);
+        highlighted: 0..1;
+        limitedView: 0..1;
+        RESERVED: 0..((1 shl 6)-1);
+      end;
+    
+  public
+    class function alloc: NSMenuItem; message 'alloc';
+
+    class procedure setUsesUserKeyEquivalents(flag: Boolean); message 'setUsesUserKeyEquivalents:';
+    class function usesUserKeyEquivalents: Boolean; message 'usesUserKeyEquivalents';
+    class function separatorItem: NSMenuItem; message 'separatorItem';
+    function initWithTitle_action_keyEquivalent(aString: NSString; aSelector: SEL; charCode: NSString): id; message 'initWithTitle:action:keyEquivalent:';
+    procedure setMenu(menu_: NSMenu); message 'setMenu:';
+    function menu: NSMenu; message 'menu';
+    function hasSubmenu: Boolean; message 'hasSubmenu';
+    procedure setSubmenu(submenu_: NSMenu); message 'setSubmenu:';
+    function submenu: NSMenu; message 'submenu';
+    procedure setTitle(aString: NSString); message 'setTitle:';
+    function title: NSString; message 'title';
+    procedure setAttributedTitle(string_: NSAttributedString); message 'setAttributedTitle:';
+    function attributedTitle: NSAttributedString; message 'attributedTitle';
+    function isSeparatorItem: Boolean; message 'isSeparatorItem';
+    procedure setKeyEquivalent(aKeyEquivalent: NSString); message 'setKeyEquivalent:';
+    function keyEquivalent: NSString; message 'keyEquivalent';
+    procedure setKeyEquivalentModifierMask(mask: culong); message 'setKeyEquivalentModifierMask:';
+    function keyEquivalentModifierMask: culong; message 'keyEquivalentModifierMask';
+    function userKeyEquivalent: NSString; message 'userKeyEquivalent';
+    procedure setMnemonicLocation(location: culong); message 'setMnemonicLocation:';
+    function mnemonicLocation: culong; message 'mnemonicLocation';
+    function mnemonic: NSString; message 'mnemonic';
+    procedure setTitleWithMnemonic(stringWithAmpersand: NSString); message 'setTitleWithMnemonic:';
+    procedure setImage(menuImage: NSImage); message 'setImage:';
+    function image: NSImage; message 'image';
+    procedure setState(state_: clong); message 'setState:';
+    function state: clong; message 'state';
+    procedure setOnStateImage(image_: NSImage); message 'setOnStateImage:';
+    function onStateImage: NSImage; message 'onStateImage';
+    procedure setOffStateImage(image_: NSImage); message 'setOffStateImage:';
+    function offStateImage: NSImage; message 'offStateImage';
+    procedure setMixedStateImage(image_: NSImage); message 'setMixedStateImage:';
+    function mixedStateImage: NSImage; message 'mixedStateImage';
+    procedure setEnabled(flag: Boolean); message 'setEnabled:';
+    function isEnabled: Boolean; message 'isEnabled';
+    procedure setAlternate(isAlternate_: Boolean); message 'setAlternate:';
+    function isAlternate: Boolean; message 'isAlternate';
+    procedure setIndentationLevel(indentationLevel_: clong); message 'setIndentationLevel:';
+    function indentationLevel: clong; message 'indentationLevel';
+    procedure setTarget(anObject: id); message 'setTarget:';
+    function target: id; message 'target';
+    procedure setAction(aSelector: SEL); message 'setAction:';
+    function action: SEL; message 'action';
+    procedure setTag(anInt: clong); message 'setTag:';
+    function tag: clong; message 'tag';
+    procedure setRepresentedObject(anObject: id); message 'setRepresentedObject:';
+    function representedObject: id; message 'representedObject';
+    procedure setView(view_: NSView); message 'setView:';
+    function view: NSView; message 'view';
+    function isHighlighted: Boolean; message 'isHighlighted';
+    procedure setHidden(hidden: Boolean); message 'setHidden:';
+    function isHidden: Boolean; message 'isHidden';
+    function isHiddenOrHasHiddenAncestor: Boolean; message 'isHiddenOrHasHiddenAncestor';
+    procedure setToolTip(toolTip_: NSString); message 'setToolTip:';
+    function toolTip: NSString; message 'toolTip';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSMenuItemCell.inc b/packages/cocoaint/src/appkit/NSMenuItemCell.inc
new file mode 100644
index 0000000000..906e81ddf7
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSMenuItemCell.inc
@@ -0,0 +1,96 @@
+{ Parsed from Appkit.framework NSMenuItemCell.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSMENUITEMCELL_PAS_H}
+{$define NSMENUITEMCELL_PAS_H}
+type
+  NSMenuItemCellPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSMENUITEMCELL_PAS_T}
+{$define NSMENUITEMCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSMENUITEMCELL_PAS_R}
+{$define NSMENUITEMCELL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSMENUITEMCELL_PAS_F}
+{$define NSMENUITEMCELL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSMENUITEMCELL_PAS_T}
+{$define NSMENUITEMCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSMenuItemCell = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSMENUITEMCELL_PAS_C}
+{$define NSMENUITEMCELL_PAS_C}
+
+{ NSMenuItemCell }
+  NSMenuItemCell = objcclass(NSButtonCell)
+  private
+    __extraData: id;
+    __stateImageSize: NSSize;
+    __imageSize: NSSize;
+    __titleSize: NSSize;
+    __keyEquivalentSize: NSSize;
+    __size: NSSize;
+    __micFlags: bitpacked record
+        needsSizing: 0..1;
+        reserved: 0..1;
+        needsDisplay: 0..1;
+        keyEquivGlyphWidth: 0..((1 shl 16)-1);
+        RESERVED_: 0..((1 shl 13)-1);
+      end;
+    
+  public
+    class function alloc: NSMenuItemCell; message 'alloc';
+
+    procedure setMenuItem(item: NSMenuItem); message 'setMenuItem:';
+    function menuItem: NSMenuItem; message 'menuItem';
+    procedure setMenuView(menuView_: NSMenuView); message 'setMenuView:';
+    function menuView: NSMenuView; message 'menuView';
+    procedure setNeedsSizing(flag: Boolean); message 'setNeedsSizing:';
+    function needsSizing: Boolean; message 'needsSizing';
+    procedure calcSize; message 'calcSize';
+    procedure setNeedsDisplay_(flag: Boolean); message 'setNeedsDisplay:';
+    function needsDisplay: Boolean; message 'needsDisplay';
+    function stateImageWidth: CGFloat; message 'stateImageWidth';
+    function imageWidth: CGFloat; message 'imageWidth';
+    function titleWidth: CGFloat; message 'titleWidth';
+    function keyEquivalentWidth: CGFloat; message 'keyEquivalentWidth';
+    function stateImageRectForBounds(cellFrame: NSRect): NSRect; message 'stateImageRectForBounds:';
+    function titleRectForBounds(cellFrame: NSRect): NSRect; message 'titleRectForBounds:';
+    function keyEquivalentRectForBounds(cellFrame: NSRect): NSRect; message 'keyEquivalentRectForBounds:';
+    procedure drawSeparatorItemWithFrame_inView(cellFrame: NSRect; controlView_: NSView); message 'drawSeparatorItemWithFrame:inView:';
+    procedure drawStateImageWithFrame_inView(cellFrame: NSRect; controlView_: NSView); message 'drawStateImageWithFrame:inView:';
+    procedure drawImageWithFrame_inView(cellFrame: NSRect; controlView_: NSView); message 'drawImageWithFrame:inView:';
+    procedure drawTitleWithFrame_inView(cellFrame: NSRect; controlView_: NSView); message 'drawTitleWithFrame:inView:';
+    procedure drawKeyEquivalentWithFrame_inView(cellFrame: NSRect; controlView_: NSView); message 'drawKeyEquivalentWithFrame:inView:';
+    procedure drawBorderAndBackgroundWithFrame_inView(cellFrame: NSRect; controlView_: NSView); message 'drawBorderAndBackgroundWithFrame:inView:';
+    function tag: clong; message 'tag';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSMenuView.inc b/packages/cocoaint/src/appkit/NSMenuView.inc
new file mode 100644
index 0000000000..c6a0a4efcc
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSMenuView.inc
@@ -0,0 +1,134 @@
+{ Parsed from Appkit.framework NSMenuView.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSMENUVIEW_PAS_H}
+{$define NSMENUVIEW_PAS_H}
+type
+  NSMenuViewPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSMENUVIEW_PAS_T}
+{$define NSMENUVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSMENUVIEW_PAS_R}
+{$define NSMENUVIEW_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSMENUVIEW_PAS_F}
+{$define NSMENUVIEW_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSMENUVIEW_PAS_T}
+{$define NSMENUVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSMenuView = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSMENUVIEW_PAS_C}
+{$define NSMENUVIEW_PAS_C}
+
+{ NSMenuView }
+  NSMenuView = objcclass(NSView)
+  private
+    __menu: NSMenu;
+    __cells: NSMutableArray;
+    __stateImageWidth: CGFloat;
+    __imageAndTitleWidth: CGFloat;
+    __keyEquivalentWidth: CGFloat;
+    __extents: CGFloat;
+    __extentsCapacity: cuint;
+    __highlightedItemIndex: cint;
+    __submenuPopupTimer: Pointer;
+    __attachedMenuView: NSMenuView;
+    __scrollArrowHeight: CGFloat;
+    __maxWinHeight: CGFloat;
+    __font: NSFont;
+    __minSize: NSSize;
+    __horizontalEdgePad: CGFloat;
+    _trackingState: Pointer;
+    __scrollingView: id;
+    __mvFlags: bitpacked record
+        needsSizing: 0..1;
+        releasingWindow: 0..1;
+        isHorizontal: 0..1;
+        disableSizing: 0..1;
+        attachedSubmenuWhileMouseWasUp: 0..1;
+        needsToCreateCells: 0..1;
+        allowsTearOffs: 0..1;
+        isTearOff: 0..1;
+        keyEquivGlyphWidth: 0..((1 shl 16)-1);
+        disableResize: 0..1;
+        savedHODState: 0..1;
+        drawCenter: 0..1;
+        RESERVED: 0..((1 shl 5)-1);
+      end;
+    
+  public
+    class function alloc: NSMenuView; message 'alloc';
+
+    class function menuBarHeight: CGFloat; message 'menuBarHeight';
+    function initWithFrame(frame_: NSRect): id; message 'initWithFrame:';
+    function initAsTearOff: id; message 'initAsTearOff';
+    procedure setMenu(menu_: NSMenu); message 'setMenu:';
+    function menu: NSMenu; message 'menu';
+    procedure itemChanged(notification: NSNotification); message 'itemChanged:';
+    procedure itemAdded(notification: NSNotification); message 'itemAdded:';
+    procedure itemRemoved(notification: NSNotification); message 'itemRemoved:';
+    procedure update; message 'update';
+    procedure setHorizontal(flag: Boolean); message 'setHorizontal:';
+    function isHorizontal: Boolean; message 'isHorizontal';
+    procedure setFont(font_: NSFont); message 'setFont:';
+    function font: NSFont; message 'font';
+    function innerRect: NSRect; message 'innerRect';
+    function rectOfItemAtIndex(index: clong): NSRect; message 'rectOfItemAtIndex:';
+    function indexOfItemAtPoint(point: NSPoint): clong; message 'indexOfItemAtPoint:';
+    procedure setNeedsDisplayForItemAtIndex(index: clong); message 'setNeedsDisplayForItemAtIndex:';
+    procedure setHighlightedItemIndex(index: clong); message 'setHighlightedItemIndex:';
+    function highlightedItemIndex: clong; message 'highlightedItemIndex';
+    function stateImageOffset: CGFloat; message 'stateImageOffset';
+    function stateImageWidth: CGFloat; message 'stateImageWidth';
+    function imageAndTitleOffset: CGFloat; message 'imageAndTitleOffset';
+    function imageAndTitleWidth: CGFloat; message 'imageAndTitleWidth';
+    function keyEquivalentOffset: CGFloat; message 'keyEquivalentOffset';
+    function keyEquivalentWidth: CGFloat; message 'keyEquivalentWidth';
+    procedure setMenuItemCell_forItemAtIndex(cell: NSMenuItemCell; index: clong); message 'setMenuItemCell:forItemAtIndex:';
+    function menuItemCellForItemAtIndex(index: clong): NSMenuItemCell; message 'menuItemCellForItemAtIndex:';
+    function attachedMenuView: NSMenuView; message 'attachedMenuView';
+    procedure setNeedsSizing(flag: Boolean); message 'setNeedsSizing:';
+    function needsSizing: Boolean; message 'needsSizing';
+    procedure sizeToFit; message 'sizeToFit';
+    function attachedMenu: NSMenu; message 'attachedMenu';
+    function isAttached: Boolean; message 'isAttached';
+    function isTornOff: Boolean; message 'isTornOff';
+    function locationForSubmenu(aSubmenu: NSMenu): NSPoint; message 'locationForSubmenu:';
+    procedure setWindowFrameForAttachingToRect_onScreen_preferredEdge_popUpSelectedItem(screenRect: NSRect; screen: NSScreen; edge: NSRectEdge; selectedItemIndex: clong); message 'setWindowFrameForAttachingToRect:onScreen:preferredEdge:popUpSelectedItem:';
+    procedure detachSubmenu; message 'detachSubmenu';
+    procedure attachSubmenuForItemAtIndex(index: clong); message 'attachSubmenuForItemAtIndex:';
+    procedure performActionWithHighlightingForItemAtIndex(index: clong); message 'performActionWithHighlightingForItemAtIndex:';
+    function trackWithEvent(event: NSEvent): Boolean; message 'trackWithEvent:';
+    function horizontalEdgePadding: CGFloat; message 'horizontalEdgePadding';
+    procedure setHorizontalEdgePadding(pad: CGFloat); message 'setHorizontalEdgePadding:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSMovie.inc b/packages/cocoaint/src/appkit/NSMovie.inc
new file mode 100644
index 0000000000..a42dacc1e1
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSMovie.inc
@@ -0,0 +1,76 @@
+{ Parsed from Appkit.framework NSMovie.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSMOVIE_PAS_H}
+{$define NSMOVIE_PAS_H}
+type
+  NSMoviePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSMOVIE_PAS_T}
+{$define NSMOVIE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSMOVIE_PAS_R}
+{$define NSMOVIE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSMOVIE_PAS_F}
+{$define NSMOVIE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSMOVIE_PAS_T}
+{$define NSMOVIE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSMovie = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSMOVIE_PAS_C}
+{$define NSMOVIE_PAS_C}
+
+{ NSMovie }
+  NSMovie = objcclass(NSObject, NSCodingProtocol)
+  private
+    __movie: Pointer;
+    __url: NSURL;
+    __movieFlags: bitpacked record
+        dispose_: 0..1;
+        reserved: 0..((1 shl 31)-1);
+      end;
+    __reserved1: clong;
+    __reserved2: clong;
+    
+  public
+    class function alloc: NSMovie; message 'alloc';
+
+    function initWithMovie(movie: Pointer): id; message 'initWithMovie:';
+    function initWithURL_byReference(URL_: NSURL; byRef: Boolean): id; message 'initWithURL:byReference:';
+    function initWithPasteboard(pasteboard: NSPasteboard): id; message 'initWithPasteboard:';
+    function QTMovie: Pointer; message 'QTMovie';
+    function URL: NSURL; message 'URL';
+    class function movieUnfilteredFileTypes: NSArray; message 'movieUnfilteredFileTypes';
+    class function movieUnfilteredPasteboardTypes: NSArray; message 'movieUnfilteredPasteboardTypes';
+    class function canInitWithPasteboard(pasteboard: NSPasteboard): Boolean; message 'canInitWithPasteboard:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSMovieView.inc b/packages/cocoaint/src/appkit/NSMovieView.inc
new file mode 100644
index 0000000000..d77f570540
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSMovieView.inc
@@ -0,0 +1,128 @@
+{ Parsed from Appkit.framework NSMovieView.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSMOVIEVIEW_PAS_H}
+{$define NSMOVIEVIEW_PAS_H}
+type
+  NSMovieViewPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSMOVIEVIEW_PAS_T}
+{$define NSMOVIEVIEW_PAS_T}
+
+{ Constants }
+
+const
+  NSQTMovieNormalPlayback = 0;
+  NSQTMovieLoopingPlayback = 1;
+  NSQTMovieLoopingBackAndForthPlayback = 2;
+
+{ Types }
+type
+  NSQTMovieLoopMode = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSMOVIEVIEW_PAS_R}
+{$define NSMOVIEVIEW_PAS_R}
+
+{ Records }
+type
+  __MVFlags = record
+    editable: cuint;
+    loopMode: NSQTMovieLoopMode;
+    playsEveryFrame: cuint;
+    playsSelectionOnly: cuint;
+    controllerVisible: cuint;
+    reserved: cuint;
+  end;
+_MVFlags = __MVFlags;
+
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSMOVIEVIEW_PAS_F}
+{$define NSMOVIEVIEW_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSMOVIEVIEW_PAS_T}
+{$define NSMOVIEVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSMovieView = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSMOVIEVIEW_PAS_C}
+{$define NSMOVIEVIEW_PAS_C}
+
+{ NSMovieView }
+  NSMovieView = objcclass(NSView, NSUserInterfaceValidationsProtocol)
+  private
+    __fMovie: NSMovie;
+    __fRate: single;
+    __fVolume: single;
+    __fFlags: _MVFlags;
+    __fAuxData: Pointer;
+    __fReserved1: culong;
+    __fReserved2: culong;
+    __fReserved3: culong;
+    
+  public
+    class function alloc: NSMovieView; message 'alloc';
+
+    procedure setMovie(movie_: NSMovie); message 'setMovie:';
+    function movie: NSMovie; message 'movie';
+    function movieController: Pointer; message 'movieController';
+    function movieRect: NSRect; message 'movieRect';
+    procedure start(sender: id); message 'start:';
+    procedure stop(sender: id); message 'stop:';
+    function isPlaying: Boolean; message 'isPlaying';
+    procedure gotoPosterFrame(sender: id); message 'gotoPosterFrame:';
+    procedure gotoBeginning(sender: id); message 'gotoBeginning:';
+    procedure gotoEnd(sender: id); message 'gotoEnd:';
+    procedure stepForward(sender: id); message 'stepForward:';
+    procedure stepBack(sender: id); message 'stepBack:';
+    procedure setRate(rate_: single); message 'setRate:';
+    function rate: single; message 'rate';
+    procedure setVolume(volume_: single); message 'setVolume:';
+    function volume: single; message 'volume';
+    procedure setMuted(mute: Boolean); message 'setMuted:';
+    function isMuted: Boolean; message 'isMuted';
+    procedure setLoopMode(mode: NSQTMovieLoopMode); message 'setLoopMode:';
+    function loopMode: NSQTMovieLoopMode; message 'loopMode';
+    procedure setPlaysSelectionOnly(flag: Boolean); message 'setPlaysSelectionOnly:';
+    function playsSelectionOnly: Boolean; message 'playsSelectionOnly';
+    procedure setPlaysEveryFrame(flag: Boolean); message 'setPlaysEveryFrame:';
+    function playsEveryFrame: Boolean; message 'playsEveryFrame';
+    procedure showController_adjustingSize(show: Boolean; adjustSize: Boolean); message 'showController:adjustingSize:';
+    function isControllerVisible: Boolean; message 'isControllerVisible';
+    procedure resizeWithMagnification(magnification: CGFloat); message 'resizeWithMagnification:';
+    function sizeForMagnification(magnification: CGFloat): NSSize; message 'sizeForMagnification:';
+    procedure setEditable(editable: Boolean); message 'setEditable:';
+    function isEditable: Boolean; message 'isEditable';
+    procedure cut(sender: id); message 'cut:';
+    procedure copy_(sender: id); message 'copy:';
+    procedure paste(sender: id); message 'paste:';
+    procedure delete(sender: id); message 'delete:';
+    procedure selectAll(sender: id); message 'selectAll:';
+    procedure clear(sender: id); message 'clear:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSMoview.inc b/packages/cocoaint/src/appkit/NSMoview.inc
new file mode 100644
index 0000000000..c40a19f750
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSMoview.inc
@@ -0,0 +1,31 @@
+{ Parsed from Appkit.framework NSMoview.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Mon Sep 7 17:27:43 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSMOVIEW_PAS_T}
+{$define NSMOVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSMOVIEW_PAS_R}
+{$define NSMOVIEW_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSMOVIEW_PAS_F}
+{$define NSMOVIEW_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSMOVIEW_PAS_T}
+{$define NSMOVIEW_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSNib.inc b/packages/cocoaint/src/appkit/NSNib.inc
new file mode 100644
index 0000000000..21f6a3b392
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSNib.inc
@@ -0,0 +1,79 @@
+{ Parsed from Appkit.framework NSNib.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSNIB_PAS_H}
+{$define NSNIB_PAS_H}
+type
+  NSNibPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSNIB_PAS_T}
+{$define NSNIB_PAS_T}
+
+{ CFString constants }
+var
+  NSNibOwner: CFStringRef; external name '_NSNibOwner';
+  NSNibTopLevelObjects: CFStringRef; external name '_NSNibTopLevelObjects';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSNIB_PAS_R}
+{$define NSNIB_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSNIB_PAS_F}
+{$define NSNIB_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSNIB_PAS_T}
+{$define NSNIB_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSNib = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSNIB_PAS_C}
+{$define NSNIB_PAS_C}
+
+{ NSNib }
+  NSNib = objcclass(NSObject, NSCodingProtocol)
+  private
+    __data: NSData;
+    __images: NSArray;
+    __sounds: NSArray;
+    __bundle: NSBundle;
+    __flags: bitpacked record
+        _isKeyed: 0..1;
+        _reserved: 0..((1 shl 31)-1);
+      end;
+    _reserved1: id;
+    _reserved2: id;
+    
+  public
+    class function alloc: NSNib; message 'alloc';
+
+    function initWithContentsOfURL(nibFileURL: NSURL): id; message 'initWithContentsOfURL:';
+    function initWithNibNamed_bundle(nibName: NSString; bundle: NSBundle): id; message 'initWithNibNamed:bundle:';
+    function instantiateNibWithExternalNameTable(externalNameTable: NSDictionary): Boolean; message 'instantiateNibWithExternalNameTable:';
+    function instantiateNibWithOwner_topLevelObjects(owner: id; var topLevelObjects: NSArray): Boolean; message 'instantiateNibWithOwner:topLevelObjects:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSNibLoading.inc b/packages/cocoaint/src/appkit/NSNibLoading.inc
new file mode 100644
index 0000000000..9d2e46bb73
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSNibLoading.inc
@@ -0,0 +1,31 @@
+{ Parsed from Appkit.framework NSNibLoading.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSNIBLOADING_PAS_T}
+{$define NSNIBLOADING_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSNIBLOADING_PAS_R}
+{$define NSNIBLOADING_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSNIBLOADING_PAS_F}
+{$define NSNIBLOADING_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSNIBLOADING_PAS_T}
+{$define NSNIBLOADING_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSObjectController.inc b/packages/cocoaint/src/appkit/NSObjectController.inc
new file mode 100644
index 0000000000..3afa64a582
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSObjectController.inc
@@ -0,0 +1,111 @@
+{ Parsed from Appkit.framework NSObjectController.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSOBJECTCONTROLLER_PAS_H}
+{$define NSOBJECTCONTROLLER_PAS_H}
+type
+  NSObjectControllerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSOBJECTCONTROLLER_PAS_T}
+{$define NSOBJECTCONTROLLER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSOBJECTCONTROLLER_PAS_R}
+{$define NSOBJECTCONTROLLER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSOBJECTCONTROLLER_PAS_F}
+{$define NSOBJECTCONTROLLER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSOBJECTCONTROLLER_PAS_T}
+{$define NSOBJECTCONTROLLER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSObjectController = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSOBJECTCONTROLLER_PAS_C}
+{$define NSOBJECTCONTROLLER_PAS_C}
+
+{ NSObjectController }
+  NSObjectController = objcclass(NSController)
+  private
+    __reserved3: Pointer;
+    __managedProxy: id;
+    __objectControllerFlags: bitpacked record
+        _editable: 0..1;
+        _automaticallyPreparesContent: 0..1;
+        _hasLoadedData: 0..1;
+        _explicitlyCannotAdd: 0..1;
+        _explicitlyCannotRemove: 0..1;
+        _isUsingManagedProxy: 0..1;
+        _hasFetched: 0..1;
+        _batches: 0..1;
+        _reservedObjectController: 0..((1 shl 24)-1);
+      end;
+    __objectClassName: NSString;
+    __objectClass: Pobjc_class;
+    __contentObjectArray: NSArray;
+    __content: id;
+    __objectHandler: id;
+    
+  public
+    class function alloc: NSObjectController; message 'alloc';
+
+    function initWithContent(content_: id): id; message 'initWithContent:';
+    procedure setContent(content_: id); message 'setContent:';
+    function content: id; message 'content';
+    function selection: id; message 'selection';
+    function selectedObjects: NSArray; message 'selectedObjects';
+    procedure setAutomaticallyPreparesContent(flag: Boolean); message 'setAutomaticallyPreparesContent:';
+    function automaticallyPreparesContent: Boolean; message 'automaticallyPreparesContent';
+    procedure prepareContent; message 'prepareContent';
+    procedure setObjectClass(objectClass_: Pobjc_class); message 'setObjectClass:';
+    function objectClass: Pobjc_class; message 'objectClass';
+    function newObject: id; message 'newObject';
+    procedure addObject(object_: id); message 'addObject:';
+    procedure removeObject(object_: id); message 'removeObject:';
+    procedure setEditable(flag: Boolean); message 'setEditable:';
+    function isEditable: Boolean; message 'isEditable';
+    procedure add(sender: id); message 'add:';
+    function canAdd: Boolean; message 'canAdd';
+    procedure remove(sender: id); message 'remove:';
+    function canRemove: Boolean; message 'canRemove';
+    function validateUserInterfaceItem(item: id): Boolean; message 'validateUserInterfaceItem:';
+
+    { Category: NSManagedController }
+    function managedObjectContext: NSManagedObjectContext; message 'managedObjectContext';
+    procedure setManagedObjectContext(var managedObjectContext_: NSManagedObjectContext); message 'setManagedObjectContext:';
+    function entityName: NSString; message 'entityName';
+    procedure setEntityName(entityName_: NSString); message 'setEntityName:';
+    function fetchPredicate: NSPredicate; message 'fetchPredicate';
+    procedure setFetchPredicate(predicate: NSPredicate); message 'setFetchPredicate:';
+    function fetchWithRequest_merge_error(var fetchRequest: NSFetchRequest; merge: Boolean; var error: NSError): Boolean; message 'fetchWithRequest:merge:error:';
+    procedure fetch(sender: id); message 'fetch:';
+    procedure setUsesLazyFetching(enabled: Boolean); message 'setUsesLazyFetching:';
+    function usesLazyFetching: Boolean; message 'usesLazyFetching';
+    function defaultFetchRequest: NSFetchRequest; message 'defaultFetchRequest';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSOpenGL.inc b/packages/cocoaint/src/appkit/NSOpenGL.inc
new file mode 100644
index 0000000000..07ad07e485
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSOpenGL.inc
@@ -0,0 +1,187 @@
+{ Parsed from Appkit.framework NSOpenGL.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSOPENGL_PAS_H}
+{$define NSOPENGL_PAS_H}
+type
+  NSOpenGLPixelFormatPointer = Pointer;
+  NSOpenGLPixelBufferPointer = Pointer;
+  NSOpenGLContextPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSOPENGL_PAS_T}
+{$define NSOPENGL_PAS_T}
+
+{ Defines }
+const
+  NSOPENGL_CURRENT_VERSION = 1;
+
+{ Sets }
+
+type
+  NSOpenGLGlobalOption = (NSOpenGLGOFormatCacheSize = 501, NSOpenGLGOClearFormatCache = 502, NSOpenGLGORetainRenderers = 503, NSOpenGLGOResetLibrary = 504);
+
+type
+  NSOpenGLContextParameter = (NSOpenGLCPSwapRectangle = 200, NSOpenGLCPSwapRectangleEnable = 201, NSOpenGLCPRasterizationEnable = 221, NSOpenGLCPSwapInterval = 222, NSOpenGLCPSurfaceOrder = 235, NSOpenGLCPSurfaceOpacity = 236, NSOpenGLCPStateValidation = 301);
+
+{ Constants }
+
+const
+  NSOpenGLPFAAllRenderers = 1;
+  NSOpenGLPFADoubleBuffer = 5;
+  NSOpenGLPFAStereo = 6;
+  NSOpenGLPFAAuxBuffers = 7;
+  NSOpenGLPFAColorSize = 8;
+  NSOpenGLPFAAlphaSize = 11;
+  NSOpenGLPFADepthSize = 12;
+  NSOpenGLPFAStencilSize = 13;
+  NSOpenGLPFAAccumSize = 14;
+  NSOpenGLPFAMinimumPolicy = 51;
+  NSOpenGLPFAMaximumPolicy = 52;
+  NSOpenGLPFAOffScreen = 53;
+  NSOpenGLPFAFullScreen = 54;
+  NSOpenGLPFASampleBuffers = 55;
+  NSOpenGLPFASamples = 56;
+  NSOpenGLPFAAuxDepthStencil = 57;
+  NSOpenGLPFAColorFloat = 58;
+  NSOpenGLPFAMultisample = 59;
+  NSOpenGLPFASupersample = 60;
+  NSOpenGLPFASampleAlpha = 61;
+  NSOpenGLPFARendererID = 70;
+  NSOpenGLPFASingleRenderer = 71;
+  NSOpenGLPFANoRecovery = 72;
+  NSOpenGLPFAAccelerated = 73;
+  NSOpenGLPFAClosestPolicy = 74;
+  NSOpenGLPFARobust = 75;
+  NSOpenGLPFABackingStore = 76;
+  NSOpenGLPFAMPSafe = 78;
+  NSOpenGLPFAWindow = 80;
+  NSOpenGLPFAMultiScreen = 81;
+  NSOpenGLPFACompliant = 83;
+  NSOpenGLPFAScreenMask = 84;
+  NSOpenGLPFAPixelBuffer = 90;
+  NSOpenGLPFAAllowOfflineRenderers = 96;
+  NSOpenGLPFAVirtualScreenCount = 128;
+
+{ Types }
+type
+  NSOpenGLPixelFormatAttribute = cardinal;
+  _CGLPixelFormatObject = Pointer;
+  NSOpenGLPixelFormatAuxiliary = _CGLPixelFormatObject;
+  _CGLContextObject = Pointer;
+  NSOpenGLContextAuxiliary = _CGLContextObject;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSOPENGL_PAS_R}
+{$define NSOPENGL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSOPENGL_PAS_F}
+{$define NSOPENGL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSOPENGL_PAS_T}
+{$define NSOPENGL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSOpenGLPixelFormat = objcclass;
+  NSOpenGLPixelBuffer = objcclass;
+  NSOpenGLContext = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSOPENGL_PAS_C}
+{$define NSOPENGL_PAS_C}
+
+{ NSOpenGLPixelFormat }
+  NSOpenGLPixelFormat = objcclass(NSObject, NSCodingProtocol)
+  private
+    __pixelFormatAuxiliary: NSOpenGLPixelFormatAuxiliary;
+    __pixelAttributes: NSData;
+    __reserved1: clong;
+    __reserved2: clong;
+    __reserved3: clong;
+    
+  public
+    class function alloc: NSOpenGLPixelFormat; message 'alloc';
+
+    function initWithAttributes(var attribs: NSOpenGLPixelFormatAttribute): id; message 'initWithAttributes:';
+    function initWithData(attribs: NSData): id; message 'initWithData:';
+    function attributes: NSData; message 'attributes';
+    procedure setAttributes(attribs: NSData); message 'setAttributes:';
+    procedure getValues_forAttribute_forVirtualScreen(var vals: GLint; attrib: NSOpenGLPixelFormatAttribute; screen: GLint); message 'getValues:forAttribute:forVirtualScreen:';
+    function numberOfVirtualScreens: GLint; message 'numberOfVirtualScreens';
+    function CGLPixelFormatObj: Pointer; message 'CGLPixelFormatObj';
+  end; external;
+
+{ NSOpenGLPixelBuffer }
+  NSOpenGLPixelBuffer = objcclass(NSObject)
+  private
+    __pixelBufferAuxiliary: _CGLPBufferObject;
+    __reserved1: Pointer;
+    __reserved2: Pointer;
+    
+  public
+    class function alloc: NSOpenGLPixelBuffer; message 'alloc';
+
+    function initWithTextureTarget_textureInternalFormat_textureMaxMipMapLevel_pixelsWide_pixelsHigh(target: GLenum; format: GLenum; maxLevel: GLint; pixelsWide_: GLsizei; pixelsHigh_: GLsizei): id; message 'initWithTextureTarget:textureInternalFormat:textureMaxMipMapLevel:pixelsWide:pixelsHigh:';
+    function pixelsWide: GLsizei; message 'pixelsWide';
+    function pixelsHigh: GLsizei; message 'pixelsHigh';
+    function textureTarget: GLenum; message 'textureTarget';
+    function textureInternalFormat: GLenum; message 'textureInternalFormat';
+    function textureMaxMipMapLevel: GLint; message 'textureMaxMipMapLevel';
+  end; external;
+
+{ NSOpenGLContext }
+  NSOpenGLContext = objcclass(NSObject)
+  private
+    __view: NSView;
+    __contextAuxiliary: NSOpenGLContextAuxiliary;
+    
+  public
+    class function alloc: NSOpenGLContext; message 'alloc';
+
+    function initWithFormat_shareContext(format: NSOpenGLPixelFormat; share: NSOpenGLContext): id; message 'initWithFormat:shareContext:';
+    procedure setView(view_: NSView); message 'setView:';
+    function view: NSView; message 'view';
+    procedure setFullScreen; message 'setFullScreen';
+    procedure setOffScreen_width_height_rowbytes(baseaddr: Pointer; width: GLsizei; height: GLsizei; rowbytes: GLint); message 'setOffScreen:width:height:rowbytes:';
+    procedure clearDrawable; message 'clearDrawable';
+    procedure update; message 'update';
+    procedure flushBuffer; message 'flushBuffer';
+    procedure makeCurrentContext; message 'makeCurrentContext';
+    class procedure clearCurrentContext; message 'clearCurrentContext';
+    class function currentContext: NSOpenGLContext; message 'currentContext';
+    procedure copyAttributesFromContext_withMask(context: NSOpenGLContext; mask: GLbitfield); message 'copyAttributesFromContext:withMask:';
+    procedure setValues_forParameter(var vals: GLint; param: NSOpenGLContextParameter); message 'setValues:forParameter:';
+    procedure getValues_forParameter(var vals: GLint; param: NSOpenGLContextParameter); message 'getValues:forParameter:';
+    procedure setCurrentVirtualScreen(screen: GLint); message 'setCurrentVirtualScreen:';
+    function currentVirtualScreen: GLint; message 'currentVirtualScreen';
+    procedure createTexture_fromView_internalFormat(target: GLenum; view_: NSView; format: GLenum); message 'createTexture:fromView:internalFormat:';
+    function CGLContextObj: Pointer; message 'CGLContextObj';
+    procedure setPixelBuffer_cubeMapFace_mipMapLevel_currentVirtualScreen(pixelBuffer_: NSOpenGLPixelBuffer; face: GLenum; level: GLint; screen: GLint); message 'setPixelBuffer:cubeMapFace:mipMapLevel:currentVirtualScreen:';
+    function pixelBuffer: NSOpenGLPixelBuffer; message 'pixelBuffer';
+    function pixelBufferCubeMapFace: GLenum; message 'pixelBufferCubeMapFace';
+    function pixelBufferMipMapLevel: GLint; message 'pixelBufferMipMapLevel';
+    procedure setTextureImageToPixelBuffer_colorBuffer(pixelBuffer_: NSOpenGLPixelBuffer; source: GLenum); message 'setTextureImageToPixelBuffer:colorBuffer:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSOpenGLView.inc b/packages/cocoaint/src/appkit/NSOpenGLView.inc
new file mode 100644
index 0000000000..2ffe189057
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSOpenGLView.inc
@@ -0,0 +1,75 @@
+{ Parsed from Appkit.framework NSOpenGLView.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSOPENGLVIEW_PAS_H}
+{$define NSOPENGLVIEW_PAS_H}
+type
+  NSOpenGLViewPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSOPENGLVIEW_PAS_T}
+{$define NSOPENGLVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSOPENGLVIEW_PAS_R}
+{$define NSOPENGLVIEW_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSOPENGLVIEW_PAS_F}
+{$define NSOPENGLVIEW_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSOPENGLVIEW_PAS_T}
+{$define NSOPENGLVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSOpenGLView = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSOPENGLVIEW_PAS_C}
+{$define NSOPENGLVIEW_PAS_C}
+
+{ NSOpenGLView }
+  NSOpenGLView = objcclass(NSView)
+  private
+    __openGLContext: NSOpenGLContext;
+    __pixelFormat: NSOpenGLPixelFormat;
+    __reserved1: clong;
+    __reserved2: clong;
+    __reserved3: clong;
+    
+  public
+    class function alloc: NSOpenGLView; message 'alloc';
+
+    class function defaultPixelFormat: NSOpenGLPixelFormat; message 'defaultPixelFormat';
+    function initWithFrame_pixelFormat(frameRect: NSRect; format: NSOpenGLPixelFormat): id; message 'initWithFrame:pixelFormat:';
+    procedure setOpenGLContext(context: NSOpenGLContext); message 'setOpenGLContext:';
+    function openGLContext: NSOpenGLContext; message 'openGLContext';
+    procedure clearGLContext; message 'clearGLContext';
+    procedure update; message 'update';
+    procedure reshape; message 'reshape';
+    procedure setPixelFormat(pixelFormat_: NSOpenGLPixelFormat); message 'setPixelFormat:';
+    function pixelFormat: NSOpenGLPixelFormat; message 'pixelFormat';
+    procedure prepareOpenGL; message 'prepareOpenGL';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSOpenPanel.inc b/packages/cocoaint/src/appkit/NSOpenPanel.inc
new file mode 100644
index 0000000000..f8ead70886
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSOpenPanel.inc
@@ -0,0 +1,79 @@
+{ Parsed from Appkit.framework NSOpenPanel.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSOPENPANEL_PAS_H}
+{$define NSOPENPANEL_PAS_H}
+type
+  NSOpenPanelPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSOPENPANEL_PAS_T}
+{$define NSOPENPANEL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSOPENPANEL_PAS_R}
+{$define NSOPENPANEL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSOPENPANEL_PAS_F}
+{$define NSOPENPANEL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSOPENPANEL_PAS_T}
+{$define NSOPENPANEL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSOpenPanel = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSOPENPANEL_PAS_C}
+{$define NSOPENPANEL_PAS_C}
+
+{ NSOpenPanel }
+  NSOpenPanel = objcclass(NSSavePanel)
+  private
+    __reservedOpenPanel: char;
+    __privateOpenPanel: Pointer;
+    
+  public
+    class function alloc: NSOpenPanel; message 'alloc';
+
+    class function openPanel: NSOpenPanel; message 'openPanel';
+    function URLs: NSArray; message 'URLs';
+    function filenames: NSArray; message 'filenames';
+    function resolvesAliases: Boolean; message 'resolvesAliases';
+    procedure setResolvesAliases(flag: Boolean); message 'setResolvesAliases:';
+    function canChooseDirectories: Boolean; message 'canChooseDirectories';
+    procedure setCanChooseDirectories(flag: Boolean); message 'setCanChooseDirectories:';
+    function allowsMultipleSelection: Boolean; message 'allowsMultipleSelection';
+    procedure setAllowsMultipleSelection(flag: Boolean); message 'setAllowsMultipleSelection:';
+    function canChooseFiles: Boolean; message 'canChooseFiles';
+    procedure setCanChooseFiles(flag: Boolean); message 'setCanChooseFiles:';
+
+    { Category: NSOpenPanelRuntime }
+    procedure beginSheetForDirectory_file_types_modalForWindow_modalDelegate_didEndSelector_contextInfo(path: NSString; name: NSString; fileTypes: NSArray; docWindow: NSWindow; delegate_: id; didEndSelector: SEL; contextInfo: Pointer); message 'beginSheetForDirectory:file:types:modalForWindow:modalDelegate:didEndSelector:contextInfo:';
+    procedure beginForDirectory_file_types_modelessDelegate_didEndSelector_contextInfo(path: NSString; name: NSString; fileTypes: NSArray; delegate_: id; didEndSelector: SEL; contextInfo: Pointer); message 'beginForDirectory:file:types:modelessDelegate:didEndSelector:contextInfo:';
+    function runModalForDirectory_file_types(path: NSString; name: NSString; fileTypes: NSArray): clong; message 'runModalForDirectory:file:types:';
+    function runModalForTypes(fileTypes: NSArray): clong; message 'runModalForTypes:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSOutlineView.inc b/packages/cocoaint/src/appkit/NSOutlineView.inc
new file mode 100644
index 0000000000..b005c5b574
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSOutlineView.inc
@@ -0,0 +1,173 @@
+{ Parsed from Appkit.framework NSOutlineView.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSOUTLINEVIEW_PAS_H}
+{$define NSOUTLINEVIEW_PAS_H}
+type
+  NSOutlineViewPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSOUTLINEVIEW_PAS_T}
+{$define NSOUTLINEVIEW_PAS_T}
+
+{ CFString constants }
+var
+  NSOutlineViewSelectionDidChangeNotification: CFStringRef; external name '_NSOutlineViewSelectionDidChangeNotification';
+  NSOutlineViewColumnDidMoveNotification: CFStringRef; external name '_NSOutlineViewColumnDidMoveNotification';
+  NSOutlineViewColumnDidResizeNotification: CFStringRef; external name '_NSOutlineViewColumnDidResizeNotification';
+  NSOutlineViewSelectionIsChangingNotification: CFStringRef; external name '_NSOutlineViewSelectionIsChangingNotification';
+  NSOutlineViewItemWillExpandNotification: CFStringRef; external name '_NSOutlineViewItemWillExpandNotification';
+  NSOutlineViewItemDidExpandNotification: CFStringRef; external name '_NSOutlineViewItemDidExpandNotification';
+  NSOutlineViewItemWillCollapseNotification: CFStringRef; external name '_NSOutlineViewItemWillCollapseNotification';
+  NSOutlineViewItemDidCollapseNotification: CFStringRef; external name '_NSOutlineViewItemDidCollapseNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSOUTLINEVIEW_PAS_R}
+{$define NSOUTLINEVIEW_PAS_R}
+
+{ Records }
+type
+  __OvFlags = record
+{$ifdef fpc_big_endian}
+    delegateWillDisplayCell: cuint;
+    delegateShouldEditTableColumn: cuint;
+    delegateShouldSelectItem: cuint;
+    delegateShouldSelectTableColumn: cuint;
+    delegateSelectionShouldChangeInOutlineView: cuint;
+    delegateShouldCollapseItem: cuint;
+    delegateShouldExpandItem: cuint;
+    autoresizesOutlineColumn: cuint;
+    autoSaveExpandItems: cuint;
+    enableExpandNotifications: cuint;
+    delegateWillDisplayOutlineCell: cuint;
+    removeChildInProgress: cuint;
+    selectionAdjustmentDisabled: cuint;
+    autoExpandFlashState: cuint;
+    compatCollapseForceClearsExpandState: cuint;
+    delegateHeightOfRowByItem: cuint;
+    delayRowEntryFreeDisabled: cuint;
+    numberOfRowsDataExpandEntered: cuint;
+    validDataSourceMethods: cuint;
+    reloadingData: cuint;
+    _reserved: cuint;
+{$else}
+    _reserved: cuint;
+    reloadingData: cuint;
+    validDataSourceMethods: cuint;
+    numberOfRowsDataExpandEntered: cuint;
+    delayRowEntryFreeDisabled: cuint;
+    delegateHeightOfRowByItem: cuint;
+    compatCollapseForceClearsExpandState: cuint;
+    autoExpandFlashState: cuint;
+    selectionAdjustmentDisabled: cuint;
+    removeChildInProgress: cuint;
+    delegateWillDisplayOutlineCell: cuint;
+    enableExpandNotifications: cuint;
+    autoSaveExpandItems: cuint;
+    autoresizesOutlineColumn: cuint;
+    delegateShouldExpandItem: cuint;
+    delegateShouldCollapseItem: cuint;
+    delegateSelectionShouldChangeInOutlineView: cuint;
+    delegateShouldSelectTableColumn: cuint;
+    delegateShouldSelectItem: cuint;
+    delegateShouldEditTableColumn: cuint;
+    delegateWillDisplayCell: cuint;
+{$endif}
+  end;
+_OVFlags = __OvFlags;
+
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSOUTLINEVIEW_PAS_F}
+{$define NSOUTLINEVIEW_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSOUTLINEVIEW_PAS_T}
+{$define NSOUTLINEVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSOutlineView = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSOUTLINEVIEW_PAS_C}
+{$define NSOUTLINEVIEW_PAS_C}
+
+{ NSOutlineView }
+  NSOutlineView = objcclass(NSTableView)
+  private
+    __numberOfRows: clong;
+    __rowEntryTree: __NSOVRowEntry;
+    __itemToEntryMap: CFMutableDictionaryRef;
+    __unused2: clong;
+    __unused3: clong;
+    __unused1: clong;
+    __outlineTableColumn: NSTableColumn;
+    __initedRows: Boolean;
+    __indentationMarkerInCell: Boolean;
+    __indentationPerLevel: clong;
+    __outlineCell: NSButtonCell;
+    __trackingOutlineFrame: NSRect;
+    __tracker: NSMouseTracker;
+    __unused4: id;
+    __ovFlags: _OVFlags;
+    __ovLock: id;
+    __indentArray: clong;
+    __originalWidth: clong;
+    __expandSet: id;
+    __expandSetToExpandItemsInto: id;
+    __indentArraySize: clong;
+    __trackingOutlineCell: NSButtonCell;
+    __trackingRow: clong;
+    __ovReserved: id;
+    
+  public
+    class function alloc: NSOutlineView; message 'alloc';
+
+    procedure setOutlineTableColumn(outlineTableColumn_: NSTableColumn); message 'setOutlineTableColumn:';
+    function outlineTableColumn: NSTableColumn; message 'outlineTableColumn';
+    function isExpandable(item: id): Boolean; message 'isExpandable:';
+    procedure expandItem_expandChildren(item: id; expandChildren: Boolean); message 'expandItem:expandChildren:';
+    procedure expandItem(item: id); message 'expandItem:';
+    procedure collapseItem_collapseChildren(item: id; collapseChildren: Boolean); message 'collapseItem:collapseChildren:';
+    procedure collapseItem(item: id); message 'collapseItem:';
+    procedure reloadItem_reloadChildren(item: id; reloadChildren: Boolean); message 'reloadItem:reloadChildren:';
+    procedure reloadItem(item: id); message 'reloadItem:';
+    function parentForItem(item: id): id; message 'parentForItem:';
+    function itemAtRow(row: clong): id; message 'itemAtRow:';
+    function rowForItem(item: id): clong; message 'rowForItem:';
+    function levelForItem(item: id): clong; message 'levelForItem:';
+    function levelForRow(row: clong): clong; message 'levelForRow:';
+    function isItemExpanded(item: id): Boolean; message 'isItemExpanded:';
+    procedure setIndentationPerLevel(indentationPerLevel_: CGFloat); message 'setIndentationPerLevel:';
+    function indentationPerLevel: CGFloat; message 'indentationPerLevel';
+    procedure setIndentationMarkerFollowsCell(drawInCell: Boolean); message 'setIndentationMarkerFollowsCell:';
+    function indentationMarkerFollowsCell: Boolean; message 'indentationMarkerFollowsCell';
+    procedure setAutoresizesOutlineColumn(resize: Boolean); message 'setAutoresizesOutlineColumn:';
+    function autoresizesOutlineColumn: Boolean; message 'autoresizesOutlineColumn';
+    function frameOfOutlineCellAtRow(row: clong): NSRect; message 'frameOfOutlineCellAtRow:';
+    procedure setDropItem_dropChildIndex(item: id; index: clong); message 'setDropItem:dropChildIndex:';
+    function shouldCollapseAutoExpandedItemsForDeposited(deposited: Boolean): Boolean; message 'shouldCollapseAutoExpandedItemsForDeposited:';
+    function autosaveExpandedItems: Boolean; message 'autosaveExpandedItems';
+    procedure setAutosaveExpandedItems(save: Boolean); message 'setAutosaveExpandedItems:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSPDFImageRep.inc b/packages/cocoaint/src/appkit/NSPDFImageRep.inc
new file mode 100644
index 0000000000..1bc936c24e
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSPDFImageRep.inc
@@ -0,0 +1,71 @@
+{ Parsed from Appkit.framework NSPDFImageRep.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPDFIMAGEREP_PAS_H}
+{$define NSPDFIMAGEREP_PAS_H}
+type
+  NSPDFImageRepPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPDFIMAGEREP_PAS_T}
+{$define NSPDFIMAGEREP_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPDFIMAGEREP_PAS_R}
+{$define NSPDFIMAGEREP_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPDFIMAGEREP_PAS_F}
+{$define NSPDFIMAGEREP_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPDFIMAGEREP_PAS_T}
+{$define NSPDFIMAGEREP_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPDFImageRep = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPDFIMAGEREP_PAS_C}
+{$define NSPDFIMAGEREP_PAS_C}
+
+{ NSPDFImageRep }
+  NSPDFImageRep = objcclass(NSImageRep)
+  private
+    __pdfData: NSData;
+    __reserved1: cint;
+    __reserved2: cint;
+    __private: id;
+    
+  public
+    class function alloc: NSPDFImageRep; message 'alloc';
+
+    class function imageRepWithData(pdfData: NSData): id; message 'imageRepWithData:';
+    function initWithData(pdfData: NSData): id; message 'initWithData:';
+    function PDFRepresentation: NSData; message 'PDFRepresentation';
+    function bounds: NSRect; message 'bounds';
+    procedure setCurrentPage(page: clong); message 'setCurrentPage:';
+    function currentPage: clong; message 'currentPage';
+    function pageCount: clong; message 'pageCount';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSPICTImageRep.inc b/packages/cocoaint/src/appkit/NSPICTImageRep.inc
new file mode 100644
index 0000000000..15a8409956
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSPICTImageRep.inc
@@ -0,0 +1,75 @@
+{ Parsed from Appkit.framework NSPICTImageRep.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPICTIMAGEREP_PAS_H}
+{$define NSPICTIMAGEREP_PAS_H}
+type
+  NSPICTImageRepPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPICTIMAGEREP_PAS_T}
+{$define NSPICTIMAGEREP_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPICTIMAGEREP_PAS_R}
+{$define NSPICTIMAGEREP_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPICTIMAGEREP_PAS_F}
+{$define NSPICTIMAGEREP_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPICTIMAGEREP_PAS_T}
+{$define NSPICTIMAGEREP_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPICTImageRep = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPICTIMAGEREP_PAS_C}
+{$define NSPICTIMAGEREP_PAS_C}
+
+{ NSPICTImageRep }
+  NSPICTImageRep = objcclass(NSImageRep)
+  private
+    __pictOrigin: NSPoint;
+    __pictData: NSData;
+    {$ifndef cpu64}
+    __reserved1: cuint;
+    __reserved2: cuint;
+    {$else}
+    __imageRep: id;
+    __pictOffset: culong;
+    __reserved1: cuint;
+    __reserved2: cuint;
+    {$endif}
+    
+  public
+    class function alloc: NSPICTImageRep; message 'alloc';
+
+    class function imageRepWithData(pictData: NSData): id; message 'imageRepWithData:';
+    function initWithData(pictData: NSData): id; message 'initWithData:';
+    function PICTRepresentation: NSData; message 'PICTRepresentation';
+    function boundingBox: NSRect; message 'boundingBox';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSPageLayout.inc b/packages/cocoaint/src/appkit/NSPageLayout.inc
new file mode 100644
index 0000000000..420304eb9d
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSPageLayout.inc
@@ -0,0 +1,86 @@
+{ Parsed from Appkit.framework NSPageLayout.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPAGELAYOUT_PAS_H}
+{$define NSPAGELAYOUT_PAS_H}
+type
+  NSPageLayoutPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPAGELAYOUT_PAS_T}
+{$define NSPAGELAYOUT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPAGELAYOUT_PAS_R}
+{$define NSPAGELAYOUT_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPAGELAYOUT_PAS_F}
+{$define NSPAGELAYOUT_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPAGELAYOUT_PAS_T}
+{$define NSPAGELAYOUT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPageLayout = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPAGELAYOUT_PAS_C}
+{$define NSPAGELAYOUT_PAS_C}
+
+{ NSPageLayout }
+  NSPageLayout = objcclass(NSObject)
+  private
+    __accessoryControllers: NSMutableArray;
+    __originalPrintInfo: NSPrintInfo;
+    __delegate: id;
+    __didEndSelector: SEL;
+    __contextInfo: Pointer;
+    __presentedPrintInfo: NSPrintInfo;
+    __windowController: NSWindowController;
+    {$ifdef cpu64}
+    __reserved: id;
+    {$else}
+    __compatibilityPadding: char;
+    {$endif}
+    
+  public
+    class function alloc: NSPageLayout; message 'alloc';
+
+    class function pageLayout: NSPageLayout; message 'pageLayout';
+    procedure addAccessoryController(accessoryController: NSViewController); message 'addAccessoryController:';
+    procedure removeAccessoryController(accessoryController: NSViewController); message 'removeAccessoryController:';
+    function accessoryControllers: NSArray; message 'accessoryControllers';
+    procedure beginSheetWithPrintInfo_modalForWindow_delegate_didEndSelector_contextInfo(printInfo_: NSPrintInfo; docWindow: NSWindow; delegate: id; didEndSelector: SEL; contextInfo: Pointer); message 'beginSheetWithPrintInfo:modalForWindow:delegate:didEndSelector:contextInfo:';
+    function runModalWithPrintInfo(printInfo_: NSPrintInfo): clong; message 'runModalWithPrintInfo:';
+    function runModal: clong; message 'runModal';
+    function printInfo: NSPrintInfo; message 'printInfo';
+
+    { Category: NSDeprecated }
+    procedure setAccessoryView(accessoryView_: NSView); message 'setAccessoryView:';
+    function accessoryView: NSView; message 'accessoryView';
+    procedure readPrintInfo; message 'readPrintInfo';
+    procedure writePrintInfo; message 'writePrintInfo';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSPanel.inc b/packages/cocoaint/src/appkit/NSPanel.inc
new file mode 100644
index 0000000000..77d4f7b344
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSPanel.inc
@@ -0,0 +1,102 @@
+{ Parsed from Appkit.framework NSPanel.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPANEL_PAS_H}
+{$define NSPANEL_PAS_H}
+type
+  NSPanelPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPANEL_PAS_T}
+{$define NSPANEL_PAS_T}
+
+{ Constants }
+
+const
+  NSAlertDefaultReturn = 1;
+  NSAlertAlternateReturn = 0;
+  NSAlertOtherReturn = -1;
+  NSAlertErrorReturn = -2;
+
+const
+  NSOKButton = 1;
+  NSCancelButton = 0;
+
+const
+  NSUtilityWindowMask = 1  shl  4;
+  NSDocModalWindowMask = 1  shl  6;
+
+const
+  NSNonactivatingPanelMask = 1  shl  7;
+
+const
+  NSHUDWindowMask = 1  shl  13;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPANEL_PAS_R}
+{$define NSPANEL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPANEL_PAS_F}
+{$define NSPANEL_PAS_F}
+
+{ Functions }
+function NSRunAlertPanel(var title: NSString; var msgFormat: NSString; var defaultButton: NSString; var alternateButton: NSString; var otherButton: NSString; multipleParams: array of Pointer): clong; cdecl; external name 'NSRunAlertPanel';
+function NSRunInformationalAlertPanel(var title: NSString; var msgFormat: NSString; var defaultButton: NSString; var alternateButton: NSString; var otherButton: NSString; multipleParams: array of Pointer): clong; cdecl; external name 'NSRunInformationalAlertPanel';
+function NSRunCriticalAlertPanel(var title: NSString; var msgFormat: NSString; var defaultButton: NSString; var alternateButton: NSString; var otherButton: NSString; multipleParams: array of Pointer): clong; cdecl; external name 'NSRunCriticalAlertPanel';
+function NSRunAlertPanelRelativeToWindow(var title: NSString; var msgFormat: NSString; var defaultButton: NSString; var alternateButton: NSString; var otherButton: NSString; var docWindow: NSWindow; multipleParams: array of Pointer): clong; cdecl; external name 'NSRunAlertPanelRelativeToWindow';
+function NSRunInformationalAlertPanelRelativeToWindow(var title: NSString; var msgFormat: NSString; var defaultButton: NSString; var alternateButton: NSString; var otherButton: NSString; var docWindow: NSWindow; multipleParams: array of Pointer): clong; cdecl; external name 'NSRunInformationalAlertPanelRelativeToWindow';
+function NSRunCriticalAlertPanelRelativeToWindow(var title: NSString; var msgFormat: NSString; var defaultButton: NSString; var alternateButton: NSString; var otherButton: NSString; var docWindow: NSWindow; multipleParams: array of Pointer): clong; cdecl; external name 'NSRunCriticalAlertPanelRelativeToWindow';
+procedure NSBeginAlertSheet(var title: NSString; var defaultButton: NSString; var alternateButton: NSString; var otherButton: NSString; var docWindow: NSWindow; modalDelegate: id; didEndSelector: SEL; didDismissSelector: SEL; var contextInfo: Pointer; var msgFormat: NSString; multipleParams: array of Pointer); cdecl; external name 'NSBeginAlertSheet';
+procedure NSBeginInformationalAlertSheet(var title: NSString; var defaultButton: NSString; var alternateButton: NSString; var otherButton: NSString; var docWindow: NSWindow; modalDelegate: id; didEndSelector: SEL; didDismissSelector: SEL; var contextInfo: Pointer; var msgFormat: NSString; multipleParams: array of Pointer); cdecl; external name 'NSBeginInformationalAlertSheet';
+procedure NSBeginCriticalAlertSheet(var title: NSString; var defaultButton: NSString; var alternateButton: NSString; var otherButton: NSString; var docWindow: NSWindow; modalDelegate: id; didEndSelector: SEL; didDismissSelector: SEL; var contextInfo: Pointer; var msgFormat: NSString; multipleParams: array of Pointer); cdecl; external name 'NSBeginCriticalAlertSheet';
+function NSGetAlertPanel(var title: NSString; var msgFormat: NSString; var defaultButton: NSString; var alternateButton: NSString; var otherButton: NSString; multipleParams: array of Pointer): id; cdecl; external name 'NSGetAlertPanel';
+function NSGetInformationalAlertPanel(var title: NSString; var msgFormat: NSString; var defaultButton: NSString; var alternateButton: NSString; var otherButton: NSString; multipleParams: array of Pointer): id; cdecl; external name 'NSGetInformationalAlertPanel';
+function NSGetCriticalAlertPanel(var title: NSString; var msgFormat: NSString; var defaultButton: NSString; var alternateButton: NSString; var otherButton: NSString; multipleParams: array of Pointer): id; cdecl; external name 'NSGetCriticalAlertPanel';
+procedure NSReleaseAlertPanel(panel: id); cdecl; external name 'NSReleaseAlertPanel';
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPANEL_PAS_T}
+{$define NSPANEL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPanel = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPANEL_PAS_C}
+{$define NSPANEL_PAS_C}
+
+{ NSPanel }
+  NSPanel = objcclass(NSWindow)
+    
+  public
+    class function alloc: NSPanel; message 'alloc';
+
+    function isFloatingPanel: Boolean; message 'isFloatingPanel';
+    procedure setFloatingPanel(flag: Boolean); message 'setFloatingPanel:';
+    function becomesKeyOnlyIfNeeded: Boolean; message 'becomesKeyOnlyIfNeeded';
+    procedure setBecomesKeyOnlyIfNeeded(flag: Boolean); message 'setBecomesKeyOnlyIfNeeded:';
+    function worksWhenModal: Boolean; message 'worksWhenModal';
+    procedure setWorksWhenModal(flag: Boolean); message 'setWorksWhenModal:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSParagraphStyle.inc b/packages/cocoaint/src/appkit/NSParagraphStyle.inc
new file mode 100644
index 0000000000..a07a572e2a
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSParagraphStyle.inc
@@ -0,0 +1,179 @@
+{ Parsed from Appkit.framework NSParagraphStyle.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPARAGRAPHSTYLE_PAS_H}
+{$define NSPARAGRAPHSTYLE_PAS_H}
+type
+  NSTextTabPointer = Pointer;
+  NSParagraphStylePointer = Pointer;
+  NSMutableParagraphStylePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPARAGRAPHSTYLE_PAS_T}
+{$define NSPARAGRAPHSTYLE_PAS_T}
+
+{ Constants }
+
+const
+  NSLeftTabStopType = 0;
+  NSRightTabStopType = 0;
+  NSCenterTabStopType = 1;
+  NSDecimalTabStopType = 2;
+
+const
+  NSLineBreakByWordWrapping = 0;
+  NSLineBreakByTruncatingMiddle = 0;
+
+{ Types }
+type
+  NSTextTabType = culong;
+  NSLineBreakMode = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPARAGRAPHSTYLE_PAS_R}
+{$define NSPARAGRAPHSTYLE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPARAGRAPHSTYLE_PAS_F}
+{$define NSPARAGRAPHSTYLE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPARAGRAPHSTYLE_PAS_T}
+{$define NSPARAGRAPHSTYLE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTextTab = objcclass;
+  NSParagraphStyle = objcclass;
+  NSMutableParagraphStyle = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPARAGRAPHSTYLE_PAS_C}
+{$define NSPARAGRAPHSTYLE_PAS_C}
+
+{ NSTextTab }
+  NSTextTab = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __flags: bitpacked record
+        alignment: 0..((1 shl 4)-1);
+        refCount: 0..((1 shl 24)-1);
+        unused: 0..((1 shl 4)-1);
+        {$ifdef cpu64}
+        int: 0..((1 shl 32)-1);
+        {$endif}
+      end;
+    __location: CGFloat;
+    __reserved: id;
+    
+  public
+    class function alloc: NSTextTab; message 'alloc';
+
+    function initWithTextAlignment_location_options(alignment_: NSTextAlignment; loc: CGFloat; options_: NSDictionary): id; message 'initWithTextAlignment:location:options:';
+    function alignment: NSTextAlignment; message 'alignment';
+    function options: NSDictionary; message 'options';
+    function initWithType_location(type_: NSTextTabType; loc: CGFloat): id; message 'initWithType:location:';
+    function location: CGFloat; message 'location';
+    function tabStopType: NSTextTabType; message 'tabStopType';
+  end; external;
+
+{ NSParagraphStyle }
+  NSParagraphStyle = objcclass(NSObject, NSCopyingProtocol, NSMutableCopyingProtocol, NSCodingProtocol)
+  private
+    __lineSpacing: CGFloat;
+    __paragraphSpacing: CGFloat;
+    __headIndent: CGFloat;
+    __tailIndent: CGFloat;
+    __firstLineHeadIndent: CGFloat;
+    __minimumLineHeight: CGFloat;
+    __maximumLineHeight: CGFloat;
+    __tabStops: NSArray;
+    __flags: bitpacked record
+        alignment: 0..((1 shl 4)-1);
+        lineBreakMode: 0..((1 shl 4)-1);
+        tabStopsIsMutable: 0..1;
+        isNaturalDirection: 0..1;
+        rightToLeftDirection: 0..1;
+        fixedMultiple: 0..((1 shl 2)-1);
+        refCount: 0..((1 shl 19)-1);
+        {$ifdef cpu64}
+        int: 0..((1 shl 32)-1);
+        {$endif}
+      end;
+    __defaultTabInterval: CGFloat;
+    __extraData: id;
+    
+  public
+    class function alloc: NSParagraphStyle; message 'alloc';
+
+    class function defaultParagraphStyle: NSParagraphStyle; message 'defaultParagraphStyle';
+    class function defaultWritingDirectionForLanguage(languageName: NSString): NSWritingDirection; message 'defaultWritingDirectionForLanguage:';
+    function lineSpacing: CGFloat; message 'lineSpacing';
+    function paragraphSpacing: CGFloat; message 'paragraphSpacing';
+    function alignment: NSTextAlignment; message 'alignment';
+    function headIndent: CGFloat; message 'headIndent';
+    function tailIndent: CGFloat; message 'tailIndent';
+    function firstLineHeadIndent: CGFloat; message 'firstLineHeadIndent';
+    function tabStops: NSArray; message 'tabStops';
+    function minimumLineHeight: CGFloat; message 'minimumLineHeight';
+    function maximumLineHeight: CGFloat; message 'maximumLineHeight';
+    function lineBreakMode: NSLineBreakMode; message 'lineBreakMode';
+    function baseWritingDirection: NSWritingDirection; message 'baseWritingDirection';
+    function lineHeightMultiple: CGFloat; message 'lineHeightMultiple';
+    function paragraphSpacingBefore: CGFloat; message 'paragraphSpacingBefore';
+    function defaultTabInterval: CGFloat; message 'defaultTabInterval';
+    function textBlocks: NSArray; message 'textBlocks';
+    function textLists: NSArray; message 'textLists';
+    function hyphenationFactor: single; message 'hyphenationFactor';
+    function tighteningFactorForTruncation: single; message 'tighteningFactorForTruncation';
+    function headerLevel: clong; message 'headerLevel';
+  end; external;
+
+{ NSMutableParagraphStyle }
+  NSMutableParagraphStyle = objcclass(NSParagraphStyle)
+    
+  public
+    class function alloc: NSMutableParagraphStyle; message 'alloc';
+
+    procedure setLineSpacing(aFloat: CGFloat); message 'setLineSpacing:';
+    procedure setParagraphSpacing(aFloat: CGFloat); message 'setParagraphSpacing:';
+    procedure setAlignment(alignment_: NSTextAlignment); message 'setAlignment:';
+    procedure setFirstLineHeadIndent(aFloat: CGFloat); message 'setFirstLineHeadIndent:';
+    procedure setHeadIndent(aFloat: CGFloat); message 'setHeadIndent:';
+    procedure setTailIndent(aFloat: CGFloat); message 'setTailIndent:';
+    procedure setLineBreakMode(mode: NSLineBreakMode); message 'setLineBreakMode:';
+    procedure setMinimumLineHeight(aFloat: CGFloat); message 'setMinimumLineHeight:';
+    procedure setMaximumLineHeight(aFloat: CGFloat); message 'setMaximumLineHeight:';
+    procedure addTabStop(anObject: NSTextTab); message 'addTabStop:';
+    procedure removeTabStop(anObject: NSTextTab); message 'removeTabStop:';
+    procedure setTabStops(array_: NSArray); message 'setTabStops:';
+    procedure setParagraphStyle(obj: NSParagraphStyle); message 'setParagraphStyle:';
+    procedure setBaseWritingDirection(writingDirection: NSWritingDirection); message 'setBaseWritingDirection:';
+    procedure setLineHeightMultiple(aFloat: CGFloat); message 'setLineHeightMultiple:';
+    procedure setParagraphSpacingBefore(aFloat: CGFloat); message 'setParagraphSpacingBefore:';
+    procedure setDefaultTabInterval(aFloat: CGFloat); message 'setDefaultTabInterval:';
+    procedure setTextBlocks(array_: NSArray); message 'setTextBlocks:';
+    procedure setTextLists(array_: NSArray); message 'setTextLists:';
+    procedure setHyphenationFactor(aFactor: single); message 'setHyphenationFactor:';
+    procedure setTighteningFactorForTruncation(aFactor: single); message 'setTighteningFactorForTruncation:';
+    procedure setHeaderLevel(level: clong); message 'setHeaderLevel:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSPasteboard.inc b/packages/cocoaint/src/appkit/NSPasteboard.inc
new file mode 100644
index 0000000000..d054435257
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSPasteboard.inc
@@ -0,0 +1,123 @@
+{ Parsed from Appkit.framework NSPasteboard.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPASTEBOARD_PAS_H}
+{$define NSPASTEBOARD_PAS_H}
+type
+  NSPasteboardPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPASTEBOARD_PAS_T}
+{$define NSPASTEBOARD_PAS_T}
+
+{ CFString constants }
+var
+  NSStringPboardType: CFStringRef; external name '_NSStringPboardType';
+  NSFilenamesPboardType: CFStringRef; external name '_NSFilenamesPboardType';
+  NSPostScriptPboardType: CFStringRef; external name '_NSPostScriptPboardType';
+  NSTIFFPboardType: CFStringRef; external name '_NSTIFFPboardType';
+  NSRTFPboardType: CFStringRef; external name '_NSRTFPboardType';
+  NSTabularTextPboardType: CFStringRef; external name '_NSTabularTextPboardType';
+  NSFontPboardType: CFStringRef; external name '_NSFontPboardType';
+  NSRulerPboardType: CFStringRef; external name '_NSRulerPboardType';
+  NSFileContentsPboardType: CFStringRef; external name '_NSFileContentsPboardType';
+  NSColorPboardType: CFStringRef; external name '_NSColorPboardType';
+  NSRTFDPboardType: CFStringRef; external name '_NSRTFDPboardType';
+  NSHTMLPboardType: CFStringRef; external name '_NSHTMLPboardType';
+  NSPICTPboardType: CFStringRef; external name '_NSPICTPboardType';
+  NSURLPboardType: CFStringRef; external name '_NSURLPboardType';
+  NSPDFPboardType: CFStringRef; external name '_NSPDFPboardType';
+  NSGeneralPboard: CFStringRef; external name '_NSGeneralPboard';
+  NSFontPboard: CFStringRef; external name '_NSFontPboard';
+  NSRulerPboard: CFStringRef; external name '_NSRulerPboard';
+  NSFindPboard: CFStringRef; external name '_NSFindPboard';
+  NSDragPboard: CFStringRef; external name '_NSDragPboard';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPASTEBOARD_PAS_R}
+{$define NSPASTEBOARD_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPASTEBOARD_PAS_F}
+{$define NSPASTEBOARD_PAS_F}
+
+{ Functions }
+function NSCreateFilenamePboardType(var fileType: NSString): NSString; cdecl; external name 'NSCreateFilenamePboardType';
+function NSCreateFileContentsPboardType(var fileType: NSString): NSString; cdecl; external name 'NSCreateFileContentsPboardType';
+function NSGetFileType(var pboardType: NSString): NSString; cdecl; external name 'NSGetFileType';
+function NSGetFileTypes(var pboardTypes: NSArray): NSArray; cdecl; external name 'NSGetFileTypes';
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPASTEBOARD_PAS_T}
+{$define NSPASTEBOARD_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPasteboard = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPASTEBOARD_PAS_C}
+{$define NSPASTEBOARD_PAS_C}
+
+{ NSPasteboard }
+  NSPasteboard = objcclass(NSObject)
+  private
+    __pboard: id;
+    __gen: cint;
+    __owners: id;
+    __cachedTypeNameChangeCount: CFIndex;
+    __cachedTypeNames: NSArray;
+    __promiseTypeNamesByIdentifier: NSMutableDictionary;
+    __support: id;
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSPasteboard; message 'alloc';
+
+    class function generalPasteboard: NSPasteboard; message 'generalPasteboard';
+    class function pasteboardWithName(name_: NSString): NSPasteboard; message 'pasteboardWithName:';
+    class function pasteboardWithUniqueName: NSPasteboard; message 'pasteboardWithUniqueName';
+    class function typesFilterableTo(type_: NSString): NSArray; message 'typesFilterableTo:';
+    class function pasteboardByFilteringFile(filename: NSString): NSPasteboard; message 'pasteboardByFilteringFile:';
+    class function pasteboardByFilteringData_ofType(data: NSData; type_: NSString): NSPasteboard; message 'pasteboardByFilteringData:ofType:';
+    class function pasteboardByFilteringTypesInPasteboard(pboard: NSPasteboard): NSPasteboard; message 'pasteboardByFilteringTypesInPasteboard:';
+    function name: NSString; message 'name';
+    procedure releaseGlobally; message 'releaseGlobally';
+    function declareTypes_owner(newTypes: NSArray; newOwner: id): clong; message 'declareTypes:owner:';
+    function addTypes_owner(newTypes: NSArray; newOwner: id): clong; message 'addTypes:owner:';
+    function changeCount: clong; message 'changeCount';
+    function types: NSArray; message 'types';
+    function availableTypeFromArray(types_: NSArray): NSString; message 'availableTypeFromArray:';
+    function setData_forType(data: NSData; dataType: NSString): Boolean; message 'setData:forType:';
+    function dataForType(dataType: NSString): NSData; message 'dataForType:';
+    function setPropertyList_forType(plist: id; dataType: NSString): Boolean; message 'setPropertyList:forType:';
+    function propertyListForType(dataType: NSString): id; message 'propertyListForType:';
+    function setString_forType(string_: NSString; dataType: NSString): Boolean; message 'setString:forType:';
+    function stringForType(dataType: NSString): NSString; message 'stringForType:';
+
+    { Category: NSFileContents }
+    function writeFileContents(filename: NSString): Boolean; message 'writeFileContents:';
+    function readFileContentsType_toFile(type_: NSString; filename: NSString): NSString; message 'readFileContentsType:toFile:';
+    function writeFileWrapper(wrapper: NSFileWrapper): Boolean; message 'writeFileWrapper:';
+    function readFileWrapper: NSFileWrapper; message 'readFileWrapper';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSPathCell.inc b/packages/cocoaint/src/appkit/NSPathCell.inc
new file mode 100644
index 0000000000..803add92ac
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSPathCell.inc
@@ -0,0 +1,125 @@
+{ Parsed from Appkit.framework NSPathCell.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPATHCELL_PAS_H}
+{$define NSPATHCELL_PAS_H}
+type
+  NSPathCellPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPATHCELL_PAS_T}
+{$define NSPATHCELL_PAS_T}
+
+{ Constants }
+
+const
+  NSPathStyleStandard = 0;
+  NSPathStyleNavigationBar = 1;
+  NSPathStylePopUp = 2;
+
+{ Types }
+type
+  NSPathStyle = clong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPATHCELL_PAS_R}
+{$define NSPATHCELL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPATHCELL_PAS_F}
+{$define NSPATHCELL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPATHCELL_PAS_T}
+{$define NSPATHCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPathCellDelegateProtocol = objcprotocol;
+  NSPathCell = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPATHCELL_PAS_C}
+{$define NSPATHCELL_PAS_C}
+
+{ NSPathCell }
+  NSPathCell = objcclass(NSActionCell)
+  private
+    __backgroundColor: NSColor;
+    __borderColors: NSMutableArray;
+    __cells: NSMutableArray;
+    __clickedCell: NSPathComponentCell;
+    __hoveredCell: NSPathComponentCell;
+    __popUpButtonCell: NSPopUpButtonCell;
+    __currentRect: NSRect;
+    __animation: NSAnimation;
+    __allowedTypes: NSArray;
+    __doubleAction: SEL;
+    __delegate: id;
+    __piFlags: bitpacked record
+        reserved: 0..((1 shl 32)-1);
+      end;
+    __pathStyle: NSPathStyle;
+    __aux: id;
+    
+  public
+    class function alloc: NSPathCell; message 'alloc';
+
+    function pathStyle: NSPathStyle; message 'pathStyle';
+    procedure setPathStyle(style: NSPathStyle); message 'setPathStyle:';
+    function URL: NSURL; message 'URL';
+    procedure setURL(URL_: NSURL); message 'setURL:';
+    procedure setObjectValue(obj: id); message 'setObjectValue:';
+    function allowedTypes: NSArray; message 'allowedTypes';
+    procedure setAllowedTypes(allowedTypes_: NSArray); message 'setAllowedTypes:';
+    function delegate: id; message 'delegate';
+    procedure setDelegate(value: id); message 'setDelegate:';
+    class function pathComponentCellClass: Pobjc_class; message 'pathComponentCellClass';
+    function pathComponentCells: NSArray; message 'pathComponentCells';
+    procedure setPathComponentCells(cells: NSArray); message 'setPathComponentCells:';
+    function rectOfPathComponentCell_withFrame_inView(cell: NSPathComponentCell; frame: NSRect; view: NSView): NSRect; message 'rectOfPathComponentCell:withFrame:inView:';
+    function pathComponentCellAtPoint_withFrame_inView(point: NSPoint; frame: NSRect; view: NSView): NSPathComponentCell; message 'pathComponentCellAtPoint:withFrame:inView:';
+    function clickedPathComponentCell: NSPathComponentCell; message 'clickedPathComponentCell';
+    procedure mouseEntered_withFrame_inView(event: NSEvent; frame: NSRect; view: NSView); message 'mouseEntered:withFrame:inView:';
+    procedure mouseExited_withFrame_inView(event: NSEvent; frame: NSRect; view: NSView); message 'mouseExited:withFrame:inView:';
+    function doubleAction: SEL; message 'doubleAction';
+    procedure setDoubleAction(action_: SEL); message 'setDoubleAction:';
+    procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
+    function backgroundColor: NSColor; message 'backgroundColor';
+    procedure setPlaceholderString(string_: NSString); message 'setPlaceholderString:';
+    function placeholderString: NSString; message 'placeholderString';
+    procedure setPlaceholderAttributedString(string_: NSAttributedString); message 'setPlaceholderAttributedString:';
+    function placeholderAttributedString: NSAttributedString; message 'placeholderAttributedString';
+    procedure setControlSize(size: NSControlSize); message 'setControlSize:';
+  end; external;
+
+{$endif}
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSPATHCELL_PAS_P}
+{$define NSPATHCELL_PAS_P}
+  
+{ NSPathCellDelegate Protocol }
+  NSPathCellDelegateProtocol = objcprotocol
+    procedure pathCell_willDisplayOpenPanel(pathCell: NSPathCell; openPanel: NSOpenPanel); message 'pathCell:willDisplayOpenPanel:';
+    procedure pathCell_willPopUpMenu(pathCell: NSPathCell; menu: NSMenu); message 'pathCell:willPopUpMenu:';
+  end; external name 'NSPathCellDelegate';
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSPathComponentCell.inc b/packages/cocoaint/src/appkit/NSPathComponentCell.inc
new file mode 100644
index 0000000000..a32b7600c3
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSPathComponentCell.inc
@@ -0,0 +1,77 @@
+{ Parsed from Appkit.framework NSPathComponentCell.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPATHCOMPONENTCELL_PAS_H}
+{$define NSPATHCOMPONENTCELL_PAS_H}
+type
+  NSPathComponentCellPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPATHCOMPONENTCELL_PAS_T}
+{$define NSPATHCOMPONENTCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPATHCOMPONENTCELL_PAS_R}
+{$define NSPATHCOMPONENTCELL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPATHCOMPONENTCELL_PAS_F}
+{$define NSPATHCOMPONENTCELL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPATHCOMPONENTCELL_PAS_T}
+{$define NSPATHCOMPONENTCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPathComponentCell = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPATHCOMPONENTCELL_PAS_C}
+{$define NSPATHCOMPONENTCELL_PAS_C}
+
+{ NSPathComponentCell }
+  NSPathComponentCell = objcclass(NSTextFieldCell)
+  private
+    __image: NSImage;
+    __fullWidth: CGFloat;
+    __resizedWidth: CGFloat;
+    __currentWidth: CGFloat;
+    __url: NSURL;
+    __flags: bitpacked record
+        shouldDrawArrow: 0..1;
+        drawsAsNavigationBar: 0..1;
+        isFirstItem: 0..1;
+        isLastItem: 0..1;
+        reserved: 0..((1 shl 28)-1);
+      end;
+    __aux: id;
+    
+  public
+    class function alloc: NSPathComponentCell; message 'alloc';
+
+    function image: NSImage; message 'image';
+    procedure setImage(value: NSImage); message 'setImage:';
+    function URL: NSURL; message 'URL';
+    procedure setURL(URL_: NSURL); message 'setURL:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSPathControl.inc b/packages/cocoaint/src/appkit/NSPathControl.inc
new file mode 100644
index 0000000000..ce5898a4c1
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSPathControl.inc
@@ -0,0 +1,94 @@
+{ Parsed from Appkit.framework NSPathControl.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPATHCONTROL_PAS_H}
+{$define NSPATHCONTROL_PAS_H}
+type
+  NSPathControlPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPATHCONTROL_PAS_T}
+{$define NSPATHCONTROL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPATHCONTROL_PAS_R}
+{$define NSPATHCONTROL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPATHCONTROL_PAS_F}
+{$define NSPATHCONTROL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPATHCONTROL_PAS_T}
+{$define NSPATHCONTROL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPathControlDelegateProtocol = objcprotocol;
+  NSPathControl = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPATHCONTROL_PAS_C}
+{$define NSPATHCONTROL_PAS_C}
+
+{ NSPathControl }
+  NSPathControl = objcclass(NSControl)
+  private
+    __draggingSourceOperationMaskForLocal: NSDragOperation;
+    __draggingSourceOperationMaskForNonLocal: NSDragOperation;
+    __dropOperation: NSDragOperation;
+    __delegate: id;
+    __aux: id;
+    
+  public
+    class function alloc: NSPathControl; message 'alloc';
+
+    function URL: NSURL; message 'URL';
+    procedure setURL(URL_: NSURL); message 'setURL:';
+    function doubleAction: SEL; message 'doubleAction';
+    procedure setDoubleAction(action_: SEL); message 'setDoubleAction:';
+    function pathStyle: NSPathStyle; message 'pathStyle';
+    procedure setPathStyle(style: NSPathStyle); message 'setPathStyle:';
+    function clickedPathComponentCell: NSPathComponentCell; message 'clickedPathComponentCell';
+    function pathComponentCells: NSArray; message 'pathComponentCells';
+    procedure setPathComponentCells(cells: NSArray); message 'setPathComponentCells:';
+    procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
+    function backgroundColor: NSColor; message 'backgroundColor';
+    function delegate: id; message 'delegate';
+    procedure setDelegate(delegate_: id); message 'setDelegate:';
+    procedure setDraggingSourceOperationMask_forLocal(mask: NSDragOperation; isLocal: Boolean); message 'setDraggingSourceOperationMask:forLocal:';
+  end; external;
+
+{$endif}
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSPATHCONTROL_PAS_P}
+{$define NSPATHCONTROL_PAS_P}
+  
+{ NSPathControlDelegate Protocol }
+  NSPathControlDelegateProtocol = objcprotocol
+    function pathControl_shouldDragPathComponentCell_withPasteboard(pathControl: NSPathControl; pathComponentCell: NSPathComponentCell; pasteboard: NSPasteboard): Boolean; message 'pathControl:shouldDragPathComponentCell:withPasteboard:';
+    function pathControl_validateDrop(pathControl: NSPathControl; info: id): NSDragOperation; message 'pathControl:validateDrop:';
+    function pathControl_acceptDrop(pathControl: NSPathControl; info: id): Boolean; message 'pathControl:acceptDrop:';
+    procedure pathControl_willDisplayOpenPanel(pathControl: NSPathControl; openPanel: NSOpenPanel); message 'pathControl:willDisplayOpenPanel:';
+    procedure pathControl_willPopUpMenu(pathControl: NSPathControl; menu: NSMenu); message 'pathControl:willPopUpMenu:';
+  end; external name 'NSPathControlDelegate';
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSPersistentDocument.inc b/packages/cocoaint/src/appkit/NSPersistentDocument.inc
new file mode 100644
index 0000000000..1983d50ec0
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSPersistentDocument.inc
@@ -0,0 +1,78 @@
+{ Parsed from Appkit.framework NSPersistentDocument.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPERSISTENTDOCUMENT_PAS_H}
+{$define NSPERSISTENTDOCUMENT_PAS_H}
+type
+  NSPersistentDocumentPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPERSISTENTDOCUMENT_PAS_T}
+{$define NSPERSISTENTDOCUMENT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPERSISTENTDOCUMENT_PAS_R}
+{$define NSPERSISTENTDOCUMENT_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPERSISTENTDOCUMENT_PAS_F}
+{$define NSPERSISTENTDOCUMENT_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPERSISTENTDOCUMENT_PAS_T}
+{$define NSPERSISTENTDOCUMENT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPersistentDocument = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPERSISTENTDOCUMENT_PAS_C}
+{$define NSPERSISTENTDOCUMENT_PAS_C}
+
+{ NSPersistentDocument }
+  NSPersistentDocument = objcclass(NSDocument)
+  private
+    __managedObjectModel: NSManagedObjectModel;
+    __managedObjectContext: NSManagedObjectContext;
+    __store: id;
+    __reserved: Pointer;
+    __reserved2: Pointer;
+    __reserved3: Pointer;
+    __reserved4: Pointer;
+    
+  public
+    class function alloc: NSPersistentDocument; message 'alloc';
+
+    function managedObjectContext: NSManagedObjectContext; message 'managedObjectContext';
+    procedure setManagedObjectContext(var managedObjectContext_: NSManagedObjectContext); message 'setManagedObjectContext:';
+    function managedObjectModel: id; message 'managedObjectModel';
+    function configurePersistentStoreCoordinatorForURL_ofType_modelConfiguration_storeOptions_error(url: NSURL; fileType_: NSString; configuration: NSString; storeOptions: NSDictionary; var error: NSError): Boolean; message 'configurePersistentStoreCoordinatorForURL:ofType:modelConfiguration:storeOptions:error:';
+    function persistentStoreTypeForFileType(fileType_: NSString): NSString; message 'persistentStoreTypeForFileType:';
+    function writeToURL_ofType_forSaveOperation_originalContentsURL_error(absoluteURL: NSURL; typeName: NSString; saveOperation: NSSaveOperationType; absoluteOriginalContentsURL: NSURL; var error: NSError): Boolean; message 'writeToURL:ofType:forSaveOperation:originalContentsURL:error:';
+    function readFromURL_ofType_error(absoluteURL: NSURL; typeName: NSString; var error: NSError): Boolean; message 'readFromURL:ofType:error:';
+    function revertToContentsOfURL_ofType_error(inAbsoluteURL: NSURL; inTypeName: NSString; var outError: NSError): Boolean; message 'revertToContentsOfURL:ofType:error:';
+
+    { Category: NSPersistentDocumentDeprecated }
+    function configurePersistentStoreCoordinatorForURL_ofType_error(url: NSURL; fileType_: NSString; var error: NSError): Boolean; message 'configurePersistentStoreCoordinatorForURL:ofType:error:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSPopUpButton.inc b/packages/cocoaint/src/appkit/NSPopUpButton.inc
new file mode 100644
index 0000000000..b714180149
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSPopUpButton.inc
@@ -0,0 +1,107 @@
+{ Parsed from Appkit.framework NSPopUpButton.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPOPUPBUTTON_PAS_H}
+{$define NSPOPUPBUTTON_PAS_H}
+type
+  NSPopUpButtonPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPOPUPBUTTON_PAS_T}
+{$define NSPOPUPBUTTON_PAS_T}
+
+{ CFString constants }
+var
+  NSPopUpButtonWillPopUpNotification: CFStringRef; external name '_NSPopUpButtonWillPopUpNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPOPUPBUTTON_PAS_R}
+{$define NSPOPUPBUTTON_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPOPUPBUTTON_PAS_F}
+{$define NSPOPUPBUTTON_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPOPUPBUTTON_PAS_T}
+{$define NSPOPUPBUTTON_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPopUpButton = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPOPUPBUTTON_PAS_C}
+{$define NSPOPUPBUTTON_PAS_C}
+
+{ NSPopUpButton }
+  NSPopUpButton = objcclass(NSButton)
+  private
+    __pbFlags: bitpacked record
+        needsPullsDownFromTemplate: 0..1;
+        RESERVED: 0..((1 shl 31)-1);
+      end;
+    {$ifdef cpu64}
+    __popupReserved: id;
+    {$endif}
+    
+  public
+    class function alloc: NSPopUpButton; message 'alloc';
+
+    function initWithFrame_pullsDown(buttonFrame: NSRect; flag: Boolean): id; message 'initWithFrame:pullsDown:';
+    procedure setMenu(menu_: NSMenu); message 'setMenu:';
+    function menu: NSMenu; message 'menu';
+    procedure setPullsDown(flag: Boolean); message 'setPullsDown:';
+    function pullsDown: Boolean; message 'pullsDown';
+    procedure setAutoenablesItems(flag: Boolean); message 'setAutoenablesItems:';
+    function autoenablesItems: Boolean; message 'autoenablesItems';
+    procedure setPreferredEdge(edge: NSRectEdge); message 'setPreferredEdge:';
+    function preferredEdge: NSRectEdge; message 'preferredEdge';
+    procedure addItemWithTitle(title_: NSString); message 'addItemWithTitle:';
+    procedure addItemsWithTitles(itemTitles_: NSArray); message 'addItemsWithTitles:';
+    procedure insertItemWithTitle_atIndex(title_: NSString; index: clong); message 'insertItemWithTitle:atIndex:';
+    procedure removeItemWithTitle(title_: NSString); message 'removeItemWithTitle:';
+    procedure removeItemAtIndex(index: clong); message 'removeItemAtIndex:';
+    procedure removeAllItems; message 'removeAllItems';
+    function itemArray: NSArray; message 'itemArray';
+    function numberOfItems: clong; message 'numberOfItems';
+    function indexOfItem(item: NSMenuItem): clong; message 'indexOfItem:';
+    function indexOfItemWithTitle(title_: NSString): clong; message 'indexOfItemWithTitle:';
+    function indexOfItemWithTag(tag_: clong): clong; message 'indexOfItemWithTag:';
+    function indexOfItemWithRepresentedObject(obj: id): clong; message 'indexOfItemWithRepresentedObject:';
+    function indexOfItemWithTarget_andAction(target_: id; actionSelector: SEL): clong; message 'indexOfItemWithTarget:andAction:';
+    function itemAtIndex(index: clong): NSMenuItem; message 'itemAtIndex:';
+    function itemWithTitle(title_: NSString): NSMenuItem; message 'itemWithTitle:';
+    function lastItem: NSMenuItem; message 'lastItem';
+    procedure selectItem(item: NSMenuItem); message 'selectItem:';
+    procedure selectItemAtIndex(index: clong); message 'selectItemAtIndex:';
+    procedure selectItemWithTitle(title_: NSString); message 'selectItemWithTitle:';
+    function selectItemWithTag(tag_: clong): Boolean; message 'selectItemWithTag:';
+    procedure setTitle(aString: NSString); message 'setTitle:';
+    function selectedItem: NSMenuItem; message 'selectedItem';
+    function indexOfSelectedItem: clong; message 'indexOfSelectedItem';
+    procedure synchronizeTitleAndSelectedItem; message 'synchronizeTitleAndSelectedItem';
+    function itemTitleAtIndex(index: clong): NSString; message 'itemTitleAtIndex:';
+    function itemTitles: NSArray; message 'itemTitles';
+    function titleOfSelectedItem: NSString; message 'titleOfSelectedItem';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSPopUpButtonCell.inc b/packages/cocoaint/src/appkit/NSPopUpButtonCell.inc
new file mode 100644
index 0000000000..2154c5fd5d
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSPopUpButtonCell.inc
@@ -0,0 +1,139 @@
+{ Parsed from Appkit.framework NSPopUpButtonCell.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPOPUPBUTTONCELL_PAS_H}
+{$define NSPOPUPBUTTONCELL_PAS_H}
+type
+  NSPopUpButtonCellPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPOPUPBUTTONCELL_PAS_T}
+{$define NSPOPUPBUTTONCELL_PAS_T}
+
+{ Constants }
+
+const
+  NSPopUpNoArrow = 0;
+  NSPopUpArrowAtCenter = 1;
+  NSPopUpArrowAtBottom = 2;
+
+{ Types }
+type
+  NSPopUpArrowPosition = culong;
+
+{ CFString constants }
+var
+  NSPopUpButtonCellWillPopUpNotification: CFStringRef; external name '_NSPopUpButtonCellWillPopUpNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPOPUPBUTTONCELL_PAS_R}
+{$define NSPOPUPBUTTONCELL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPOPUPBUTTONCELL_PAS_F}
+{$define NSPOPUPBUTTONCELL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPOPUPBUTTONCELL_PAS_T}
+{$define NSPOPUPBUTTONCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPopUpButtonCell = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPOPUPBUTTONCELL_PAS_C}
+{$define NSPOPUPBUTTONCELL_PAS_C}
+
+{ NSPopUpButtonCell }
+  NSPopUpButtonCell = objcclass(NSMenuItemCell)
+  private
+    __menu: NSMenu;
+    __selectedIndex: cint;
+    __pbcFlags: bitpacked record
+        pullsDown: 0..1;
+        preferredEdge: 0..((1 shl 3)-1);
+        menuIsAttached: 0..1;
+        usesItemFromMenu: 0..1;
+        altersStateOfSelectedItem: 0..1;
+        decoding: 0..1;
+        arrowPosition: 0..((1 shl 2)-1);
+        ignoreMenuLayout: 0..1;
+        drawing: 0..1;
+        RESERVED: 0..((1 shl 20)-1);
+      end;
+    {$ifdef cpu64}
+    __popupReserved: id;
+    {$endif}
+    
+  public
+    class function alloc: NSPopUpButtonCell; message 'alloc';
+
+    function initTextCell_pullsDown(stringValue_: NSString; pullDown: Boolean): id; message 'initTextCell:pullsDown:';
+    procedure setMenu(menu_: NSMenu); message 'setMenu:';
+    function menu: NSMenu; message 'menu';
+    procedure setPullsDown(flag: Boolean); message 'setPullsDown:';
+    function pullsDown: Boolean; message 'pullsDown';
+    procedure setAutoenablesItems(flag: Boolean); message 'setAutoenablesItems:';
+    function autoenablesItems: Boolean; message 'autoenablesItems';
+    procedure setPreferredEdge(edge: NSRectEdge); message 'setPreferredEdge:';
+    function preferredEdge: NSRectEdge; message 'preferredEdge';
+    procedure setUsesItemFromMenu(flag: Boolean); message 'setUsesItemFromMenu:';
+    function usesItemFromMenu: Boolean; message 'usesItemFromMenu';
+    procedure setAltersStateOfSelectedItem(flag: Boolean); message 'setAltersStateOfSelectedItem:';
+    function altersStateOfSelectedItem: Boolean; message 'altersStateOfSelectedItem';
+    procedure addItemWithTitle(title_: NSString); message 'addItemWithTitle:';
+    procedure addItemsWithTitles(itemTitles_: NSArray); message 'addItemsWithTitles:';
+    procedure insertItemWithTitle_atIndex(title_: NSString; index: clong); message 'insertItemWithTitle:atIndex:';
+    procedure removeItemWithTitle(title_: NSString); message 'removeItemWithTitle:';
+    procedure removeItemAtIndex(index: clong); message 'removeItemAtIndex:';
+    procedure removeAllItems; message 'removeAllItems';
+    function itemArray: NSArray; message 'itemArray';
+    function numberOfItems: clong; message 'numberOfItems';
+    function indexOfItem(item: NSMenuItem): clong; message 'indexOfItem:';
+    function indexOfItemWithTitle(title_: NSString): clong; message 'indexOfItemWithTitle:';
+    function indexOfItemWithTag(tag_: clong): clong; message 'indexOfItemWithTag:';
+    function indexOfItemWithRepresentedObject(obj: id): clong; message 'indexOfItemWithRepresentedObject:';
+    function indexOfItemWithTarget_andAction(target_: id; actionSelector: SEL): clong; message 'indexOfItemWithTarget:andAction:';
+    function itemAtIndex(index: clong): NSMenuItem; message 'itemAtIndex:';
+    function itemWithTitle(title_: NSString): NSMenuItem; message 'itemWithTitle:';
+    function lastItem: NSMenuItem; message 'lastItem';
+    procedure selectItem(item: NSMenuItem); message 'selectItem:';
+    procedure selectItemAtIndex(index: clong); message 'selectItemAtIndex:';
+    procedure selectItemWithTitle(title_: NSString); message 'selectItemWithTitle:';
+    function selectItemWithTag(tag_: clong): Boolean; message 'selectItemWithTag:';
+    procedure setTitle(aString: NSString); message 'setTitle:';
+    function selectedItem: NSMenuItem; message 'selectedItem';
+    function indexOfSelectedItem: clong; message 'indexOfSelectedItem';
+    procedure synchronizeTitleAndSelectedItem; message 'synchronizeTitleAndSelectedItem';
+    function itemTitleAtIndex(index: clong): NSString; message 'itemTitleAtIndex:';
+    function itemTitles: NSArray; message 'itemTitles';
+    function titleOfSelectedItem: NSString; message 'titleOfSelectedItem';
+    procedure attachPopUpWithFrame_inView(cellFrame: NSRect; controlView_: NSView); message 'attachPopUpWithFrame:inView:';
+    procedure dismissPopUp; message 'dismissPopUp';
+    procedure performClickWithFrame_inView(frame: NSRect; controlView_: NSView); message 'performClickWithFrame:inView:';
+    function arrowPosition: NSPopUpArrowPosition; message 'arrowPosition';
+    procedure setArrowPosition(position: NSPopUpArrowPosition); message 'setArrowPosition:';
+    function objectValue: id; message 'objectValue';
+    procedure setObjectValue(obj: id); message 'setObjectValue:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSPredicateEditor.inc b/packages/cocoaint/src/appkit/NSPredicateEditor.inc
new file mode 100644
index 0000000000..ab358b5974
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSPredicateEditor.inc
@@ -0,0 +1,72 @@
+{ Parsed from Appkit.framework NSPredicateEditor.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPREDICATEEDITOR_PAS_H}
+{$define NSPREDICATEEDITOR_PAS_H}
+type
+  NSPredicateEditorPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPREDICATEEDITOR_PAS_T}
+{$define NSPREDICATEEDITOR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPREDICATEEDITOR_PAS_R}
+{$define NSPREDICATEEDITOR_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPREDICATEEDITOR_PAS_F}
+{$define NSPREDICATEEDITOR_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPREDICATEEDITOR_PAS_T}
+{$define NSPREDICATEEDITOR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPredicateEditor = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPREDICATEEDITOR_PAS_C}
+{$define NSPREDICATEEDITOR_PAS_C}
+
+{ NSPredicateEditor }
+  NSPredicateEditor = objcclass(NSRuleEditor)
+  private
+    __allTemplates: id;
+    __rootItems: NSArray;
+    __rootHeaderItems: NSArray;
+    __predicateTarget: id;
+    __predicateAction: SEL;
+    __peFlags: bitpacked record
+        settingValue: 0..1;
+        reserved: 0..((1 shl 31)-1);
+      end;
+    __predicateEditorReserved: id;
+    
+  public
+    class function alloc: NSPredicateEditor; message 'alloc';
+
+    procedure setRowTemplates(rowTemplates_: NSArray); message 'setRowTemplates:';
+    function rowTemplates: NSArray; message 'rowTemplates';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSPrintInfo.inc b/packages/cocoaint/src/appkit/NSPrintInfo.inc
new file mode 100644
index 0000000000..9ad31281bc
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSPrintInfo.inc
@@ -0,0 +1,165 @@
+{ Parsed from Appkit.framework NSPrintInfo.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPRINTINFO_PAS_H}
+{$define NSPRINTINFO_PAS_H}
+type
+  NSPrintInfoPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPRINTINFO_PAS_T}
+{$define NSPRINTINFO_PAS_T}
+
+{ Constants }
+
+const
+  NSPortraitOrientation = 0;
+  NSLandscapeOrientation = 1;
+
+const
+  NSAutoPagination = 0;
+  NSFitPagination = 1;
+  NSClipPagination = 2;
+
+{ Types }
+type
+  NSPrintingOrientation = culong;
+  NSPrintingPaginationMode = culong;
+
+{ CFString constants }
+var
+  NSPrintSpoolJob: CFStringRef; external name '_NSPrintSpoolJob';
+  NSPrintPreviewJob: CFStringRef; external name '_NSPrintPreviewJob';
+  NSPrintSaveJob: CFStringRef; external name '_NSPrintSaveJob';
+  NSPrintCancelJob: CFStringRef; external name '_NSPrintCancelJob';
+  NSPrintPaperName: CFStringRef; external name '_NSPrintPaperName';
+  NSPrintPaperSize: CFStringRef; external name '_NSPrintPaperSize';
+  NSPrintOrientation: CFStringRef; external name '_NSPrintOrientation';
+  NSPrintScalingFactor: CFStringRef; external name '_NSPrintScalingFactor';
+  NSPrintLeftMargin: CFStringRef; external name '_NSPrintLeftMargin';
+  NSPrintRightMargin: CFStringRef; external name '_NSPrintRightMargin';
+  NSPrintTopMargin: CFStringRef; external name '_NSPrintTopMargin';
+  NSPrintBottomMargin: CFStringRef; external name '_NSPrintBottomMargin';
+  NSPrintHorizontallyCentered: CFStringRef; external name '_NSPrintHorizontallyCentered';
+  NSPrintVerticallyCentered: CFStringRef; external name '_NSPrintVerticallyCentered';
+  NSPrintHorizontalPagination: CFStringRef; external name '_NSPrintHorizontalPagination';
+  NSPrintVerticalPagination: CFStringRef; external name '_NSPrintVerticalPagination';
+  NSPrintPrinter: CFStringRef; external name '_NSPrintPrinter';
+  NSPrintCopies: CFStringRef; external name '_NSPrintCopies';
+  NSPrintAllPages: CFStringRef; external name '_NSPrintAllPages';
+  NSPrintFirstPage: CFStringRef; external name '_NSPrintFirstPage';
+  NSPrintLastPage: CFStringRef; external name '_NSPrintLastPage';
+  NSPrintMustCollate: CFStringRef; external name '_NSPrintMustCollate';
+  NSPrintReversePageOrder: CFStringRef; external name '_NSPrintReversePageOrder';
+  NSPrintJobDisposition: CFStringRef; external name '_NSPrintJobDisposition';
+  NSPrintSavePath: CFStringRef; external name '_NSPrintSavePath';
+  NSPrintFormName: CFStringRef; external name '_NSPrintFormName';
+  NSPrintJobFeatures: CFStringRef; external name '_NSPrintJobFeatures';
+  NSPrintManualFeed: CFStringRef; external name '_NSPrintManualFeed';
+  NSPrintPagesPerSheet: CFStringRef; external name '_NSPrintPagesPerSheet';
+  NSPrintPaperFeed: CFStringRef; external name '_NSPrintPaperFeed';
+  NSPrintFaxCoverSheetName: CFStringRef; external name '_NSPrintFaxCoverSheetName';
+  NSPrintFaxHighResolution: CFStringRef; external name '_NSPrintFaxHighResolution';
+  NSPrintFaxModem: CFStringRef; external name '_NSPrintFaxModem';
+  NSPrintFaxReceiverNames: CFStringRef; external name '_NSPrintFaxReceiverNames';
+  NSPrintFaxReceiverNumbers: CFStringRef; external name '_NSPrintFaxReceiverNumbers';
+  NSPrintFaxReturnReceipt: CFStringRef; external name '_NSPrintFaxReturnReceipt';
+  NSPrintFaxSendTime: CFStringRef; external name '_NSPrintFaxSendTime';
+  NSPrintFaxTrimPageEnds: CFStringRef; external name '_NSPrintFaxTrimPageEnds';
+  NSPrintFaxUseCoverSheet: CFStringRef; external name '_NSPrintFaxUseCoverSheet';
+  NSPrintFaxJob: CFStringRef; external name '_NSPrintFaxJob';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPRINTINFO_PAS_R}
+{$define NSPRINTINFO_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPRINTINFO_PAS_F}
+{$define NSPRINTINFO_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPRINTINFO_PAS_T}
+{$define NSPRINTINFO_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPrintInfo = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPRINTINFO_PAS_C}
+{$define NSPRINTINFO_PAS_C}
+
+{ NSPrintInfo }
+  NSPrintInfo = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __attributes: NSMutableDictionary;
+    __moreVars: id;
+    
+  public
+    class function alloc: NSPrintInfo; message 'alloc';
+
+    class procedure setSharedPrintInfo(printInfo: NSPrintInfo); message 'setSharedPrintInfo:';
+    class function sharedPrintInfo: NSPrintInfo; message 'sharedPrintInfo';
+    function initWithDictionary(attributes: NSDictionary): id; message 'initWithDictionary:';
+    function dictionary: NSMutableDictionary; message 'dictionary';
+    procedure setPaperName(name: NSString); message 'setPaperName:';
+    procedure setPaperSize(size: NSSize); message 'setPaperSize:';
+    procedure setOrientation(orientation_: NSPrintingOrientation); message 'setOrientation:';
+    function paperName: NSString; message 'paperName';
+    function paperSize: NSSize; message 'paperSize';
+    function orientation: NSPrintingOrientation; message 'orientation';
+    procedure setLeftMargin(margin: CGFloat); message 'setLeftMargin:';
+    procedure setRightMargin(margin: CGFloat); message 'setRightMargin:';
+    procedure setTopMargin(margin: CGFloat); message 'setTopMargin:';
+    procedure setBottomMargin(margin: CGFloat); message 'setBottomMargin:';
+    function leftMargin: CGFloat; message 'leftMargin';
+    function rightMargin: CGFloat; message 'rightMargin';
+    function topMargin: CGFloat; message 'topMargin';
+    function bottomMargin: CGFloat; message 'bottomMargin';
+    procedure setHorizontallyCentered(flag: Boolean); message 'setHorizontallyCentered:';
+    procedure setVerticallyCentered(flag: Boolean); message 'setVerticallyCentered:';
+    function isHorizontallyCentered: Boolean; message 'isHorizontallyCentered';
+    function isVerticallyCentered: Boolean; message 'isVerticallyCentered';
+    procedure setHorizontalPagination(mode: NSPrintingPaginationMode); message 'setHorizontalPagination:';
+    procedure setVerticalPagination(mode: NSPrintingPaginationMode); message 'setVerticalPagination:';
+    function horizontalPagination: NSPrintingPaginationMode; message 'horizontalPagination';
+    function verticalPagination: NSPrintingPaginationMode; message 'verticalPagination';
+    procedure setJobDisposition(disposition: NSString); message 'setJobDisposition:';
+    function jobDisposition: NSString; message 'jobDisposition';
+    procedure setPrinter(printer_: NSPrinter); message 'setPrinter:';
+    function printer: NSPrinter; message 'printer';
+    procedure setUpPrintOperationDefaultValues; message 'setUpPrintOperationDefaultValues';
+    function imageablePageBounds: NSRect; message 'imageablePageBounds';
+    function localizedPaperName: NSString; message 'localizedPaperName';
+    class function defaultPrinter: NSPrinter; message 'defaultPrinter';
+    function printSettings: NSMutableDictionary; message 'printSettings';
+    function PMPrintSession: Pointer; message 'PMPrintSession';
+    function PMPageFormat: Pointer; message 'PMPageFormat';
+    function PMPrintSettings: Pointer; message 'PMPrintSettings';
+    procedure updateFromPMPageFormat; message 'updateFromPMPageFormat';
+    procedure updateFromPMPrintSettings; message 'updateFromPMPrintSettings';
+
+    { Category: NSDeprecated }
+    class procedure setDefaultPrinter(printer_: NSPrinter); message 'setDefaultPrinter:';
+    class function sizeForPaperName(name: NSString): NSSize; message 'sizeForPaperName:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSPrintOperation.inc b/packages/cocoaint/src/appkit/NSPrintOperation.inc
new file mode 100644
index 0000000000..af75247596
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSPrintOperation.inc
@@ -0,0 +1,116 @@
+{ Parsed from Appkit.framework NSPrintOperation.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPRINTOPERATION_PAS_H}
+{$define NSPRINTOPERATION_PAS_H}
+type
+  NSPrintOperationPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPRINTOPERATION_PAS_T}
+{$define NSPRINTOPERATION_PAS_T}
+
+{ Constants }
+
+const
+  NSDescendingPageOrder = -1;
+  NSAscendingPageOrder = 1;
+
+{ Types }
+type
+  NSPrintingPageOrder = clong;
+
+{ CFString constants }
+var
+  NSPrintOperationExistsException: CFStringRef; external name '_NSPrintOperationExistsException';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPRINTOPERATION_PAS_R}
+{$define NSPRINTOPERATION_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPRINTOPERATION_PAS_F}
+{$define NSPRINTOPERATION_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPRINTOPERATION_PAS_T}
+{$define NSPRINTOPERATION_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPrintOperation = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPRINTOPERATION_PAS_C}
+{$define NSPRINTOPERATION_PAS_C}
+
+{ NSPrintOperation }
+  NSPrintOperation = objcclass(NSObject)
+    
+  public
+    class function alloc: NSPrintOperation; message 'alloc';
+
+    class function printOperationWithView_printInfo(view_: NSView; printInfo_: NSPrintInfo): NSPrintOperation; message 'printOperationWithView:printInfo:';
+    class function PDFOperationWithView_insideRect_toData_printInfo(view_: NSView; rect: NSRect; data: NSMutableData; printInfo_: NSPrintInfo): NSPrintOperation; message 'PDFOperationWithView:insideRect:toData:printInfo:';
+    class function PDFOperationWithView_insideRect_toPath_printInfo(view_: NSView; rect: NSRect; path: NSString; printInfo_: NSPrintInfo): NSPrintOperation; message 'PDFOperationWithView:insideRect:toPath:printInfo:';
+    class function EPSOperationWithView_insideRect_toData_printInfo(view_: NSView; rect: NSRect; data: NSMutableData; printInfo_: NSPrintInfo): NSPrintOperation; message 'EPSOperationWithView:insideRect:toData:printInfo:';
+    class function EPSOperationWithView_insideRect_toPath_printInfo(view_: NSView; rect: NSRect; path: NSString; printInfo_: NSPrintInfo): NSPrintOperation; message 'EPSOperationWithView:insideRect:toPath:printInfo:';
+    class function printOperationWithView(view_: NSView): NSPrintOperation; message 'printOperationWithView:';
+    class function PDFOperationWithView_insideRect_toData(view_: NSView; rect: NSRect; data: NSMutableData): NSPrintOperation; message 'PDFOperationWithView:insideRect:toData:';
+    class function EPSOperationWithView_insideRect_toData(view_: NSView; rect: NSRect; data: NSMutableData): NSPrintOperation; message 'EPSOperationWithView:insideRect:toData:';
+    class function currentOperation: NSPrintOperation; message 'currentOperation';
+    class procedure setCurrentOperation(operation: NSPrintOperation); message 'setCurrentOperation:';
+    function isCopyingOperation: Boolean; message 'isCopyingOperation';
+    procedure setJobTitle(jobTitle_: NSString); message 'setJobTitle:';
+    function jobTitle: NSString; message 'jobTitle';
+    procedure setShowsPrintPanel(flag: Boolean); message 'setShowsPrintPanel:';
+    function showsPrintPanel: Boolean; message 'showsPrintPanel';
+    procedure setShowsProgressPanel(flag: Boolean); message 'setShowsProgressPanel:';
+    function showsProgressPanel: Boolean; message 'showsProgressPanel';
+    procedure setPrintPanel(panel: NSPrintPanel); message 'setPrintPanel:';
+    function printPanel: NSPrintPanel; message 'printPanel';
+    procedure setCanSpawnSeparateThread(canSpawnSeparateThread_: Boolean); message 'setCanSpawnSeparateThread:';
+    function canSpawnSeparateThread: Boolean; message 'canSpawnSeparateThread';
+    procedure setPageOrder(pageOrder_: NSPrintingPageOrder); message 'setPageOrder:';
+    function pageOrder: NSPrintingPageOrder; message 'pageOrder';
+    procedure runOperationModalForWindow_delegate_didRunSelector_contextInfo(docWindow: NSWindow; delegate: id; didRunSelector: SEL; contextInfo: Pointer); message 'runOperationModalForWindow:delegate:didRunSelector:contextInfo:';
+    function runOperation: Boolean; message 'runOperation';
+    function view: NSView; message 'view';
+    function printInfo: NSPrintInfo; message 'printInfo';
+    procedure setPrintInfo(printInfo_: NSPrintInfo); message 'setPrintInfo:';
+    function context: NSGraphicsContext; message 'context';
+    function pageRange: NSRange; message 'pageRange';
+    function currentPage: clong; message 'currentPage';
+    function createContext: NSGraphicsContext; message 'createContext';
+    procedure destroyContext; message 'destroyContext';
+    function deliverResult: Boolean; message 'deliverResult';
+    procedure cleanUpOperation; message 'cleanUpOperation';
+
+    { Category: NSDeprecated }
+    procedure setAccessoryView(view_: NSView); message 'setAccessoryView:';
+    function accessoryView: NSView; message 'accessoryView';
+    procedure setJobStyleHint(hint: NSString); message 'setJobStyleHint:';
+    function jobStyleHint: NSString; message 'jobStyleHint';
+    procedure setShowPanels(flag: Boolean); message 'setShowPanels:';
+    function showPanels: Boolean; message 'showPanels';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSPrintPanel.inc b/packages/cocoaint/src/appkit/NSPrintPanel.inc
new file mode 100644
index 0000000000..a6a753ab98
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSPrintPanel.inc
@@ -0,0 +1,127 @@
+{ Parsed from Appkit.framework NSPrintPanel.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPRINTPANEL_PAS_H}
+{$define NSPRINTPANEL_PAS_H}
+type
+  NSPrintPanelPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPRINTPANEL_PAS_T}
+{$define NSPRINTPANEL_PAS_T}
+
+{ Constants }
+
+const
+  NSPrintPanelShowsCopies = $01;
+  NSPrintPanelShowsPageRange = $02;
+  NSPrintPanelShowsPaperSize = $04;
+  NSPrintPanelShowsOrientation = $08;
+  NSPrintPanelShowsScaling = $10;
+  NSPrintPanelShowsPageSetupAccessory = $100;
+  NSPrintPanelShowsPreview = $20000;
+
+{ Types }
+type
+  NSPrintPanelOptions = clong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPRINTPANEL_PAS_R}
+{$define NSPRINTPANEL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPRINTPANEL_PAS_F}
+{$define NSPRINTPANEL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPRINTPANEL_PAS_T}
+{$define NSPRINTPANEL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPrintPanelAccessorizingProtocol = objcprotocol;
+  NSPrintPanel = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPRINTPANEL_PAS_C}
+{$define NSPRINTPANEL_PAS_C}
+
+{ NSPrintPanel }
+  NSPrintPanel = objcclass(NSObject)
+  private
+    __accessoryControllers: NSMutableArray;
+    __previewController: id;
+    __thumbnailView: NSView;
+    __options: clong;
+    __defaultButtonTitle: NSString;
+    __helpAnchor: NSString;
+    __jobStyleHint: NSString;
+    __originalPrintInfo: NSPrintInfo;
+    __delegate: id;
+    __didEndSelector: SEL;
+    __contextInfo: Pointer;
+    __presentedPrintInfo: NSPrintInfo;
+    __windowController: NSWindowController;
+    {$ifdef cpu64}
+    __reserved: id;
+    {$else}
+    __compatibilityPadding: char;
+    {$endif}
+    
+  public
+    class function alloc: NSPrintPanel; message 'alloc';
+
+    class function printPanel: NSPrintPanel; message 'printPanel';
+    procedure addAccessoryController(accessoryController: NSViewController); message 'addAccessoryController:';
+    procedure removeAccessoryController(accessoryController: NSViewController); message 'removeAccessoryController:';
+    function accessoryControllers: NSArray; message 'accessoryControllers';
+    procedure setOptions(options_: NSPrintPanelOptions); message 'setOptions:';
+    function options: NSPrintPanelOptions; message 'options';
+    procedure setDefaultButtonTitle(defaultButtonTitle_: NSString); message 'setDefaultButtonTitle:';
+    function defaultButtonTitle: NSString; message 'defaultButtonTitle';
+    procedure setHelpAnchor(helpAnchor_: NSString); message 'setHelpAnchor:';
+    function helpAnchor: NSString; message 'helpAnchor';
+    procedure setJobStyleHint(hint: NSString); message 'setJobStyleHint:';
+    function jobStyleHint: NSString; message 'jobStyleHint';
+    procedure beginSheetWithPrintInfo_modalForWindow_delegate_didEndSelector_contextInfo(printInfo_: NSPrintInfo; docWindow: NSWindow; delegate: id; didEndSelector: SEL; contextInfo: Pointer); message 'beginSheetWithPrintInfo:modalForWindow:delegate:didEndSelector:contextInfo:';
+    function runModalWithPrintInfo(printInfo_: NSPrintInfo): clong; message 'runModalWithPrintInfo:';
+    function runModal: clong; message 'runModal';
+    function printInfo: NSPrintInfo; message 'printInfo';
+
+    { Category: NSDeprecated }
+    procedure setAccessoryView(accessoryView_: NSView); message 'setAccessoryView:';
+    function accessoryView: NSView; message 'accessoryView';
+    procedure updateFromPrintInfo; message 'updateFromPrintInfo';
+    procedure finalWritePrintInfo; message 'finalWritePrintInfo';
+  end; external;
+
+{$endif}
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSPRINTPANEL_PAS_P}
+{$define NSPRINTPANEL_PAS_P}
+  
+{ NSPrintPanelAccessorizing Protocol }
+  NSPrintPanelAccessorizingProtocol = objcprotocol
+    function localizedSummaryItems: NSArray; message 'localizedSummaryItems';
+    function keyPathsForValuesAffectingPreview: NSSet; message 'keyPathsForValuesAffectingPreview';
+  end; external name 'NSPrintPanelAccessorizing';
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSPrinter.inc b/packages/cocoaint/src/appkit/NSPrinter.inc
new file mode 100644
index 0000000000..7b9507daa9
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSPrinter.inc
@@ -0,0 +1,111 @@
+{ Parsed from Appkit.framework NSPrinter.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPRINTER_PAS_H}
+{$define NSPRINTER_PAS_H}
+type
+  NSPrinterPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPRINTER_PAS_T}
+{$define NSPRINTER_PAS_T}
+
+{ Constants }
+
+const
+  NSPrinterTableOK = 0;
+  NSPrinterTableNotFound = 1;
+  NSPrinterTableError = 2;
+
+{ Types }
+type
+  NSPrinterTableStatus = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPRINTER_PAS_R}
+{$define NSPRINTER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPRINTER_PAS_F}
+{$define NSPRINTER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPRINTER_PAS_T}
+{$define NSPRINTER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPrinter = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPRINTER_PAS_C}
+{$define NSPRINTER_PAS_C}
+
+{ NSPrinter }
+  NSPrinter = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __printerName: NSString;
+    __printer: Pointer;
+    __cachedDeviceDescription: NSDictionary;
+    __ppdCreationNum: cint;
+    __ppdNodes: Pointer;
+    __ppdPriv: Pointer;
+    {$ifdef cpu64}
+    __reserved: id;
+    {$else}
+    __compatibilityPadding: char;
+    {$endif}
+    
+  public
+    class function alloc: NSPrinter; message 'alloc';
+
+    class function printerNames: NSArray; message 'printerNames';
+    class function printerTypes: NSArray; message 'printerTypes';
+    class function printerWithName(name_: NSString): NSPrinter; message 'printerWithName:';
+    class function printerWithType(type__: NSString): NSPrinter; message 'printerWithType:';
+    function name: NSString; message 'name';
+    function type_: NSString; message 'type';
+    function languageLevel: clong; message 'languageLevel';
+    function pageSizeForPaper(paperName: NSString): NSSize; message 'pageSizeForPaper:';
+    function statusForTable(tableName: NSString): NSPrinterTableStatus; message 'statusForTable:';
+    function isKey_inTable(key: NSString; table: NSString): Boolean; message 'isKey:inTable:';
+    function booleanForKey_inTable(key: NSString; table: NSString): Boolean; message 'booleanForKey:inTable:';
+    function floatForKey_inTable(key: NSString; table: NSString): single; message 'floatForKey:inTable:';
+    function intForKey_inTable(key: NSString; table: NSString): cint; message 'intForKey:inTable:';
+    function rectForKey_inTable(key: NSString; table: NSString): NSRect; message 'rectForKey:inTable:';
+    function sizeForKey_inTable(key: NSString; table: NSString): NSSize; message 'sizeForKey:inTable:';
+    function stringForKey_inTable(key: NSString; table: NSString): NSString; message 'stringForKey:inTable:';
+    function stringListForKey_inTable(key: NSString; table: NSString): NSArray; message 'stringListForKey:inTable:';
+    function deviceDescription: NSDictionary; message 'deviceDescription';
+
+    { Category: NSDeprecated }
+    function imageRectForPaper(paperName: NSString): NSRect; message 'imageRectForPaper:';
+    function acceptsBinary: Boolean; message 'acceptsBinary';
+    function isColor: Boolean; message 'isColor';
+    function isFontAvailable(faceName: NSString): Boolean; message 'isFontAvailable:';
+    function isOutputStackInReverseOrder: Boolean; message 'isOutputStackInReverseOrder';
+    class function printerWithName_domain_includeUnavailable(name_: NSString; domain_: NSString; flag: Boolean): NSPrinter; message 'printerWithName:domain:includeUnavailable:';
+    function domain: NSString; message 'domain';
+    function host: NSString; message 'host';
+    function note: NSString; message 'note';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSProgressIndicator.inc b/packages/cocoaint/src/appkit/NSProgressIndicator.inc
new file mode 100644
index 0000000000..c1afc82c32
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSProgressIndicator.inc
@@ -0,0 +1,132 @@
+{ Parsed from Appkit.framework NSProgressIndicator.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPROGRESSINDICATOR_PAS_H}
+{$define NSPROGRESSINDICATOR_PAS_H}
+type
+  NSProgressIndicatorPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPROGRESSINDICATOR_PAS_T}
+{$define NSPROGRESSINDICATOR_PAS_T}
+
+{ Types }
+type
+  __NSProgressIndicatorThreadInfo = Pointer;
+  _NSProgressIndicatorThreadInfo = __NSProgressIndicatorThreadInfo;
+  NSProgressIndicatorThickness = culong;
+  NSProgressIndicatorStyle = culong;
+
+{ Constants }
+
+const
+  NSProgressIndicatorPreferredThickness = 14;
+  NSProgressIndicatorPreferredSmallThickness = 10;
+  NSProgressIndicatorPreferredLargeThickness = 18;
+  NSProgressIndicatorPreferredAquaThickness = 12;
+
+const
+  NSProgressIndicatorBarStyle = 0;
+  NSProgressIndicatorSpinningStyle = 1;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPROGRESSINDICATOR_PAS_R}
+{$define NSPROGRESSINDICATOR_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPROGRESSINDICATOR_PAS_F}
+{$define NSPROGRESSINDICATOR_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPROGRESSINDICATOR_PAS_T}
+{$define NSPROGRESSINDICATOR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSProgressIndicator = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPROGRESSINDICATOR_PAS_C}
+{$define NSPROGRESSINDICATOR_PAS_C}
+
+{ NSProgressIndicator }
+  NSProgressIndicator = objcclass(NSView)
+  private
+    __isBezeled: Boolean;
+    __isIndeterminate: Boolean;
+    __threadedAnimation: Boolean;
+    __minimum: double;
+    __maximum: double;
+    __value: double;
+    __animationIndex: cint;
+    __animationDelay: NSTimeInterval;
+    __timer: id;
+    __animationThreadLock: id;
+    __cachedImage: id;
+    __cachedImageLock: id;
+    _isSpinning: 0..1;
+    _isVector: 0..1;
+    _isLocked: 0..1;
+    _controlTint: 0..((1 shl 3)-1);
+    _controlSize: 0..((1 shl 2)-1);
+    _style: 0..1;
+    __delayedStartup: 0..1;
+    __orderOutForResize: 0..1;
+    _hideWhenStopped: 0..1;
+    _revive: 0..1;
+    _RESERVED: 0..((1 shl 19)-1);
+    __progressIndicatorFlags: record
+      end;
+    __NSProgressIndicatorReserved1: id;
+    
+  public
+    class function alloc: NSProgressIndicator; message 'alloc';
+
+    function isIndeterminate: Boolean; message 'isIndeterminate';
+    procedure setIndeterminate(flag: Boolean); message 'setIndeterminate:';
+    function isBezeled: Boolean; message 'isBezeled';
+    procedure setBezeled(flag: Boolean); message 'setBezeled:';
+    function controlTint: NSControlTint; message 'controlTint';
+    procedure setControlTint(tint: NSControlTint); message 'setControlTint:';
+    function controlSize: NSControlSize; message 'controlSize';
+    procedure setControlSize(size: NSControlSize); message 'setControlSize:';
+    function doubleValue: double; message 'doubleValue';
+    procedure setDoubleValue(doubleValue_: double); message 'setDoubleValue:';
+    procedure incrementBy(delta: double); message 'incrementBy:';
+    function minValue: double; message 'minValue';
+    function maxValue: double; message 'maxValue';
+    procedure setMinValue(newMinimum: double); message 'setMinValue:';
+    procedure setMaxValue(newMaximum: double); message 'setMaxValue:';
+    function animationDelay: NSTimeInterval; message 'animationDelay';
+    procedure setAnimationDelay(delay: NSTimeInterval); message 'setAnimationDelay:';
+    function usesThreadedAnimation: Boolean; message 'usesThreadedAnimation';
+    procedure setUsesThreadedAnimation(threadedAnimation: Boolean); message 'setUsesThreadedAnimation:';
+    procedure startAnimation(sender: id); message 'startAnimation:';
+    procedure stopAnimation(sender: id); message 'stopAnimation:';
+    procedure animate(sender: id); message 'animate:';
+    procedure setStyle(style_: NSProgressIndicatorStyle); message 'setStyle:';
+    function style: NSProgressIndicatorStyle; message 'style';
+    procedure sizeToFit; message 'sizeToFit';
+    function isDisplayedWhenStopped: Boolean; message 'isDisplayedWhenStopped';
+    procedure setDisplayedWhenStopped(isDisplayed: Boolean); message 'setDisplayedWhenStopped:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSQuickDrawView.inc b/packages/cocoaint/src/appkit/NSQuickDrawView.inc
new file mode 100644
index 0000000000..f2476a144e
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSQuickDrawView.inc
@@ -0,0 +1,64 @@
+{ Parsed from Appkit.framework NSQuickDrawView.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSQUICKDRAWVIEW_PAS_H}
+{$define NSQUICKDRAWVIEW_PAS_H}
+type
+  NSQuickDrawViewPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSQUICKDRAWVIEW_PAS_T}
+{$define NSQUICKDRAWVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSQUICKDRAWVIEW_PAS_R}
+{$define NSQUICKDRAWVIEW_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSQUICKDRAWVIEW_PAS_F}
+{$define NSQUICKDRAWVIEW_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSQUICKDRAWVIEW_PAS_T}
+{$define NSQUICKDRAWVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSQuickDrawView = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSQUICKDRAWVIEW_PAS_C}
+{$define NSQUICKDRAWVIEW_PAS_C}
+
+{ NSQuickDrawView }
+  NSQuickDrawView = objcclass(NSView)
+  private
+    __qdPort: Pointer;
+    __savePort: Pointer;
+    __synchToView: Boolean;
+    
+  public
+    class function alloc: NSQuickDrawView; message 'alloc';
+
+    function qdPort: Pointer; message 'qdPort';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSResponder.inc b/packages/cocoaint/src/appkit/NSResponder.inc
new file mode 100644
index 0000000000..104fa508a6
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSResponder.inc
@@ -0,0 +1,183 @@
+{ Parsed from Appkit.framework NSResponder.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSRESPONDER_PAS_H}
+{$define NSRESPONDER_PAS_H}
+type
+  NSResponderPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSRESPONDER_PAS_T}
+{$define NSRESPONDER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSRESPONDER_PAS_R}
+{$define NSRESPONDER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSRESPONDER_PAS_F}
+{$define NSRESPONDER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSRESPONDER_PAS_T}
+{$define NSRESPONDER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSResponder = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSRESPONDER_PAS_C}
+{$define NSRESPONDER_PAS_C}
+
+{ NSResponder }
+  NSResponder = objcclass(NSObject, NSCodingProtocol)
+  private
+    __nextResponder: id;
+    
+  public
+    class function alloc: NSResponder; message 'alloc';
+
+    function nextResponder: NSResponder; message 'nextResponder';
+    procedure setNextResponder(aResponder: NSResponder); message 'setNextResponder:';
+    function tryToPerform_with(anAction: SEL; anObject: id): Boolean; message 'tryToPerform:with:';
+    function performKeyEquivalent(theEvent: NSEvent): Boolean; message 'performKeyEquivalent:';
+    function validRequestorForSendType_returnType(sendType: NSString; returnType: NSString): id; message 'validRequestorForSendType:returnType:';
+    procedure mouseDown(theEvent: NSEvent); message 'mouseDown:';
+    procedure rightMouseDown(theEvent: NSEvent); message 'rightMouseDown:';
+    procedure otherMouseDown(theEvent: NSEvent); message 'otherMouseDown:';
+    procedure mouseUp(theEvent: NSEvent); message 'mouseUp:';
+    procedure rightMouseUp(theEvent: NSEvent); message 'rightMouseUp:';
+    procedure otherMouseUp(theEvent: NSEvent); message 'otherMouseUp:';
+    procedure mouseMoved(theEvent: NSEvent); message 'mouseMoved:';
+    procedure mouseDragged(theEvent: NSEvent); message 'mouseDragged:';
+    procedure scrollWheel(theEvent: NSEvent); message 'scrollWheel:';
+    procedure rightMouseDragged(theEvent: NSEvent); message 'rightMouseDragged:';
+    procedure otherMouseDragged(theEvent: NSEvent); message 'otherMouseDragged:';
+    procedure mouseEntered(theEvent: NSEvent); message 'mouseEntered:';
+    procedure mouseExited(theEvent: NSEvent); message 'mouseExited:';
+    procedure keyDown(theEvent: NSEvent); message 'keyDown:';
+    procedure keyUp(theEvent: NSEvent); message 'keyUp:';
+    procedure flagsChanged(theEvent: NSEvent); message 'flagsChanged:';
+    procedure tabletPoint(theEvent: NSEvent); message 'tabletPoint:';
+    procedure tabletProximity(theEvent: NSEvent); message 'tabletProximity:';
+    procedure cursorUpdate(event: NSEvent); message 'cursorUpdate:';
+    procedure noResponderFor(eventSelector: SEL); message 'noResponderFor:';
+    function acceptsFirstResponder: Boolean; message 'acceptsFirstResponder';
+    function becomeFirstResponder: Boolean; message 'becomeFirstResponder';
+    function resignFirstResponder: Boolean; message 'resignFirstResponder';
+    procedure interpretKeyEvents(eventArray: NSArray); message 'interpretKeyEvents:';
+    procedure flushBufferedKeyEvents; message 'flushBufferedKeyEvents';
+    procedure setMenu(menu_: NSMenu); message 'setMenu:';
+    function menu: NSMenu; message 'menu';
+    procedure showContextHelp(sender: id); message 'showContextHelp:';
+    procedure helpRequested(eventPtr: NSEventPointer); message 'helpRequested:';
+    function shouldBeTreatedAsInkEvent(theEvent: NSEvent): Boolean; message 'shouldBeTreatedAsInkEvent:';
+
+    { Category: NSKeyboardUI }
+    function performMnemonic(theString: NSString): Boolean; message 'performMnemonic:';
+
+    { Category: NSStandardKeyBindingMethods }
+    procedure insertText(insertString: id); message 'insertText:';
+    procedure doCommandBySelector(aSelector: SEL); message 'doCommandBySelector:';
+    procedure moveForward(sender: id); message 'moveForward:';
+    procedure moveRight(sender: id); message 'moveRight:';
+    procedure moveBackward(sender: id); message 'moveBackward:';
+    procedure moveLeft(sender: id); message 'moveLeft:';
+    procedure moveUp(sender: id); message 'moveUp:';
+    procedure moveDown(sender: id); message 'moveDown:';
+    procedure moveWordForward(sender: id); message 'moveWordForward:';
+    procedure moveWordBackward(sender: id); message 'moveWordBackward:';
+    procedure moveToBeginningOfLine(sender: id); message 'moveToBeginningOfLine:';
+    procedure moveToEndOfLine(sender: id); message 'moveToEndOfLine:';
+    procedure moveToBeginningOfParagraph(sender: id); message 'moveToBeginningOfParagraph:';
+    procedure moveToEndOfParagraph(sender: id); message 'moveToEndOfParagraph:';
+    procedure moveToEndOfDocument(sender: id); message 'moveToEndOfDocument:';
+    procedure moveToBeginningOfDocument(sender: id); message 'moveToBeginningOfDocument:';
+    procedure pageDown(sender: id); message 'pageDown:';
+    procedure pageUp(sender: id); message 'pageUp:';
+    procedure centerSelectionInVisibleArea(sender: id); message 'centerSelectionInVisibleArea:';
+    procedure moveBackwardAndModifySelection(sender: id); message 'moveBackwardAndModifySelection:';
+    procedure moveForwardAndModifySelection(sender: id); message 'moveForwardAndModifySelection:';
+    procedure moveWordForwardAndModifySelection(sender: id); message 'moveWordForwardAndModifySelection:';
+    procedure moveWordBackwardAndModifySelection(sender: id); message 'moveWordBackwardAndModifySelection:';
+    procedure moveUpAndModifySelection(sender: id); message 'moveUpAndModifySelection:';
+    procedure moveDownAndModifySelection(sender: id); message 'moveDownAndModifySelection:';
+    procedure moveWordRight(sender: id); message 'moveWordRight:';
+    procedure moveWordLeft(sender: id); message 'moveWordLeft:';
+    procedure moveRightAndModifySelection(sender: id); message 'moveRightAndModifySelection:';
+    procedure moveLeftAndModifySelection(sender: id); message 'moveLeftAndModifySelection:';
+    procedure moveWordRightAndModifySelection(sender: id); message 'moveWordRightAndModifySelection:';
+    procedure moveWordLeftAndModifySelection(sender: id); message 'moveWordLeftAndModifySelection:';
+    procedure scrollPageUp(sender: id); message 'scrollPageUp:';
+    procedure scrollPageDown(sender: id); message 'scrollPageDown:';
+    procedure scrollLineUp(sender: id); message 'scrollLineUp:';
+    procedure scrollLineDown(sender: id); message 'scrollLineDown:';
+    procedure transpose(sender: id); message 'transpose:';
+    procedure transposeWords(sender: id); message 'transposeWords:';
+    procedure selectAll(sender: id); message 'selectAll:';
+    procedure selectParagraph(sender: id); message 'selectParagraph:';
+    procedure selectLine(sender: id); message 'selectLine:';
+    procedure selectWord(sender: id); message 'selectWord:';
+    procedure indent(sender: id); message 'indent:';
+    procedure insertTab(sender: id); message 'insertTab:';
+    procedure insertBacktab(sender: id); message 'insertBacktab:';
+    procedure insertNewline(sender: id); message 'insertNewline:';
+    procedure insertParagraphSeparator(sender: id); message 'insertParagraphSeparator:';
+    procedure insertNewlineIgnoringFieldEditor(sender: id); message 'insertNewlineIgnoringFieldEditor:';
+    procedure insertTabIgnoringFieldEditor(sender: id); message 'insertTabIgnoringFieldEditor:';
+    procedure insertLineBreak(sender: id); message 'insertLineBreak:';
+    procedure insertContainerBreak(sender: id); message 'insertContainerBreak:';
+    procedure changeCaseOfLetter(sender: id); message 'changeCaseOfLetter:';
+    procedure uppercaseWord(sender: id); message 'uppercaseWord:';
+    procedure lowercaseWord(sender: id); message 'lowercaseWord:';
+    procedure capitalizeWord(sender: id); message 'capitalizeWord:';
+    procedure deleteForward(sender: id); message 'deleteForward:';
+    procedure deleteBackward(sender: id); message 'deleteBackward:';
+    procedure deleteBackwardByDecomposingPreviousCharacter(sender: id); message 'deleteBackwardByDecomposingPreviousCharacter:';
+    procedure deleteWordForward(sender: id); message 'deleteWordForward:';
+    procedure deleteWordBackward(sender: id); message 'deleteWordBackward:';
+    procedure deleteToBeginningOfLine(sender: id); message 'deleteToBeginningOfLine:';
+    procedure deleteToEndOfLine(sender: id); message 'deleteToEndOfLine:';
+    procedure deleteToBeginningOfParagraph(sender: id); message 'deleteToBeginningOfParagraph:';
+    procedure deleteToEndOfParagraph(sender: id); message 'deleteToEndOfParagraph:';
+    procedure yank(sender: id); message 'yank:';
+    procedure complete(sender: id); message 'complete:';
+    procedure setMark(sender: id); message 'setMark:';
+    procedure deleteToMark(sender: id); message 'deleteToMark:';
+    procedure selectToMark(sender: id); message 'selectToMark:';
+    procedure swapWithMark(sender: id); message 'swapWithMark:';
+    procedure cancelOperation(sender: id); message 'cancelOperation:';
+
+    { Category: NSUndoSupport }
+    function undoManager: NSUndoManager; message 'undoManager';
+
+    { Category: NSErrorPresentation }
+    procedure presentError_modalForWindow_delegate_didPresentSelector_contextInfo(error: NSError; window: NSWindow; delegate: id; didPresentSelector: SEL; contextInfo: Pointer); message 'presentError:modalForWindow:delegate:didPresentSelector:contextInfo:';
+    function presentError(error: NSError): Boolean; message 'presentError:';
+    function willPresentError(error: NSError): NSError; message 'willPresentError:';
+
+    { Category: NSInterfaceStyle }
+    function interfaceStyle: NSInterfaceStyle; message 'interfaceStyle';
+    procedure setInterfaceStyle(interfaceStyle_: NSInterfaceStyle); message 'setInterfaceStyle:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSRuleEditor.inc b/packages/cocoaint/src/appkit/NSRuleEditor.inc
new file mode 100644
index 0000000000..4b71a2cccd
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSRuleEditor.inc
@@ -0,0 +1,169 @@
+{ Parsed from Appkit.framework NSRuleEditor.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSRULEEDITOR_PAS_H}
+{$define NSRULEEDITOR_PAS_H}
+type
+  NSRuleEditorPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSRULEEDITOR_PAS_T}
+{$define NSRULEEDITOR_PAS_T}
+
+{ Constants }
+
+const
+  NSRuleEditorNestingModeSimple = 0;
+
+const
+  NSRuleEditorRowTypeSimple = 0;
+  NSRuleEditorRowTypeCompound = 1;
+
+{ Types }
+type
+  NSRuleEditorNestingMode = culong;
+  NSRuleEditorRowType = culong;
+
+{ CFString constants }
+var
+  NSRuleEditorPredicateLeftExpression: CFStringRef; external name '_NSRuleEditorPredicateLeftExpression';
+  NSRuleEditorPredicateRightExpression: CFStringRef; external name '_NSRuleEditorPredicateRightExpression';
+  NSRuleEditorPredicateComparisonModifier: CFStringRef; external name '_NSRuleEditorPredicateComparisonModifier';
+  NSRuleEditorPredicateOptions: CFStringRef; external name '_NSRuleEditorPredicateOptions';
+  NSRuleEditorPredicateOperatorType: CFStringRef; external name '_NSRuleEditorPredicateOperatorType';
+  NSRuleEditorPredicateCustomSelector: CFStringRef; external name '_NSRuleEditorPredicateCustomSelector';
+  NSRuleEditorPredicateCompoundType: CFStringRef; external name '_NSRuleEditorPredicateCompoundType';
+  NSRuleEditorRowsDidChangeNotification: CFStringRef; external name '_NSRuleEditorRowsDidChangeNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSRULEEDITOR_PAS_R}
+{$define NSRULEEDITOR_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSRULEEDITOR_PAS_F}
+{$define NSRULEEDITOR_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSRULEEDITOR_PAS_T}
+{$define NSRULEEDITOR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSRuleEditor = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSRULEEDITOR_PAS_C}
+{$define NSRULEEDITOR_PAS_C}
+
+{ NSRuleEditor }
+  NSRuleEditor = objcclass(NSControl)
+  private
+    __ruleDataSource: id;
+    __ruleDelegate: id;
+    __draggingRows: NSIndexSet;
+    __rowCache: NSMutableArray;
+    __slicesHolder: NSView;
+    __slices: NSMutableArray;
+    __sliceHeight: CGFloat;
+    __alignmentGridWidth: CGFloat;
+    __subviewIndexOfDropLine: clong;
+    __dropLineView: id;
+    __currentAnimation: NSViewAnimation;
+    __frameTimer: NSTimer;
+    __stringsFileName: NSString;
+    __standardLocalizer: id;
+    __headerLocalizer: id;
+    __predicate: NSPredicate;
+    __nestingMode: clong;
+    __ruleEditorFlags: bitpacked record
+        elideUpdating: 0..1;
+        lastAlternateKeyValue: 0..1;
+        extendedDelegateCalls: 0..1;
+        editable: 0..1;
+        settingSize: 0..1;
+        suppressKeyDown: 0..1;
+        dropWasSuccessful: 0..1;
+        delegateWantsValidation: 0..1;
+        disallowEmpty: 0..1;
+        lastDrewWithFRAppearance: 0..1;
+        allowsEmptyCompoundRows: 0..1;
+        dropChangedRowCount: 0..1;
+        reserved: 0..((1 shl 20)-1);
+      end;
+    __typeKeyPath: NSString;
+    __itemsKeyPath: NSString;
+    __valuesKeyPath: NSString;
+    __subrowsArrayKeyPath: NSString;
+    __rowClass: Pobjc_class;
+    __boundArrayOwner: id;
+    __boundArrayKeyPath: NSString;
+    __ruleReserved1: id;
+    __lastRow: clong;
+    __ruleReserved2: id;
+    
+  public
+    class function alloc: NSRuleEditor; message 'alloc';
+
+    procedure setDelegate(obj_: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
+    procedure setFormattingStringsFilename(stringsFilename: NSString); message 'setFormattingStringsFilename:';
+    function formattingStringsFilename: NSString; message 'formattingStringsFilename';
+    procedure setFormattingDictionary(dictionary: NSDictionary); message 'setFormattingDictionary:';
+    function formattingDictionary: NSDictionary; message 'formattingDictionary';
+    procedure reloadCriteria; message 'reloadCriteria';
+    procedure setNestingMode(mode: NSRuleEditorNestingMode); message 'setNestingMode:';
+    function nestingMode: NSRuleEditorNestingMode; message 'nestingMode';
+    procedure setRowHeight(height: CGFloat); message 'setRowHeight:';
+    function rowHeight: CGFloat; message 'rowHeight';
+    procedure setEditable(editable: Boolean); message 'setEditable:';
+    function isEditable: Boolean; message 'isEditable';
+    procedure setCanRemoveAllRows(val: Boolean); message 'setCanRemoveAllRows:';
+    function canRemoveAllRows: Boolean; message 'canRemoveAllRows';
+    function predicate: NSPredicate; message 'predicate';
+    procedure reloadPredicate; message 'reloadPredicate';
+    function predicateForRow(row: clong): NSPredicate; message 'predicateForRow:';
+    function numberOfRows: clong; message 'numberOfRows';
+    function subrowIndexesForRow(rowIndex: clong): NSIndexSet; message 'subrowIndexesForRow:';
+    function criteriaForRow(row: clong): NSArray; message 'criteriaForRow:';
+    function displayValuesForRow(row: clong): NSArray; message 'displayValuesForRow:';
+    function rowForDisplayValue(displayValue: id): clong; message 'rowForDisplayValue:';
+    function rowTypeForRow(rowIndex: clong): NSRuleEditorRowType; message 'rowTypeForRow:';
+    function parentRowForRow(rowIndex: clong): clong; message 'parentRowForRow:';
+    procedure addRow(sender: id); message 'addRow:';
+    procedure insertRowAtIndex_withType_asSubrowOfRow_animate(rowIndex: clong; rowType: NSRuleEditorRowType; parentRow: clong; shouldAnimate: Boolean); message 'insertRowAtIndex:withType:asSubrowOfRow:animate:';
+    procedure setCriteria_andDisplayValues_forRowAtIndex(criteria: NSArray; values: NSArray; rowIndex: clong); message 'setCriteria:andDisplayValues:forRowAtIndex:';
+    procedure removeRowAtIndex(rowIndex: clong); message 'removeRowAtIndex:';
+    procedure removeRowsAtIndexes_includeSubrows(rowIndexes: NSIndexSet; includeSubrows: Boolean); message 'removeRowsAtIndexes:includeSubrows:';
+    function selectedRowIndexes: NSIndexSet; message 'selectedRowIndexes';
+    procedure selectRowIndexes_byExtendingSelection(indexes: NSIndexSet; extend: Boolean); message 'selectRowIndexes:byExtendingSelection:';
+    procedure setRowClass(rowClass_: Pobjc_class); message 'setRowClass:';
+    function rowClass: Pobjc_class; message 'rowClass';
+    procedure setRowTypeKeyPath(keyPath: NSString); message 'setRowTypeKeyPath:';
+    function rowTypeKeyPath: NSString; message 'rowTypeKeyPath';
+    procedure setSubrowsKeyPath(keyPath: NSString); message 'setSubrowsKeyPath:';
+    function subrowsKeyPath: NSString; message 'subrowsKeyPath';
+    procedure setCriteriaKeyPath(keyPath: NSString); message 'setCriteriaKeyPath:';
+    function criteriaKeyPath: NSString; message 'criteriaKeyPath';
+    procedure setDisplayValuesKeyPath(keyPath: NSString); message 'setDisplayValuesKeyPath:';
+    function displayValuesKeyPath: NSString; message 'displayValuesKeyPath';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSRulerMarker.inc b/packages/cocoaint/src/appkit/NSRulerMarker.inc
new file mode 100644
index 0000000000..586bc415ad
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSRulerMarker.inc
@@ -0,0 +1,91 @@
+{ Parsed from Appkit.framework NSRulerMarker.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSRULERMARKER_PAS_H}
+{$define NSRULERMARKER_PAS_H}
+type
+  NSRulerMarkerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSRULERMARKER_PAS_T}
+{$define NSRULERMARKER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSRULERMARKER_PAS_R}
+{$define NSRULERMARKER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSRULERMARKER_PAS_F}
+{$define NSRULERMARKER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSRULERMARKER_PAS_T}
+{$define NSRULERMARKER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSRulerMarker = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSRULERMARKER_PAS_C}
+{$define NSRULERMARKER_PAS_C}
+
+{ NSRulerMarker }
+  NSRulerMarker = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __ruler: NSRulerView;
+    __location: CGFloat;
+    __image: NSImage;
+    __imageOrigin: NSPoint;
+    __rFlags: bitpacked record
+        movable: 0..1;
+        removable: 0..1;
+        dragging: 0..1;
+        pinned: 0..1;
+        _reserved: 0..((1 shl 28)-1);
+      end;
+    __representedObject: id;
+    
+  public
+    class function alloc: NSRulerMarker; message 'alloc';
+
+    function initWithRulerView_markerLocation_image_imageOrigin(ruler_: NSRulerView; location: CGFloat; image_: NSImage; imageOrigin_: NSPoint): id; message 'initWithRulerView:markerLocation:image:imageOrigin:';
+    function ruler: NSRulerView; message 'ruler';
+    procedure setMarkerLocation(location: CGFloat); message 'setMarkerLocation:';
+    function markerLocation: CGFloat; message 'markerLocation';
+    procedure setImage(image_: NSImage); message 'setImage:';
+    function image: NSImage; message 'image';
+    procedure setImageOrigin(imageOrigin_: NSPoint); message 'setImageOrigin:';
+    function imageOrigin: NSPoint; message 'imageOrigin';
+    procedure setMovable(flag: Boolean); message 'setMovable:';
+    procedure setRemovable(flag: Boolean); message 'setRemovable:';
+    function isMovable: Boolean; message 'isMovable';
+    function isRemovable: Boolean; message 'isRemovable';
+    function isDragging: Boolean; message 'isDragging';
+    procedure setRepresentedObject(representedObject_: id); message 'setRepresentedObject:';
+    function representedObject: id; message 'representedObject';
+    function imageRectInRuler: NSRect; message 'imageRectInRuler';
+    function thicknessRequiredInRuler: CGFloat; message 'thicknessRequiredInRuler';
+    procedure drawRect(rect: NSRect); message 'drawRect:';
+    function trackMouse_adding(mouseDownEvent: NSEvent; isAdding: Boolean): Boolean; message 'trackMouse:adding:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSRulerView.inc b/packages/cocoaint/src/appkit/NSRulerView.inc
new file mode 100644
index 0000000000..b26b17663e
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSRulerView.inc
@@ -0,0 +1,117 @@
+{ Parsed from Appkit.framework NSRulerView.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSRULERVIEW_PAS_H}
+{$define NSRULERVIEW_PAS_H}
+type
+  NSRulerViewPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSRULERVIEW_PAS_T}
+{$define NSRULERVIEW_PAS_T}
+
+{ Constants }
+
+const
+  NSHorizontalRuler = 0;
+  NSVerticalRuler = 1;
+
+{ Types }
+type
+  NSRulerOrientation = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSRULERVIEW_PAS_R}
+{$define NSRULERVIEW_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSRULERVIEW_PAS_F}
+{$define NSRULERVIEW_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSRULERVIEW_PAS_T}
+{$define NSRULERVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSRulerView = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSRULERVIEW_PAS_C}
+{$define NSRULERVIEW_PAS_C}
+
+{ NSRulerView }
+  NSRulerView = objcclass(NSView)
+  private
+    __scrollView: NSScrollView;
+    __orientation: NSRulerOrientation;
+    __units: NSString;
+    __originOffset: CGFloat;
+    __ruleThickness: CGFloat;
+    __thicknessForMarkers: CGFloat;
+    __thicknessForAccessoryView: CGFloat;
+    __clientView: NSView;
+    __markers: NSMutableArray;
+    __accessoryView: NSView;
+    __cachedHashDict: NSDictionary;
+    __cachedDocViewToRulerConversion: CGFloat;
+    __cachedContentBoundsOrigin: NSPoint;
+    __draggingMarker: NSRulerMarker;
+    __reservedRulerView1: id;
+    
+  public
+    class function alloc: NSRulerView; message 'alloc';
+
+    class procedure registerUnitWithName_abbreviation_unitToPointsConversionFactor_stepUpCycle_stepDownCycle(unitName: NSString; abbreviation: NSString; conversionFactor: CGFloat; stepUpCycle: NSArray; stepDownCycle: NSArray); message 'registerUnitWithName:abbreviation:unitToPointsConversionFactor:stepUpCycle:stepDownCycle:';
+    function initWithScrollView_orientation(scrollView_: NSScrollView; orientation_: NSRulerOrientation): id; message 'initWithScrollView:orientation:';
+    procedure setScrollView(scrollView_: NSScrollView); message 'setScrollView:';
+    function scrollView: NSScrollView; message 'scrollView';
+    procedure setOrientation(orientation_: NSRulerOrientation); message 'setOrientation:';
+    function orientation: NSRulerOrientation; message 'orientation';
+    function baselineLocation: CGFloat; message 'baselineLocation';
+    function requiredThickness: CGFloat; message 'requiredThickness';
+    procedure setRuleThickness(thickness: CGFloat); message 'setRuleThickness:';
+    function ruleThickness: CGFloat; message 'ruleThickness';
+    procedure setReservedThicknessForMarkers(thickness: CGFloat); message 'setReservedThicknessForMarkers:';
+    function reservedThicknessForMarkers: CGFloat; message 'reservedThicknessForMarkers';
+    procedure setReservedThicknessForAccessoryView(thickness: CGFloat); message 'setReservedThicknessForAccessoryView:';
+    function reservedThicknessForAccessoryView: CGFloat; message 'reservedThicknessForAccessoryView';
+    procedure setMeasurementUnits(unitName: NSString); message 'setMeasurementUnits:';
+    function measurementUnits: NSString; message 'measurementUnits';
+    procedure setOriginOffset(offset: CGFloat); message 'setOriginOffset:';
+    function originOffset: CGFloat; message 'originOffset';
+    procedure setClientView(client: NSView); message 'setClientView:';
+    function clientView: NSView; message 'clientView';
+    procedure setMarkers(markers_: NSArray); message 'setMarkers:';
+    procedure addMarker(marker: NSRulerMarker); message 'addMarker:';
+    procedure removeMarker(marker: NSRulerMarker); message 'removeMarker:';
+    function markers: NSArray; message 'markers';
+    function trackMarker_withMouseEvent(marker: NSRulerMarker; event: NSEvent): Boolean; message 'trackMarker:withMouseEvent:';
+    procedure setAccessoryView(accessory: NSView); message 'setAccessoryView:';
+    function accessoryView: NSView; message 'accessoryView';
+    procedure moveRulerlineFromLocation_toLocation(oldLocation: CGFloat; newLocation: CGFloat); message 'moveRulerlineFromLocation:toLocation:';
+    procedure invalidateHashMarks; message 'invalidateHashMarks';
+    procedure drawHashMarksAndLabelsInRect(rect: NSRect); message 'drawHashMarksAndLabelsInRect:';
+    procedure drawMarkersInRect(rect: NSRect); message 'drawMarkersInRect:';
+    function isFlipped: Boolean; message 'isFlipped';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSSavePanel.inc b/packages/cocoaint/src/appkit/NSSavePanel.inc
new file mode 100644
index 0000000000..5c7f2d4be2
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSSavePanel.inc
@@ -0,0 +1,148 @@
+{ Parsed from Appkit.framework NSSavePanel.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSAVEPANEL_PAS_H}
+{$define NSSAVEPANEL_PAS_H}
+type
+  NSSavePanelPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSAVEPANEL_PAS_T}
+{$define NSSAVEPANEL_PAS_T}
+
+{ Constants }
+
+const
+  NSFileHandlingPanelCancelButton = NSCancelButton;
+  NSFileHandlingPanelOKButton = NSOKButton;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSAVEPANEL_PAS_R}
+{$define NSSAVEPANEL_PAS_R}
+
+{ Records }
+type
+  __SPFlags = record
+    saveMode: cuint;
+    isExpanded: cuint;
+    allowsOtherFileTypes: cuint;
+    canCreateDirectories: cuint;
+    canSelectedHiddenExtension: cuint;
+    reserved: cuint;
+  end;
+_SPFlags = __SPFlags;
+
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSAVEPANEL_PAS_F}
+{$define NSSAVEPANEL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSAVEPANEL_PAS_T}
+{$define NSSAVEPANEL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSSavePanel = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSAVEPANEL_PAS_C}
+{$define NSSAVEPANEL_PAS_C}
+
+{ NSSavePanel }
+  NSSavePanel = objcclass(NSPanel)
+  private
+    __navView: NSNavView;
+    __accessoryView: NSView;
+    __allowedFileTypes: NSArray;
+    __validatedPosixName: NSString;
+    __hiddenExtension: NSString;
+    __messageTextField: NSTextField;
+    __savePane: NSView;
+    __saveNavSeparatorBox: NSBox;
+    __savePaneTopPartsContainer: NSView;
+    __nameField: NSTextField;
+    __nameFieldLabel: NSTextField;
+    __expansionButton: NSButton;
+    __directoryPopUpContainer: NSView;
+    __directoryPopUp: id;
+    __directoryPopUpLabel: NSTextField;
+    __navViewContainer: NSBox;
+    __accessoryViewContainer: NSBox;
+    __bottomControlsContainer: NSView;
+    __hideExtensionButton: NSButton;
+    __newFolderButton: NSButton;
+    __cancelButton: NSButton;
+    __okButton: NSButton;
+    __filepathInputController: id;
+    __newFolderController: id;
+    __spFlags: _SPFlags;
+    __spAuxiliaryStorage: NSSavePanelAuxiliary;
+    __reserved: char;
+    __private: Pointer;
+    
+  public
+    class function alloc: NSSavePanel; message 'alloc';
+
+    class function savePanel: NSSavePanel; message 'savePanel';
+    function URL: NSURL; message 'URL';
+    function filename: NSString; message 'filename';
+    function directory: NSString; message 'directory';
+    procedure setDirectory(path: NSString); message 'setDirectory:';
+    function requiredFileType: NSString; message 'requiredFileType';
+    procedure setRequiredFileType(type_: NSString); message 'setRequiredFileType:';
+    function allowedFileTypes: NSArray; message 'allowedFileTypes';
+    procedure setAllowedFileTypes(types: NSArray); message 'setAllowedFileTypes:';
+    function allowsOtherFileTypes: Boolean; message 'allowsOtherFileTypes';
+    procedure setAllowsOtherFileTypes(flag: Boolean); message 'setAllowsOtherFileTypes:';
+    function accessoryView: NSView; message 'accessoryView';
+    procedure setAccessoryView(view: NSView); message 'setAccessoryView:';
+    function delegate: id; message 'delegate';
+    procedure setDelegate(delegate_: id); message 'setDelegate:';
+    function isExpanded: Boolean; message 'isExpanded';
+    function canCreateDirectories: Boolean; message 'canCreateDirectories';
+    procedure setCanCreateDirectories(flag: Boolean); message 'setCanCreateDirectories:';
+    function canSelectHiddenExtension: Boolean; message 'canSelectHiddenExtension';
+    procedure setCanSelectHiddenExtension(flag: Boolean); message 'setCanSelectHiddenExtension:';
+    function isExtensionHidden: Boolean; message 'isExtensionHidden';
+    procedure setExtensionHidden(flag: Boolean); message 'setExtensionHidden:';
+    function treatsFilePackagesAsDirectories: Boolean; message 'treatsFilePackagesAsDirectories';
+    procedure setTreatsFilePackagesAsDirectories(flag: Boolean); message 'setTreatsFilePackagesAsDirectories:';
+    function prompt: NSString; message 'prompt';
+    procedure setPrompt(prompt_: NSString); message 'setPrompt:';
+    function title: NSString; message 'title';
+    procedure setTitle(title_: NSString); message 'setTitle:';
+    function nameFieldLabel: NSString; message 'nameFieldLabel';
+    procedure setNameFieldLabel(label_: NSString); message 'setNameFieldLabel:';
+    function message: NSString; message 'message';
+    procedure setMessage(message_: NSString); message 'setMessage:';
+    procedure validateVisibleColumns; message 'validateVisibleColumns';
+    procedure selectText(sender: id); message 'selectText:';
+
+    { Category: NSSavePanelRuntime }
+    procedure ok(sender: id); message 'ok:';
+    procedure cancel(sender: id); message 'cancel:';
+    procedure beginSheetForDirectory_file_modalForWindow_modalDelegate_didEndSelector_contextInfo(path: NSString; name: NSString; docWindow: NSWindow; delegate_: id; didEndSelector: SEL; contextInfo: Pointer); message 'beginSheetForDirectory:file:modalForWindow:modalDelegate:didEndSelector:contextInfo:';
+    function runModalForDirectory_file(path: NSString; name: NSString): clong; message 'runModalForDirectory:file:';
+    function runModal: clong; message 'runModal';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSScreen.inc b/packages/cocoaint/src/appkit/NSScreen.inc
new file mode 100644
index 0000000000..63ee7b60bc
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSScreen.inc
@@ -0,0 +1,78 @@
+{ Parsed from Appkit.framework NSScreen.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSCREEN_PAS_H}
+{$define NSSCREEN_PAS_H}
+type
+  NSScreenPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSCREEN_PAS_T}
+{$define NSSCREEN_PAS_T}
+
+{ Types }
+type
+  NSScreenAuxiliary = Pointer;
+  NSScreenAuxiliaryOpaque = NSScreenAuxiliary;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSCREEN_PAS_R}
+{$define NSSCREEN_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSCREEN_PAS_F}
+{$define NSSCREEN_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSCREEN_PAS_T}
+{$define NSSCREEN_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSScreen = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSCREEN_PAS_C}
+{$define NSSCREEN_PAS_C}
+
+{ NSScreen }
+  NSScreen = objcclass(NSObject)
+  private
+    __frame: NSRect;
+    __depth: NSWindowDepth;
+    __screenNumber: cint;
+    __auxiliaryStorage: NSScreenAuxiliaryOpaque;
+    
+  public
+    class function alloc: NSScreen; message 'alloc';
+
+    class function screens: NSArray; message 'screens';
+    class function mainScreen: NSScreen; message 'mainScreen';
+    class function deepestScreen: NSScreen; message 'deepestScreen';
+    function depth: NSWindowDepth; message 'depth';
+    function frame: NSRect; message 'frame';
+    function visibleFrame: NSRect; message 'visibleFrame';
+    function deviceDescription: NSDictionary; message 'deviceDescription';
+    function supportedWindowDepths: NSWindowDepth; message 'supportedWindowDepths';
+    function userSpaceScaleFactor: CGFloat; message 'userSpaceScaleFactor';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSScrollView.inc b/packages/cocoaint/src/appkit/NSScrollView.inc
new file mode 100644
index 0000000000..a772e63674
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSScrollView.inc
@@ -0,0 +1,173 @@
+{ Parsed from Appkit.framework NSScrollView.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSCROLLVIEW_PAS_H}
+{$define NSSCROLLVIEW_PAS_H}
+type
+  NSScrollViewPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSCROLLVIEW_PAS_T}
+{$define NSSCROLLVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSCROLLVIEW_PAS_R}
+{$define NSSCROLLVIEW_PAS_R}
+
+{ Records }
+type
+  __SFlags = record
+{$ifdef fpc_big_endian}
+    vScrollerRequired: cuint;
+    hScrollerRequired: cuint;
+    vScrollerStatus: cuint;
+    hScrollerStatus: cuint;
+    noDynamicScrolling: cuint;
+    borderType: NSBorderType;
+    oldRulerInstalled: cuint;
+    showRulers: cuint;
+    hasHorizontalRuler: cuint;
+    hasVerticalRuler: cuint;
+    needsTile: cuint;
+    doesNotDrawBackground: cuint;
+    skipRemoveSuperviewCheck: cuint;
+    focusRingNeedsRedisplay: cuint;
+    hasCustomLineBorderColor: cuint;
+    autohidesScrollers: cuint;
+    autoforwardsScrollWheelEvents: cuint;
+    RESERVED: cuint;
+{$else}
+    RESERVED: cuint;
+    autoforwardsScrollWheelEvents: cuint;
+    autohidesScrollers: cuint;
+    hasCustomLineBorderColor: cuint;
+    focusRingNeedsRedisplay: cuint;
+    skipRemoveSuperviewCheck: cuint;
+    doesNotDrawBackground: cuint;
+    needsTile: cuint;
+    hasVerticalRuler: cuint;
+    hasHorizontalRuler: cuint;
+    showRulers: cuint;
+    oldRulerInstalled: cuint;
+    borderType: NSBorderType;
+    noDynamicScrolling: cuint;
+    hScrollerStatus: cuint;
+    vScrollerStatus: cuint;
+    hScrollerRequired: cuint;
+    vScrollerRequired: cuint;
+{$endif}
+  end;
+_SFlags = __SFlags;
+
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSCROLLVIEW_PAS_F}
+{$define NSSCROLLVIEW_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSCROLLVIEW_PAS_T}
+{$define NSSCROLLVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSScrollView = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSCROLLVIEW_PAS_C}
+{$define NSSCROLLVIEW_PAS_C}
+
+{ NSScrollView }
+  NSScrollView = objcclass(NSView)
+  private
+    __vScroller: NSScroller;
+    __hScroller: NSScroller;
+    __contentView: NSClipView;
+    __headerClipView: NSClipView;
+    __cornerView: NSView;
+    __ruler: id;
+    __sFlags: _SFlags;
+    __extraIvars: Pointer; {garbage collector: __strong }
+    __horizontalRuler: NSRulerView;
+    __verticalRuler: NSRulerView;
+    
+  public
+    class function alloc: NSScrollView; message 'alloc';
+
+    class function frameSizeForContentSize_hasHorizontalScroller_hasVerticalScroller_borderType(cSize: NSSize; hFlag: Boolean; vFlag: Boolean; aType: NSBorderType): NSSize; message 'frameSizeForContentSize:hasHorizontalScroller:hasVerticalScroller:borderType:';
+    class function contentSizeForFrameSize_hasHorizontalScroller_hasVerticalScroller_borderType(fSize: NSSize; hFlag: Boolean; vFlag: Boolean; aType: NSBorderType): NSSize; message 'contentSizeForFrameSize:hasHorizontalScroller:hasVerticalScroller:borderType:';
+    function documentVisibleRect: NSRect; message 'documentVisibleRect';
+    function contentSize: NSSize; message 'contentSize';
+    procedure setDocumentView(aView: NSView); message 'setDocumentView:';
+    function documentView: id; message 'documentView';
+    procedure setContentView(contentView_: NSClipView); message 'setContentView:';
+    function contentView: NSClipView; message 'contentView';
+    procedure setDocumentCursor(anObj: NSCursor); message 'setDocumentCursor:';
+    function documentCursor: NSCursor; message 'documentCursor';
+    procedure setBorderType(aType: NSBorderType); message 'setBorderType:';
+    function borderType: NSBorderType; message 'borderType';
+    procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
+    function backgroundColor: NSColor; message 'backgroundColor';
+    procedure setDrawsBackground(flag: Boolean); message 'setDrawsBackground:';
+    function drawsBackground: Boolean; message 'drawsBackground';
+    procedure setHasVerticalScroller(flag: Boolean); message 'setHasVerticalScroller:';
+    function hasVerticalScroller: Boolean; message 'hasVerticalScroller';
+    procedure setHasHorizontalScroller(flag: Boolean); message 'setHasHorizontalScroller:';
+    function hasHorizontalScroller: Boolean; message 'hasHorizontalScroller';
+    procedure setVerticalScroller(anObject: NSScroller); message 'setVerticalScroller:';
+    function verticalScroller: NSScroller; message 'verticalScroller';
+    procedure setHorizontalScroller(anObject: NSScroller); message 'setHorizontalScroller:';
+    function horizontalScroller: NSScroller; message 'horizontalScroller';
+    function autohidesScrollers: Boolean; message 'autohidesScrollers';
+    procedure setAutohidesScrollers(flag: Boolean); message 'setAutohidesScrollers:';
+    procedure setHorizontalLineScroll(value: CGFloat); message 'setHorizontalLineScroll:';
+    procedure setVerticalLineScroll(value: CGFloat); message 'setVerticalLineScroll:';
+    procedure setLineScroll(value: CGFloat); message 'setLineScroll:';
+    function horizontalLineScroll: CGFloat; message 'horizontalLineScroll';
+    function verticalLineScroll: CGFloat; message 'verticalLineScroll';
+    function lineScroll: CGFloat; message 'lineScroll';
+    procedure setHorizontalPageScroll(value: CGFloat); message 'setHorizontalPageScroll:';
+    procedure setVerticalPageScroll(value: CGFloat); message 'setVerticalPageScroll:';
+    procedure setPageScroll(value: CGFloat); message 'setPageScroll:';
+    function horizontalPageScroll: CGFloat; message 'horizontalPageScroll';
+    function verticalPageScroll: CGFloat; message 'verticalPageScroll';
+    function pageScroll: CGFloat; message 'pageScroll';
+    procedure setScrollsDynamically(flag: Boolean); message 'setScrollsDynamically:';
+    function scrollsDynamically: Boolean; message 'scrollsDynamically';
+    procedure tile; message 'tile';
+    procedure reflectScrolledClipView(cView: NSClipView); message 'reflectScrolledClipView:';
+    procedure scrollWheel(theEvent: NSEvent); message 'scrollWheel:';
+
+    { Category: NSRulerSupport }
+    class procedure setRulerViewClass(rulerViewClass_: Pobjc_class); message 'setRulerViewClass:';
+    class function rulerViewClass: Pobjc_class; message 'rulerViewClass';
+    procedure setRulersVisible(flag: Boolean); message 'setRulersVisible:';
+    function rulersVisible: Boolean; message 'rulersVisible';
+    procedure setHasHorizontalRuler(flag: Boolean); message 'setHasHorizontalRuler:';
+    function hasHorizontalRuler: Boolean; message 'hasHorizontalRuler';
+    procedure setHasVerticalRuler(flag: Boolean); message 'setHasVerticalRuler:';
+    function hasVerticalRuler: Boolean; message 'hasVerticalRuler';
+    procedure setHorizontalRulerView(ruler: NSRulerView); message 'setHorizontalRulerView:';
+    function horizontalRulerView: NSRulerView; message 'horizontalRulerView';
+    procedure setVerticalRulerView(ruler: NSRulerView); message 'setVerticalRulerView:';
+    function verticalRulerView: NSRulerView; message 'verticalRulerView';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSScroller.inc b/packages/cocoaint/src/appkit/NSScroller.inc
new file mode 100644
index 0000000000..9e83e243d9
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSScroller.inc
@@ -0,0 +1,146 @@
+{ Parsed from Appkit.framework NSScroller.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSCROLLER_PAS_H}
+{$define NSSCROLLER_PAS_H}
+type
+  NSScrollerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSCROLLER_PAS_T}
+{$define NSSCROLLER_PAS_T}
+
+{ Constants }
+
+const
+  NSScrollerArrowsMaxEnd = 0;
+  NSScrollerArrowsMinEnd = 1;
+  NSScrollerArrowsDefaultSetting = 0;
+  NSScrollerArrowsNone = 2;
+
+const
+  NSNoScrollerParts = 0;
+  NSOnlyScrollerArrows = 1;
+  NSAllScrollerParts = 2;
+
+const
+  NSScrollerNoPart = 0;
+  NSScrollerDecrementPage = 1;
+  NSScrollerKnob = 2;
+  NSScrollerIncrementPage = 3;
+  NSScrollerDecrementLine = 4;
+  NSScrollerIncrementLine = 5;
+  NSScrollerKnobSlot = 6;
+
+const
+  NSScrollerIncrementArrow = 0;
+  NSScrollerDecrementArrow = 1;
+
+{ Types }
+type
+  NSScrollArrowPosition = culong;
+  NSUsableScrollerParts = culong;
+  NSScrollerPart = culong;
+  NSScrollerArrow = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSCROLLER_PAS_R}
+{$define NSSCROLLER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSCROLLER_PAS_F}
+{$define NSSCROLLER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSCROLLER_PAS_T}
+{$define NSSCROLLER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSScroller = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSCROLLER_PAS_C}
+{$define NSSCROLLER_PAS_C}
+
+{ NSScroller }
+  NSScroller = objcclass(NSControl)
+  private
+    __curValue: CGFloat;
+    __percent: CGFloat;
+    __knobSize: CGFloat;
+    __sFlags2: bitpacked record
+        hitPart: 0..((1 shl 4)-1);
+        controlSize: 0..((1 shl 2)-1);
+        inMaxEnd: 0..1;
+        setFloatValueOverridden: 0..1;
+        setFloatValueKnobProportionOverridden: 0..1;
+        reserved: 0..((1 shl 23)-1);
+      end;
+    __target: id;
+    __action: SEL;
+    _sFlags: bitpacked record
+        isHoriz: 0..1;
+        arrowsLoc: 0..((1 shl 2)-1);
+        partsUsable: 0..((1 shl 2)-1);
+        fine: 0..1;
+        needsEnableFlush: 0..1;
+        thumbing: 0..1;
+        slotDrawn: 0..1;
+        knobDrawn: 0..1;
+        lit: 0..1;
+        knobLit: 0..1;
+        reserved: 0..1;
+        controlTint: 0..((1 shl 3)-1);
+        repeatCount: 0..((1 shl 16)-1);
+      end;
+    
+  public
+    class function alloc: NSScroller; message 'alloc';
+
+    class function scrollerWidth: CGFloat; message 'scrollerWidth';
+    class function scrollerWidthForControlSize(controlSize_: NSControlSize): CGFloat; message 'scrollerWidthForControlSize:';
+    procedure drawParts; message 'drawParts';
+    function rectForPart(partCode: NSScrollerPart): NSRect; message 'rectForPart:';
+    procedure checkSpaceForParts; message 'checkSpaceForParts';
+    function usableParts: NSUsableScrollerParts; message 'usableParts';
+    procedure setArrowsPosition(where: NSScrollArrowPosition); message 'setArrowsPosition:';
+    function arrowsPosition: NSScrollArrowPosition; message 'arrowsPosition';
+    procedure setControlTint(controlTint_: NSControlTint); message 'setControlTint:';
+    function controlTint: NSControlTint; message 'controlTint';
+    procedure setControlSize(controlSize_: NSControlSize); message 'setControlSize:';
+    function controlSize: NSControlSize; message 'controlSize';
+    procedure drawArrow_highlight(whichArrow: NSScrollerArrow; flag: Boolean); message 'drawArrow:highlight:';
+    procedure drawKnob; message 'drawKnob';
+    procedure drawKnobSlotInRect_highlight(slotRect: NSRect; flag: Boolean); message 'drawKnobSlotInRect:highlight:';
+    procedure highlight(flag: Boolean); message 'highlight:';
+    function testPart(thePoint: NSPoint): NSScrollerPart; message 'testPart:';
+    procedure trackKnob(theEvent: NSEvent); message 'trackKnob:';
+    procedure trackScrollButtons(theEvent: NSEvent); message 'trackScrollButtons:';
+    function hitPart: NSScrollerPart; message 'hitPart';
+    function knobProportion: CGFloat; message 'knobProportion';
+    procedure setKnobProportion(proportion: CGFloat); message 'setKnobProportion:';
+
+    { Category: NSDeprecated }
+    procedure setFloatValue_knobProportion(aFloat: single; proportion: CGFloat); message 'setFloatValue:knobProportion:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSSearchField.inc b/packages/cocoaint/src/appkit/NSSearchField.inc
new file mode 100644
index 0000000000..b666c5c7f2
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSSearchField.inc
@@ -0,0 +1,68 @@
+{ Parsed from Appkit.framework NSSearchField.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSEARCHFIELD_PAS_H}
+{$define NSSEARCHFIELD_PAS_H}
+type
+  NSSearchFieldPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSEARCHFIELD_PAS_T}
+{$define NSSEARCHFIELD_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSEARCHFIELD_PAS_R}
+{$define NSSEARCHFIELD_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSEARCHFIELD_PAS_F}
+{$define NSSEARCHFIELD_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSEARCHFIELD_PAS_T}
+{$define NSSEARCHFIELD_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSSearchField = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSEARCHFIELD_PAS_C}
+{$define NSSEARCHFIELD_PAS_C}
+
+{ NSSearchField }
+  NSSearchField = objcclass(NSTextField)
+  private
+    __reserved1: cuint;
+    __reserved2: cuint;
+    __reserved3: cuint;
+    __reserved4: cuint;
+    
+  public
+    class function alloc: NSSearchField; message 'alloc';
+
+    procedure setRecentSearches(searches: NSArray); message 'setRecentSearches:';
+    function recentSearches: NSArray; message 'recentSearches';
+    procedure setRecentsAutosaveName(string_: NSString); message 'setRecentsAutosaveName:';
+    function recentsAutosaveName: NSString; message 'recentsAutosaveName';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSSearchFieldCell.inc b/packages/cocoaint/src/appkit/NSSearchFieldCell.inc
new file mode 100644
index 0000000000..0decc9aeab
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSSearchFieldCell.inc
@@ -0,0 +1,112 @@
+{ Parsed from Appkit.framework NSSearchFieldCell.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSEARCHFIELDCELL_PAS_H}
+{$define NSSEARCHFIELDCELL_PAS_H}
+type
+  NSSearchFieldCellPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSEARCHFIELDCELL_PAS_T}
+{$define NSSEARCHFIELDCELL_PAS_T}
+
+{ Defines }
+const
+  NSSearchFieldRecentsTitleMenuItemTag = 1000;
+  NSSearchFieldRecentsMenuItemTag = 1001;
+  NSSearchFieldClearRecentsMenuItemTag = 1002;
+  NSSearchFieldNoRecentsMenuItemTag = 1003;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSEARCHFIELDCELL_PAS_R}
+{$define NSSEARCHFIELDCELL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSEARCHFIELDCELL_PAS_F}
+{$define NSSEARCHFIELDCELL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSEARCHFIELDCELL_PAS_T}
+{$define NSSEARCHFIELDCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSSearchFieldCell = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSEARCHFIELDCELL_PAS_C}
+{$define NSSEARCHFIELDCELL_PAS_C}
+
+{ NSSearchFieldCell }
+  NSSearchFieldCell = objcclass(NSTextFieldCell)
+  private
+    __sfFlags: bitpacked record
+        sendsWholeSearchString: 0..1;
+        maximumRecents: 0..((1 shl 8)-1);
+        cancelVisible: 0..1;
+        drawSize: 0..((1 shl 2)-1);
+        disableText: 0..1;
+        menuTracking: 0..1;
+        deferredUpdate: 0..1;
+        sendsImmediately: 0..1;
+        activeTimer: 0..1;
+        
+        reserved: 0..((1 shl 15)-1);
+      end;
+    __searchButtonCell: NSButtonCell;
+    __cancelButtonCell: NSButtonCell;
+    __searchMenuTemplate: NSMenu;
+    __recentsAutosaveName: NSString;
+    __recentSearches: NSMutableArray;
+    __searchMenu: NSMenu;
+    __partialStringTimer: NSTimer;
+    __reserved1: cuint;
+    __reserved2: cuint;
+    __reserved3: cuint;
+    __reserved4: cuint;
+    
+  public
+    class function alloc: NSSearchFieldCell; message 'alloc';
+
+    function searchButtonCell: NSButtonCell; message 'searchButtonCell';
+    procedure setSearchButtonCell(cell: NSButtonCell); message 'setSearchButtonCell:';
+    function cancelButtonCell: NSButtonCell; message 'cancelButtonCell';
+    procedure setCancelButtonCell(cell: NSButtonCell); message 'setCancelButtonCell:';
+    procedure resetSearchButtonCell; message 'resetSearchButtonCell';
+    procedure resetCancelButtonCell; message 'resetCancelButtonCell';
+    function searchTextRectForBounds(rect: NSRect): NSRect; message 'searchTextRectForBounds:';
+    function searchButtonRectForBounds(rect: NSRect): NSRect; message 'searchButtonRectForBounds:';
+    function cancelButtonRectForBounds(rect: NSRect): NSRect; message 'cancelButtonRectForBounds:';
+    procedure setSearchMenuTemplate(menu_: NSMenu); message 'setSearchMenuTemplate:';
+    function searchMenuTemplate: NSMenu; message 'searchMenuTemplate';
+    procedure setSendsWholeSearchString(flag: Boolean); message 'setSendsWholeSearchString:';
+    function sendsWholeSearchString: Boolean; message 'sendsWholeSearchString';
+    procedure setMaximumRecents(maxRecents: clong); message 'setMaximumRecents:';
+    function maximumRecents: clong; message 'maximumRecents';
+    procedure setRecentSearches(searches: NSArray); message 'setRecentSearches:';
+    function recentSearches: NSArray; message 'recentSearches';
+    procedure setRecentsAutosaveName(string_: NSString); message 'setRecentsAutosaveName:';
+    function recentsAutosaveName: NSString; message 'recentsAutosaveName';
+    function sendsSearchStringImmediately: Boolean; message 'sendsSearchStringImmediately';
+    procedure setSendsSearchStringImmediately(flag: Boolean); message 'setSendsSearchStringImmediately:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSSecureTextField.inc b/packages/cocoaint/src/appkit/NSSecureTextField.inc
new file mode 100644
index 0000000000..0b915ed943
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSSecureTextField.inc
@@ -0,0 +1,72 @@
+{ Parsed from Appkit.framework NSSecureTextField.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSECURETEXTFIELD_PAS_H}
+{$define NSSECURETEXTFIELD_PAS_H}
+type
+  NSSecureTextFieldPointer = Pointer;
+  NSSecureTextFieldCellPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSECURETEXTFIELD_PAS_T}
+{$define NSSECURETEXTFIELD_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSECURETEXTFIELD_PAS_R}
+{$define NSSECURETEXTFIELD_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSECURETEXTFIELD_PAS_F}
+{$define NSSECURETEXTFIELD_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSECURETEXTFIELD_PAS_T}
+{$define NSSECURETEXTFIELD_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSSecureTextField = objcclass;
+  NSSecureTextFieldCell = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSECURETEXTFIELD_PAS_C}
+{$define NSSECURETEXTFIELD_PAS_C}
+
+{ NSSecureTextField }
+  NSSecureTextField = objcclass(NSTextField)
+    
+  public
+    class function alloc: NSSecureTextField; message 'alloc';
+  end; external;
+
+{ NSSecureTextFieldCell }
+  NSSecureTextFieldCell = objcclass(NSTextFieldCell)
+  private
+    __echosBullets: Boolean;
+    
+  public
+    class function alloc: NSSecureTextFieldCell; message 'alloc';
+
+    procedure setEchosBullets(flag: Boolean); message 'setEchosBullets:';
+    function echosBullets: Boolean; message 'echosBullets';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSSegmentedControl.inc b/packages/cocoaint/src/appkit/NSSegmentedControl.inc
new file mode 100644
index 0000000000..866d65afd5
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSSegmentedControl.inc
@@ -0,0 +1,99 @@
+{ Parsed from Appkit.framework NSSegmentedControl.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSEGMENTEDCONTROL_PAS_H}
+{$define NSSEGMENTEDCONTROL_PAS_H}
+type
+  NSSegmentedControlPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSEGMENTEDCONTROL_PAS_T}
+{$define NSSEGMENTEDCONTROL_PAS_T}
+
+{ Constants }
+
+const
+  NSSegmentStyleRounded = 1;
+  NSSegmentStyleTexturedRounded = 2;
+  NSSegmentStyleRoundRect = 3;
+  NSSegmentStyleTexturedSquare = 4;
+  NSSegmentStyleCapsule = 5;
+  NSSegmentStyleSmallSquare = 6;
+
+{ Types }
+type
+  NSSegmentStyle = clong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSEGMENTEDCONTROL_PAS_R}
+{$define NSSEGMENTEDCONTROL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSEGMENTEDCONTROL_PAS_F}
+{$define NSSEGMENTEDCONTROL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSEGMENTEDCONTROL_PAS_T}
+{$define NSSEGMENTEDCONTROL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSSegmentedControl = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSEGMENTEDCONTROL_PAS_C}
+{$define NSSEGMENTEDCONTROL_PAS_C}
+
+{ NSSegmentedControl }
+  NSSegmentedControl = objcclass(NSControl)
+  private
+    __reserved1: clong;
+    __reserved2: clong;
+    __reserved3: clong;
+    __reserved4: clong;
+    
+  public
+    class function alloc: NSSegmentedControl; message 'alloc';
+
+    procedure setSegmentCount(count: clong); message 'setSegmentCount:';
+    function segmentCount: clong; message 'segmentCount';
+    procedure setSelectedSegment(selectedSegment_: clong); message 'setSelectedSegment:';
+    function selectedSegment: clong; message 'selectedSegment';
+    function selectSegmentWithTag(tag_: clong): Boolean; message 'selectSegmentWithTag:';
+    procedure setWidth_forSegment(width: CGFloat; segment: clong); message 'setWidth:forSegment:';
+    function widthForSegment(segment: clong): CGFloat; message 'widthForSegment:';
+    procedure setImage_forSegment(image: NSImage; segment: clong); message 'setImage:forSegment:';
+    function imageForSegment(segment: clong): NSImage; message 'imageForSegment:';
+    procedure setImageScaling_forSegment(scaling: NSImageScaling; segment: clong); message 'setImageScaling:forSegment:';
+    function imageScalingForSegment(segment: clong): NSImageScaling; message 'imageScalingForSegment:';
+    procedure setLabel_forSegment(label_: NSString; segment: clong); message 'setLabel:forSegment:';
+    function labelForSegment(segment: clong): NSString; message 'labelForSegment:';
+    procedure setMenu_forSegment(menu_: NSMenu; segment: clong); message 'setMenu:forSegment:';
+    function menuForSegment(segment: clong): NSMenu; message 'menuForSegment:';
+    procedure setSelected_forSegment(selected: Boolean; segment: clong); message 'setSelected:forSegment:';
+    function isSelectedForSegment(segment: clong): Boolean; message 'isSelectedForSegment:';
+    procedure setEnabled_forSegment(enabled: Boolean; segment: clong); message 'setEnabled:forSegment:';
+    function isEnabledForSegment(segment: clong): Boolean; message 'isEnabledForSegment:';
+    procedure setSegmentStyle(segmentStyle_: NSSegmentStyle); message 'setSegmentStyle:';
+    function segmentStyle: NSSegmentStyle; message 'segmentStyle';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSShadow.inc b/packages/cocoaint/src/appkit/NSShadow.inc
new file mode 100644
index 0000000000..60ff70f4f0
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSShadow.inc
@@ -0,0 +1,74 @@
+{ Parsed from Appkit.framework NSShadow.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSHADOW_PAS_H}
+{$define NSSHADOW_PAS_H}
+type
+  NSShadowPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSHADOW_PAS_T}
+{$define NSSHADOW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSHADOW_PAS_R}
+{$define NSSHADOW_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSHADOW_PAS_F}
+{$define NSSHADOW_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSHADOW_PAS_T}
+{$define NSSHADOW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSShadow = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSHADOW_PAS_C}
+{$define NSSHADOW_PAS_C}
+
+{ NSShadow }
+  NSShadow = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __shadowFlags: culong;
+    __shadowOffset: NSSize;
+    __shadowBlurRadius: CGFloat;
+    __shadowColor: NSColor;
+    __reservedFloat: CGFloat;
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSShadow; message 'alloc';
+
+    function init: id; message 'init';
+    function shadowOffset: NSSize; message 'shadowOffset';
+    procedure setShadowOffset(offset: NSSize); message 'setShadowOffset:';
+    function shadowBlurRadius: CGFloat; message 'shadowBlurRadius';
+    procedure setShadowBlurRadius(val: CGFloat); message 'setShadowBlurRadius:';
+    function shadowColor: NSColor; message 'shadowColor';
+    procedure setShadowColor(color: NSColor); message 'setShadowColor:';
+    procedure set_; message 'set';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSSlider.inc b/packages/cocoaint/src/appkit/NSSlider.inc
new file mode 100644
index 0000000000..e49b08d2d7
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSSlider.inc
@@ -0,0 +1,91 @@
+{ Parsed from Appkit.framework NSSlider.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSLIDER_PAS_H}
+{$define NSSLIDER_PAS_H}
+type
+  NSSliderPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSLIDER_PAS_T}
+{$define NSSLIDER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSLIDER_PAS_R}
+{$define NSSLIDER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSLIDER_PAS_F}
+{$define NSSLIDER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSLIDER_PAS_T}
+{$define NSSLIDER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSSlider = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSLIDER_PAS_C}
+{$define NSSLIDER_PAS_C}
+
+{ NSSlider }
+  NSSlider = objcclass(NSControl)
+    
+  public
+    class function alloc: NSSlider; message 'alloc';
+
+    function minValue: double; message 'minValue';
+    procedure setMinValue(aDouble: double); message 'setMinValue:';
+    function maxValue: double; message 'maxValue';
+    procedure setMaxValue(aDouble: double); message 'setMaxValue:';
+    procedure setAltIncrementValue(incValue: double); message 'setAltIncrementValue:';
+    function altIncrementValue: double; message 'altIncrementValue';
+    procedure setTitleCell(aCell: NSCell); message 'setTitleCell:';
+    function titleCell: id; message 'titleCell';
+    procedure setTitleColor(newColor: NSColor); message 'setTitleColor:';
+    function titleColor: NSColor; message 'titleColor';
+    procedure setTitleFont(fontObj: NSFont); message 'setTitleFont:';
+    function titleFont: NSFont; message 'titleFont';
+    function title: NSString; message 'title';
+    procedure setTitle(aString: NSString); message 'setTitle:';
+    procedure setKnobThickness(aFloat: CGFloat); message 'setKnobThickness:';
+    function knobThickness: CGFloat; message 'knobThickness';
+    procedure setImage(backgroundImage: NSImage); message 'setImage:';
+    function image: NSImage; message 'image';
+    function isVertical: clong; message 'isVertical';
+    function acceptsFirstMouse(theEvent: NSEvent): Boolean; message 'acceptsFirstMouse:';
+
+    { Category: NSTickMarkSupport }
+    procedure setNumberOfTickMarks(count: clong); message 'setNumberOfTickMarks:';
+    function numberOfTickMarks: clong; message 'numberOfTickMarks';
+    procedure setTickMarkPosition(position: NSTickMarkPosition); message 'setTickMarkPosition:';
+    function tickMarkPosition: NSTickMarkPosition; message 'tickMarkPosition';
+    procedure setAllowsTickMarkValuesOnly(yorn: Boolean); message 'setAllowsTickMarkValuesOnly:';
+    function allowsTickMarkValuesOnly: Boolean; message 'allowsTickMarkValuesOnly';
+    function tickMarkValueAtIndex(index: clong): double; message 'tickMarkValueAtIndex:';
+    function rectOfTickMarkAtIndex(index: clong): NSRect; message 'rectOfTickMarkAtIndex:';
+    function indexOfTickMarkAtPoint(point: NSPoint): clong; message 'indexOfTickMarkAtPoint:';
+    function closestTickMarkValueToValue(value: double): double; message 'closestTickMarkValueToValue:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSSliderCell.inc b/packages/cocoaint/src/appkit/NSSliderCell.inc
new file mode 100644
index 0000000000..3534650f7c
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSSliderCell.inc
@@ -0,0 +1,131 @@
+{ Parsed from Appkit.framework NSSliderCell.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSLIDERCELL_PAS_H}
+{$define NSSLIDERCELL_PAS_H}
+type
+  NSSliderCellPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSLIDERCELL_PAS_T}
+{$define NSSLIDERCELL_PAS_T}
+
+{ Constants }
+
+const
+  NSTickMarkBelow = 0;
+  NSTickMarkAbove = 1;
+  NSTickMarkLeft = NSTickMarkAbove;
+  NSTickMarkRight = NSTickMarkBelow;
+
+const
+  NSLinearSlider = 0;
+  NSCircularSlider = 1;
+
+{ Types }
+type
+  NSTickMarkPosition = culong;
+  NSSliderType = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSLIDERCELL_PAS_R}
+{$define NSSLIDERCELL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSLIDERCELL_PAS_F}
+{$define NSSLIDERCELL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSLIDERCELL_PAS_T}
+{$define NSSLIDERCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSSliderCell = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSLIDERCELL_PAS_C}
+{$define NSSLIDERCELL_PAS_C}
+
+{ NSSliderCell }
+  NSSliderCell = objcclass(NSActionCell)
+  private
+    __reserved: cint;
+    __numberOfTickMarks: cint;
+    __altIncValue: double;
+    __value: double;
+    __maxValue: double;
+    __minValue: double;
+    __trackRect: NSRect;
+    __scFlags: bitpacked record
+        weAreVertical: 0..1;
+        weAreVerticalSet: 0..1;
+        reserved1: 0..1;
+        isPressed: 0..1;
+        allowsTickMarkValuesOnly: 0..1;
+        tickMarkPosition: 0..1;
+        sliderType: 0..((1 shl 2)-1);
+        drawing: 0..1;
+        reserved2: 0..((1 shl 23)-1);
+      end;
+    
+  public
+    class function alloc: NSSliderCell; message 'alloc';
+
+    class function prefersTrackingUntilMouseUp: Boolean; message 'prefersTrackingUntilMouseUp';
+    function minValue: double; message 'minValue';
+    procedure setMinValue(aDouble: double); message 'setMinValue:';
+    function maxValue: double; message 'maxValue';
+    procedure setMaxValue(aDouble: double); message 'setMaxValue:';
+    procedure setAltIncrementValue(incValue: double); message 'setAltIncrementValue:';
+    function altIncrementValue: double; message 'altIncrementValue';
+    function isVertical: clong; message 'isVertical';
+    procedure setTitleColor(newColor: NSColor); message 'setTitleColor:';
+    function titleColor: NSColor; message 'titleColor';
+    procedure setTitleFont(fontObj: NSFont); message 'setTitleFont:';
+    function titleFont: NSFont; message 'titleFont';
+    function title: NSString; message 'title';
+    procedure setTitle(aString: NSString); message 'setTitle:';
+    procedure setTitleCell(aCell: NSCell); message 'setTitleCell:';
+    function titleCell: id; message 'titleCell';
+    procedure setKnobThickness(aFloat: CGFloat); message 'setKnobThickness:';
+    function knobThickness: CGFloat; message 'knobThickness';
+    function knobRectFlipped(flipped: Boolean): NSRect; message 'knobRectFlipped:';
+    procedure drawKnob(knobRect: NSRect); message 'drawKnob:';
+    procedure drawBarInside_flipped(aRect: NSRect; flipped: Boolean); message 'drawBarInside:flipped:';
+    function trackRect: NSRect; message 'trackRect';
+    procedure setSliderType(sliderType_: NSSliderType); message 'setSliderType:';
+    function sliderType: NSSliderType; message 'sliderType';
+
+    { Category: NSTickMarkSupport }
+    procedure setNumberOfTickMarks(count: clong); message 'setNumberOfTickMarks:';
+    function numberOfTickMarks: clong; message 'numberOfTickMarks';
+    procedure setTickMarkPosition(position: NSTickMarkPosition); message 'setTickMarkPosition:';
+    function tickMarkPosition: NSTickMarkPosition; message 'tickMarkPosition';
+    procedure setAllowsTickMarkValuesOnly(yorn: Boolean); message 'setAllowsTickMarkValuesOnly:';
+    function allowsTickMarkValuesOnly: Boolean; message 'allowsTickMarkValuesOnly';
+    function tickMarkValueAtIndex(index: clong): double; message 'tickMarkValueAtIndex:';
+    function rectOfTickMarkAtIndex(index: clong): NSRect; message 'rectOfTickMarkAtIndex:';
+    function indexOfTickMarkAtPoint(point: NSPoint): clong; message 'indexOfTickMarkAtPoint:';
+    function closestTickMarkValueToValue(value: double): double; message 'closestTickMarkValueToValue:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSSound.inc b/packages/cocoaint/src/appkit/NSSound.inc
new file mode 100644
index 0000000000..bd8849b888
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSSound.inc
@@ -0,0 +1,100 @@
+{ Parsed from Appkit.framework NSSound.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSOUND_PAS_H}
+{$define NSSOUND_PAS_H}
+type
+  NSSoundPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSOUND_PAS_T}
+{$define NSSOUND_PAS_T}
+
+{ CFString constants }
+var
+  NSSoundPboardType: CFStringRef; external name '_NSSoundPboardType';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSOUND_PAS_R}
+{$define NSSOUND_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSOUND_PAS_F}
+{$define NSSOUND_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSOUND_PAS_T}
+{$define NSSOUND_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSSound = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSOUND_PAS_C}
+{$define NSSOUND_PAS_C}
+
+{ NSSound }
+  NSSound = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __delegate: id;
+    __info: id;
+    __reserved: id;
+    __sFlags: culong;
+    
+  public
+    class function alloc: NSSound; message 'alloc';
+
+    class function soundNamed(name_: NSString): id; message 'soundNamed:';
+    function initWithContentsOfURL_byReference(url: NSURL; byRef: Boolean): id; message 'initWithContentsOfURL:byReference:';
+    function initWithContentsOfFile_byReference(path: NSString; byRef: Boolean): id; message 'initWithContentsOfFile:byReference:';
+    function initWithData(data: NSData): id; message 'initWithData:';
+    function setName(string_: NSString): Boolean; message 'setName:';
+    function name: NSString; message 'name';
+    class function canInitWithPasteboard(pasteboard: NSPasteboard): Boolean; message 'canInitWithPasteboard:';
+    class function soundUnfilteredTypes: NSArray; message 'soundUnfilteredTypes';
+    function initWithPasteboard(pasteboard: NSPasteboard): id; message 'initWithPasteboard:';
+    procedure writeToPasteboard(pasteboard: NSPasteboard); message 'writeToPasteboard:';
+    function play: Boolean; message 'play';
+    function pause: Boolean; message 'pause';
+    function resume: Boolean; message 'resume';
+    function stop: Boolean; message 'stop';
+    function isPlaying: Boolean; message 'isPlaying';
+    function delegate: id; message 'delegate';
+    procedure setDelegate(aDelegate: id); message 'setDelegate:';
+    function duration: NSTimeInterval; message 'duration';
+    procedure setVolume(volume_: single); message 'setVolume:';
+    function volume: single; message 'volume';
+    function currentTime: NSTimeInterval; message 'currentTime';
+    procedure setCurrentTime(seconds: NSTimeInterval); message 'setCurrentTime:';
+    procedure setLoops(val: Boolean); message 'setLoops:';
+    function loops: Boolean; message 'loops';
+    procedure setPlaybackDeviceIdentifier(deviceUID: NSString); message 'setPlaybackDeviceIdentifier:';
+    function playbackDeviceIdentifier: NSString; message 'playbackDeviceIdentifier';
+    procedure setChannelMapping(channelMapping_: NSArray); message 'setChannelMapping:';
+    function channelMapping: NSArray; message 'channelMapping';
+
+    { Category: NSDeprecated }
+    class function soundUnfilteredFileTypes: NSArray; message 'soundUnfilteredFileTypes';
+    class function soundUnfilteredPasteboardTypes: NSArray; message 'soundUnfilteredPasteboardTypes';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSSpeechRecognizer.inc b/packages/cocoaint/src/appkit/NSSpeechRecognizer.inc
new file mode 100644
index 0000000000..8d27e12f56
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSSpeechRecognizer.inc
@@ -0,0 +1,74 @@
+{ Parsed from Appkit.framework NSSpeechRecognizer.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSPEECHRECOGNIZER_PAS_H}
+{$define NSSPEECHRECOGNIZER_PAS_H}
+type
+  NSSpeechRecognizerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSPEECHRECOGNIZER_PAS_T}
+{$define NSSPEECHRECOGNIZER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSPEECHRECOGNIZER_PAS_R}
+{$define NSSPEECHRECOGNIZER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSPEECHRECOGNIZER_PAS_F}
+{$define NSSPEECHRECOGNIZER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSPEECHRECOGNIZER_PAS_T}
+{$define NSSPEECHRECOGNIZER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSSpeechRecognizer = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSPEECHRECOGNIZER_PAS_C}
+{$define NSSPEECHRECOGNIZER_PAS_C}
+
+{ NSSpeechRecognizer }
+  NSSpeechRecognizer = objcclass(NSObject)
+  private
+    __privateNSSpeechRecognizerVars: id;
+    
+  public
+    class function alloc: NSSpeechRecognizer; message 'alloc';
+
+    function init: id; message 'init';
+    procedure startListening; message 'startListening';
+    procedure stopListening; message 'stopListening';
+    function delegate: id; message 'delegate';
+    procedure setDelegate(anObject: id); message 'setDelegate:';
+    function commands: NSArray; message 'commands';
+    procedure setCommands(commands_: NSArray); message 'setCommands:';
+    function displayedCommandsTitle: NSString; message 'displayedCommandsTitle';
+    procedure setDisplayedCommandsTitle(title: NSString); message 'setDisplayedCommandsTitle:';
+    function listensInForegroundOnly: Boolean; message 'listensInForegroundOnly';
+    procedure setListensInForegroundOnly(flag: Boolean); message 'setListensInForegroundOnly:';
+    function blocksOtherRecognizers: Boolean; message 'blocksOtherRecognizers';
+    procedure setBlocksOtherRecognizers(flag: Boolean); message 'setBlocksOtherRecognizers:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSSpeechSynthesizer.inc b/packages/cocoaint/src/appkit/NSSpeechSynthesizer.inc
new file mode 100644
index 0000000000..20a301810c
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSSpeechSynthesizer.inc
@@ -0,0 +1,98 @@
+{ Parsed from Appkit.framework NSSpeechSynthesizer.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSPEECHSYNTHESIZER_PAS_H}
+{$define NSSPEECHSYNTHESIZER_PAS_H}
+type
+  NSSpeechSynthesizerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSPEECHSYNTHESIZER_PAS_T}
+{$define NSSPEECHSYNTHESIZER_PAS_T}
+
+{ Constants }
+
+const
+  NSSpeechImmediateBoundary = 0;
+  NSSpeechWordBoundary = 0;
+  NSSpeechSentenceBoundary = 1;
+
+{ Types }
+type
+  NSSpeechBoundary = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSPEECHSYNTHESIZER_PAS_R}
+{$define NSSPEECHSYNTHESIZER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSPEECHSYNTHESIZER_PAS_F}
+{$define NSSPEECHSYNTHESIZER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSPEECHSYNTHESIZER_PAS_T}
+{$define NSSPEECHSYNTHESIZER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSSpeechSynthesizer = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSPEECHSYNTHESIZER_PAS_C}
+{$define NSSPEECHSYNTHESIZER_PAS_C}
+
+{ NSSpeechSynthesizer }
+  NSSpeechSynthesizer = objcclass(NSObject)
+  private
+    __privateNSSpeechSynthesizerVars: id;
+    
+  public
+    class function alloc: NSSpeechSynthesizer; message 'alloc';
+
+    function initWithVoice(voice_: NSString): id; message 'initWithVoice:';
+    function startSpeakingString(string_: NSString): Boolean; message 'startSpeakingString:';
+    function startSpeakingString_toURL(string_: NSString; url: NSURL): Boolean; message 'startSpeakingString:toURL:';
+    function isSpeaking: Boolean; message 'isSpeaking';
+    procedure stopSpeaking; message 'stopSpeaking';
+    procedure stopSpeakingAtBoundary(boundary: NSSpeechBoundary); message 'stopSpeakingAtBoundary:';
+    procedure pauseSpeakingAtBoundary(boundary: NSSpeechBoundary); message 'pauseSpeakingAtBoundary:';
+    procedure continueSpeaking; message 'continueSpeaking';
+    function delegate: id; message 'delegate';
+    procedure setDelegate(anObject: id); message 'setDelegate:';
+    function voice: NSString; message 'voice';
+    function setVoice(voice_: NSString): Boolean; message 'setVoice:';
+    function rate: single; message 'rate';
+    procedure setRate(rate_: single); message 'setRate:';
+    function volume: single; message 'volume';
+    procedure setVolume(volume_: single); message 'setVolume:';
+    function usesFeedbackWindow: Boolean; message 'usesFeedbackWindow';
+    procedure setUsesFeedbackWindow(flag: Boolean); message 'setUsesFeedbackWindow:';
+    procedure addSpeechDictionary(speechDictionary: NSDictionary); message 'addSpeechDictionary:';
+    function phonemesFromText(text: NSString): NSString; message 'phonemesFromText:';
+    function objectForProperty_error(property_: NSString; var outError: NSError): id; message 'objectForProperty:error:';
+    function setObject_forProperty_error(object_: id; property_: NSString; var outError: NSError): Boolean; message 'setObject:forProperty:error:';
+    class function isAnyApplicationSpeaking: Boolean; message 'isAnyApplicationSpeaking';
+    class function defaultVoice: NSString; message 'defaultVoice';
+    class function availableVoices: NSArray; message 'availableVoices';
+    class function attributesForVoice(voice_: NSString): NSDictionary; message 'attributesForVoice:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSSpellChecker.inc b/packages/cocoaint/src/appkit/NSSpellChecker.inc
new file mode 100644
index 0000000000..8d73ed004e
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSSpellChecker.inc
@@ -0,0 +1,118 @@
+{ Parsed from Appkit.framework NSSpellChecker.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSPELLCHECKER_PAS_H}
+{$define NSSPELLCHECKER_PAS_H}
+type
+  NSSpellCheckerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSPELLCHECKER_PAS_T}
+{$define NSSPELLCHECKER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSPELLCHECKER_PAS_R}
+{$define NSSPELLCHECKER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSPELLCHECKER_PAS_F}
+{$define NSSPELLCHECKER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSPELLCHECKER_PAS_T}
+{$define NSSPELLCHECKER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSSpellChecker = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSPELLCHECKER_PAS_C}
+{$define NSSPELLCHECKER_PAS_C}
+
+{ NSSpellChecker }
+  NSSpellChecker = objcclass(NSObject)
+  private
+    __guessesBrowser: id;
+    __wordField: id;
+    __languagePopUp: id;
+    __guessesList: id;
+    __panel: id;
+    __userDictionaries: id;
+    __correctButton: id;
+    __guessButton: id;
+    __ignoreButton: id;
+    __accessoryView: id;
+    __dictionaryBrowser: id;
+    __selectionString: NSString;
+    __spellServers: id;
+    __lastGuess: NSString;
+    __scFlags: bitpacked record
+        autoShowGuesses: 0..1;
+        needDelayedGuess: 0..1;
+        unignoreInProgress: 0..1;
+        wordFieldEdited: 0..1;
+        inSpelling: 0..1;
+        reconnectSpelling: 0..1;
+        inGrammar: 0..1;
+        reconnectGrammar: 0..1;
+        _reserved: 0..((1 shl 24)-1);
+      end;
+    __deleteButton: id;
+    __openButton: id;
+    __learnButton: id;
+    __infoField: id;
+    __grammarControl: id;
+    
+  public
+    class function alloc: NSSpellChecker; message 'alloc';
+
+    class function sharedSpellChecker: NSSpellChecker; message 'sharedSpellChecker';
+    class function sharedSpellCheckerExists: Boolean; message 'sharedSpellCheckerExists';
+    class function uniqueSpellDocumentTag: clong; message 'uniqueSpellDocumentTag';
+    function checkSpellingOfString_startingAt_language_wrap_inSpellDocumentWithTag_wordCount(stringToCheck: NSString; startingOffset: clong; language_: NSString; wrapFlag: Boolean; tag: clong; var wordCount: clong): NSRange; message 'checkSpellingOfString:startingAt:language:wrap:inSpellDocumentWithTag:wordCount:';
+    function checkSpellingOfString_startingAt(stringToCheck: NSString; startingOffset: clong): NSRange; message 'checkSpellingOfString:startingAt:';
+    function countWordsInString_language(stringToCount: NSString; language_: NSString): clong; message 'countWordsInString:language:';
+    function checkGrammarOfString_startingAt_language_wrap_inSpellDocumentWithTag_details(stringToCheck: NSString; startingOffset: clong; language_: NSString; wrapFlag: Boolean; tag: clong; var details: NSArray): NSRange; message 'checkGrammarOfString:startingAt:language:wrap:inSpellDocumentWithTag:details:';
+    procedure updateSpellingPanelWithMisspelledWord(word: NSString); message 'updateSpellingPanelWithMisspelledWord:';
+    procedure updateSpellingPanelWithGrammarString_detail(string_: NSString; detail: NSDictionary); message 'updateSpellingPanelWithGrammarString:detail:';
+    function spellingPanel: NSPanel; message 'spellingPanel';
+    function accessoryView: NSView; message 'accessoryView';
+    procedure setAccessoryView(aView: NSView); message 'setAccessoryView:';
+    procedure ignoreWord_inSpellDocumentWithTag(wordToIgnore: NSString; tag: clong); message 'ignoreWord:inSpellDocumentWithTag:';
+    function ignoredWordsInSpellDocumentWithTag(tag: clong): NSArray; message 'ignoredWordsInSpellDocumentWithTag:';
+    procedure setIgnoredWords_inSpellDocumentWithTag(words: NSArray; tag: clong); message 'setIgnoredWords:inSpellDocumentWithTag:';
+    function guessesForWord(word: NSString): NSArray; message 'guessesForWord:';
+    function completionsForPartialWordRange_inString_language_inSpellDocumentWithTag(range: NSRange; string_: NSString; language_: NSString; tag: clong): NSArray; message 'completionsForPartialWordRange:inString:language:inSpellDocumentWithTag:';
+    procedure closeSpellDocumentWithTag(tag: clong); message 'closeSpellDocumentWithTag:';
+    function language: NSString; message 'language';
+    function setLanguage(language_: NSString): Boolean; message 'setLanguage:';
+    function availableLanguages: NSArray; message 'availableLanguages';
+    procedure setWordFieldStringValue(aString: NSString); message 'setWordFieldStringValue:';
+    procedure learnWord(word: NSString); message 'learnWord:';
+    function hasLearnedWord(word: NSString): Boolean; message 'hasLearnedWord:';
+    procedure unlearnWord(word: NSString); message 'unlearnWord:';
+
+    { Category: NSDeprecated }
+    procedure forgetWord(word: NSString); message 'forgetWord:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSSpellProtocol.inc b/packages/cocoaint/src/appkit/NSSpellProtocol.inc
new file mode 100644
index 0000000000..d94d0e3f15
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSSpellProtocol.inc
@@ -0,0 +1,52 @@
+{ Parsed from Appkit.framework NSSpellProtocol.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSSPELLPROTOCOL_PAS_T}
+{$define NSSPELLPROTOCOL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSPELLPROTOCOL_PAS_R}
+{$define NSSPELLPROTOCOL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSPELLPROTOCOL_PAS_F}
+{$define NSSPELLPROTOCOL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSPELLPROTOCOL_PAS_T}
+{$define NSSPELLPROTOCOL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSChangeSpellingProtocol = objcprotocol;
+  NSIgnoreMisspelledWordsProtocol = objcprotocol;
+
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSSPELLPROTOCOL_PAS_P}
+{$define NSSPELLPROTOCOL_PAS_P}
+  
+{ NSChangeSpelling Protocol }
+  NSChangeSpellingProtocol = objcprotocol
+    procedure changeSpelling(sender: id); message 'changeSpelling:';
+  end; external name 'NSChangeSpelling';
+  
+{ NSIgnoreMisspelledWords Protocol }
+  NSIgnoreMisspelledWordsProtocol = objcprotocol
+    procedure ignoreSpelling(sender: id); message 'ignoreSpelling:';
+  end; external name 'NSIgnoreMisspelledWords';
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSSplitView.inc b/packages/cocoaint/src/appkit/NSSplitView.inc
new file mode 100644
index 0000000000..ae8f364a4f
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSSplitView.inc
@@ -0,0 +1,94 @@
+{ Parsed from Appkit.framework NSSplitView.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSPLITVIEW_PAS_H}
+{$define NSSPLITVIEW_PAS_H}
+type
+  NSSplitViewPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSPLITVIEW_PAS_T}
+{$define NSSPLITVIEW_PAS_T}
+
+{ Constants }
+
+const
+  NSSplitViewDividerStyleThick = 1;
+  NSSplitViewDividerStyleThin = 0;
+
+{ Types }
+type
+  NSSplitViewDividerStyle = clong;
+
+{ CFString constants }
+var
+  NSSplitViewWillResizeSubviewsNotification: CFStringRef; external name '_NSSplitViewWillResizeSubviewsNotification';
+  NSSplitViewDidResizeSubviewsNotification: CFStringRef; external name '_NSSplitViewDidResizeSubviewsNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSPLITVIEW_PAS_R}
+{$define NSSPLITVIEW_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSPLITVIEW_PAS_F}
+{$define NSSPLITVIEW_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSPLITVIEW_PAS_T}
+{$define NSSPLITVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSSplitView = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSPLITVIEW_PAS_C}
+{$define NSSPLITVIEW_PAS_C}
+
+{ NSSplitView }
+  NSSplitView = objcclass(NSView)
+  private
+    __variables: id;
+    
+  public
+    class function alloc: NSSplitView; message 'alloc';
+
+    procedure setVertical(flag: Boolean); message 'setVertical:';
+    function isVertical: Boolean; message 'isVertical';
+    procedure setDividerStyle(dividerStyle_: NSSplitViewDividerStyle); message 'setDividerStyle:';
+    function dividerStyle: NSSplitViewDividerStyle; message 'dividerStyle';
+    procedure setAutosaveName(autosaveName_: NSString); message 'setAutosaveName:';
+    function autosaveName: NSString; message 'autosaveName';
+    procedure setDelegate(delegate_: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
+    procedure drawDividerInRect(rect: NSRect); message 'drawDividerInRect:';
+    function dividerColor: NSColor; message 'dividerColor';
+    function dividerThickness: CGFloat; message 'dividerThickness';
+    procedure adjustSubviews; message 'adjustSubviews';
+    function isSubviewCollapsed(subview: NSView): Boolean; message 'isSubviewCollapsed:';
+    function minPossiblePositionOfDividerAtIndex(dividerIndex: clong): CGFloat; message 'minPossiblePositionOfDividerAtIndex:';
+    function maxPossiblePositionOfDividerAtIndex(dividerIndex: clong): CGFloat; message 'maxPossiblePositionOfDividerAtIndex:';
+    procedure setPosition_ofDividerAtIndex(position: CGFloat; dividerIndex: clong); message 'setPosition:ofDividerAtIndex:';
+    procedure setIsPaneSplitter(flag: Boolean); message 'setIsPaneSplitter:';
+    function isPaneSplitter: Boolean; message 'isPaneSplitter';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSStatusBar.inc b/packages/cocoaint/src/appkit/NSStatusBar.inc
new file mode 100644
index 0000000000..94dba5cd22
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSStatusBar.inc
@@ -0,0 +1,69 @@
+{ Parsed from Appkit.framework NSStatusBar.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSTATUSBAR_PAS_H}
+{$define NSSTATUSBAR_PAS_H}
+type
+  NSStatusBarPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSTATUSBAR_PAS_T}
+{$define NSSTATUSBAR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSTATUSBAR_PAS_R}
+{$define NSSTATUSBAR_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSTATUSBAR_PAS_F}
+{$define NSSTATUSBAR_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSTATUSBAR_PAS_T}
+{$define NSSTATUSBAR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSStatusBar = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSTATUSBAR_PAS_C}
+{$define NSSTATUSBAR_PAS_C}
+
+{ NSStatusBar }
+  NSStatusBar = objcclass(NSObject)
+  private
+    __actions: NSMutableArray;
+    __fReserved1: Pointer;
+    __fReserved2: Pointer;
+    __fReserved3: Pointer;
+    
+  public
+    class function alloc: NSStatusBar; message 'alloc';
+
+    class function systemStatusBar: NSStatusBar; message 'systemStatusBar';
+    function statusItemWithLength(length: CGFloat): NSStatusItem; message 'statusItemWithLength:';
+    procedure removeStatusItem(item: NSStatusItem); message 'removeStatusItem:';
+    function isVertical: Boolean; message 'isVertical';
+    function thickness: CGFloat; message 'thickness';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSStatusItem.inc b/packages/cocoaint/src/appkit/NSStatusItem.inc
new file mode 100644
index 0000000000..2365852278
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSStatusItem.inc
@@ -0,0 +1,111 @@
+{ Parsed from Appkit.framework NSStatusItem.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSTATUSITEM_PAS_H}
+{$define NSSTATUSITEM_PAS_H}
+type
+  NSStatusItemPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSTATUSITEM_PAS_T}
+{$define NSSTATUSITEM_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSTATUSITEM_PAS_R}
+{$define NSSTATUSITEM_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSTATUSITEM_PAS_F}
+{$define NSSTATUSITEM_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSTATUSITEM_PAS_T}
+{$define NSSTATUSITEM_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSStatusItem = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSTATUSITEM_PAS_C}
+{$define NSSTATUSITEM_PAS_C}
+
+{ NSStatusItem }
+  NSStatusItem = objcclass(NSObject)
+  private
+    __fStatusBar: NSStatusBar;
+    __fLength: CGFloat;
+    __fWindow: NSWindow;
+    __fView: NSView;
+    __fPriority: cint;
+    __fFlags: bitpacked record
+        customView: 0..1;
+        highlightMode: 0..1;
+        hasAlternateImage: 0..1;
+        hidden: 0..1;
+        backgroundStyle: 0..((1 shl 4)-1);
+        reserved: 0..((1 shl 24)-1);
+      end;
+    __fReserved1: id;
+    __fReserved2: id;
+    __fReserved3: id;
+    __fReserved4: id;
+    
+  public
+    class function alloc: NSStatusItem; message 'alloc';
+
+    function statusBar: NSStatusBar; message 'statusBar';
+    function length: CGFloat; message 'length';
+    procedure setLength(length_: CGFloat); message 'setLength:';
+
+    { Category: NSStatusItemCommon }
+    function action: SEL; message 'action';
+    procedure setAction(action_: SEL); message 'setAction:';
+    function doubleAction: SEL; message 'doubleAction';
+    procedure setDoubleAction(action_: SEL); message 'setDoubleAction:';
+    function target: id; message 'target';
+    procedure setTarget(target_: id); message 'setTarget:';
+    function title: NSString; message 'title';
+    procedure setTitle(title_: NSString); message 'setTitle:';
+    function attributedTitle: NSAttributedString; message 'attributedTitle';
+    procedure setAttributedTitle(title_: NSAttributedString); message 'setAttributedTitle:';
+    function image: NSImage; message 'image';
+    procedure setImage(image_: NSImage); message 'setImage:';
+    function alternateImage: NSImage; message 'alternateImage';
+    procedure setAlternateImage(image_: NSImage); message 'setAlternateImage:';
+    function menu: NSMenu; message 'menu';
+    procedure setMenu(menu_: NSMenu); message 'setMenu:';
+    function isEnabled: Boolean; message 'isEnabled';
+    procedure setEnabled(enabled: Boolean); message 'setEnabled:';
+    function toolTip: NSString; message 'toolTip';
+    procedure setToolTip(toolTip_: NSString); message 'setToolTip:';
+    procedure setHighlightMode(highlightMode_: Boolean); message 'setHighlightMode:';
+    function highlightMode: Boolean; message 'highlightMode';
+    function sendActionOn(mask: clong): clong; message 'sendActionOn:';
+    procedure popUpStatusItemMenu(menu_: NSMenu); message 'popUpStatusItemMenu:';
+    procedure drawStatusBarBackgroundInRect_withHighlight(rect: NSRect; highlight: Boolean); message 'drawStatusBarBackgroundInRect:withHighlight:';
+
+    { Category: NSStatusItemView }
+    function view: NSView; message 'view';
+    procedure setView(view_: NSView); message 'setView:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSStepper.inc b/packages/cocoaint/src/appkit/NSStepper.inc
new file mode 100644
index 0000000000..9eff6c9bb0
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSStepper.inc
@@ -0,0 +1,74 @@
+{ Parsed from Appkit.framework NSStepper.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSTEPPER_PAS_H}
+{$define NSSTEPPER_PAS_H}
+type
+  NSStepperPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSTEPPER_PAS_T}
+{$define NSSTEPPER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSTEPPER_PAS_R}
+{$define NSSTEPPER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSTEPPER_PAS_F}
+{$define NSSTEPPER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSTEPPER_PAS_T}
+{$define NSSTEPPER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSStepper = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSTEPPER_PAS_C}
+{$define NSSTEPPER_PAS_C}
+
+{ NSStepper }
+  NSStepper = objcclass(NSControl)
+  private
+    __reserved1: cuint;
+    __reserved2: cuint;
+    __reserved3: cuint;
+    __reserved4: cuint;
+    
+  public
+    class function alloc: NSStepper; message 'alloc';
+
+    function minValue: double; message 'minValue';
+    procedure setMinValue(minValue_: double); message 'setMinValue:';
+    function maxValue: double; message 'maxValue';
+    procedure setMaxValue(maxValue_: double); message 'setMaxValue:';
+    function increment: double; message 'increment';
+    procedure setIncrement(increment_: double); message 'setIncrement:';
+    function valueWraps: Boolean; message 'valueWraps';
+    procedure setValueWraps(valueWraps_: Boolean); message 'setValueWraps:';
+    function autorepeat: Boolean; message 'autorepeat';
+    procedure setAutorepeat(autorepeat_: Boolean); message 'setAutorepeat:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSStepperCell.inc b/packages/cocoaint/src/appkit/NSStepperCell.inc
new file mode 100644
index 0000000000..2c26e5ac54
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSStepperCell.inc
@@ -0,0 +1,84 @@
+{ Parsed from Appkit.framework NSStepperCell.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSTEPPERCELL_PAS_H}
+{$define NSSTEPPERCELL_PAS_H}
+type
+  NSStepperCellPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSTEPPERCELL_PAS_T}
+{$define NSSTEPPERCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSTEPPERCELL_PAS_R}
+{$define NSSTEPPERCELL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSTEPPERCELL_PAS_F}
+{$define NSSTEPPERCELL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSTEPPERCELL_PAS_T}
+{$define NSSTEPPERCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSStepperCell = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSTEPPERCELL_PAS_C}
+{$define NSSTEPPERCELL_PAS_C}
+
+{ NSStepperCell }
+  NSStepperCell = objcclass(NSActionCell)
+  private
+    __value: double;
+    __minValue: double;
+    __maxValue: double;
+    __increment: double;
+    __stFlags: bitpacked record
+        valueWraps: 0..1;
+        autorepeat: 0..1;
+        drawing: 0..1;
+        reserved: 0..((1 shl 29)-1);
+      end;
+    __reserved1: cuint;
+    __reserved2: cuint;
+    __reserved3: cuint;
+    __reserved4: cuint;
+    
+  public
+    class function alloc: NSStepperCell; message 'alloc';
+
+    function minValue: double; message 'minValue';
+    procedure setMinValue(minValue_: double); message 'setMinValue:';
+    function maxValue: double; message 'maxValue';
+    procedure setMaxValue(maxValue_: double); message 'setMaxValue:';
+    function increment: double; message 'increment';
+    procedure setIncrement(increment_: double); message 'setIncrement:';
+    function valueWraps: Boolean; message 'valueWraps';
+    procedure setValueWraps(valueWraps_: Boolean); message 'setValueWraps:';
+    function autorepeat: Boolean; message 'autorepeat';
+    procedure setAutorepeat(autorepeat_: Boolean); message 'setAutorepeat:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSStringDrawing.inc b/packages/cocoaint/src/appkit/NSStringDrawing.inc
new file mode 100644
index 0000000000..a890a71dda
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSStringDrawing.inc
@@ -0,0 +1,45 @@
+{ Parsed from Appkit.framework NSStringDrawing.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSSTRINGDRAWING_PAS_T}
+{$define NSSTRINGDRAWING_PAS_T}
+
+{ Constants }
+
+const
+  NSStringDrawingTruncatesLastVisibleLine = 1  shl  5;
+  NSStringDrawingUsesLineFragmentOrigin = 1  shl  0;
+  NSStringDrawingUsesFontLeading = 1  shl  1;
+  NSStringDrawingDisableScreenFontSubstitution = 1  shl  2;
+  NSStringDrawingUsesDeviceMetrics = 1  shl  3;
+  NSStringDrawingOneShot = 1  shl  4;
+
+{ Types }
+type
+  NSStringDrawingOptions = clong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSTRINGDRAWING_PAS_R}
+{$define NSSTRINGDRAWING_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSTRINGDRAWING_PAS_F}
+{$define NSSTRINGDRAWING_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSTRINGDRAWING_PAS_T}
+{$define NSSTRINGDRAWING_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSTabView.inc b/packages/cocoaint/src/appkit/NSTabView.inc
new file mode 100644
index 0000000000..bee74dd0b9
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSTabView.inc
@@ -0,0 +1,145 @@
+{ Parsed from Appkit.framework NSTabView.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTABVIEW_PAS_H}
+{$define NSTABVIEW_PAS_H}
+type
+  NSTabViewPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTABVIEW_PAS_T}
+{$define NSTABVIEW_PAS_T}
+
+{ Defines }
+const
+  NSAppKitVersionNumberWithDirectionalTabs = 631.0;
+
+{ Constants }
+
+const
+  NSLeftTabsBezelBorder = 1;
+  NSBottomTabsBezelBorder = 2;
+  NSRightTabsBezelBorder = 3;
+  NSNoTabsBezelBorder = 4;
+  NSNoTabsLineBorder = 5;
+  NSNoTabsNoBorder = 6;
+
+{ Types }
+type
+  NSTabViewType = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTABVIEW_PAS_R}
+{$define NSTABVIEW_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTABVIEW_PAS_F}
+{$define NSTABVIEW_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTABVIEW_PAS_T}
+{$define NSTABVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTabView = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTABVIEW_PAS_C}
+{$define NSTABVIEW_PAS_C}
+
+{ NSTabView }
+  NSTabView = objcclass(NSView)
+  private
+    __tabViewItems: id;
+    __selectedTabViewItem: NSTabViewItem;
+    __font: NSFont;
+    __tabViewType: NSTabViewType;
+    __allowTruncatedLabels: Boolean;
+    __delegate: id;
+    __tabViewUnusedBOOL1: Boolean;
+    __drawsBackground: Boolean;
+    __pressedTabViewItem: NSTabViewItem;
+    __endTabWidth: clong;
+    __maxOverlap: clong;
+    __tabHeight: CGFloat;
+    __tabViewItemWithKeyView: NSTabViewItem;
+    __originalNextKeyView: NSView;
+    __delegateRespondTo: bitpacked record
+        shouldSelectTabViewItem: 0..1;
+        willSelectTabViewItem: 0..1;
+        didSelectTabViewItem: 0..1;
+        didChangeNumberOfTabViewItems: 0..1;
+        reserved: 0..((1 shl 28)-1);
+      end;
+    __flags: bitpacked record
+        needsLayout: 0..1;
+        controlTint: 0..((1 shl 3)-1);
+        controlSize: 0..((1 shl 2)-1);
+        wiringNibConnections: 0..1;
+        wiringInteriorLastKeyView: 0..1;
+        originalNextKeyViewChanged: 0..1;
+        liveResizeSkippedResetToolTips: 0..1;
+        reserved: 0..((1 shl 22)-1);
+      end;
+    __focusedTabViewItem: NSTabViewItem;
+    __tabViewUnused2: Pointer;
+    
+  public
+    class function alloc: NSTabView; message 'alloc';
+
+    procedure selectTabViewItem(tabViewItem: NSTabViewItem); message 'selectTabViewItem:';
+    procedure selectTabViewItemAtIndex(index: clong); message 'selectTabViewItemAtIndex:';
+    procedure selectTabViewItemWithIdentifier(identifier: id); message 'selectTabViewItemWithIdentifier:';
+    procedure takeSelectedTabViewItemFromSender(sender: id); message 'takeSelectedTabViewItemFromSender:';
+    procedure selectFirstTabViewItem(sender: id); message 'selectFirstTabViewItem:';
+    procedure selectLastTabViewItem(sender: id); message 'selectLastTabViewItem:';
+    procedure selectNextTabViewItem(sender: id); message 'selectNextTabViewItem:';
+    procedure selectPreviousTabViewItem(sender: id); message 'selectPreviousTabViewItem:';
+    function selectedTabViewItem: NSTabViewItem; message 'selectedTabViewItem';
+    function font: NSFont; message 'font';
+    function tabViewType: NSTabViewType; message 'tabViewType';
+    function tabViewItems: NSArray; message 'tabViewItems';
+    function allowsTruncatedLabels: Boolean; message 'allowsTruncatedLabels';
+    function minimumSize: NSSize; message 'minimumSize';
+    function drawsBackground: Boolean; message 'drawsBackground';
+    function controlTint: NSControlTint; message 'controlTint';
+    function controlSize: NSControlSize; message 'controlSize';
+    procedure setFont(font_: NSFont); message 'setFont:';
+    procedure setTabViewType(tabViewType_: NSTabViewType); message 'setTabViewType:';
+    procedure setAllowsTruncatedLabels(allowTruncatedLabels: Boolean); message 'setAllowsTruncatedLabels:';
+    procedure setDrawsBackground(flag: Boolean); message 'setDrawsBackground:';
+    procedure setControlTint(controlTint_: NSControlTint); message 'setControlTint:';
+    procedure setControlSize(controlSize_: NSControlSize); message 'setControlSize:';
+    procedure addTabViewItem(tabViewItem: NSTabViewItem); message 'addTabViewItem:';
+    procedure insertTabViewItem_atIndex(tabViewItem: NSTabViewItem; index: clong); message 'insertTabViewItem:atIndex:';
+    procedure removeTabViewItem(tabViewItem: NSTabViewItem); message 'removeTabViewItem:';
+    procedure setDelegate(anObject: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
+    function tabViewItemAtPoint(point: NSPoint): NSTabViewItem; message 'tabViewItemAtPoint:';
+    function contentRect: NSRect; message 'contentRect';
+    function numberOfTabViewItems: clong; message 'numberOfTabViewItems';
+    function indexOfTabViewItem(tabViewItem: NSTabViewItem): clong; message 'indexOfTabViewItem:';
+    function tabViewItemAtIndex(index: clong): NSTabViewItem; message 'tabViewItemAtIndex:';
+    function indexOfTabViewItemWithIdentifier(identifier: id): clong; message 'indexOfTabViewItemWithIdentifier:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSTabViewItem.inc b/packages/cocoaint/src/appkit/NSTabViewItem.inc
new file mode 100644
index 0000000000..047ce2d6c2
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSTabViewItem.inc
@@ -0,0 +1,105 @@
+{ Parsed from Appkit.framework NSTabViewItem.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTABVIEWITEM_PAS_H}
+{$define NSTABVIEWITEM_PAS_H}
+type
+  NSTabViewItemPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTABVIEWITEM_PAS_T}
+{$define NSTABVIEWITEM_PAS_T}
+
+{ Constants }
+
+const
+  NSSelectedTab = 0;
+  NSBackgroundTab = 1;
+  NSPressedTab = 2;
+
+{ Types }
+type
+  NSTabState = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTABVIEWITEM_PAS_R}
+{$define NSTABVIEWITEM_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTABVIEWITEM_PAS_F}
+{$define NSTABVIEWITEM_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTABVIEWITEM_PAS_T}
+{$define NSTABVIEWITEM_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTabViewItem = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTABVIEWITEM_PAS_C}
+{$define NSTABVIEWITEM_PAS_C}
+
+{ NSTabViewItem }
+  NSTabViewItem = objcclass(NSObject, NSCodingProtocol)
+  private
+    __identifier: id;
+    __label: NSString;
+    __view: NSView;
+    __initialFirstResponder: NSView;
+    __color: NSColor;
+    __tabView: NSTabView;
+    __tabState: NSTabState;
+    __lastKeyView: NSView;
+    __tviFlags: bitpacked record
+        hasCustomColor: 0..1;
+        labelSizeIsValid: 0..1;
+        autoGeneratedIFR: 0..1;
+        isTabDisabled: 0..1;
+        RESERVED: 0..((1 shl 28)-1);
+      end;
+    __labelSize: NSSize;
+    __tabRect: NSRect;
+    __tabToolTipTag: NSToolTipTag;
+    __auxiliaryStorage: id;
+    
+  public
+    class function alloc: NSTabViewItem; message 'alloc';
+
+    function initWithIdentifier(identifier_: id): id; message 'initWithIdentifier:';
+    function identifier: id; message 'identifier';
+    function view: id; message 'view';
+    function initialFirstResponder: id; message 'initialFirstResponder';
+    function label_: NSString; message 'label';
+    function color: NSColor; message 'color';
+    function tabState: NSTabState; message 'tabState';
+    function tabView: NSTabView; message 'tabView';
+    procedure setIdentifier(identifier_: id); message 'setIdentifier:';
+    procedure setLabel(label__: NSString); message 'setLabel:';
+    procedure setColor(color_: NSColor); message 'setColor:';
+    procedure setView(view_: NSView); message 'setView:';
+    procedure setInitialFirstResponder(view_: NSView); message 'setInitialFirstResponder:';
+    procedure drawLabel_inRect(shouldTruncateLabel: Boolean; labelRect: NSRect); message 'drawLabel:inRect:';
+    function sizeOfLabel(computeMin: Boolean): NSSize; message 'sizeOfLabel:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSTableColumn.inc b/packages/cocoaint/src/appkit/NSTableColumn.inc
new file mode 100644
index 0000000000..55302c6ddb
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSTableColumn.inc
@@ -0,0 +1,107 @@
+{ Parsed from Appkit.framework NSTableColumn.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTABLECOLUMN_PAS_H}
+{$define NSTABLECOLUMN_PAS_H}
+type
+  NSTableColumnPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTABLECOLUMN_PAS_T}
+{$define NSTABLECOLUMN_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTABLECOLUMN_PAS_R}
+{$define NSTABLECOLUMN_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTABLECOLUMN_PAS_F}
+{$define NSTABLECOLUMN_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTABLECOLUMN_PAS_T}
+{$define NSTABLECOLUMN_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTableColumn = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTABLECOLUMN_PAS_C}
+{$define NSTABLECOLUMN_PAS_C}
+
+{ NSTableColumn }
+  NSTableColumn = objcclass(NSObject, NSCodingProtocol)
+  private
+    __identifier: id;
+    __width: CGFloat;
+    __minWidth: CGFloat;
+    __maxWidth: CGFloat;
+    __tableView: NSTableView;
+    __headerCell: NSCell;
+    __dataCell: NSCell;
+    __cFlags: bitpacked record
+        oldIsResizable: 0..1;
+        isEditable: 0..1;
+        resizedPostingDisableCount: 0..((1 shl 8)-1);
+        canUseReorderResizeImageCache: 0..1;
+        userResizingAllowed: 0..1;
+        autoResizingAllowed: 0..1;
+        hidden: 0..1;
+        RESERVED: 0..((1 shl 18)-1);
+      end;
+    __tcAuxiliaryStorage: id;
+    
+  public
+    class function alloc: NSTableColumn; message 'alloc';
+
+    function initWithIdentifier(identifier_: id): id; message 'initWithIdentifier:';
+    procedure setIdentifier(identifier_: id); message 'setIdentifier:';
+    function identifier: id; message 'identifier';
+    procedure setTableView(tableView_: NSTableView); message 'setTableView:';
+    function tableView: NSTableView; message 'tableView';
+    procedure setWidth(width_: CGFloat); message 'setWidth:';
+    function width: CGFloat; message 'width';
+    procedure setMinWidth(minWidth_: CGFloat); message 'setMinWidth:';
+    function minWidth: CGFloat; message 'minWidth';
+    procedure setMaxWidth(maxWidth_: CGFloat); message 'setMaxWidth:';
+    function maxWidth: CGFloat; message 'maxWidth';
+    procedure setHeaderCell(cell: NSCell); message 'setHeaderCell:';
+    function headerCell: id; message 'headerCell';
+    procedure setDataCell(cell: NSCell); message 'setDataCell:';
+    function dataCell: id; message 'dataCell';
+    function dataCellForRow(row: clong): id; message 'dataCellForRow:';
+    procedure setEditable(flag: Boolean); message 'setEditable:';
+    function isEditable: Boolean; message 'isEditable';
+    procedure sizeToFit; message 'sizeToFit';
+    procedure setSortDescriptorPrototype(sortDescriptor: NSSortDescriptor); message 'setSortDescriptorPrototype:';
+    function sortDescriptorPrototype: NSSortDescriptor; message 'sortDescriptorPrototype';
+    procedure setResizingMask(resizingMask_: culong); message 'setResizingMask:';
+    function resizingMask: culong; message 'resizingMask';
+    procedure setHeaderToolTip(string_: NSString); message 'setHeaderToolTip:';
+    function headerToolTip: NSString; message 'headerToolTip';
+    function isHidden: Boolean; message 'isHidden';
+    procedure setHidden(hidden: Boolean); message 'setHidden:';
+    procedure setResizable(flag: Boolean); message 'setResizable:';
+    function isResizable: Boolean; message 'isResizable';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSTableHeaderCell.inc b/packages/cocoaint/src/appkit/NSTableHeaderCell.inc
new file mode 100644
index 0000000000..564f617097
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSTableHeaderCell.inc
@@ -0,0 +1,61 @@
+{ Parsed from Appkit.framework NSTableHeaderCell.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTABLEHEADERCELL_PAS_H}
+{$define NSTABLEHEADERCELL_PAS_H}
+type
+  NSTableHeaderCellPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTABLEHEADERCELL_PAS_T}
+{$define NSTABLEHEADERCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTABLEHEADERCELL_PAS_R}
+{$define NSTABLEHEADERCELL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTABLEHEADERCELL_PAS_F}
+{$define NSTABLEHEADERCELL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTABLEHEADERCELL_PAS_T}
+{$define NSTABLEHEADERCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTableHeaderCell = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTABLEHEADERCELL_PAS_C}
+{$define NSTABLEHEADERCELL_PAS_C}
+
+{ NSTableHeaderCell }
+  NSTableHeaderCell = objcclass(NSTextFieldCell)
+    
+  public
+    class function alloc: NSTableHeaderCell; message 'alloc';
+
+    procedure drawSortIndicatorWithFrame_inView_ascending_priority(cellFrame: NSRect; controlView_: NSView; ascending: Boolean; priority: clong); message 'drawSortIndicatorWithFrame:inView:ascending:priority:';
+    function sortIndicatorRectForBounds(theRect: NSRect): NSRect; message 'sortIndicatorRectForBounds:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSTableHeaderView.inc b/packages/cocoaint/src/appkit/NSTableHeaderView.inc
new file mode 100644
index 0000000000..8bc57476ff
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSTableHeaderView.inc
@@ -0,0 +1,79 @@
+{ Parsed from Appkit.framework NSTableHeaderView.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTABLEHEADERVIEW_PAS_H}
+{$define NSTABLEHEADERVIEW_PAS_H}
+type
+  NSTableHeaderViewPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTABLEHEADERVIEW_PAS_T}
+{$define NSTABLEHEADERVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTABLEHEADERVIEW_PAS_R}
+{$define NSTABLEHEADERVIEW_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTABLEHEADERVIEW_PAS_F}
+{$define NSTABLEHEADERVIEW_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTABLEHEADERVIEW_PAS_T}
+{$define NSTABLEHEADERVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTableHeaderView = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTABLEHEADERVIEW_PAS_C}
+{$define NSTABLEHEADERVIEW_PAS_C}
+
+{ NSTableHeaderView }
+  NSTableHeaderView = objcclass(NSView)
+  private
+    __tableView: NSTableView;
+    __resizedColumn: clong;
+    __draggedColumn: clong;
+    __pressedColumn: clong;
+    __headerDragImage: NSImage;
+    __draggedDistance: CGFloat;
+    __isColumnResizing: Boolean;
+    __showHandCursorFired: Boolean;
+    __toolTipRectsDirty: Boolean;
+    __reserved4: Boolean;
+    __skipDrawingSeparator: Boolean;
+    __reserved: id;
+    
+  public
+    class function alloc: NSTableHeaderView; message 'alloc';
+
+    procedure setTableView(tableView_: NSTableView); message 'setTableView:';
+    function tableView: NSTableView; message 'tableView';
+    function draggedColumn: clong; message 'draggedColumn';
+    function draggedDistance: CGFloat; message 'draggedDistance';
+    function resizedColumn: clong; message 'resizedColumn';
+    function headerRectOfColumn(column: clong): NSRect; message 'headerRectOfColumn:';
+    function columnAtPoint(point: NSPoint): clong; message 'columnAtPoint:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSTableView.inc b/packages/cocoaint/src/appkit/NSTableView.inc
new file mode 100644
index 0000000000..18912f40ef
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSTableView.inc
@@ -0,0 +1,283 @@
+{ Parsed from Appkit.framework NSTableView.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTABLEVIEW_PAS_H}
+{$define NSTABLEVIEW_PAS_H}
+type
+  NSTableViewPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTABLEVIEW_PAS_T}
+{$define NSTABLEVIEW_PAS_T}
+
+{ Types }
+type
+  NSTableViewDropOperation = culong;
+  NSTableViewColumnAutoresizingStyle = culong;
+  NSTableViewSelectionHighlightStyle = clong;
+
+{ Constants }
+
+const
+  NSTableViewNoColumnAutoresizing = 0;
+  NSTableViewUniformColumnAutoresizingStyle = 0;
+  NSTableViewLastColumnOnlyAutoresizingStyle = 1;
+  NSTableViewFirstColumnOnlyAutoresizingStyle = 2;
+
+const
+  NSTableViewGridNone = 0;
+  NSTableViewSolidVerticalGridLineMask = 1  shl  0;
+  NSTableViewSolidHorizontalGridLineMask = 1  shl  1;
+
+const
+  NSTableViewSelectionHighlightStyleRegular = 0;
+  NSTableViewSelectionHighlightStyleSourceList = 1;
+
+{ CFString constants }
+var
+  NSTableViewSelectionDidChangeNotification: CFStringRef; external name '_NSTableViewSelectionDidChangeNotification';
+  NSTableViewColumnDidMoveNotification: CFStringRef; external name '_NSTableViewColumnDidMoveNotification';
+  NSTableViewColumnDidResizeNotification: CFStringRef; external name '_NSTableViewColumnDidResizeNotification';
+  NSTableViewSelectionIsChangingNotification: CFStringRef; external name '_NSTableViewSelectionIsChangingNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTABLEVIEW_PAS_R}
+{$define NSTABLEVIEW_PAS_R}
+
+{ Records }
+type
+  __TvFlags = record
+{$ifdef fpc_big_endian}
+    allowsColumnReordering: cuint;
+    allowsColumnResizing: cuint;
+    oldDrawsGridFlag: cuint;
+    allowsEmptySelection: cuint;
+    allowsMultipleSelection: cuint;
+    allowsColumnSelection: cuint;
+    selectionType: cuint;
+    changingLayout: cuint;
+    compareWidthWithSuperview: cuint;
+    delegateWillDisplayCell: cuint;
+    delegateShouldEditTableColumn: cuint;
+    delegateShouldSelectRow: cuint;
+    delegateShouldSelectTableColumn: cuint;
+    delegateSelectionShouldChangeInTableView: cuint;
+    oldAutoresizesAllColumnsToFit: cuint;
+    dataSourceSetObjectValue: cuint;
+    selectionPostingDisableCount: cuint;
+    movedPostingDisableCount: cuint;
+    refusesFirstResponder: cuint;
+{$else}
+    refusesFirstResponder: cuint;
+    movedPostingDisableCount: cuint;
+    selectionPostingDisableCount: cuint;
+    dataSourceSetObjectValue: cuint;
+    oldAutoresizesAllColumnsToFit: cuint;
+    delegateSelectionShouldChangeInTableView: cuint;
+    delegateShouldSelectTableColumn: cuint;
+    delegateShouldSelectRow: cuint;
+    delegateShouldEditTableColumn: cuint;
+    delegateWillDisplayCell: cuint;
+    compareWidthWithSuperview: cuint;
+    changingLayout: cuint;
+    selectionType: cuint;
+    allowsColumnSelection: cuint;
+    allowsMultipleSelection: cuint;
+    allowsEmptySelection: cuint;
+    oldDrawsGridFlag: cuint;
+    allowsColumnResizing: cuint;
+    allowsColumnReordering: cuint;
+{$endif}
+  end;
+_TvFlags = __TvFlags;
+
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTABLEVIEW_PAS_F}
+{$define NSTABLEVIEW_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTABLEVIEW_PAS_T}
+{$define NSTABLEVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTableView = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTABLEVIEW_PAS_C}
+{$define NSTABLEVIEW_PAS_C}
+
+{ NSTableView }
+  NSTableView = objcclass(NSControl, NSUserInterfaceValidationsProtocol)
+  private
+    __headerView: NSTableHeaderView;
+    __cornerView: NSView;
+    __tableColumns: NSMutableArray;
+    __editingCell: NSCell;
+    __delegate: id;
+    __dataSource: id;
+    __intercellSpacing: NSSize;
+    __rowHeight: CGFloat;
+    __lastSelectedColumn: clong;
+    __lastSelectedRow: clong;
+    __editingRow: clong;
+    __editingColumn: clong;
+    __selectedColumns: NSMutableIndexSet;
+    __selectedRows: NSMutableIndexSet;
+    __bodyDragImage: NSImage;
+    __backgroundColor: NSColor;
+    __gridColor: NSColor;
+    __dragYPos: CGFloat;
+    __target: id;
+    __action: SEL;
+    __doubleAction: SEL;
+    __rectOfLastColumn: NSRect;
+    __lastCachedRectColumn: clong;
+    __rectOfLastRow: NSRect;
+    __lastCachedRectRow: clong;
+    __tvFlags: _TvFlags;
+    __reserved: id;
+    
+  public
+    class function alloc: NSTableView; message 'alloc';
+
+    procedure setDataSource(aSource: id); message 'setDataSource:';
+    function dataSource: id; message 'dataSource';
+    procedure setDelegate(delegate_: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
+    procedure setHeaderView(headerView_: NSTableHeaderView); message 'setHeaderView:';
+    function headerView: NSTableHeaderView; message 'headerView';
+    procedure setCornerView(cornerView_: NSView); message 'setCornerView:';
+    function cornerView: NSView; message 'cornerView';
+    procedure setAllowsColumnReordering(flag: Boolean); message 'setAllowsColumnReordering:';
+    function allowsColumnReordering: Boolean; message 'allowsColumnReordering';
+    procedure setAllowsColumnResizing(flag: Boolean); message 'setAllowsColumnResizing:';
+    function allowsColumnResizing: Boolean; message 'allowsColumnResizing';
+    procedure setColumnAutoresizingStyle(style: NSTableViewColumnAutoresizingStyle); message 'setColumnAutoresizingStyle:';
+    function columnAutoresizingStyle: NSTableViewColumnAutoresizingStyle; message 'columnAutoresizingStyle';
+    procedure setGridStyleMask(gridType: culong); message 'setGridStyleMask:';
+    function gridStyleMask: culong; message 'gridStyleMask';
+    procedure setIntercellSpacing(aSize: NSSize); message 'setIntercellSpacing:';
+    function intercellSpacing: NSSize; message 'intercellSpacing';
+    procedure setUsesAlternatingRowBackgroundColors(useAlternatingRowColors: Boolean); message 'setUsesAlternatingRowBackgroundColors:';
+    function usesAlternatingRowBackgroundColors: Boolean; message 'usesAlternatingRowBackgroundColors';
+    procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
+    function backgroundColor: NSColor; message 'backgroundColor';
+    procedure setGridColor(color: NSColor); message 'setGridColor:';
+    function gridColor: NSColor; message 'gridColor';
+    procedure setRowHeight(rowHeight_: CGFloat); message 'setRowHeight:';
+    function rowHeight: CGFloat; message 'rowHeight';
+    procedure noteHeightOfRowsWithIndexesChanged(indexSet: NSIndexSet); message 'noteHeightOfRowsWithIndexesChanged:';
+    function tableColumns: NSArray; message 'tableColumns';
+    function numberOfColumns: clong; message 'numberOfColumns';
+    function numberOfRows: clong; message 'numberOfRows';
+    procedure addTableColumn(column: NSTableColumn); message 'addTableColumn:';
+    procedure removeTableColumn(column: NSTableColumn); message 'removeTableColumn:';
+    function columnWithIdentifier(identifier: id): clong; message 'columnWithIdentifier:';
+    function tableColumnWithIdentifier(identifier: id): NSTableColumn; message 'tableColumnWithIdentifier:';
+    procedure tile; message 'tile';
+    procedure sizeToFit; message 'sizeToFit';
+    procedure sizeLastColumnToFit; message 'sizeLastColumnToFit';
+    procedure scrollRowToVisible(row: clong); message 'scrollRowToVisible:';
+    procedure scrollColumnToVisible(column: clong); message 'scrollColumnToVisible:';
+    procedure moveColumn_toColumn(column: clong; newIndex: clong); message 'moveColumn:toColumn:';
+    procedure reloadData; message 'reloadData';
+    procedure noteNumberOfRowsChanged; message 'noteNumberOfRowsChanged';
+    function editedColumn: clong; message 'editedColumn';
+    function editedRow: clong; message 'editedRow';
+    function clickedColumn: clong; message 'clickedColumn';
+    function clickedRow: clong; message 'clickedRow';
+    procedure setDoubleAction(aSelector: SEL); message 'setDoubleAction:';
+    function doubleAction: SEL; message 'doubleAction';
+    procedure setSortDescriptors(array_: NSArray); message 'setSortDescriptors:';
+    function sortDescriptors: NSArray; message 'sortDescriptors';
+    procedure setIndicatorImage_inTableColumn(anImage: NSImage; tc: NSTableColumn); message 'setIndicatorImage:inTableColumn:';
+    function indicatorImageInTableColumn(tc: NSTableColumn): NSImage; message 'indicatorImageInTableColumn:';
+    procedure setHighlightedTableColumn(tc: NSTableColumn); message 'setHighlightedTableColumn:';
+    function highlightedTableColumn: NSTableColumn; message 'highlightedTableColumn';
+    procedure setVerticalMotionCanBeginDrag(flag: Boolean); message 'setVerticalMotionCanBeginDrag:';
+    function verticalMotionCanBeginDrag: Boolean; message 'verticalMotionCanBeginDrag';
+    function canDragRowsWithIndexes_atPoint(rowIndexes: NSIndexSet; mouseDownPoint: NSPoint): Boolean; message 'canDragRowsWithIndexes:atPoint:';
+    function dragImageForRowsWithIndexes_tableColumns_event_offset(dragRows: NSIndexSet; tableColumns_: NSArray; dragEvent: NSEvent; dragImageOffset: NSPointPointer): NSImage; message 'dragImageForRowsWithIndexes:tableColumns:event:offset:';
+    procedure setDraggingSourceOperationMask_forLocal(mask: NSDragOperation; isLocal: Boolean); message 'setDraggingSourceOperationMask:forLocal:';
+    procedure setDropRow_dropOperation(row: clong; op: NSTableViewDropOperation); message 'setDropRow:dropOperation:';
+    procedure setAllowsMultipleSelection(flag: Boolean); message 'setAllowsMultipleSelection:';
+    function allowsMultipleSelection: Boolean; message 'allowsMultipleSelection';
+    procedure setAllowsEmptySelection(flag: Boolean); message 'setAllowsEmptySelection:';
+    function allowsEmptySelection: Boolean; message 'allowsEmptySelection';
+    procedure setAllowsColumnSelection(flag: Boolean); message 'setAllowsColumnSelection:';
+    function allowsColumnSelection: Boolean; message 'allowsColumnSelection';
+    procedure selectAll(sender: id); message 'selectAll:';
+    procedure deselectAll(sender: id); message 'deselectAll:';
+    procedure selectColumnIndexes_byExtendingSelection(indexes: NSIndexSet; extend: Boolean); message 'selectColumnIndexes:byExtendingSelection:';
+    procedure selectRowIndexes_byExtendingSelection(indexes: NSIndexSet; extend: Boolean); message 'selectRowIndexes:byExtendingSelection:';
+    function selectedColumnIndexes: NSIndexSet; message 'selectedColumnIndexes';
+    function selectedRowIndexes: NSIndexSet; message 'selectedRowIndexes';
+    procedure deselectColumn(column: clong); message 'deselectColumn:';
+    procedure deselectRow(row: clong); message 'deselectRow:';
+    function selectedColumn: clong; message 'selectedColumn';
+    function selectedRow: clong; message 'selectedRow';
+    function isColumnSelected(column: clong): Boolean; message 'isColumnSelected:';
+    function isRowSelected(row: clong): Boolean; message 'isRowSelected:';
+    function numberOfSelectedColumns: clong; message 'numberOfSelectedColumns';
+    function numberOfSelectedRows: clong; message 'numberOfSelectedRows';
+    function allowsTypeSelect: Boolean; message 'allowsTypeSelect';
+    procedure setAllowsTypeSelect(value: Boolean); message 'setAllowsTypeSelect:';
+    function selectionHighlightStyle: NSTableViewSelectionHighlightStyle; message 'selectionHighlightStyle';
+    procedure setSelectionHighlightStyle(selectionHighlightStyle_: NSTableViewSelectionHighlightStyle); message 'setSelectionHighlightStyle:';
+    function rectOfColumn(column: clong): NSRect; message 'rectOfColumn:';
+    function rectOfRow(row: clong): NSRect; message 'rectOfRow:';
+    function columnIndexesInRect(rect: NSRect): NSIndexSet; message 'columnIndexesInRect:';
+    function rowsInRect(rect: NSRect): NSRange; message 'rowsInRect:';
+    function columnAtPoint(point: NSPoint): clong; message 'columnAtPoint:';
+    function rowAtPoint(point: NSPoint): clong; message 'rowAtPoint:';
+    function frameOfCellAtColumn_row(column: clong; row: clong): NSRect; message 'frameOfCellAtColumn:row:';
+    function preparedCellAtColumn_row(column: clong; row: clong): NSCell; message 'preparedCellAtColumn:row:';
+    function textShouldBeginEditing(textObject: NSText): Boolean; message 'textShouldBeginEditing:';
+    function textShouldEndEditing(textObject: NSText): Boolean; message 'textShouldEndEditing:';
+    procedure textDidBeginEditing(notification: NSNotification); message 'textDidBeginEditing:';
+    procedure textDidEndEditing(notification: NSNotification); message 'textDidEndEditing:';
+    procedure textDidChange(notification: NSNotification); message 'textDidChange:';
+    procedure setAutosaveName(name: NSString); message 'setAutosaveName:';
+    function autosaveName: NSString; message 'autosaveName';
+    procedure setAutosaveTableColumns(save: Boolean); message 'setAutosaveTableColumns:';
+    function autosaveTableColumns: Boolean; message 'autosaveTableColumns';
+    procedure editColumn_row_withEvent_select(column: clong; row: clong; theEvent: NSEvent; select: Boolean); message 'editColumn:row:withEvent:select:';
+    procedure drawRow_clipRect(row: clong; clipRect: NSRect); message 'drawRow:clipRect:';
+    procedure highlightSelectionInClipRect(clipRect: NSRect); message 'highlightSelectionInClipRect:';
+    procedure drawGridInClipRect(clipRect: NSRect); message 'drawGridInClipRect:';
+    procedure drawBackgroundInClipRect(clipRect: NSRect); message 'drawBackgroundInClipRect:';
+
+    { Category: NSDeprecated }
+    procedure setDrawsGrid(flag: Boolean); message 'setDrawsGrid:';
+    function drawsGrid: Boolean; message 'drawsGrid';
+    procedure selectColumn_byExtendingSelection(column: clong; extend: Boolean); message 'selectColumn:byExtendingSelection:';
+    procedure selectRow_byExtendingSelection(row: clong; extend: Boolean); message 'selectRow:byExtendingSelection:';
+    function selectedColumnEnumerator: NSEnumerator; message 'selectedColumnEnumerator';
+    function selectedRowEnumerator: NSEnumerator; message 'selectedRowEnumerator';
+    function dragImageForRows_event_dragImageOffset(dragRows: NSArray; dragEvent: NSEvent; dragImageOffset: NSPointPointer): NSImage; message 'dragImageForRows:event:dragImageOffset:';
+    procedure setAutoresizesAllColumnsToFit(flag: Boolean); message 'setAutoresizesAllColumnsToFit:';
+    function autoresizesAllColumnsToFit: Boolean; message 'autoresizesAllColumnsToFit';
+    function columnsInRect(rect: NSRect): NSRange; message 'columnsInRect:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSText.inc b/packages/cocoaint/src/appkit/NSText.inc
new file mode 100644
index 0000000000..e4cd70520f
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSText.inc
@@ -0,0 +1,168 @@
+{ Parsed from Appkit.framework NSText.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTEXT_PAS_H}
+{$define NSTEXT_PAS_H}
+type
+  NSTextPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTEXT_PAS_T}
+{$define NSTEXT_PAS_T}
+
+{ Constants }
+
+const
+  NSEnterCharacter = $0003;
+  NSBackspaceCharacter = $0008;
+  NSTabCharacter = $0009;
+  NSNewlineCharacter = $000a;
+  NSFormFeedCharacter = $000c;
+  NSCarriageReturnCharacter = $000d;
+  NSBackTabCharacter = $0019;
+  NSDeleteCharacter = $007f;
+  NSLineSeparatorCharacter = $2028;
+  NSParagraphSeparatorCharacter = $2029;
+
+const
+  NSIllegalTextMovement = 0;
+  NSReturnTextMovement = $10;
+  NSTabTextMovement = $11;
+  NSBacktabTextMovement = $12;
+  NSLeftTextMovement = $13;
+  NSRightTextMovement = $14;
+  NSUpTextMovement = $15;
+  NSDownTextMovement = $16;
+  NSCancelTextMovement = $17;
+  NSOtherTextMovement = 0;
+
+{ Types }
+type
+  NSTextAlignment = culong;
+  NSWritingDirection = clong;
+
+{ CFString constants }
+var
+  NSTextDidBeginEditingNotification: CFStringRef; external name '_NSTextDidBeginEditingNotification';
+  NSTextDidEndEditingNotification: CFStringRef; external name '_NSTextDidEndEditingNotification';
+  NSTextDidChangeNotification: CFStringRef; external name '_NSTextDidChangeNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTEXT_PAS_R}
+{$define NSTEXT_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTEXT_PAS_F}
+{$define NSTEXT_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTEXT_PAS_T}
+{$define NSTEXT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSText = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTEXT_PAS_C}
+{$define NSTEXT_PAS_C}
+
+{ NSText }
+  NSText = objcclass(NSView, NSChangeSpellingProtocol, NSIgnoreMisspelledWordsProtocol)
+  private
+    __ivars: id;
+    
+  public
+    class function alloc: NSText; message 'alloc';
+
+    function string_: NSString; message 'string';
+    procedure setString(string__: NSString); message 'setString:';
+    procedure replaceCharactersInRange_withString(range: NSRange; aString: NSString); message 'replaceCharactersInRange:withString:';
+    procedure replaceCharactersInRange_withRTF(range: NSRange; rtfData: NSData); message 'replaceCharactersInRange:withRTF:';
+    procedure replaceCharactersInRange_withRTFD(range: NSRange; rtfdData: NSData); message 'replaceCharactersInRange:withRTFD:';
+    function RTFFromRange(range: NSRange): NSData; message 'RTFFromRange:';
+    function RTFDFromRange(range: NSRange): NSData; message 'RTFDFromRange:';
+    function writeRTFDToFile_atomically(path: NSString; flag: Boolean): Boolean; message 'writeRTFDToFile:atomically:';
+    function readRTFDFromFile(path: NSString): Boolean; message 'readRTFDFromFile:';
+    function delegate: id; message 'delegate';
+    procedure setDelegate(anObject: id); message 'setDelegate:';
+    function isEditable: Boolean; message 'isEditable';
+    procedure setEditable(flag: Boolean); message 'setEditable:';
+    function isSelectable: Boolean; message 'isSelectable';
+    procedure setSelectable(flag: Boolean); message 'setSelectable:';
+    function isRichText: Boolean; message 'isRichText';
+    procedure setRichText(flag: Boolean); message 'setRichText:';
+    function importsGraphics: Boolean; message 'importsGraphics';
+    procedure setImportsGraphics(flag: Boolean); message 'setImportsGraphics:';
+    function isFieldEditor: Boolean; message 'isFieldEditor';
+    procedure setFieldEditor(flag: Boolean); message 'setFieldEditor:';
+    function usesFontPanel: Boolean; message 'usesFontPanel';
+    procedure setUsesFontPanel(flag: Boolean); message 'setUsesFontPanel:';
+    function drawsBackground: Boolean; message 'drawsBackground';
+    procedure setDrawsBackground(flag: Boolean); message 'setDrawsBackground:';
+    function backgroundColor: NSColor; message 'backgroundColor';
+    procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
+    function isRulerVisible: Boolean; message 'isRulerVisible';
+    function selectedRange: NSRange; message 'selectedRange';
+    procedure setSelectedRange(range: NSRange); message 'setSelectedRange:';
+    procedure scrollRangeToVisible(range: NSRange); message 'scrollRangeToVisible:';
+    procedure setFont(obj: NSFont); message 'setFont:';
+    function font: NSFont; message 'font';
+    procedure setTextColor(color: NSColor); message 'setTextColor:';
+    function textColor: NSColor; message 'textColor';
+    function alignment: NSTextAlignment; message 'alignment';
+    procedure setAlignment(mode: NSTextAlignment); message 'setAlignment:';
+    function baseWritingDirection: NSWritingDirection; message 'baseWritingDirection';
+    procedure setBaseWritingDirection(writingDirection: NSWritingDirection); message 'setBaseWritingDirection:';
+    procedure setTextColor_range(color: NSColor; range: NSRange); message 'setTextColor:range:';
+    procedure setFont_range(font_: NSFont; range: NSRange); message 'setFont:range:';
+    function maxSize: NSSize; message 'maxSize';
+    procedure setMaxSize(newMaxSize: NSSize); message 'setMaxSize:';
+    function minSize: NSSize; message 'minSize';
+    procedure setMinSize(newMinSize: NSSize); message 'setMinSize:';
+    function isHorizontallyResizable: Boolean; message 'isHorizontallyResizable';
+    procedure setHorizontallyResizable(flag: Boolean); message 'setHorizontallyResizable:';
+    function isVerticallyResizable: Boolean; message 'isVerticallyResizable';
+    procedure setVerticallyResizable(flag: Boolean); message 'setVerticallyResizable:';
+    procedure sizeToFit; message 'sizeToFit';
+    procedure copy_(sender: id); message 'copy:';
+    procedure copyFont(sender: id); message 'copyFont:';
+    procedure copyRuler(sender: id); message 'copyRuler:';
+    procedure cut(sender: id); message 'cut:';
+    procedure delete(sender: id); message 'delete:';
+    procedure paste(sender: id); message 'paste:';
+    procedure pasteFont(sender: id); message 'pasteFont:';
+    procedure pasteRuler(sender: id); message 'pasteRuler:';
+    procedure selectAll(sender: id); message 'selectAll:';
+    procedure changeFont(sender: id); message 'changeFont:';
+    procedure alignLeft(sender: id); message 'alignLeft:';
+    procedure alignRight(sender: id); message 'alignRight:';
+    procedure alignCenter(sender: id); message 'alignCenter:';
+    procedure subscript(sender: id); message 'subscript:';
+    procedure superscript(sender: id); message 'superscript:';
+    procedure underline(sender: id); message 'underline:';
+    procedure unscript(sender: id); message 'unscript:';
+    procedure showGuessPanel(sender: id); message 'showGuessPanel:';
+    procedure checkSpelling(sender: id); message 'checkSpelling:';
+    procedure toggleRuler(sender: id); message 'toggleRuler:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSTextAttachment.inc b/packages/cocoaint/src/appkit/NSTextAttachment.inc
new file mode 100644
index 0000000000..2febf85662
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSTextAttachment.inc
@@ -0,0 +1,110 @@
+{ Parsed from Appkit.framework NSTextAttachment.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTEXTATTACHMENT_PAS_H}
+{$define NSTEXTATTACHMENT_PAS_H}
+type
+  NSTextAttachmentCellPointer = Pointer;
+  NSTextAttachmentPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTEXTATTACHMENT_PAS_T}
+{$define NSTEXTATTACHMENT_PAS_T}
+
+{ Constants }
+
+const
+  NSAttachmentCharacter = $fffc;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTEXTATTACHMENT_PAS_R}
+{$define NSTEXTATTACHMENT_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTEXTATTACHMENT_PAS_F}
+{$define NSTEXTATTACHMENT_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTEXTATTACHMENT_PAS_T}
+{$define NSTEXTATTACHMENT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTextAttachmentCellProtocol = objcprotocol;
+  NSTextAttachmentCell = objcclass;
+  NSTextAttachment = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTEXTATTACHMENT_PAS_C}
+{$define NSTEXTATTACHMENT_PAS_C}
+
+{ NSTextAttachmentCell }
+  NSTextAttachmentCell = objcclass(NSCell, NSTextAttachmentCellProtocol)
+  private
+    __attachment: NSTextAttachment;
+    
+  public
+    class function alloc: NSTextAttachmentCell; message 'alloc';
+  end; external;
+
+{ NSTextAttachment }
+  NSTextAttachment = objcclass(NSObject, NSCodingProtocol)
+  private
+    __fileWrapper: NSFileWrapper;
+    __cell: id;
+    __flags: bitpacked record
+        cellWasExplicitlySet: 0..1;
+        int: 0..((1 shl 31)-1);
+      end;
+    
+  public
+    class function alloc: NSTextAttachment; message 'alloc';
+
+    function initWithFileWrapper(fileWrapper_: NSFileWrapper): id; message 'initWithFileWrapper:';
+    procedure setFileWrapper(fileWrapper_: NSFileWrapper); message 'setFileWrapper:';
+    function fileWrapper: NSFileWrapper; message 'fileWrapper';
+    function attachmentCell: id; message 'attachmentCell';
+    procedure setAttachmentCell(cell: id); message 'setAttachmentCell:';
+  end; external;
+
+{$endif}
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSTEXTATTACHMENT_PAS_P}
+{$define NSTEXTATTACHMENT_PAS_P}
+  
+{ NSTextAttachmentCell Protocol }
+  NSTextAttachmentCellProtocol = objcprotocol
+    procedure drawWithFrame_inView(cellFrame: NSRect; controlView: NSView); message 'drawWithFrame:inView:';
+    function wantsToTrackMouse: Boolean; message 'wantsToTrackMouse';
+    procedure highlight_withFrame_inView(flag: Boolean; cellFrame: NSRect; controlView: NSView); message 'highlight:withFrame:inView:';
+    function trackMouse_inRect_ofView_untilMouseUp(theEvent: NSEvent; cellFrame: NSRect; controlView: NSView; flag: Boolean): Boolean; message 'trackMouse:inRect:ofView:untilMouseUp:';
+    function cellSize: NSSize; message 'cellSize';
+    function cellBaselineOffset: NSPoint; message 'cellBaselineOffset';
+    procedure setAttachment(anObject: NSTextAttachment); message 'setAttachment:';
+    function attachment: NSTextAttachment; message 'attachment';
+    procedure drawWithFrame_inView_characterIndex(cellFrame: NSRect; controlView: NSView; charIndex: culong); message 'drawWithFrame:inView:characterIndex:';
+    procedure drawWithFrame_inView_characterIndex_layoutManager(cellFrame: NSRect; controlView: NSView; charIndex: culong; layoutManager: NSLayoutManager); message 'drawWithFrame:inView:characterIndex:layoutManager:';
+    function wantsToTrackMouseForEvent_inRect_ofView_atCharacterIndex(theEvent: NSEvent; cellFrame: NSRect; controlView: NSView; charIndex: culong): Boolean; message 'wantsToTrackMouseForEvent:inRect:ofView:atCharacterIndex:';
+    function trackMouse_inRect_ofView_atCharacterIndex_untilMouseUp(theEvent: NSEvent; cellFrame: NSRect; controlView: NSView; charIndex: culong; flag: Boolean): Boolean; message 'trackMouse:inRect:ofView:atCharacterIndex:untilMouseUp:';
+    function cellFrameForTextContainer_proposedLineFragment_glyphPosition_characterIndex(textContainer: NSTextContainer; lineFrag: NSRect; position: NSPoint; charIndex: culong): NSRect; message 'cellFrameForTextContainer:proposedLineFragment:glyphPosition:characterIndex:';
+  end; external name 'NSTextAttachmentCell';
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSTextContainer.inc b/packages/cocoaint/src/appkit/NSTextContainer.inc
new file mode 100644
index 0000000000..a25a1af3c9
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSTextContainer.inc
@@ -0,0 +1,107 @@
+{ Parsed from Appkit.framework NSTextContainer.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTEXTCONTAINER_PAS_H}
+{$define NSTEXTCONTAINER_PAS_H}
+type
+  NSTextContainerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTEXTCONTAINER_PAS_T}
+{$define NSTEXTCONTAINER_PAS_T}
+
+{ Constants }
+
+const
+  NSLineSweepLeft = 0;
+  NSLineSweepRight = 1;
+  NSLineSweepDown = 2;
+  NSLineSweepUp = 3;
+
+const
+  NSLineDoesntMove = 0;
+  NSLineMovesLeft = 1;
+  NSLineMovesRight = 2;
+  NSLineMovesDown = 3;
+  NSLineMovesUp = 4;
+
+{ Types }
+type
+  NSLineSweepDirection = culong;
+  NSLineMovementDirection = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTEXTCONTAINER_PAS_R}
+{$define NSTEXTCONTAINER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTEXTCONTAINER_PAS_F}
+{$define NSTEXTCONTAINER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTEXTCONTAINER_PAS_T}
+{$define NSTEXTCONTAINER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTextContainer = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTEXTCONTAINER_PAS_C}
+{$define NSTEXTCONTAINER_PAS_C}
+
+{ NSTextContainer }
+  NSTextContainer = objcclass(NSObject, NSCodingProtocol)
+  private
+    __layoutManager: NSLayoutManager;
+    __textView: NSTextView;
+    __size: NSSize;
+    __lineFragmentPadding: CGFloat;
+    __tcFlags: bitpacked record
+        widthTracksTextView: 0..1;
+        heightTracksTextView: 0..1;
+        observingFrameChanges: 0..1;
+        _reserved: 0..((1 shl 13)-1);
+      end;
+    
+  public
+    class function alloc: NSTextContainer; message 'alloc';
+
+    function initWithContainerSize(size: NSSize): id; message 'initWithContainerSize:';
+    function layoutManager: NSLayoutManager; message 'layoutManager';
+    procedure setLayoutManager(layoutManager_: NSLayoutManager); message 'setLayoutManager:';
+    procedure replaceLayoutManager(newLayoutManager: NSLayoutManager); message 'replaceLayoutManager:';
+    function textView: NSTextView; message 'textView';
+    procedure setTextView(textView_: NSTextView); message 'setTextView:';
+    procedure setWidthTracksTextView(flag: Boolean); message 'setWidthTracksTextView:';
+    function widthTracksTextView: Boolean; message 'widthTracksTextView';
+    procedure setHeightTracksTextView(flag: Boolean); message 'setHeightTracksTextView:';
+    function heightTracksTextView: Boolean; message 'heightTracksTextView';
+    procedure setContainerSize(size: NSSize); message 'setContainerSize:';
+    function containerSize: NSSize; message 'containerSize';
+    procedure setLineFragmentPadding(pad: CGFloat); message 'setLineFragmentPadding:';
+    function lineFragmentPadding: CGFloat; message 'lineFragmentPadding';
+    function lineFragmentRectForProposedRect_sweepDirection_movementDirection_remainingRect(proposedRect: NSRect; sweepDirection: NSLineSweepDirection; movementDirection: NSLineMovementDirection; remainingRect: NSRectPointer): NSRect; message 'lineFragmentRectForProposedRect:sweepDirection:movementDirection:remainingRect:';
+    function isSimpleRectangularTextContainer: Boolean; message 'isSimpleRectangularTextContainer';
+    function containsPoint(point: NSPoint): Boolean; message 'containsPoint:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSTextField.inc b/packages/cocoaint/src/appkit/NSTextField.inc
new file mode 100644
index 0000000000..6c73d798a9
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSTextField.inc
@@ -0,0 +1,96 @@
+{ Parsed from Appkit.framework NSTextField.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTEXTFIELD_PAS_H}
+{$define NSTEXTFIELD_PAS_H}
+type
+  NSTextFieldPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTEXTFIELD_PAS_T}
+{$define NSTEXTFIELD_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTEXTFIELD_PAS_R}
+{$define NSTEXTFIELD_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTEXTFIELD_PAS_F}
+{$define NSTEXTFIELD_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTEXTFIELD_PAS_T}
+{$define NSTEXTFIELD_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTextField = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTEXTFIELD_PAS_C}
+{$define NSTEXTFIELD_PAS_C}
+
+{ NSTextField }
+  NSTextField = objcclass(NSControl, NSUserInterfaceValidationsProtocol)
+  private
+    __delegate: id;
+    __errorAction: SEL;
+    
+  public
+    class function alloc: NSTextField; message 'alloc';
+
+    procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
+    function backgroundColor: NSColor; message 'backgroundColor';
+    procedure setDrawsBackground(flag: Boolean); message 'setDrawsBackground:';
+    function drawsBackground: Boolean; message 'drawsBackground';
+    procedure setTextColor(color: NSColor); message 'setTextColor:';
+    function textColor: NSColor; message 'textColor';
+    function isBordered: Boolean; message 'isBordered';
+    procedure setBordered(flag: Boolean); message 'setBordered:';
+    function isBezeled: Boolean; message 'isBezeled';
+    procedure setBezeled(flag: Boolean); message 'setBezeled:';
+    function isEditable: Boolean; message 'isEditable';
+    procedure setEditable(flag: Boolean); message 'setEditable:';
+    function isSelectable: Boolean; message 'isSelectable';
+    procedure setSelectable(flag: Boolean); message 'setSelectable:';
+    procedure selectText(sender: id); message 'selectText:';
+    function delegate: id; message 'delegate';
+    procedure setDelegate(anObject: id); message 'setDelegate:';
+    function textShouldBeginEditing(textObject: NSText): Boolean; message 'textShouldBeginEditing:';
+    function textShouldEndEditing(textObject: NSText): Boolean; message 'textShouldEndEditing:';
+    procedure textDidBeginEditing(notification: NSNotification); message 'textDidBeginEditing:';
+    procedure textDidEndEditing(notification: NSNotification); message 'textDidEndEditing:';
+    procedure textDidChange(notification: NSNotification); message 'textDidChange:';
+    function acceptsFirstResponder: Boolean; message 'acceptsFirstResponder';
+    procedure setBezelStyle(style: NSTextFieldBezelStyle); message 'setBezelStyle:';
+    function bezelStyle: NSTextFieldBezelStyle; message 'bezelStyle';
+
+    { Category: NSKeyboardUI }
+    procedure setTitleWithMnemonic(stringWithAmpersand: NSString); message 'setTitleWithMnemonic:';
+
+    { Category: NSTextFieldAttributedStringMethods }
+    function allowsEditingTextAttributes: Boolean; message 'allowsEditingTextAttributes';
+    procedure setAllowsEditingTextAttributes(flag: Boolean); message 'setAllowsEditingTextAttributes:';
+    function importsGraphics: Boolean; message 'importsGraphics';
+    procedure setImportsGraphics(flag: Boolean); message 'setImportsGraphics:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSTextFieldCell.inc b/packages/cocoaint/src/appkit/NSTextFieldCell.inc
new file mode 100644
index 0000000000..29846c61c4
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSTextFieldCell.inc
@@ -0,0 +1,101 @@
+{ Parsed from Appkit.framework NSTextFieldCell.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTEXTFIELDCELL_PAS_H}
+{$define NSTEXTFIELDCELL_PAS_H}
+type
+  NSTextFieldCellPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTEXTFIELDCELL_PAS_T}
+{$define NSTEXTFIELDCELL_PAS_T}
+
+{ Constants }
+
+const
+  NSTextFieldSquareBezel = 0;
+  NSTextFieldRoundedBezel = 1;
+
+{ Types }
+type
+  NSTextFieldBezelStyle = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTEXTFIELDCELL_PAS_R}
+{$define NSTEXTFIELDCELL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTEXTFIELDCELL_PAS_F}
+{$define NSTEXTFIELDCELL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTEXTFIELDCELL_PAS_T}
+{$define NSTEXTFIELDCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTextFieldCell = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTEXTFIELDCELL_PAS_C}
+{$define NSTEXTFIELDCELL_PAS_C}
+
+{ NSTextFieldCell }
+  NSTextFieldCell = objcclass(NSActionCell)
+  private
+    __backgroundColor: NSColor;
+    __textColor: NSColor;
+    __tfFlags: bitpacked record
+        drawsBackground: 0..1;
+        bezelStyle: 0..((1 shl 3)-1);
+        thcSortDirection: 0..((1 shl 2)-1);
+        thcSortPriority: 0..((1 shl 4)-1);
+        mini: 0..1;
+        textColorIgnoresNormalDisableFlag: 0..1;
+        textColorDisableFlag: 0..1;
+        thcForceHighlightForSort: 0..1;
+        invalidTextColor: 0..1;
+        notificationForMarkedText: 0..1;
+        reservedTextFieldCell: 0..((1 shl 16)-1);
+      end;
+    
+  public
+    class function alloc: NSTextFieldCell; message 'alloc';
+
+    procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
+    function backgroundColor: NSColor; message 'backgroundColor';
+    procedure setDrawsBackground(flag: Boolean); message 'setDrawsBackground:';
+    function drawsBackground: Boolean; message 'drawsBackground';
+    procedure setTextColor(color: NSColor); message 'setTextColor:';
+    function textColor: NSColor; message 'textColor';
+    function setUpFieldEditorAttributes(textObj: NSText): NSText; message 'setUpFieldEditorAttributes:';
+    procedure setBezelStyle(style: NSTextFieldBezelStyle); message 'setBezelStyle:';
+    function bezelStyle: NSTextFieldBezelStyle; message 'bezelStyle';
+    procedure setPlaceholderString(string_: NSString); message 'setPlaceholderString:';
+    function placeholderString: NSString; message 'placeholderString';
+    procedure setPlaceholderAttributedString(string_: NSAttributedString); message 'setPlaceholderAttributedString:';
+    function placeholderAttributedString: NSAttributedString; message 'placeholderAttributedString';
+    procedure setWantsNotificationForMarkedText(flag: Boolean); message 'setWantsNotificationForMarkedText:';
+    function allowedInputSourceLocales: NSArray; message 'allowedInputSourceLocales';
+    procedure setAllowedInputSourceLocales(localeIdentifiers: NSArray); message 'setAllowedInputSourceLocales:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSTextInputClient.inc b/packages/cocoaint/src/appkit/NSTextInputClient.inc
new file mode 100644
index 0000000000..557ac6e0b5
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSTextInputClient.inc
@@ -0,0 +1,59 @@
+{ Parsed from Appkit.framework NSTextInputClient.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSTEXTINPUTCLIENT_PAS_T}
+{$define NSTEXTINPUTCLIENT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTEXTINPUTCLIENT_PAS_R}
+{$define NSTEXTINPUTCLIENT_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTEXTINPUTCLIENT_PAS_F}
+{$define NSTEXTINPUTCLIENT_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTEXTINPUTCLIENT_PAS_T}
+{$define NSTEXTINPUTCLIENT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTextInputClientProtocol = objcprotocol;
+
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSTEXTINPUTCLIENT_PAS_P}
+{$define NSTEXTINPUTCLIENT_PAS_P}
+  
+{ NSTextInputClient Protocol }
+  NSTextInputClientProtocol = objcprotocol
+    procedure insertText_replacementRange(aString: id; replacementRange: NSRange); message 'insertText:replacementRange:';
+    procedure setMarkedText_selectedRange_replacementRange(aString: id; selectedRange: NSRange; replacementRange: NSRange); message 'setMarkedText:selectedRange:replacementRange:';
+    procedure unmarkText; message 'unmarkText';
+    function selectedRange: NSRange; message 'selectedRange';
+    function markedRange: NSRange; message 'markedRange';
+    function hasMarkedText: Boolean; message 'hasMarkedText';
+    function attributedSubstringForProposedRange_actualRange(aRange: NSRange; actualRange: NSRangePointer): NSAttributedString; message 'attributedSubstringForProposedRange:actualRange:';
+    function validAttributesForMarkedText: NSArray; message 'validAttributesForMarkedText';
+    function firstRectForCharacterRange_actualRange(aRange: NSRange; actualRange: NSRangePointer): NSRect; message 'firstRectForCharacterRange:actualRange:';
+    function characterIndexForPoint(aPoint: NSPoint): culong; message 'characterIndexForPoint:';
+    function attributedString: NSAttributedString; message 'attributedString';
+    function fractionOfDistanceThroughGlyphForPoint(aPoint: NSPoint): CGFloat; message 'fractionOfDistanceThroughGlyphForPoint:';
+    function baselineDeltaForCharacterAtIndex(anIndex: culong): CGFloat; message 'baselineDeltaForCharacterAtIndex:';
+    function windowLevel: clong; message 'windowLevel';
+  end; external name 'NSTextInputClient';
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSTextList.inc b/packages/cocoaint/src/appkit/NSTextList.inc
new file mode 100644
index 0000000000..58544e546d
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSTextList.inc
@@ -0,0 +1,73 @@
+{ Parsed from Appkit.framework NSTextList.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTEXTLIST_PAS_H}
+{$define NSTEXTLIST_PAS_H}
+type
+  NSTextListPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTEXTLIST_PAS_T}
+{$define NSTEXTLIST_PAS_T}
+
+{ Constants }
+
+const
+  NSTextListPrependEnclosingMarker = 1  shl  0;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTEXTLIST_PAS_R}
+{$define NSTEXTLIST_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTEXTLIST_PAS_F}
+{$define NSTEXTLIST_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTEXTLIST_PAS_T}
+{$define NSTEXTLIST_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTextList = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTEXTLIST_PAS_C}
+{$define NSTEXTLIST_PAS_C}
+
+{ NSTextList }
+  NSTextList = objcclass(NSObject, NSCodingProtocol, NSCopyingProtocol)
+  private
+    __markerFormat: NSString;
+    __listFlags: culong;
+    __listPrimary: Pointer;
+    __listSecondary: Pointer;
+    
+  public
+    class function alloc: NSTextList; message 'alloc';
+
+    function initWithMarkerFormat_options(format: NSString; mask: culong): id; message 'initWithMarkerFormat:options:';
+    function markerFormat: NSString; message 'markerFormat';
+    function listOptions: culong; message 'listOptions';
+    function markerForItemNumber(itemNum: clong): NSString; message 'markerForItemNumber:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSTextStorage.inc b/packages/cocoaint/src/appkit/NSTextStorage.inc
new file mode 100644
index 0000000000..f138063a90
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSTextStorage.inc
@@ -0,0 +1,111 @@
+{ Parsed from Appkit.framework NSTextStorage.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTEXTSTORAGE_PAS_H}
+{$define NSTEXTSTORAGE_PAS_H}
+type
+  NSTextStoragePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTEXTSTORAGE_PAS_T}
+{$define NSTEXTSTORAGE_PAS_T}
+
+{ Constants }
+
+const
+  NSTextStorageEditedAttributes = 1;
+  NSTextStorageEditedCharacters = 2;
+
+{ CFString constants }
+var
+  NSTextStorageWillProcessEditingNotification: CFStringRef; external name '_NSTextStorageWillProcessEditingNotification';
+  NSTextStorageDidProcessEditingNotification: CFStringRef; external name '_NSTextStorageDidProcessEditingNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTEXTSTORAGE_PAS_R}
+{$define NSTEXTSTORAGE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTEXTSTORAGE_PAS_F}
+{$define NSTEXTSTORAGE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTEXTSTORAGE_PAS_T}
+{$define NSTEXTSTORAGE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTextStorage = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTEXTSTORAGE_PAS_C}
+{$define NSTEXTSTORAGE_PAS_C}
+
+{ NSTextStorage }
+  NSTextStorage = objcclass(NSMutableAttributedString)
+  private
+    __editedRange: NSRange;
+    __editedDelta: clong;
+    __flags: bitpacked record
+        editedMask: 0..((1 shl 8)-1);
+        inFSC: 0..1;
+        int: 0..((1 shl 7)-1);
+        disabled: 0..((1 shl 16)-1);
+        {$ifdef cpu64}
+        int: 0..((1 shl 32)-1);
+        {$endif}
+      end;
+    __layoutManagers: NSMutableArray;
+    __sideData: id;
+    
+  public
+    class function alloc: NSTextStorage; message 'alloc';
+
+    procedure addLayoutManager_setTextStorage(obj: NSLayoutManager); message 'addLayoutManager:';
+    procedure removeLayoutManager(obj: NSLayoutManager); message 'removeLayoutManager:';
+    function layoutManagers: NSArray; message 'layoutManagers';
+    procedure edited_range_changeInLength(editedMask_: culong; range: NSRange; delta: clong); message 'edited:range:changeInLength:';
+    procedure processEditing; message 'processEditing';
+    procedure invalidateAttributesInRange(range: NSRange); message 'invalidateAttributesInRange:';
+    procedure ensureAttributesAreFixedInRange(range: NSRange); message 'ensureAttributesAreFixedInRange:';
+    function fixesAttributesLazily: Boolean; message 'fixesAttributesLazily';
+    function editedMask: culong; message 'editedMask';
+    function editedRange: NSRange; message 'editedRange';
+    function changeInLength: clong; message 'changeInLength';
+    procedure setDelegate(delegate_: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
+
+    { Category: Scripting }
+    function attributeRuns: NSArray; message 'attributeRuns';
+    procedure setAttributeRuns(attributeRuns_: NSArray); message 'setAttributeRuns:';
+    function paragraphs: NSArray; message 'paragraphs';
+    procedure setParagraphs(paragraphs_: NSArray); message 'setParagraphs:';
+    function words: NSArray; message 'words';
+    procedure setWords(words_: NSArray); message 'setWords:';
+    function characters: NSArray; message 'characters';
+    procedure setCharacters(characters_: NSArray); message 'setCharacters:';
+    function font: NSFont; message 'font';
+    procedure setFont(font_: NSFont); message 'setFont:';
+    function foregroundColor: NSColor; message 'foregroundColor';
+    procedure setForegroundColor(color: NSColor); message 'setForegroundColor:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSTextStorageScripting.inc b/packages/cocoaint/src/appkit/NSTextStorageScripting.inc
new file mode 100644
index 0000000000..cfde204484
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSTextStorageScripting.inc
@@ -0,0 +1,31 @@
+{ Parsed from Appkit.framework NSTextStorageScripting.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSTEXTSTORAGESCRIPTING_PAS_T}
+{$define NSTEXTSTORAGESCRIPTING_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTEXTSTORAGESCRIPTING_PAS_R}
+{$define NSTEXTSTORAGESCRIPTING_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTEXTSTORAGESCRIPTING_PAS_F}
+{$define NSTEXTSTORAGESCRIPTING_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTEXTSTORAGESCRIPTING_PAS_T}
+{$define NSTEXTSTORAGESCRIPTING_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSTextTable.inc b/packages/cocoaint/src/appkit/NSTextTable.inc
new file mode 100644
index 0000000000..f5ac557c78
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSTextTable.inc
@@ -0,0 +1,172 @@
+{ Parsed from Appkit.framework NSTextTable.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTEXTTABLE_PAS_H}
+{$define NSTEXTTABLE_PAS_H}
+type
+  NSTextBlockPointer = Pointer;
+  NSTextTableBlockPointer = Pointer;
+  NSTextTablePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTEXTTABLE_PAS_T}
+{$define NSTEXTTABLE_PAS_T}
+
+{ Types }
+type
+  NSTextBlockValueType = culong;
+  NSTextBlockDimension = culong;
+  NSTextBlockLayer = clong;
+  NSTextBlockVerticalAlignment = culong;
+  NSTextTableLayoutAlgorithm = culong;
+
+{ Constants }
+
+const
+  NSTextBlockWidth = 0;
+  NSTextBlockMinimumWidth = 1;
+  NSTextBlockMaximumWidth = 2;
+  NSTextBlockHeight = 4;
+  NSTextBlockMinimumHeight = 5;
+  NSTextBlockMaximumHeight = 6;
+
+const
+  NSTextBlockPadding = -1;
+  NSTextBlockBorder = 0;
+  NSTextBlockMargin = 1;
+
+const
+  NSTextBlockTopAlignment = 0;
+  NSTextBlockMiddleAlignment = 1;
+  NSTextBlockBottomAlignment = 2;
+  NSTextBlockBaselineAlignment = 3;
+
+const
+  NSTextTableAutomaticLayoutAlgorithm = 0;
+  NSTextTableFixedLayoutAlgorithm = 1;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTEXTTABLE_PAS_R}
+{$define NSTEXTTABLE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTEXTTABLE_PAS_F}
+{$define NSTEXTTABLE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTEXTTABLE_PAS_T}
+{$define NSTEXTTABLE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTextBlock = objcclass;
+  NSTextTableBlock = objcclass;
+  NSTextTable = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTEXTTABLE_PAS_C}
+{$define NSTEXTTABLE_PAS_C}
+
+{ NSTextBlock }
+  NSTextBlock = objcclass(NSObject, NSCodingProtocol, NSCopyingProtocol)
+  private
+    __propVals: Pointer;
+    __propMask: culong;
+    __typeMask: culong;
+    __primParamVal: id;
+    __otherParamVals: id;
+    __blockPrimary: Pointer;
+    __blockSecondary: Pointer;
+    
+  public
+    class function alloc: NSTextBlock; message 'alloc';
+
+    function init: id; message 'init';
+    procedure setValue_type_forDimension(val: CGFloat; type_: NSTextBlockValueType; dimension: NSTextBlockDimension); message 'setValue:type:forDimension:';
+    function valueForDimension(dimension: NSTextBlockDimension): CGFloat; message 'valueForDimension:';
+    function valueTypeForDimension(dimension: NSTextBlockDimension): NSTextBlockValueType; message 'valueTypeForDimension:';
+    procedure setContentWidth_type(val: CGFloat; type_: NSTextBlockValueType); message 'setContentWidth:type:';
+    function contentWidth: CGFloat; message 'contentWidth';
+    function contentWidthValueType: NSTextBlockValueType; message 'contentWidthValueType';
+    procedure setWidth_type_forLayer_edge(val: CGFloat; type_: NSTextBlockValueType; layer: NSTextBlockLayer; edge: NSRectEdge); message 'setWidth:type:forLayer:edge:';
+    procedure setWidth_type_forLayer(val: CGFloat; type_: NSTextBlockValueType; layer: NSTextBlockLayer); message 'setWidth:type:forLayer:';
+    function widthForLayer_edge(layer: NSTextBlockLayer; edge: NSRectEdge): CGFloat; message 'widthForLayer:edge:';
+    function widthValueTypeForLayer_edge(layer: NSTextBlockLayer; edge: NSRectEdge): NSTextBlockValueType; message 'widthValueTypeForLayer:edge:';
+    procedure setVerticalAlignment(alignment: NSTextBlockVerticalAlignment); message 'setVerticalAlignment:';
+    function verticalAlignment: NSTextBlockVerticalAlignment; message 'verticalAlignment';
+    procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
+    function backgroundColor: NSColor; message 'backgroundColor';
+    procedure setBorderColor_forEdge(color: NSColor; edge: NSRectEdge); message 'setBorderColor:forEdge:';
+    procedure setBorderColor(color: NSColor); message 'setBorderColor:';
+    function borderColorForEdge(edge: NSRectEdge): NSColor; message 'borderColorForEdge:';
+    function rectForLayoutAtPoint_inRect_textContainer_characterRange(startingPoint: NSPoint; rect: NSRect; textContainer: NSTextContainer; charRange: NSRange): NSRect; message 'rectForLayoutAtPoint:inRect:textContainer:characterRange:';
+    function boundsRectForContentRect_inRect_textContainer_characterRange(contentRect: NSRect; rect: NSRect; textContainer: NSTextContainer; charRange: NSRange): NSRect; message 'boundsRectForContentRect:inRect:textContainer:characterRange:';
+    procedure drawBackgroundWithFrame_inView_characterRange_layoutManager(frameRect: NSRect; controlView: NSView; charRange: NSRange; layoutManager: NSLayoutManager); message 'drawBackgroundWithFrame:inView:characterRange:layoutManager:';
+  end; external;
+
+{ NSTextTableBlock }
+  NSTextTableBlock = objcclass(NSTextBlock)
+  private
+    __table: NSTextTable;
+    __rowNum: clong;
+    __colNum: clong;
+    __rowSpan: clong;
+    __colSpan: clong;
+    __tableBlockPrimary: Pointer;
+    __tableBlockSecondary: Pointer;
+    
+  public
+    class function alloc: NSTextTableBlock; message 'alloc';
+
+    function initWithTable_startingRow_rowSpan_startingColumn_columnSpan(table_: NSTextTable; row: clong; rowSpan_: clong; col: clong; colSpan: clong): id; message 'initWithTable:startingRow:rowSpan:startingColumn:columnSpan:';
+    function table: NSTextTable; message 'table';
+    function startingRow: clong; message 'startingRow';
+    function rowSpan: clong; message 'rowSpan';
+    function startingColumn: clong; message 'startingColumn';
+    function columnSpan: clong; message 'columnSpan';
+  end; external;
+
+{ NSTextTable }
+  NSTextTable = objcclass(NSTextBlock)
+  private
+    __numCols: culong;
+    __tableFlags: culong;
+    __lcache: id;
+    __tablePrimary: Pointer;
+    __tableSecondary: Pointer;
+    
+  public
+    class function alloc: NSTextTable; message 'alloc';
+
+    function numberOfColumns: culong; message 'numberOfColumns';
+    procedure setNumberOfColumns(numCols: culong); message 'setNumberOfColumns:';
+    function layoutAlgorithm: NSTextTableLayoutAlgorithm; message 'layoutAlgorithm';
+    procedure setLayoutAlgorithm(algorithm: NSTextTableLayoutAlgorithm); message 'setLayoutAlgorithm:';
+    function collapsesBorders: Boolean; message 'collapsesBorders';
+    procedure setCollapsesBorders(flag: Boolean); message 'setCollapsesBorders:';
+    function hidesEmptyCells: Boolean; message 'hidesEmptyCells';
+    procedure setHidesEmptyCells(flag: Boolean); message 'setHidesEmptyCells:';
+    function rectForBlock_layoutAtPoint_inRect_textContainer_characterRange(block: NSTextTableBlock; startingPoint: NSPoint; rect: NSRect; textContainer: NSTextContainer; charRange: NSRange): NSRect; message 'rectForBlock:layoutAtPoint:inRect:textContainer:characterRange:';
+    function boundsRectForBlock_contentRect_inRect_textContainer_characterRange(block: NSTextTableBlock; contentRect: NSRect; rect: NSRect; textContainer: NSTextContainer; charRange: NSRange): NSRect; message 'boundsRectForBlock:contentRect:inRect:textContainer:characterRange:';
+    procedure drawBackgroundForBlock_withFrame_inView_characterRange_layoutManager(block: NSTextTableBlock; frameRect: NSRect; controlView: NSView; charRange: NSRange; layoutManager: NSLayoutManager); message 'drawBackgroundForBlock:withFrame:inView:characterRange:layoutManager:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSTextView.inc b/packages/cocoaint/src/appkit/NSTextView.inc
new file mode 100644
index 0000000000..d1489f8520
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSTextView.inc
@@ -0,0 +1,274 @@
+{ Parsed from Appkit.framework NSTextView.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTEXTVIEW_PAS_H}
+{$define NSTEXTVIEW_PAS_H}
+type
+  NSTextViewPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTEXTVIEW_PAS_T}
+{$define NSTEXTVIEW_PAS_T}
+
+{ Constants }
+
+const
+  NSSelectByCharacter = 0;
+  NSSelectByWord = 1;
+  NSSelectByParagraph = 2;
+
+const
+  NSSelectionAffinityUpstream = 0;
+  NSSelectionAffinityDownstream = 1;
+
+const
+  NSFindPanelActionShowFindPanel = 1;
+  NSFindPanelActionNext = 2;
+  NSFindPanelActionPrevious = 3;
+  NSFindPanelActionReplaceAll = 4;
+  NSFindPanelActionReplace = 5;
+  NSFindPanelActionReplaceAndFind = 6;
+  NSFindPanelActionSetFindString = 7;
+  NSFindPanelActionReplaceAllInSelection = 8;
+  NSFindPanelActionSelectAll = 9;
+  NSFindPanelActionSelectAllInSelection = 10;
+
+const
+  NSFindPanelSubstringMatchTypeContains = 0;
+  NSFindPanelSubstringMatchTypeStartsWith = 1;
+  NSFindPanelSubstringMatchTypeFullWord = 2;
+  NSFindPanelSubstringMatchTypeEndsWith = 3;
+
+{ Types }
+type
+  NSSelectionGranularity = culong;
+  NSSelectionAffinity = culong;
+  NSFindPanelAction = culong;
+  NSFindPanelSubstringMatchType = culong;
+
+{ CFString constants }
+var
+  NSTextViewWillChangeNotifyingTextViewNotification: CFStringRef; external name '_NSTextViewWillChangeNotifyingTextViewNotification';
+  NSTextViewDidChangeSelectionNotification: CFStringRef; external name '_NSTextViewDidChangeSelectionNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTEXTVIEW_PAS_R}
+{$define NSTEXTVIEW_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTEXTVIEW_PAS_F}
+{$define NSTEXTVIEW_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTEXTVIEW_PAS_T}
+{$define NSTEXTVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTextView = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTEXTVIEW_PAS_C}
+{$define NSTEXTVIEW_PAS_C}
+
+{ NSTextView }
+  NSTextView = objcclass(NSText)
+    
+  public
+    class function alloc: NSTextView; message 'alloc';
+
+    function initWithFrame_textContainer(frameRect: NSRect; container: NSTextContainer): id; message 'initWithFrame:textContainer:';
+    function initWithFrame(frameRect: NSRect): id; message 'initWithFrame:';
+    function textContainer: NSTextContainer; message 'textContainer';
+    procedure setTextContainer(container: NSTextContainer); message 'setTextContainer:';
+    procedure replaceTextContainer(newContainer: NSTextContainer); message 'replaceTextContainer:';
+    procedure setTextContainerInset(inset: NSSize); message 'setTextContainerInset:';
+    function textContainerInset: NSSize; message 'textContainerInset';
+    function textContainerOrigin: NSPoint; message 'textContainerOrigin';
+    procedure invalidateTextContainerOrigin; message 'invalidateTextContainerOrigin';
+    function layoutManager: NSLayoutManager; message 'layoutManager';
+    function textStorage: NSTextStorage; message 'textStorage';
+    procedure insertText(insertString: id); message 'insertText:';
+    procedure setConstrainedFrameSize(desiredSize: NSSize); message 'setConstrainedFrameSize:';
+    procedure setAlignment_range(alignment_: NSTextAlignment; range: NSRange); message 'setAlignment:range:';
+    procedure setBaseWritingDirection_range(writingDirection: NSWritingDirection; range: NSRange); message 'setBaseWritingDirection:range:';
+    procedure turnOffKerning(sender: id); message 'turnOffKerning:';
+    procedure tightenKerning(sender: id); message 'tightenKerning:';
+    procedure loosenKerning(sender: id); message 'loosenKerning:';
+    procedure useStandardKerning(sender: id); message 'useStandardKerning:';
+    procedure turnOffLigatures(sender: id); message 'turnOffLigatures:';
+    procedure useStandardLigatures(sender: id); message 'useStandardLigatures:';
+    procedure useAllLigatures(sender: id); message 'useAllLigatures:';
+    procedure raiseBaseline(sender: id); message 'raiseBaseline:';
+    procedure lowerBaseline(sender: id); message 'lowerBaseline:';
+    procedure toggleTraditionalCharacterShape(sender: id); message 'toggleTraditionalCharacterShape:';
+    procedure outline(sender: id); message 'outline:';
+    procedure performFindPanelAction(sender: id); message 'performFindPanelAction:';
+    procedure alignJustified(sender: id); message 'alignJustified:';
+    procedure changeColor(sender: id); message 'changeColor:';
+    procedure changeAttributes(sender: id); message 'changeAttributes:';
+    procedure changeDocumentBackgroundColor(sender: id); message 'changeDocumentBackgroundColor:';
+    procedure toggleBaseWritingDirection(sender: id); message 'toggleBaseWritingDirection:';
+    procedure orderFrontSpacingPanel(sender: id); message 'orderFrontSpacingPanel:';
+    procedure orderFrontLinkPanel(sender: id); message 'orderFrontLinkPanel:';
+    procedure orderFrontListPanel(sender: id); message 'orderFrontListPanel:';
+    procedure orderFrontTablePanel(sender: id); message 'orderFrontTablePanel:';
+    procedure rulerView_didMoveMarker(ruler: NSRulerView; marker: NSRulerMarker); message 'rulerView:didMoveMarker:';
+    procedure rulerView_didRemoveMarker(ruler: NSRulerView; marker: NSRulerMarker); message 'rulerView:didRemoveMarker:';
+    procedure rulerView_didAddMarker(ruler: NSRulerView; marker: NSRulerMarker); message 'rulerView:didAddMarker:';
+    function rulerView_shouldMoveMarker(ruler: NSRulerView; marker: NSRulerMarker): Boolean; message 'rulerView:shouldMoveMarker:';
+    function rulerView_shouldAddMarker(ruler: NSRulerView; marker: NSRulerMarker): Boolean; message 'rulerView:shouldAddMarker:';
+    function rulerView_willMoveMarker_toLocation(ruler: NSRulerView; marker: NSRulerMarker; location: CGFloat): CGFloat; message 'rulerView:willMoveMarker:toLocation:';
+    function rulerView_shouldRemoveMarker(ruler: NSRulerView; marker: NSRulerMarker): Boolean; message 'rulerView:shouldRemoveMarker:';
+    function rulerView_willAddMarker_atLocation(ruler: NSRulerView; marker: NSRulerMarker; location: CGFloat): CGFloat; message 'rulerView:willAddMarker:atLocation:';
+    procedure rulerView_handleMouseDown(ruler: NSRulerView; event: NSEvent); message 'rulerView:handleMouseDown:';
+    procedure setNeedsDisplayInRect_avoidAdditionalLayout(rect: NSRect; flag: Boolean); message 'setNeedsDisplayInRect:avoidAdditionalLayout:';
+    function shouldDrawInsertionPoint: Boolean; message 'shouldDrawInsertionPoint';
+    procedure drawInsertionPointInRect_color_turnedOn(rect: NSRect; color: NSColor; flag: Boolean); message 'drawInsertionPointInRect:color:turnedOn:';
+    procedure drawViewBackgroundInRect(rect: NSRect); message 'drawViewBackgroundInRect:';
+    procedure updateRuler; message 'updateRuler';
+    procedure updateFontPanel; message 'updateFontPanel';
+    procedure updateDragTypeRegistration; message 'updateDragTypeRegistration';
+    function selectionRangeForProposedRange_granularity(proposedCharRange: NSRange; granularity: NSSelectionGranularity): NSRange; message 'selectionRangeForProposedRange:granularity:';
+    procedure clickedOnLink_atIndex(link: id; charIndex: culong); message 'clickedOnLink:atIndex:';
+    procedure startSpeaking(sender: id); message 'startSpeaking:';
+    procedure stopSpeaking(sender: id); message 'stopSpeaking:';
+    function characterIndexForInsertionAtPoint(point: NSPoint): culong; message 'characterIndexForInsertionAtPoint:';
+
+    { Category: NSCompletion }
+    procedure complete(sender: id); message 'complete:';
+    function rangeForUserCompletion: NSRange; message 'rangeForUserCompletion';
+    function completionsForPartialWordRange_indexOfSelectedItem(charRange: NSRange; var index: clong): NSArray; message 'completionsForPartialWordRange:indexOfSelectedItem:';
+    procedure insertCompletion_forPartialWordRange_movement_isFinal(word: NSString; charRange: NSRange; movement: clong; flag: Boolean); message 'insertCompletion:forPartialWordRange:movement:isFinal:';
+
+    { Category: NSPasteboard }
+    function writablePasteboardTypes: NSArray; message 'writablePasteboardTypes';
+    function writeSelectionToPasteboard_type(pboard: NSPasteboard; type_: NSString): Boolean; message 'writeSelectionToPasteboard:type:';
+    function writeSelectionToPasteboard_types(pboard: NSPasteboard; types: NSArray): Boolean; message 'writeSelectionToPasteboard:types:';
+    function readablePasteboardTypes: NSArray; message 'readablePasteboardTypes';
+    function preferredPasteboardTypeFromArray_restrictedToTypesFromArray(availableTypes: NSArray; allowedTypes: NSArray): NSString; message 'preferredPasteboardTypeFromArray:restrictedToTypesFromArray:';
+    function readSelectionFromPasteboard_type(pboard: NSPasteboard; type_: NSString): Boolean; message 'readSelectionFromPasteboard:type:';
+    function readSelectionFromPasteboard(pboard: NSPasteboard): Boolean; message 'readSelectionFromPasteboard:';
+    class procedure registerForServices; message 'registerForServices';
+    function validRequestorForSendType_returnType(sendType: NSString; returnType: NSString): id; message 'validRequestorForSendType:returnType:';
+    procedure pasteAsPlainText(sender: id); message 'pasteAsPlainText:';
+    procedure pasteAsRichText(sender: id); message 'pasteAsRichText:';
+
+    { Category: NSDragging }
+    function dragSelectionWithEvent_offset_slideBack(event: NSEvent; mouseOffset: NSSize; slideBack: Boolean): Boolean; message 'dragSelectionWithEvent:offset:slideBack:';
+    function dragImageForSelectionWithEvent_origin(event: NSEvent; origin: NSPointPointer): NSImage; message 'dragImageForSelectionWithEvent:origin:';
+    function acceptableDragTypes: NSArray; message 'acceptableDragTypes';
+    function dragOperationForDraggingInfo_type(dragInfo: id; type_: NSString): NSDragOperation; message 'dragOperationForDraggingInfo:type:';
+    procedure cleanUpAfterDragOperation; message 'cleanUpAfterDragOperation';
+
+    { Category: NSSharing }
+    function selectedRanges: NSArray; message 'selectedRanges';
+    procedure setSelectedRanges_affinity_stillSelecting(ranges: NSArray; affinity: NSSelectionAffinity; stillSelectingFlag: Boolean); message 'setSelectedRanges:affinity:stillSelecting:';
+    procedure setSelectedRanges(ranges: NSArray); message 'setSelectedRanges:';
+    procedure setSelectedRange_affinity_stillSelecting(charRange: NSRange; affinity: NSSelectionAffinity; stillSelectingFlag: Boolean); message 'setSelectedRange:affinity:stillSelecting:';
+    function selectionAffinity: NSSelectionAffinity; message 'selectionAffinity';
+    function selectionGranularity: NSSelectionGranularity; message 'selectionGranularity';
+    procedure setSelectionGranularity(granularity: NSSelectionGranularity); message 'setSelectionGranularity:';
+    procedure setSelectedTextAttributes(attributeDictionary: NSDictionary); message 'setSelectedTextAttributes:';
+    function selectedTextAttributes: NSDictionary; message 'selectedTextAttributes';
+    procedure setInsertionPointColor(color: NSColor); message 'setInsertionPointColor:';
+    function insertionPointColor: NSColor; message 'insertionPointColor';
+    procedure updateInsertionPointStateAndRestartTimer(restartFlag: Boolean); message 'updateInsertionPointStateAndRestartTimer:';
+    procedure setMarkedTextAttributes(attributeDictionary: NSDictionary); message 'setMarkedTextAttributes:';
+    function markedTextAttributes: NSDictionary; message 'markedTextAttributes';
+    procedure setLinkTextAttributes(attributeDictionary: NSDictionary); message 'setLinkTextAttributes:';
+    function linkTextAttributes: NSDictionary; message 'linkTextAttributes';
+    function displaysLinkToolTips: Boolean; message 'displaysLinkToolTips';
+    procedure setDisplaysLinkToolTips(flag: Boolean); message 'setDisplaysLinkToolTips:';
+    function acceptsGlyphInfo: Boolean; message 'acceptsGlyphInfo';
+    procedure setAcceptsGlyphInfo(flag: Boolean); message 'setAcceptsGlyphInfo:';
+    procedure setRulerVisible(flag: Boolean); message 'setRulerVisible:';
+    function usesRuler: Boolean; message 'usesRuler';
+    procedure setUsesRuler(flag: Boolean); message 'setUsesRuler:';
+    procedure setContinuousSpellCheckingEnabled(flag: Boolean); message 'setContinuousSpellCheckingEnabled:';
+    function isContinuousSpellCheckingEnabled: Boolean; message 'isContinuousSpellCheckingEnabled';
+    procedure toggleContinuousSpellChecking(sender: id); message 'toggleContinuousSpellChecking:';
+    function spellCheckerDocumentTag: clong; message 'spellCheckerDocumentTag';
+    procedure setGrammarCheckingEnabled(flag: Boolean); message 'setGrammarCheckingEnabled:';
+    function isGrammarCheckingEnabled: Boolean; message 'isGrammarCheckingEnabled';
+    procedure toggleGrammarChecking(sender: id); message 'toggleGrammarChecking:';
+    procedure setSpellingState_range(value: clong; charRange: NSRange); message 'setSpellingState:range:';
+    function typingAttributes: NSDictionary; message 'typingAttributes';
+    procedure setTypingAttributes(attrs: NSDictionary); message 'setTypingAttributes:';
+    function shouldChangeTextInRanges_replacementStrings(affectedRanges: NSArray; replacementStrings: NSArray): Boolean; message 'shouldChangeTextInRanges:replacementStrings:';
+    function rangesForUserTextChange: NSArray; message 'rangesForUserTextChange';
+    function rangesForUserCharacterAttributeChange: NSArray; message 'rangesForUserCharacterAttributeChange';
+    function rangesForUserParagraphAttributeChange: NSArray; message 'rangesForUserParagraphAttributeChange';
+    function shouldChangeTextInRange_replacementString(affectedCharRange: NSRange; replacementString: NSString): Boolean; message 'shouldChangeTextInRange:replacementString:';
+    procedure didChangeText; message 'didChangeText';
+    function rangeForUserTextChange: NSRange; message 'rangeForUserTextChange';
+    function rangeForUserCharacterAttributeChange: NSRange; message 'rangeForUserCharacterAttributeChange';
+    function rangeForUserParagraphAttributeChange: NSRange; message 'rangeForUserParagraphAttributeChange';
+    procedure setUsesFindPanel(flag: Boolean); message 'setUsesFindPanel:';
+    function usesFindPanel: Boolean; message 'usesFindPanel';
+    procedure setAllowsDocumentBackgroundColorChange(flag: Boolean); message 'setAllowsDocumentBackgroundColorChange:';
+    function allowsDocumentBackgroundColorChange: Boolean; message 'allowsDocumentBackgroundColorChange';
+    procedure setDefaultParagraphStyle(paragraphStyle: NSParagraphStyle); message 'setDefaultParagraphStyle:';
+    function defaultParagraphStyle: NSParagraphStyle; message 'defaultParagraphStyle';
+    procedure setAllowsUndo(flag: Boolean); message 'setAllowsUndo:';
+    function allowsUndo: Boolean; message 'allowsUndo';
+    procedure breakUndoCoalescing; message 'breakUndoCoalescing';
+    function allowsImageEditing: Boolean; message 'allowsImageEditing';
+    procedure setAllowsImageEditing(flag: Boolean); message 'setAllowsImageEditing:';
+    procedure showFindIndicatorForRange(charRange: NSRange); message 'showFindIndicatorForRange:';
+    function delegate: id; message 'delegate';
+    procedure setDelegate(anObject: id); message 'setDelegate:';
+    function isEditable: Boolean; message 'isEditable';
+    procedure setEditable(flag: Boolean); message 'setEditable:';
+    function isSelectable: Boolean; message 'isSelectable';
+    procedure setSelectable(flag: Boolean); message 'setSelectable:';
+    function isRichText: Boolean; message 'isRichText';
+    procedure setRichText(flag: Boolean); message 'setRichText:';
+    function importsGraphics: Boolean; message 'importsGraphics';
+    procedure setImportsGraphics(flag: Boolean); message 'setImportsGraphics:';
+    function drawsBackground: Boolean; message 'drawsBackground';
+    procedure setDrawsBackground(flag: Boolean); message 'setDrawsBackground:';
+    function backgroundColor: NSColor; message 'backgroundColor';
+    procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
+    function isFieldEditor: Boolean; message 'isFieldEditor';
+    procedure setFieldEditor(flag: Boolean); message 'setFieldEditor:';
+    function usesFontPanel: Boolean; message 'usesFontPanel';
+    procedure setUsesFontPanel(flag: Boolean); message 'setUsesFontPanel:';
+    function isRulerVisible: Boolean; message 'isRulerVisible';
+    procedure setSelectedRange(charRange: NSRange); message 'setSelectedRange:';
+    function smartInsertDeleteEnabled: Boolean; message 'smartInsertDeleteEnabled';
+    procedure setSmartInsertDeleteEnabled(flag: Boolean); message 'setSmartInsertDeleteEnabled:';
+    function smartDeleteRangeForProposedRange(proposedCharRange: NSRange): NSRange; message 'smartDeleteRangeForProposedRange:';
+    procedure toggleSmartInsertDelete(sender: id); message 'toggleSmartInsertDelete:';
+    procedure smartInsertForString_replacingRange_beforeString_afterString(pasteString: NSString; charRangeToReplace: NSRange; var beforeString: NSString; var afterString: NSString); message 'smartInsertForString:replacingRange:beforeString:afterString:';
+    function smartInsertBeforeStringForString_replacingRange(pasteString: NSString; charRangeToReplace: NSRange): NSString; message 'smartInsertBeforeStringForString:replacingRange:';
+    function smartInsertAfterStringForString_replacingRange(pasteString: NSString; charRangeToReplace: NSRange): NSString; message 'smartInsertAfterStringForString:replacingRange:';
+    procedure setAutomaticQuoteSubstitutionEnabled(flag: Boolean); message 'setAutomaticQuoteSubstitutionEnabled:';
+    function isAutomaticQuoteSubstitutionEnabled: Boolean; message 'isAutomaticQuoteSubstitutionEnabled';
+    procedure toggleAutomaticQuoteSubstitution(sender: id); message 'toggleAutomaticQuoteSubstitution:';
+    procedure setAutomaticLinkDetectionEnabled(flag: Boolean); message 'setAutomaticLinkDetectionEnabled:';
+    function isAutomaticLinkDetectionEnabled: Boolean; message 'isAutomaticLinkDetectionEnabled';
+    procedure toggleAutomaticLinkDetection(sender: id); message 'toggleAutomaticLinkDetection:';
+    function allowedInputSourceLocales: NSArray; message 'allowedInputSourceLocales';
+    procedure setAllowedInputSourceLocales(localeIdentifiers: NSArray); message 'setAllowedInputSourceLocales:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSTokenField.inc b/packages/cocoaint/src/appkit/NSTokenField.inc
new file mode 100644
index 0000000000..3709c38557
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSTokenField.inc
@@ -0,0 +1,67 @@
+{ Parsed from Appkit.framework NSTokenField.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTOKENFIELD_PAS_H}
+{$define NSTOKENFIELD_PAS_H}
+type
+  NSTokenFieldPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTOKENFIELD_PAS_T}
+{$define NSTOKENFIELD_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTOKENFIELD_PAS_R}
+{$define NSTOKENFIELD_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTOKENFIELD_PAS_F}
+{$define NSTOKENFIELD_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTOKENFIELD_PAS_T}
+{$define NSTOKENFIELD_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTokenField = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTOKENFIELD_PAS_C}
+{$define NSTOKENFIELD_PAS_C}
+
+{ NSTokenField }
+  NSTokenField = objcclass(NSTextField)
+    
+  public
+    class function alloc: NSTokenField; message 'alloc';
+
+    procedure setTokenStyle(style: NSTokenStyle); message 'setTokenStyle:';
+    function tokenStyle: NSTokenStyle; message 'tokenStyle';
+    procedure setCompletionDelay(delay: NSTimeInterval); message 'setCompletionDelay:';
+    function completionDelay: NSTimeInterval; message 'completionDelay';
+    class function defaultCompletionDelay: NSTimeInterval; message 'defaultCompletionDelay';
+    procedure setTokenizingCharacterSet(characterSet: NSCharacterSet); message 'setTokenizingCharacterSet:';
+    function tokenizingCharacterSet: NSCharacterSet; message 'tokenizingCharacterSet';
+    class function defaultTokenizingCharacterSet: NSCharacterSet; message 'defaultTokenizingCharacterSet';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSTokenFieldCell.inc b/packages/cocoaint/src/appkit/NSTokenFieldCell.inc
new file mode 100644
index 0000000000..24dbcb1fad
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSTokenFieldCell.inc
@@ -0,0 +1,95 @@
+{ Parsed from Appkit.framework NSTokenFieldCell.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTOKENFIELDCELL_PAS_H}
+{$define NSTOKENFIELDCELL_PAS_H}
+type
+  NSTokenFieldCellPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTOKENFIELDCELL_PAS_T}
+{$define NSTOKENFIELDCELL_PAS_T}
+
+{ Types }
+type
+  NSTokenStyle = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTOKENFIELDCELL_PAS_R}
+{$define NSTOKENFIELDCELL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTOKENFIELDCELL_PAS_F}
+{$define NSTOKENFIELDCELL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTOKENFIELDCELL_PAS_T}
+{$define NSTOKENFIELDCELL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTokenFieldCell = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTOKENFIELDCELL_PAS_C}
+{$define NSTOKENFIELDCELL_PAS_C}
+
+{ NSTokenFieldCell }
+  NSTokenFieldCell = objcclass(NSTextFieldCell)
+  private
+    __tokenizingCharacterSet: NSCharacterSet;
+    __delegate: id;
+    __completionDelay: NSTimeInterval;
+    __cache: id;
+    __defaultTerminator: id;
+    __trackingArea: id;
+    __lastCell: id;
+    __lastCellFrame: NSRect;
+    __reserved: id;
+    __tfcFlags: bitpacked record
+        _style: 0..((1 shl 4)-1);
+        
+        _invalidCache: 0..1;
+        _inDidChange: 0..1;
+        _validationDisabled: 0..1;
+        _pendingComplete: 0..1;
+        _autoCompleteMode: 0..((1 shl 2)-1);
+        _inValidateEditing: 0..1;
+        
+        _reserved: 0..((1 shl 21)-1);
+      end;
+    
+  public
+    class function alloc: NSTokenFieldCell; message 'alloc';
+
+    procedure setTokenStyle(style: NSTokenStyle); message 'setTokenStyle:';
+    function tokenStyle: NSTokenStyle; message 'tokenStyle';
+    procedure setCompletionDelay(delay: NSTimeInterval); message 'setCompletionDelay:';
+    function completionDelay: NSTimeInterval; message 'completionDelay';
+    class function defaultCompletionDelay: NSTimeInterval; message 'defaultCompletionDelay';
+    procedure setTokenizingCharacterSet(characterSet: NSCharacterSet); message 'setTokenizingCharacterSet:';
+    function tokenizingCharacterSet: NSCharacterSet; message 'tokenizingCharacterSet';
+    class function defaultTokenizingCharacterSet: NSCharacterSet; message 'defaultTokenizingCharacterSet';
+    procedure setDelegate(anObject: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSToolbar.inc b/packages/cocoaint/src/appkit/NSToolbar.inc
new file mode 100644
index 0000000000..5b324d9c54
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSToolbar.inc
@@ -0,0 +1,138 @@
+{ Parsed from Appkit.framework NSToolbar.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTOOLBAR_PAS_H}
+{$define NSTOOLBAR_PAS_H}
+type
+  NSToolbarPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTOOLBAR_PAS_T}
+{$define NSTOOLBAR_PAS_T}
+
+{ Types }
+type
+  NSToolbarDisplayMode = culong;
+  NSToolbarSizeMode = culong;
+
+{ CFString constants }
+var
+  NSToolbarWillAddItemNotification: CFStringRef; external name '_NSToolbarWillAddItemNotification';
+  NSToolbarDidRemoveItemNotification: CFStringRef; external name '_NSToolbarDidRemoveItemNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTOOLBAR_PAS_R}
+{$define NSTOOLBAR_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTOOLBAR_PAS_F}
+{$define NSTOOLBAR_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTOOLBAR_PAS_T}
+{$define NSTOOLBAR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSToolbar = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTOOLBAR_PAS_C}
+{$define NSTOOLBAR_PAS_C}
+
+{ NSToolbar }
+  NSToolbar = objcclass(NSObject)
+  private
+    __toolbarIdentifier: NSString;
+    __currentItems: NSMutableArray;
+    __currentItemIdentifiers: NSMutableArray;
+    __initPListDatabase: NSDictionary;
+    __initPListTarget: id;
+    __selectedItemIdentifier: NSString;
+    __metrics: Pointer;
+    __delegate: id;
+    __window: NSWindow;
+    __configPalette: id;
+    __toolbarView: id;
+    __syncPostEnabledCount: clong;
+    __tbFlags: bitpacked record
+        allowsUserCustomization: 0..1;
+        autosavesUsingIdentifier: 0..1;
+        initialConfigurationDone: 0..1;
+        shouldHideAfterCustomization: 0..1;
+        delegateDefaultItemIdentifiers: 0..1;
+        delegateAllowedItemIdentifiers: 0..1;
+        delegateItemWithItemIdentifier: 0..1;
+        delegateNotificationsEnabled: 0..1;
+        prefersToBeShown: 0..1;
+        loadItemsImmediately: 0..1;
+        currentItemsContainsPlaceholder: 0..1;
+        customizationPanelIsRunning: 0..1;
+        usesCustomSheetWidth: 0..1;
+        clickAndDragPerformsCustomization: 0..1;
+        showsNoContextMenu: 0..1;
+        firstMoveableItemIndex: 0..((1 shl 6)-1);
+        keyboardLoopNeedsUpdating: 0..1;
+        showHideDuringConfigurationChangeDisabled: 0..1;
+        displayMode: 0..((1 shl 2)-1);
+        sizeMode: 0..((1 shl 2)-1);
+        doNotShowBaselineSeparator: 0..1;
+        hideWithoutResizingWindowHint: 0..1;
+        autovalidatesItemsDisabled: 0..1;
+        inAutovalidation: 0..1;
+        loadedMetrics: 0..1;
+      end;
+    __customizationSheetWidth: clong;
+    __tbReserved: id;
+    
+  public
+    class function alloc: NSToolbar; message 'alloc';
+
+    function initWithIdentifier(identifier_: NSString): id; message 'initWithIdentifier:';
+    procedure insertItemWithItemIdentifier_atIndex(itemIdentifier: NSString; index: clong); message 'insertItemWithItemIdentifier:atIndex:';
+    procedure removeItemAtIndex(index: clong); message 'removeItemAtIndex:';
+    procedure setDelegate(delegate_: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
+    procedure setVisible(shown: Boolean); message 'setVisible:';
+    function isVisible: Boolean; message 'isVisible';
+    procedure runCustomizationPalette(sender: id); message 'runCustomizationPalette:';
+    function customizationPaletteIsRunning: Boolean; message 'customizationPaletteIsRunning';
+    procedure setDisplayMode(displayMode_: NSToolbarDisplayMode); message 'setDisplayMode:';
+    function displayMode: NSToolbarDisplayMode; message 'displayMode';
+    procedure setSelectedItemIdentifier(itemIdentifier: NSString); message 'setSelectedItemIdentifier:';
+    function selectedItemIdentifier: NSString; message 'selectedItemIdentifier';
+    procedure setSizeMode(sizeMode_: NSToolbarSizeMode); message 'setSizeMode:';
+    function sizeMode: NSToolbarSizeMode; message 'sizeMode';
+    procedure setShowsBaselineSeparator(flag: Boolean); message 'setShowsBaselineSeparator:';
+    function showsBaselineSeparator: Boolean; message 'showsBaselineSeparator';
+    procedure setAllowsUserCustomization(allowCustomization: Boolean); message 'setAllowsUserCustomization:';
+    function allowsUserCustomization: Boolean; message 'allowsUserCustomization';
+    function identifier: NSString; message 'identifier';
+    function items: NSArray; message 'items';
+    function visibleItems: NSArray; message 'visibleItems';
+    procedure setAutosavesConfiguration(flag: Boolean); message 'setAutosavesConfiguration:';
+    function autosavesConfiguration: Boolean; message 'autosavesConfiguration';
+    procedure setConfigurationFromDictionary(configDict: NSDictionary); message 'setConfigurationFromDictionary:';
+    function configurationDictionary: NSDictionary; message 'configurationDictionary';
+    procedure validateVisibleItems; message 'validateVisibleItems';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSToolbarItem.inc b/packages/cocoaint/src/appkit/NSToolbarItem.inc
new file mode 100644
index 0000000000..f921960bb7
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSToolbarItem.inc
@@ -0,0 +1,147 @@
+{ Parsed from Appkit.framework NSToolbarItem.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTOOLBARITEM_PAS_H}
+{$define NSTOOLBARITEM_PAS_H}
+type
+  NSToolbarItemPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTOOLBARITEM_PAS_T}
+{$define NSTOOLBARITEM_PAS_T}
+
+{ CFString constants }
+var
+  NSToolbarSeparatorItemIdentifier: CFStringRef; external name '_NSToolbarSeparatorItemIdentifier';
+  NSToolbarSpaceItemIdentifier: CFStringRef; external name '_NSToolbarSpaceItemIdentifier';
+  NSToolbarFlexibleSpaceItemIdentifier: CFStringRef; external name '_NSToolbarFlexibleSpaceItemIdentifier';
+  NSToolbarShowColorsItemIdentifier: CFStringRef; external name '_NSToolbarShowColorsItemIdentifier';
+  NSToolbarShowFontsItemIdentifier: CFStringRef; external name '_NSToolbarShowFontsItemIdentifier';
+  NSToolbarCustomizeToolbarItemIdentifier: CFStringRef; external name '_NSToolbarCustomizeToolbarItemIdentifier';
+  NSToolbarPrintItemIdentifier: CFStringRef; external name '_NSToolbarPrintItemIdentifier';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTOOLBARITEM_PAS_R}
+{$define NSTOOLBARITEM_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTOOLBARITEM_PAS_F}
+{$define NSTOOLBARITEM_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTOOLBARITEM_PAS_T}
+{$define NSTOOLBARITEM_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSToolbarItem = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTOOLBARITEM_PAS_C}
+{$define NSTOOLBARITEM_PAS_C}
+
+{ NSToolbarItem }
+  NSToolbarItem = objcclass(NSObject, NSCopyingProtocol, NSValidatedUserInterfaceItemProtocol)
+  private
+    __toolbar: NSToolbar;
+    __image: NSImage;
+    __itemIdentifier: NSString;
+    __label: NSString;
+    __labelAlignment: NSTextAlignment;
+    __paletteLabel: NSString;
+    __toolTip: NSString;
+    __menuItemRep: NSMenuItem;
+    __tag: clong;
+    __tbiFlags: bitpacked record
+        viewRespondsToIsEnabled: 0..1;
+        viewRespondsToSetEnabled: 0..1;
+        viewRespondsToTag: 0..1;
+        viewRespondsToSetTag: 0..1;
+        viewRespondsToAction: 0..1;
+        viewRespondsToSetAction: 0..1;
+        viewRespondsToTarget: 0..1;
+        viewRespondsToSetTarget: 0..1;
+        viewRespondsToImage: 0..1;
+        viewRespondsToSetImage: 0..1;
+        isEnabled: 0..1;
+        isUserRemovable: 0..1;
+        menuHasBeenSet: 0..1;
+        menuRepIsDefault: 0..1;
+        viewHasBeenLoaded: 0..1;
+        drawingForDragImage: 0..1;
+        isCustomItemType: 0..1;
+        hasValidatedAutoModeConfiguration: 0..1;
+        useAutoModeConfiguration: 0..1;
+        hasNonDefaultPrioritySetting: 0..1;
+        autovalidationDisabled: 0..1;
+        tagHasBeenSet: 0..1;
+        sizeHasBeenSet: 0..1;
+        stateWasDisabledBeforeSheet: 0..1;
+        RESERVED: 0..((1 shl 8)-1);
+      end;
+    __allPossibleLabelsToFit: NSArray;
+    __itemViewer: id;
+    __view: NSView;
+    __minSize: NSSize;
+    __maxSize: NSSize;
+    {$ifdef cpu64}
+    __toolbarItemReserved: id;
+    {$endif}
+    
+  public
+    class function alloc: NSToolbarItem; message 'alloc';
+
+    function initWithItemIdentifier(itemIdentifier_: NSString): id; message 'initWithItemIdentifier:';
+    function itemIdentifier: NSString; message 'itemIdentifier';
+    function toolbar: NSToolbar; message 'toolbar';
+    procedure setLabel(label__: NSString); message 'setLabel:';
+    function label_: NSString; message 'label';
+    procedure setPaletteLabel(paletteLabel_: NSString); message 'setPaletteLabel:';
+    function paletteLabel: NSString; message 'paletteLabel';
+    procedure setToolTip(toolTip_: NSString); message 'setToolTip:';
+    function toolTip: NSString; message 'toolTip';
+    procedure setMenuFormRepresentation(menuItem: NSMenuItem); message 'setMenuFormRepresentation:';
+    function menuFormRepresentation: NSMenuItem; message 'menuFormRepresentation';
+    procedure setTag(tag_: clong); message 'setTag:';
+    function tag: clong; message 'tag';
+    procedure setTarget(target_: id); message 'setTarget:';
+    function target: id; message 'target';
+    procedure setAction(action_: SEL); message 'setAction:';
+    function action: SEL; message 'action';
+    procedure setEnabled(enabled: Boolean); message 'setEnabled:';
+    function isEnabled: Boolean; message 'isEnabled';
+    procedure setImage(image_: NSImage); message 'setImage:';
+    function image: NSImage; message 'image';
+    procedure setView(view_: NSView); message 'setView:';
+    function view: NSView; message 'view';
+    procedure setMinSize(size: NSSize); message 'setMinSize:';
+    function minSize: NSSize; message 'minSize';
+    procedure setMaxSize(size: NSSize); message 'setMaxSize:';
+    function maxSize: NSSize; message 'maxSize';
+    procedure setVisibilityPriority(visibilityPriority_: clong); message 'setVisibilityPriority:';
+    function visibilityPriority: clong; message 'visibilityPriority';
+    procedure validate; message 'validate';
+    procedure setAutovalidates(resistance: Boolean); message 'setAutovalidates:';
+    function autovalidates: Boolean; message 'autovalidates';
+    function allowsDuplicatesInToolbar: Boolean; message 'allowsDuplicatesInToolbar';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSToolbarItemGroup.inc b/packages/cocoaint/src/appkit/NSToolbarItemGroup.inc
new file mode 100644
index 0000000000..49c7275e2a
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSToolbarItemGroup.inc
@@ -0,0 +1,68 @@
+{ Parsed from Appkit.framework NSToolbarItemGroup.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTOOLBARITEMGROUP_PAS_H}
+{$define NSTOOLBARITEMGROUP_PAS_H}
+type
+  NSToolbarItemGroupPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTOOLBARITEMGROUP_PAS_T}
+{$define NSTOOLBARITEMGROUP_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTOOLBARITEMGROUP_PAS_R}
+{$define NSTOOLBARITEMGROUP_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTOOLBARITEMGROUP_PAS_F}
+{$define NSTOOLBARITEMGROUP_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTOOLBARITEMGROUP_PAS_T}
+{$define NSTOOLBARITEMGROUP_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSToolbarItemGroup = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTOOLBARITEMGROUP_PAS_C}
+{$define NSTOOLBARITEMGROUP_PAS_C}
+
+{ NSToolbarItemGroup }
+  NSToolbarItemGroup = objcclass(NSToolbarItem)
+  private
+    __groupItems: id;
+    __giFlags: bitpacked record
+        dirtiedLayout: 0..1;
+        reserved: 0..((1 shl 31)-1);
+      end;
+    __giReserved: id;
+    
+  public
+    class function alloc: NSToolbarItemGroup; message 'alloc';
+
+    procedure setSubitems(subitems_: NSArray); message 'setSubitems:';
+    function subitems: NSArray; message 'subitems';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSTrackingArea.inc b/packages/cocoaint/src/appkit/NSTrackingArea.inc
new file mode 100644
index 0000000000..f1a0dca6d0
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSTrackingArea.inc
@@ -0,0 +1,93 @@
+{ Parsed from Appkit.framework NSTrackingArea.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTRACKINGAREA_PAS_H}
+{$define NSTRACKINGAREA_PAS_H}
+type
+  NSTrackingAreaPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTRACKINGAREA_PAS_T}
+{$define NSTRACKINGAREA_PAS_T}
+
+{ Constants }
+
+const
+  NSTrackingMouseEnteredAndExited = $01;
+  NSTrackingMouseMoved = $02;
+  NSTrackingCursorUpdate = $04;
+
+const
+  NSTrackingActiveWhenFirstResponder = $10;
+  NSTrackingActiveInKeyWindow = $20;
+  NSTrackingActiveInActiveApp = $40;
+  NSTrackingActiveAlways = $80;
+
+const
+  NSTrackingAssumeInside = $100;
+  NSTrackingInVisibleRect = $200;
+  NSTrackingEnabledDuringMouseDrag = $400;
+
+{ Types }
+type
+  NSTrackingAreaOptions = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTRACKINGAREA_PAS_R}
+{$define NSTRACKINGAREA_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTRACKINGAREA_PAS_F}
+{$define NSTRACKINGAREA_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTRACKINGAREA_PAS_T}
+{$define NSTRACKINGAREA_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTrackingArea = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTRACKINGAREA_PAS_C}
+{$define NSTRACKINGAREA_PAS_C}
+
+{ NSTrackingArea }
+  NSTrackingArea = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __rect: NSRect;
+    __owner: id; {garbage collector: __weak }
+    __userInfo: NSDictionary;
+    __options: NSTrackingAreaOptions;
+    __privateFlags: clong;
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSTrackingArea; message 'alloc';
+
+    function initWithRect_options_owner_userInfo(rect_: NSRect; options_: NSTrackingAreaOptions; owner_: id; userInfo_: NSDictionary): NSTrackingArea; message 'initWithRect:options:owner:userInfo:';
+    function rect: NSRect; message 'rect';
+    function options: NSTrackingAreaOptions; message 'options';
+    function owner: id; message 'owner';
+    function userInfo: NSDictionary; message 'userInfo';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSTreeController.inc b/packages/cocoaint/src/appkit/NSTreeController.inc
new file mode 100644
index 0000000000..cc775b789c
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSTreeController.inc
@@ -0,0 +1,130 @@
+{ Parsed from Appkit.framework NSTreeController.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTREECONTROLLER_PAS_H}
+{$define NSTREECONTROLLER_PAS_H}
+type
+  NSTreeControllerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTREECONTROLLER_PAS_T}
+{$define NSTREECONTROLLER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTREECONTROLLER_PAS_R}
+{$define NSTREECONTROLLER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTREECONTROLLER_PAS_F}
+{$define NSTREECONTROLLER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTREECONTROLLER_PAS_T}
+{$define NSTREECONTROLLER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTreeController = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTREECONTROLLER_PAS_C}
+{$define NSTREECONTROLLER_PAS_C}
+
+{ NSTreeController }
+  NSTreeController = objcclass(NSObjectController)
+  private
+    __treeControllerReserved1: id;
+    __modelObservingKeyPaths: NSArray;
+    __treeStructureObservers: id;
+    __arrangedObjects: id;
+    __rootNode: id;
+    __selectionIndexPaths: id;
+    __treeControllerFlags: bitpacked record
+        _avoidsEmptySelection: 0..1;
+        _preservesSelection: 0..1;
+        _selectsInsertedObjects: 0..1;
+        _explicitlyCannotInsert: 0..1;
+        _explicitlyCannotInsertChild: 0..1;
+        _explicitlyCannotAddChild: 0..1;
+        _alwaysUsesMultipleValuesMarker: 0..1;
+        _observingThroughArrangedObjects: 0..1;
+        _mutatingNodes: 0..1;
+        _performingFetch: 0..1;
+        _skipSortingAfterFetch: 0..1;
+        _reservedTreeController: 0..((1 shl 21)-1);
+      end;
+    __selectedObjects: NSArray;
+    __childrenKeyPath: NSString;
+    __countKeyPath: NSString;
+    __leafKeyPath: NSString;
+    __sortDescriptors: NSArray;
+    
+  public
+    class function alloc: NSTreeController; message 'alloc';
+
+    procedure rearrangeObjects; message 'rearrangeObjects';
+    function arrangedObjects: id; message 'arrangedObjects';
+    procedure setChildrenKeyPath(keyPath: NSString); message 'setChildrenKeyPath:';
+    function childrenKeyPath: NSString; message 'childrenKeyPath';
+    procedure setCountKeyPath(keyPath: NSString); message 'setCountKeyPath:';
+    function countKeyPath: NSString; message 'countKeyPath';
+    procedure setLeafKeyPath(keyPath: NSString); message 'setLeafKeyPath:';
+    function leafKeyPath: NSString; message 'leafKeyPath';
+    procedure setSortDescriptors(sortDescriptors_: NSArray); message 'setSortDescriptors:';
+    function sortDescriptors: NSArray; message 'sortDescriptors';
+    function content: id; message 'content';
+    procedure setContent(content_: id); message 'setContent:';
+    procedure add(sender: id); message 'add:';
+    procedure remove(sender: id); message 'remove:';
+    procedure addChild(sender: id); message 'addChild:';
+    procedure insert(sender: id); message 'insert:';
+    procedure insertChild(sender: id); message 'insertChild:';
+    function canInsert: Boolean; message 'canInsert';
+    function canInsertChild: Boolean; message 'canInsertChild';
+    function canAddChild: Boolean; message 'canAddChild';
+    procedure insertObject_atArrangedObjectIndexPath(object_: id; indexPath: NSIndexPath); message 'insertObject:atArrangedObjectIndexPath:';
+    procedure insertObjects_atArrangedObjectIndexPaths(objects: NSArray; indexPaths: NSArray); message 'insertObjects:atArrangedObjectIndexPaths:';
+    procedure removeObjectAtArrangedObjectIndexPath(indexPath: NSIndexPath); message 'removeObjectAtArrangedObjectIndexPath:';
+    procedure removeObjectsAtArrangedObjectIndexPaths(indexPaths: NSArray); message 'removeObjectsAtArrangedObjectIndexPaths:';
+    procedure setAvoidsEmptySelection(flag: Boolean); message 'setAvoidsEmptySelection:';
+    function avoidsEmptySelection: Boolean; message 'avoidsEmptySelection';
+    procedure setPreservesSelection(flag: Boolean); message 'setPreservesSelection:';
+    function preservesSelection: Boolean; message 'preservesSelection';
+    procedure setSelectsInsertedObjects(flag: Boolean); message 'setSelectsInsertedObjects:';
+    function selectsInsertedObjects: Boolean; message 'selectsInsertedObjects';
+    procedure setAlwaysUsesMultipleValuesMarker(flag: Boolean); message 'setAlwaysUsesMultipleValuesMarker:';
+    function alwaysUsesMultipleValuesMarker: Boolean; message 'alwaysUsesMultipleValuesMarker';
+    function selectedObjects: NSArray; message 'selectedObjects';
+    function setSelectionIndexPaths(indexPaths: NSArray): Boolean; message 'setSelectionIndexPaths:';
+    function selectionIndexPaths: NSArray; message 'selectionIndexPaths';
+    function setSelectionIndexPath(indexPath: NSIndexPath): Boolean; message 'setSelectionIndexPath:';
+    function selectionIndexPath: NSIndexPath; message 'selectionIndexPath';
+    function addSelectionIndexPaths(indexPaths: NSArray): Boolean; message 'addSelectionIndexPaths:';
+    function removeSelectionIndexPaths(indexPaths: NSArray): Boolean; message 'removeSelectionIndexPaths:';
+    function selectedNodes: NSArray; message 'selectedNodes';
+    procedure moveNode_toIndexPath(node: NSTreeNode; indexPath: NSIndexPath); message 'moveNode:toIndexPath:';
+    procedure moveNodes_toIndexPath(nodes: NSArray; startingIndexPath: NSIndexPath); message 'moveNodes:toIndexPath:';
+    function childrenKeyPathForNode(node: NSTreeNode): NSString; message 'childrenKeyPathForNode:';
+    function countKeyPathForNode(node: NSTreeNode): NSString; message 'countKeyPathForNode:';
+    function leafKeyPathForNode(node: NSTreeNode): NSString; message 'leafKeyPathForNode:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSTreeNode.inc b/packages/cocoaint/src/appkit/NSTreeNode.inc
new file mode 100644
index 0000000000..4109fe3867
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSTreeNode.inc
@@ -0,0 +1,80 @@
+{ Parsed from Appkit.framework NSTreeNode.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTREENODE_PAS_H}
+{$define NSTREENODE_PAS_H}
+type
+  NSTreeNodePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTREENODE_PAS_T}
+{$define NSTREENODE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTREENODE_PAS_R}
+{$define NSTREENODE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTREENODE_PAS_F}
+{$define NSTREENODE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTREENODE_PAS_T}
+{$define NSTREENODE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTreeNode = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTREENODE_PAS_C}
+{$define NSTREENODE_PAS_C}
+
+{ NSTreeNode }
+  NSTreeNode = objcclass(NSObject)
+  private
+    __childNodesProxy: id;
+    __representedObject: id;
+    __observationInfo: Pointer;
+    __reserved2: id;
+    __childNodes: NSMutableArray;
+    __parentNode: NSTreeNode;
+    __NSTreeNodeFlags: bitpacked record
+        ignoreObserving: 0..1;
+        reserved: 0..((1 shl 31)-1);
+      end;
+    
+  public
+    class function alloc: NSTreeNode; message 'alloc';
+
+    class function treeNodeWithRepresentedObject(modelObject: id): id; message 'treeNodeWithRepresentedObject:';
+    function initWithRepresentedObject(modelObject: id): id; message 'initWithRepresentedObject:';
+    function representedObject: id; message 'representedObject';
+    function indexPath: NSIndexPath; message 'indexPath';
+    function isLeaf: Boolean; message 'isLeaf';
+    function childNodes: NSArray; message 'childNodes';
+    function mutableChildNodes: NSMutableArray; message 'mutableChildNodes';
+    function descendantNodeAtIndexPath(indexPath_: NSIndexPath): NSTreeNode; message 'descendantNodeAtIndexPath:';
+    function parentNode: NSTreeNode; message 'parentNode';
+    procedure sortWithSortDescriptors_recursively(sortDescriptors: NSArray; recursively: Boolean); message 'sortWithSortDescriptors:recursively:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSUserDefaultsController.inc b/packages/cocoaint/src/appkit/NSUserDefaultsController.inc
new file mode 100644
index 0000000000..0953ba2488
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSUserDefaultsController.inc
@@ -0,0 +1,82 @@
+{ Parsed from Appkit.framework NSUserDefaultsController.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSUSERDEFAULTSCONTROLLER_PAS_H}
+{$define NSUSERDEFAULTSCONTROLLER_PAS_H}
+type
+  NSUserDefaultsControllerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSUSERDEFAULTSCONTROLLER_PAS_T}
+{$define NSUSERDEFAULTSCONTROLLER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSUSERDEFAULTSCONTROLLER_PAS_R}
+{$define NSUSERDEFAULTSCONTROLLER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSUSERDEFAULTSCONTROLLER_PAS_F}
+{$define NSUSERDEFAULTSCONTROLLER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSUSERDEFAULTSCONTROLLER_PAS_T}
+{$define NSUSERDEFAULTSCONTROLLER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSUserDefaultsController = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSUSERDEFAULTSCONTROLLER_PAS_C}
+{$define NSUSERDEFAULTSCONTROLLER_PAS_C}
+
+{ NSUserDefaultsController }
+  NSUserDefaultsController = objcclass(NSController)
+  private
+    __reserved3: Pointer;
+    __reserved4: Pointer;
+    __defaults: NSUserDefaults;
+    __valueBuffer: NSMutableDictionary;
+    __initialValues: NSDictionary;
+    __userDefaultsControllerFlags: bitpacked record
+        _sharedInstance: 0..1;
+        _appliesImmediately: 0..1;
+        _reservedUserDefaultsController: 0..((1 shl 30)-1);
+      end;
+    
+  public
+    class function alloc: NSUserDefaultsController; message 'alloc';
+
+    class function sharedUserDefaultsController: id; message 'sharedUserDefaultsController';
+    function initWithDefaults_initialValues(defaults_: NSUserDefaults; initialValues_: NSDictionary): id; message 'initWithDefaults:initialValues:';
+    function defaults: NSUserDefaults; message 'defaults';
+    procedure setInitialValues(initialValues_: NSDictionary); message 'setInitialValues:';
+    function initialValues: NSDictionary; message 'initialValues';
+    procedure setAppliesImmediately(flag: Boolean); message 'setAppliesImmediately:';
+    function appliesImmediately: Boolean; message 'appliesImmediately';
+    function hasUnappliedChanges: Boolean; message 'hasUnappliedChanges';
+    function values: id; message 'values';
+    procedure revert(sender: id); message 'revert:';
+    procedure save(sender: id); message 'save:';
+    procedure revertToInitialValues(sender: id); message 'revertToInitialValues:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSValidatedUserInterfaceItem.inc b/packages/cocoaint/src/appkit/NSValidatedUserInterfaceItem.inc
new file mode 100644
index 0000000000..00534e23cf
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSValidatedUserInterfaceItem.inc
@@ -0,0 +1,31 @@
+{ Parsed from Appkit.framework NSValidatedUserInterfaceItem.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.1 - Thu Sep 3 12:01:28 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSVALIDATEDUSERINTERFACEITEM_PAS_T}
+{$define NSVALIDATEDUSERINTERFACEITEM_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSVALIDATEDUSERINTERFACEITEM_PAS_R}
+{$define NSVALIDATEDUSERINTERFACEITEM_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSVALIDATEDUSERINTERFACEITEM_PAS_F}
+{$define NSVALIDATEDUSERINTERFACEITEM_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSVALIDATEDUSERINTERFACEITEM_PAS_T}
+{$define NSVALIDATEDUSERINTERFACEITEM_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSView.inc b/packages/cocoaint/src/appkit/NSView.inc
new file mode 100644
index 0000000000..10bd9f03fc
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSView.inc
@@ -0,0 +1,388 @@
+{ Parsed from Appkit.framework NSView.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSVIEW_PAS_H}
+{$define NSVIEW_PAS_H}
+type
+  NSViewPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSVIEW_PAS_T}
+{$define NSVIEW_PAS_T}
+
+{ Callbacks }
+type
+  NSViewCompare = function (param1: id; param2: id; param3: Pointer): NSComparisonResult; cdecl;
+
+{ Constants }
+
+const
+  NSViewNotSizable = 0;
+  NSViewMinXMargin = 1;
+  NSViewWidthSizable = 2;
+  NSViewMaxXMargin = 4;
+  NSViewMinYMargin = 8;
+  NSViewHeightSizable = 16;
+  NSViewMaxYMargin = 32;
+
+const
+  NSNoBorder = 0;
+  NSLineBorder = 1;
+  NSBezelBorder = 2;
+  NSGrooveBorder = 3;
+
+{ Types }
+type
+  NSBorderType = culong;
+  NSTrackingRectTag = clong;
+  NSToolTipTag = clong;
+
+{ CFString constants }
+var
+  NSFullScreenModeAllScreens: CFStringRef; external name '_NSFullScreenModeAllScreens';
+  NSFullScreenModeSetting: CFStringRef; external name '_NSFullScreenModeSetting';
+  NSFullScreenModeWindowLevel: CFStringRef; external name '_NSFullScreenModeWindowLevel';
+  NSViewFrameDidChangeNotification: CFStringRef; external name '_NSViewFrameDidChangeNotification';
+  NSViewFocusDidChangeNotification: CFStringRef; external name '_NSViewFocusDidChangeNotification';
+  NSViewBoundsDidChangeNotification: CFStringRef; external name '_NSViewBoundsDidChangeNotification';
+  NSViewGlobalFrameDidChangeNotification: CFStringRef; external name '_NSViewGlobalFrameDidChangeNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSVIEW_PAS_R}
+{$define NSVIEW_PAS_R}
+
+{ Records }
+type
+  __VFlags = record
+{$ifdef fpc_big_endian}
+    rotatedFromBase: cuint;
+    rotatedOrScaledFromBase: cuint;
+    autosizing: cuint;
+    autoresizeSubviews: cuint;
+    wantsGState: cuint;
+    needsDisplay: cuint;
+    validGState: cuint;
+    newGState: cuint;
+    noVerticalAutosizing: cuint;
+    frameChangeNotesSuspended: cuint;
+    needsFrameChangeNote: cuint;
+    focusChangeNotesSuspended: cuint;
+    boundsChangeNotesSuspended: cuint;
+    needsBoundsChangeNote: cuint;
+    removingWithoutInvalidation: cuint;
+    interfaceStyle0: cuint;
+    needsDisplayForBounds: cuint;
+    specialArchiving: cuint;
+    interfaceStyle1: cuint;
+    retainCount: cuint;
+    retainCountOverMax: cuint;
+    aboutToResize: cuint;
+{$else}
+    aboutToResize: cuint;
+    retainCountOverMax: cuint;
+    retainCount: cuint;
+    interfaceStyle1: cuint;
+    specialArchiving: cuint;
+    needsDisplayForBounds: cuint;
+    interfaceStyle0: cuint;
+    removingWithoutInvalidation: cuint;
+    needsBoundsChangeNote: cuint;
+    boundsChangeNotesSuspended: cuint;
+    focusChangeNotesSuspended: cuint;
+    needsFrameChangeNote: cuint;
+    frameChangeNotesSuspended: cuint;
+    noVerticalAutosizing: cuint;
+    newGState: cuint;
+    validGState: cuint;
+    needsDisplay: cuint;
+    wantsGState: cuint;
+    autoresizeSubviews: cuint;
+    autosizing: cuint;
+    rotatedOrScaledFromBase: cuint;
+    rotatedFromBase: cuint;
+{$endif}
+  end;
+_VFlags = __VFlags;
+
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSVIEW_PAS_F}
+{$define NSVIEW_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSVIEW_PAS_T}
+{$define NSVIEW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSView = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSVIEW_PAS_C}
+{$define NSVIEW_PAS_C}
+
+{ NSView }
+  NSView = objcclass(NSResponder)
+  private
+    __frame: NSRect;
+    __bounds: NSRect;
+    __superview: id;
+    __subviews: id;
+    __window: NSWindow;
+    __gState: id;
+    __frameMatrix: id;
+    __drawMatrix: id;
+    __dragTypes: id;
+    __viewAuxiliary: _NSViewAuxiliary;
+    __vFlags: _VFlags;
+    __vFlags2: bitpacked record
+        nextKeyViewRefCount: 0..((1 shl 14)-1);
+        previousKeyViewRefCount: 0..((1 shl 14)-1);
+        isVisibleRect: 0..1;
+        hasToolTip: 0..1;
+        needsRealLockFocus: 0..1;
+        menuWasSet: 0..1;
+      end;
+    
+  public
+    class function alloc: NSView; message 'alloc';
+
+    function initWithFrame(frameRect: NSRect): id; message 'initWithFrame:';
+    function window: NSWindow; message 'window';
+    function superview: NSView; message 'superview';
+    function subviews: NSArray; message 'subviews';
+    function isDescendantOf(aView: NSView): Boolean; message 'isDescendantOf:';
+    function ancestorSharedWithView(aView: NSView): NSView; message 'ancestorSharedWithView:';
+    function opaqueAncestor: NSView; message 'opaqueAncestor';
+    procedure setHidden(flag: Boolean); message 'setHidden:';
+    function isHidden: Boolean; message 'isHidden';
+    function isHiddenOrHasHiddenAncestor: Boolean; message 'isHiddenOrHasHiddenAncestor';
+    procedure getRectsBeingDrawn_count(var rects: NSRect; var count: clong); message 'getRectsBeingDrawn:count:';
+    function needsToDrawRect(aRect: NSRect): Boolean; message 'needsToDrawRect:';
+    function wantsDefaultClipping: Boolean; message 'wantsDefaultClipping';
+    procedure viewDidHide; message 'viewDidHide';
+    procedure viewDidUnhide; message 'viewDidUnhide';
+    procedure setSubviews(newSubviews: NSArray); message 'setSubviews:';
+    procedure addSubview(aView: NSView); message 'addSubview:';
+    procedure addSubview_positioned_relativeTo(aView: NSView; place: NSWindowOrderingMode; otherView: NSView); message 'addSubview:positioned:relativeTo:';
+    procedure sortSubviewsUsingFunction_context(compare: NSViewCompare; context: Pointer); message 'sortSubviewsUsingFunction:context:';
+    procedure viewWillMoveToWindow(newWindow: NSWindow); message 'viewWillMoveToWindow:';
+    procedure viewDidMoveToWindow; message 'viewDidMoveToWindow';
+    procedure viewWillMoveToSuperview(newSuperview: NSView); message 'viewWillMoveToSuperview:';
+    procedure viewDidMoveToSuperview; message 'viewDidMoveToSuperview';
+    procedure didAddSubview(subview: NSView); message 'didAddSubview:';
+    procedure willRemoveSubview(subview: NSView); message 'willRemoveSubview:';
+    procedure removeFromSuperview; message 'removeFromSuperview';
+    procedure replaceSubview_with(oldView: NSView; newView: NSView); message 'replaceSubview:with:';
+    procedure removeFromSuperviewWithoutNeedingDisplay; message 'removeFromSuperviewWithoutNeedingDisplay';
+    procedure setPostsFrameChangedNotifications(flag: Boolean); message 'setPostsFrameChangedNotifications:';
+    function postsFrameChangedNotifications: Boolean; message 'postsFrameChangedNotifications';
+    procedure resizeSubviewsWithOldSize(oldSize: NSSize); message 'resizeSubviewsWithOldSize:';
+    procedure resizeWithOldSuperviewSize(oldSize: NSSize); message 'resizeWithOldSuperviewSize:';
+    procedure setAutoresizesSubviews(flag: Boolean); message 'setAutoresizesSubviews:';
+    function autoresizesSubviews: Boolean; message 'autoresizesSubviews';
+    procedure setAutoresizingMask(mask: culong); message 'setAutoresizingMask:';
+    function autoresizingMask: culong; message 'autoresizingMask';
+    procedure setFrameOrigin(newOrigin: NSPoint); message 'setFrameOrigin:';
+    procedure setFrameSize(newSize: NSSize); message 'setFrameSize:';
+    procedure setFrame(frameRect: NSRect); message 'setFrame:';
+    function frame: NSRect; message 'frame';
+    procedure setFrameRotation(angle: CGFloat); message 'setFrameRotation:';
+    function frameRotation: CGFloat; message 'frameRotation';
+    procedure setFrameCenterRotation(angle: CGFloat); message 'setFrameCenterRotation:';
+    function frameCenterRotation: CGFloat; message 'frameCenterRotation';
+    procedure setBoundsOrigin(newOrigin: NSPoint); message 'setBoundsOrigin:';
+    procedure setBoundsSize(newSize: NSSize); message 'setBoundsSize:';
+    procedure setBoundsRotation(angle: CGFloat); message 'setBoundsRotation:';
+    function boundsRotation: CGFloat; message 'boundsRotation';
+    procedure translateOriginToPoint(translation: NSPoint); message 'translateOriginToPoint:';
+    procedure scaleUnitSquareToSize(newUnitSize: NSSize); message 'scaleUnitSquareToSize:';
+    procedure rotateByAngle(angle: CGFloat); message 'rotateByAngle:';
+    procedure setBounds(aRect: NSRect); message 'setBounds:';
+    function bounds: NSRect; message 'bounds';
+    function isFlipped: Boolean; message 'isFlipped';
+    function isRotatedFromBase: Boolean; message 'isRotatedFromBase';
+    function isRotatedOrScaledFromBase: Boolean; message 'isRotatedOrScaledFromBase';
+    function isOpaque: Boolean; message 'isOpaque';
+    function convertPoint_fromView(aPoint: NSPoint; aView: NSView): NSPoint; message 'convertPoint:fromView:';
+    function convertPoint_toView(aPoint: NSPoint; aView: NSView): NSPoint; message 'convertPoint:toView:';
+    function convertSize_fromView(aSize: NSSize; aView: NSView): NSSize; message 'convertSize:fromView:';
+    function convertSize_toView(aSize: NSSize; aView: NSView): NSSize; message 'convertSize:toView:';
+    function convertRect_fromView(aRect: NSRect; aView: NSView): NSRect; message 'convertRect:fromView:';
+    function convertRect_toView(aRect: NSRect; aView: NSView): NSRect; message 'convertRect:toView:';
+    function centerScanRect(aRect: NSRect): NSRect; message 'centerScanRect:';
+    function convertPointToBase(aPoint: NSPoint): NSPoint; message 'convertPointToBase:';
+    function convertPointFromBase(aPoint: NSPoint): NSPoint; message 'convertPointFromBase:';
+    function convertSizeToBase(aSize: NSSize): NSSize; message 'convertSizeToBase:';
+    function convertSizeFromBase(aSize: NSSize): NSSize; message 'convertSizeFromBase:';
+    function convertRectToBase(aRect: NSRect): NSRect; message 'convertRectToBase:';
+    function convertRectFromBase(aRect: NSRect): NSRect; message 'convertRectFromBase:';
+    function canDraw: Boolean; message 'canDraw';
+    procedure setNeedsDisplay_(flag: Boolean); message 'setNeedsDisplay:';
+    procedure setNeedsDisplayInRect(invalidRect: NSRect); message 'setNeedsDisplayInRect:';
+    function needsDisplay: Boolean; message 'needsDisplay';
+    procedure lockFocus; message 'lockFocus';
+    procedure unlockFocus; message 'unlockFocus';
+    function lockFocusIfCanDraw: Boolean; message 'lockFocusIfCanDraw';
+    function lockFocusIfCanDrawInContext(context: NSGraphicsContext): Boolean; message 'lockFocusIfCanDrawInContext:';
+    class function focusView: NSView; message 'focusView';
+    function visibleRect: NSRect; message 'visibleRect';
+    procedure display; message 'display';
+    procedure displayIfNeeded; message 'displayIfNeeded';
+    procedure displayIfNeededIgnoringOpacity; message 'displayIfNeededIgnoringOpacity';
+    procedure displayRect(rect: NSRect); message 'displayRect:';
+    procedure displayIfNeededInRect(rect: NSRect); message 'displayIfNeededInRect:';
+    procedure displayRectIgnoringOpacity(rect: NSRect); message 'displayRectIgnoringOpacity:';
+    procedure displayIfNeededInRectIgnoringOpacity(rect: NSRect); message 'displayIfNeededInRectIgnoringOpacity:';
+    procedure drawRect(rect: NSRect); message 'drawRect:';
+    procedure displayRectIgnoringOpacity_inContext(aRect: NSRect; context: NSGraphicsContext); message 'displayRectIgnoringOpacity:inContext:';
+    function bitmapImageRepForCachingDisplayInRect(rect: NSRect): NSBitmapImageRep; message 'bitmapImageRepForCachingDisplayInRect:';
+    procedure cacheDisplayInRect_toBitmapImageRep(rect: NSRect; bitmapImageRep: NSBitmapImageRep); message 'cacheDisplayInRect:toBitmapImageRep:';
+    procedure viewWillDraw; message 'viewWillDraw';
+    function gState: clong; message 'gState';
+    procedure allocateGState; message 'allocateGState';
+    procedure releaseGState; message 'releaseGState';
+    procedure setUpGState; message 'setUpGState';
+    procedure renewGState; message 'renewGState';
+    procedure scrollPoint(aPoint: NSPoint); message 'scrollPoint:';
+    function scrollRectToVisible(aRect: NSRect): Boolean; message 'scrollRectToVisible:';
+    function autoscroll(theEvent: NSEvent): Boolean; message 'autoscroll:';
+    function adjustScroll(newVisible: NSRect): NSRect; message 'adjustScroll:';
+    procedure scrollRect_by(aRect: NSRect; delta: NSSize); message 'scrollRect:by:';
+    procedure translateRectsNeedingDisplayInRect_by(clipRect: NSRect; delta: NSSize); message 'translateRectsNeedingDisplayInRect:by:';
+    function hitTest(aPoint: NSPoint): NSView; message 'hitTest:';
+    function mouse_inRect(aPoint: NSPoint; aRect: NSRect): Boolean; message 'mouse:inRect:';
+    function viewWithTag(aTag: clong): id; message 'viewWithTag:';
+    function tag: clong; message 'tag';
+    function performKeyEquivalent(theEvent: NSEvent): Boolean; message 'performKeyEquivalent:';
+    function acceptsFirstMouse(theEvent: NSEvent): Boolean; message 'acceptsFirstMouse:';
+    function shouldDelayWindowOrderingForEvent(theEvent: NSEvent): Boolean; message 'shouldDelayWindowOrderingForEvent:';
+    function needsPanelToBecomeKey: Boolean; message 'needsPanelToBecomeKey';
+    function mouseDownCanMoveWindow: Boolean; message 'mouseDownCanMoveWindow';
+    procedure addCursorRect_cursor(aRect: NSRect; anObj: NSCursor); message 'addCursorRect:cursor:';
+    procedure removeCursorRect_cursor(aRect: NSRect; anObj: NSCursor); message 'removeCursorRect:cursor:';
+    procedure discardCursorRects; message 'discardCursorRects';
+    procedure resetCursorRects; message 'resetCursorRects';
+    function addTrackingRect_owner_userData_assumeInside(aRect: NSRect; anObject: id; data: Pointer; flag: Boolean): NSTrackingRectTag; message 'addTrackingRect:owner:userData:assumeInside:';
+    procedure removeTrackingRect(tag_: NSTrackingRectTag); message 'removeTrackingRect:';
+    procedure setWantsLayer(flag: Boolean); message 'setWantsLayer:';
+    function wantsLayer: Boolean; message 'wantsLayer';
+    procedure setLayer(var newLayer: CALayer); message 'setLayer:';
+    function layer: CALayer; message 'layer';
+    procedure setAlphaValue(viewAlpha: CGFloat); message 'setAlphaValue:';
+    function alphaValue: CGFloat; message 'alphaValue';
+    procedure setBackgroundFilters(filters: NSArray); message 'setBackgroundFilters:';
+    function backgroundFilters: NSArray; message 'backgroundFilters';
+    procedure setCompositingFilter(var filter: CIFilter); message 'setCompositingFilter:';
+    function compositingFilter: CIFilter; message 'compositingFilter';
+    procedure setContentFilters(filters: NSArray); message 'setContentFilters:';
+    function contentFilters: NSArray; message 'contentFilters';
+    procedure setShadow(shadow_: NSShadow); message 'setShadow:';
+    function shadow: NSShadow; message 'shadow';
+    procedure addTrackingArea(trackingArea: NSTrackingArea); message 'addTrackingArea:';
+    procedure removeTrackingArea(trackingArea: NSTrackingArea); message 'removeTrackingArea:';
+    function trackingAreas: NSArray; message 'trackingAreas';
+    procedure updateTrackingAreas; message 'updateTrackingAreas';
+    function shouldDrawColor: Boolean; message 'shouldDrawColor';
+    procedure setPostsBoundsChangedNotifications(flag: Boolean); message 'setPostsBoundsChangedNotifications:';
+    function postsBoundsChangedNotifications: Boolean; message 'postsBoundsChangedNotifications';
+    function enclosingScrollView: NSScrollView; message 'enclosingScrollView';
+    function menuForEvent(event: NSEvent): NSMenu; message 'menuForEvent:';
+    class function defaultMenu: NSMenu; message 'defaultMenu';
+    procedure setToolTip(string_: NSString); message 'setToolTip:';
+    function toolTip: NSString; message 'toolTip';
+    function addToolTipRect_owner_userData(aRect: NSRect; anObject: id; data: Pointer): NSToolTipTag; message 'addToolTipRect:owner:userData:';
+    procedure removeToolTip(tag_: NSToolTipTag); message 'removeToolTip:';
+    procedure removeAllToolTips; message 'removeAllToolTips';
+    procedure viewWillStartLiveResize; message 'viewWillStartLiveResize';
+    procedure viewDidEndLiveResize; message 'viewDidEndLiveResize';
+    function inLiveResize: Boolean; message 'inLiveResize';
+    function preservesContentDuringLiveResize: Boolean; message 'preservesContentDuringLiveResize';
+    function rectPreservedDuringLiveResize: NSRect; message 'rectPreservedDuringLiveResize';
+    procedure getRectsExposedDuringLiveResize_count(exposedRects: NSRect; var count: clong); message 'getRectsExposedDuringLiveResize:count:';
+
+    { Category: NSKeyboardUI }
+    function performMnemonic(theString: NSString): Boolean; message 'performMnemonic:';
+    procedure setNextKeyView(next: NSView); message 'setNextKeyView:';
+    function nextKeyView: NSView; message 'nextKeyView';
+    function previousKeyView: NSView; message 'previousKeyView';
+    function nextValidKeyView: NSView; message 'nextValidKeyView';
+    function previousValidKeyView: NSView; message 'previousValidKeyView';
+    function canBecomeKeyView: Boolean; message 'canBecomeKeyView';
+    procedure setKeyboardFocusRingNeedsDisplayInRect(rect: NSRect); message 'setKeyboardFocusRingNeedsDisplayInRect:';
+    procedure setFocusRingType(focusRingType_: NSFocusRingType); message 'setFocusRingType:';
+    function focusRingType: NSFocusRingType; message 'focusRingType';
+    class function defaultFocusRingType: NSFocusRingType; message 'defaultFocusRingType';
+
+    { Category: NSPrinting }
+    procedure writeEPSInsideRect_toPasteboard(rect: NSRect; pasteboard: NSPasteboard); message 'writeEPSInsideRect:toPasteboard:';
+    function dataWithEPSInsideRect(rect: NSRect): NSData; message 'dataWithEPSInsideRect:';
+    procedure writePDFInsideRect_toPasteboard(rect: NSRect; pasteboard: NSPasteboard); message 'writePDFInsideRect:toPasteboard:';
+    function dataWithPDFInsideRect(rect: NSRect): NSData; message 'dataWithPDFInsideRect:';
+    procedure print(sender: id); message 'print:';
+    function knowsPageRange(range: NSRangePointer): Boolean; message 'knowsPageRange:';
+    function heightAdjustLimit: CGFloat; message 'heightAdjustLimit';
+    function widthAdjustLimit: CGFloat; message 'widthAdjustLimit';
+    procedure adjustPageWidthNew_left_right_limit(var newRight: CGFloat; oldLeft: CGFloat; oldRight: CGFloat; rightLimit: CGFloat); message 'adjustPageWidthNew:left:right:limit:';
+    procedure adjustPageHeightNew_top_bottom_limit(var newBottom: CGFloat; oldTop: CGFloat; oldBottom: CGFloat; bottomLimit: CGFloat); message 'adjustPageHeightNew:top:bottom:limit:';
+    function rectForPage(page: clong): NSRect; message 'rectForPage:';
+    function locationOfPrintRect(aRect: NSRect): NSPoint; message 'locationOfPrintRect:';
+    procedure drawPageBorderWithSize(borderSize: NSSize); message 'drawPageBorderWithSize:';
+    function pageHeader: NSAttributedString; message 'pageHeader';
+    function pageFooter: NSAttributedString; message 'pageFooter';
+    procedure drawSheetBorderWithSize(borderSize: NSSize); message 'drawSheetBorderWithSize:';
+    function printJobTitle: NSString; message 'printJobTitle';
+    procedure beginDocument; message 'beginDocument';
+    procedure endDocument; message 'endDocument';
+    procedure beginPageInRect_atPlacement(aRect: NSRect; location: NSPoint); message 'beginPageInRect:atPlacement:';
+    procedure endPage; message 'endPage';
+
+    { Category: NSDrag }
+    procedure dragImage_at_offset_event_pasteboard_source_slideBack(anImage: NSImage; viewLocation: NSPoint; initialOffset: NSSize; event: NSEvent; pboard: NSPasteboard; sourceObj: id; slideFlag: Boolean); message 'dragImage:at:offset:event:pasteboard:source:slideBack:';
+    function registeredDraggedTypes: NSArray; message 'registeredDraggedTypes';
+    procedure registerForDraggedTypes(newTypes: NSArray); message 'registerForDraggedTypes:';
+    procedure unregisterDraggedTypes; message 'unregisterDraggedTypes';
+    function dragFile_fromRect_slideBack_event(filename: NSString; rect: NSRect; aFlag: Boolean; event: NSEvent): Boolean; message 'dragFile:fromRect:slideBack:event:';
+    function dragPromisedFilesOfTypes_fromRect_source_slideBack_event(typeArray: NSArray; rect: NSRect; sourceObject: id; aFlag: Boolean; event: NSEvent): Boolean; message 'dragPromisedFilesOfTypes:fromRect:source:slideBack:event:';
+
+    { Category: NSFullScreenMode }
+    function enterFullScreenMode_withOptions(screen: NSScreen; options: NSDictionary): Boolean; message 'enterFullScreenMode:withOptions:';
+    procedure exitFullScreenModeWithOptions(options: NSDictionary); message 'exitFullScreenModeWithOptions:';
+    function isInFullScreenMode: Boolean; message 'isInFullScreenMode';
+
+    { Category: NSClipViewSuperview }
+    procedure reflectScrolledClipView(aClipView: NSClipView); message 'reflectScrolledClipView:';
+    procedure scrollClipView_toPoint(aClipView: NSClipView; aPoint: NSPoint); message 'scrollClipView:toPoint:';
+
+    { Category: NSRulerMarkerClientViewDelegation }
+    function rulerView_shouldMoveMarker(ruler: NSRulerView; marker: NSRulerMarker): Boolean; message 'rulerView:shouldMoveMarker:';
+    function rulerView_willMoveMarker_toLocation(ruler: NSRulerView; marker: NSRulerMarker; location: CGFloat): CGFloat; message 'rulerView:willMoveMarker:toLocation:';
+    procedure rulerView_didMoveMarker(ruler: NSRulerView; marker: NSRulerMarker); message 'rulerView:didMoveMarker:';
+    function rulerView_shouldRemoveMarker(ruler: NSRulerView; marker: NSRulerMarker): Boolean; message 'rulerView:shouldRemoveMarker:';
+    procedure rulerView_didRemoveMarker(ruler: NSRulerView; marker: NSRulerMarker); message 'rulerView:didRemoveMarker:';
+    function rulerView_shouldAddMarker(ruler: NSRulerView; marker: NSRulerMarker): Boolean; message 'rulerView:shouldAddMarker:';
+    function rulerView_willAddMarker_atLocation(ruler: NSRulerView; marker: NSRulerMarker; location: CGFloat): CGFloat; message 'rulerView:willAddMarker:atLocation:';
+    procedure rulerView_didAddMarker(ruler: NSRulerView; marker: NSRulerMarker); message 'rulerView:didAddMarker:';
+    procedure rulerView_handleMouseDown(ruler: NSRulerView; event: NSEvent); message 'rulerView:handleMouseDown:';
+    procedure rulerView_willSetClientView(ruler: NSRulerView; newClient: NSView); message 'rulerView:willSetClientView:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSViewController.inc b/packages/cocoaint/src/appkit/NSViewController.inc
new file mode 100644
index 0000000000..f7795a13f8
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSViewController.inc
@@ -0,0 +1,82 @@
+{ Parsed from Appkit.framework NSViewController.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSVIEWCONTROLLER_PAS_H}
+{$define NSVIEWCONTROLLER_PAS_H}
+type
+  NSViewControllerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSVIEWCONTROLLER_PAS_T}
+{$define NSVIEWCONTROLLER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSVIEWCONTROLLER_PAS_R}
+{$define NSVIEWCONTROLLER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSVIEWCONTROLLER_PAS_F}
+{$define NSVIEWCONTROLLER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSVIEWCONTROLLER_PAS_T}
+{$define NSVIEWCONTROLLER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSViewController = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSVIEWCONTROLLER_PAS_C}
+{$define NSVIEWCONTROLLER_PAS_C}
+
+{ NSViewController }
+  NSViewController = objcclass(NSResponder)
+  private
+    __nibName: NSString;
+    __nibBundle: NSBundle;
+    __representedObject: id;
+    __title: NSString;
+    _view: NSView;
+    __topLevelObjects: NSArray;
+    __editors: NSPointerArray;
+    __autounbinder: id;
+    __reserved: id;
+    
+  public
+    class function alloc: NSViewController; message 'alloc';
+
+    function initWithNibName_bundle(nibNameOrNil: NSString; nibBundleOrNil: NSBundle): id; message 'initWithNibName:bundle:';
+    procedure setRepresentedObject(representedObject_: id); message 'setRepresentedObject:';
+    function representedObject: id; message 'representedObject';
+    procedure setTitle(title_: NSString); message 'setTitle:';
+    function title: NSString; message 'title';
+    function view: NSView; message 'view';
+    procedure loadView; message 'loadView';
+    function nibName: NSString; message 'nibName';
+    function nibBundle: NSBundle; message 'nibBundle';
+    procedure setView(view_: NSView); message 'setView:';
+    procedure commitEditingWithDelegate_didCommitSelector_contextInfo(delegate: id; didCommitSelector: SEL; contextInfo: Pointer); message 'commitEditingWithDelegate:didCommitSelector:contextInfo:';
+    function commitEditing: Boolean; message 'commitEditing';
+    procedure discardEditing; message 'discardEditing';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSWindow.inc b/packages/cocoaint/src/appkit/NSWindow.inc
new file mode 100644
index 0000000000..fbc31ec02d
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSWindow.inc
@@ -0,0 +1,477 @@
+{ Parsed from Appkit.framework NSWindow.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSWINDOW_PAS_H}
+{$define NSWINDOW_PAS_H}
+type
+  NSWindowPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSWINDOW_PAS_T}
+{$define NSWINDOW_PAS_T}
+
+{ Defines }
+const
+  NSAppKitVersionNumberWithCustomSheetPosition = 686.0;
+
+{ Constants }
+
+const
+  NSBorderlessWindowMask = 0;
+  NSTitledWindowMask = 1  shl  0;
+  NSClosableWindowMask = 1  shl  1;
+  NSMiniaturizableWindowMask = 1  shl  2;
+  NSResizableWindowMask = 1  shl  3;
+
+const
+  NSTexturedBackgroundWindowMask = 1  shl  8;
+
+const
+  NSUnscaledWindowMask = 1  shl  11;
+
+const
+  NSUnifiedTitleAndToolbarWindowMask = 1  shl  12;
+
+const
+  NSDisplayWindowRunLoopOrdering = 600000;
+  NSResetCursorRectsRunLoopOrdering = 700000;
+
+const
+  NSWindowCollectionBehaviorDefault = 0;
+  NSWindowCollectionBehaviorCanJoinAllSpaces = 1  shl  0;
+  NSWindowCollectionBehaviorMoveToActiveSpace = 1  shl  1;
+
+const
+  NSDirectSelection = 0;
+  NSSelectingNext = 0;
+  NSSelectingPrevious = 1;
+
+const
+  NSWindowCloseButton = 0;
+  NSWindowMiniaturizeButton = 1;
+  NSWindowZoomButton = 2;
+  NSWindowToolbarButton = 3;
+  NSWindowDocumentIconButton = 4;
+
+{ Types }
+type
+  NSWindowSharingType = culong;
+  NSWindowBackingLocation = culong;
+  NSWindowCollectionBehavior = culong;
+  NSSelectionDirection = culong;
+  NSWindowButton = culong;
+
+{ CFString constants }
+var
+  NSWindowDidBecomeKeyNotification: CFStringRef; external name '_NSWindowDidBecomeKeyNotification';
+  NSWindowDidBecomeMainNotification: CFStringRef; external name '_NSWindowDidBecomeMainNotification';
+  NSWindowDidChangeScreenNotification: CFStringRef; external name '_NSWindowDidChangeScreenNotification';
+  NSWindowDidDeminiaturizeNotification: CFStringRef; external name '_NSWindowDidDeminiaturizeNotification';
+  NSWindowDidExposeNotification: CFStringRef; external name '_NSWindowDidExposeNotification';
+  NSWindowDidMiniaturizeNotification: CFStringRef; external name '_NSWindowDidMiniaturizeNotification';
+  NSWindowDidMoveNotification: CFStringRef; external name '_NSWindowDidMoveNotification';
+  NSWindowDidResignKeyNotification: CFStringRef; external name '_NSWindowDidResignKeyNotification';
+  NSWindowDidResignMainNotification: CFStringRef; external name '_NSWindowDidResignMainNotification';
+  NSWindowDidResizeNotification: CFStringRef; external name '_NSWindowDidResizeNotification';
+  NSWindowDidUpdateNotification: CFStringRef; external name '_NSWindowDidUpdateNotification';
+  NSWindowWillCloseNotification: CFStringRef; external name '_NSWindowWillCloseNotification';
+  NSWindowWillMiniaturizeNotification: CFStringRef; external name '_NSWindowWillMiniaturizeNotification';
+  NSWindowWillMoveNotification: CFStringRef; external name '_NSWindowWillMoveNotification';
+  NSWindowWillBeginSheetNotification: CFStringRef; external name '_NSWindowWillBeginSheetNotification';
+  NSWindowDidEndSheetNotification: CFStringRef; external name '_NSWindowDidEndSheetNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSWINDOW_PAS_R}
+{$define NSWINDOW_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSWINDOW_PAS_F}
+{$define NSWINDOW_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSWINDOW_PAS_T}
+{$define NSWINDOW_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSWindow = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSWINDOW_PAS_C}
+{$define NSWINDOW_PAS_C}
+
+{ NSWindow }
+  NSWindow = objcclass(NSResponder)
+  private
+    __frame: NSRect;
+    __contentView: id;
+    __delegate: id;
+    __firstResponder: NSResponder;
+    __lastLeftHit: NSView;
+    __lastRightHit: NSView;
+    __counterpart: id;
+    __fieldEditor: id;
+    __winEventMask: cint;
+    __windowNum: clong;
+    __level: cint;
+    __backgroundColor: NSColor;
+    __borderView: id;
+    __postingDisabled: char;
+    __styleMask: char;
+    __flushDisabled: char;
+    __reservedWindow1: char;
+    __cursorRects: Pointer;
+    __trectTable: Pointer;
+    __miniIcon: NSImage;
+    __unused: cint;
+    __dragTypes: NSMutableSet;
+    __representedURL: NSURL;
+    __sizeLimits: NSSize;
+    __frameSaveName: NSString;
+    __regDragTypes: NSSet;
+    __wFlags: bitpacked record
+        backing: 0..((1 shl 2)-1);
+        visible: 0..1;
+        isMainWindow: 0..1;
+        isKeyWindow: 0..1;
+        hidesOnDeactivate: 0..1;
+        dontFreeWhenClosed: 0..1;
+        oneShot: 0..1;
+        deferred: 0..1;
+        cursorRectsDisabled: 0..1;
+        haveFreeCursorRects: 0..1;
+        validCursorRects: 0..1;
+        docEdited: 0..1;
+        dynamicDepthLimit: 0..1;
+        worksWhenModal: 0..1;
+        limitedBecomeKey: 0..1;
+        needsFlush: 0..1;
+        viewsNeedDisplay: 0..1;
+        ignoredFirstMouse: 0..1;
+        repostedFirstMouse: 0..1;
+        windowDying: 0..1;
+        tempHidden: 0..1;
+        floatingPanel: 0..1;
+        wantsToBeOnMainScreen: 0..1;
+        optimizedDrawingOk: 0..1;
+        optimizeDrawing: 0..1;
+        titleIsRepresentedFilename: 0..1;
+        excludedFromWindowsMenu: 0..1;
+        depthLimit: 0..((1 shl 4)-1);
+        delegateReturnsValidRequestor: 0..1;
+        lmouseupPending: 0..1;
+        rmouseupPending: 0..1;
+        wantsToDestroyRealWindow: 0..1;
+        wantsToRegDragTypes: 0..1;
+        sentInvalidateCursorRectsMsg: 0..1;
+        avoidsActivation: 0..1;
+        frameSavedUsingTitle: 0..1;
+        didRegDragTypes: 0..1;
+        delayedOneShot: 0..1;
+        postedNeedsDisplayNote: 0..1;
+        postedInvalidCursorRectsNote: 0..1;
+        initialFirstResponderTempSet: 0..1;
+        autodisplay: 0..1;
+        tossedFirstEvent: 0..1;
+        isImageCache: 0..1;
+        interfaceStyle: 0..((1 shl 3)-1);
+        keyViewSelectionDirection: 0..((1 shl 2)-1);
+        defaultButtonCellKETemporarilyDisabled: 0..1;
+        defaultButtonCellKEDisabled: 0..1;
+        menuHasBeenSet: 0..1;
+        wantsToBeModal: 0..1;
+        showingModalFrame: 0..1;
+        isTerminating: 0..1;
+        win32MouseActivationInProgress: 0..1;
+        makingFirstResponderForMouseDown: 0..1;
+        needsZoom: 0..1;
+        sentWindowNeedsDisplayMsg: 0..1;
+        liveResizeActive: 0..1;
+      end;
+    __defaultButtonCell: id;
+    __initialFirstResponder: NSView;
+    __auxiliaryStorage: NSWindowAuxiliary;
+    
+  public
+    class function alloc: NSWindow; message 'alloc';
+
+    class function frameRectForContentRect_styleMask(cRect: NSRect; aStyle: culong): NSRect; message 'frameRectForContentRect:styleMask:';
+    class function contentRectForFrameRect_styleMask(fRect: NSRect; aStyle: culong): NSRect; message 'contentRectForFrameRect:styleMask:';
+    class function minFrameWidthWithTitle_styleMask(aTitle: NSString; aStyle: culong): CGFloat; message 'minFrameWidthWithTitle:styleMask:';
+    class function defaultDepthLimit: NSWindowDepth; message 'defaultDepthLimit';
+    function frameRectForContentRect(contentRect: NSRect): NSRect; message 'frameRectForContentRect:';
+    function contentRectForFrameRect(frameRect: NSRect): NSRect; message 'contentRectForFrameRect:';
+    function initWithContentRect_styleMask_backing_defer(contentRect: NSRect; aStyle: culong; bufferingType: NSBackingStoreType; flag: Boolean): id; message 'initWithContentRect:styleMask:backing:defer:';
+    function initWithContentRect_styleMask_backing_defer_screen(contentRect: NSRect; aStyle: culong; bufferingType: NSBackingStoreType; flag: Boolean; screen_: NSScreen): id; message 'initWithContentRect:styleMask:backing:defer:screen:';
+    function title: NSString; message 'title';
+    procedure setTitle(aString: NSString); message 'setTitle:';
+    procedure setRepresentedURL(url: NSURL); message 'setRepresentedURL:';
+    function representedURL: NSURL; message 'representedURL';
+    function representedFilename: NSString; message 'representedFilename';
+    procedure setRepresentedFilename(aString: NSString); message 'setRepresentedFilename:';
+    procedure setTitleWithRepresentedFilename(filename: NSString); message 'setTitleWithRepresentedFilename:';
+    procedure setExcludedFromWindowsMenu(flag: Boolean); message 'setExcludedFromWindowsMenu:';
+    function isExcludedFromWindowsMenu: Boolean; message 'isExcludedFromWindowsMenu';
+    procedure setContentView(aView: NSView); message 'setContentView:';
+    function contentView: id; message 'contentView';
+    procedure setDelegate(anObject: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
+    function windowNumber: clong; message 'windowNumber';
+    function styleMask: culong; message 'styleMask';
+    function fieldEditor_forObject(createFlag: Boolean; anObject: id): NSText; message 'fieldEditor:forObject:';
+    procedure endEditingFor(anObject: id); message 'endEditingFor:';
+    function constrainFrameRect_toScreen(frameRect: NSRect; screen_: NSScreen): NSRect; message 'constrainFrameRect:toScreen:';
+    procedure setFrame_display(frameRect: NSRect; flag: Boolean); message 'setFrame:display:';
+    procedure setContentSize(aSize: NSSize); message 'setContentSize:';
+    procedure setFrameOrigin(aPoint: NSPoint); message 'setFrameOrigin:';
+    procedure setFrameTopLeftPoint(aPoint: NSPoint); message 'setFrameTopLeftPoint:';
+    function cascadeTopLeftFromPoint(topLeftPoint: NSPoint): NSPoint; message 'cascadeTopLeftFromPoint:';
+    function frame: NSRect; message 'frame';
+    function animationResizeTime(newFrame: NSRect): NSTimeInterval; message 'animationResizeTime:';
+    procedure setFrame_display_animate(frameRect: NSRect; displayFlag: Boolean; animateFlag: Boolean); message 'setFrame:display:animate:';
+    procedure setShowsResizeIndicator(show: Boolean); message 'setShowsResizeIndicator:';
+    function showsResizeIndicator: Boolean; message 'showsResizeIndicator';
+    procedure setResizeIncrements(increments: NSSize); message 'setResizeIncrements:';
+    function resizeIncrements: NSSize; message 'resizeIncrements';
+    procedure setAspectRatio(ratio: NSSize); message 'setAspectRatio:';
+    function aspectRatio: NSSize; message 'aspectRatio';
+    procedure setContentResizeIncrements(increments: NSSize); message 'setContentResizeIncrements:';
+    function contentResizeIncrements: NSSize; message 'contentResizeIncrements';
+    procedure setContentAspectRatio(ratio: NSSize); message 'setContentAspectRatio:';
+    function contentAspectRatio: NSSize; message 'contentAspectRatio';
+    procedure useOptimizedDrawing(flag: Boolean); message 'useOptimizedDrawing:';
+    procedure disableFlushWindow; message 'disableFlushWindow';
+    procedure enableFlushWindow; message 'enableFlushWindow';
+    function isFlushWindowDisabled: Boolean; message 'isFlushWindowDisabled';
+    procedure flushWindow; message 'flushWindow';
+    procedure flushWindowIfNeeded; message 'flushWindowIfNeeded';
+    procedure setViewsNeedDisplay(flag: Boolean); message 'setViewsNeedDisplay:';
+    function viewsNeedDisplay: Boolean; message 'viewsNeedDisplay';
+    procedure displayIfNeeded; message 'displayIfNeeded';
+    procedure display; message 'display';
+    procedure setAutodisplay(flag: Boolean); message 'setAutodisplay:';
+    function isAutodisplay: Boolean; message 'isAutodisplay';
+    function preservesContentDuringLiveResize: Boolean; message 'preservesContentDuringLiveResize';
+    procedure setPreservesContentDuringLiveResize(flag: Boolean); message 'setPreservesContentDuringLiveResize:';
+    procedure update; message 'update';
+    function makeFirstResponder(aResponder: NSResponder): Boolean; message 'makeFirstResponder:';
+    function firstResponder: NSResponder; message 'firstResponder';
+    function resizeFlags: clong; message 'resizeFlags';
+    procedure keyDown(theEvent: NSEvent); message 'keyDown:';
+    procedure close; message 'close';
+    procedure setReleasedWhenClosed(flag: Boolean); message 'setReleasedWhenClosed:';
+    function isReleasedWhenClosed: Boolean; message 'isReleasedWhenClosed';
+    procedure miniaturize(sender: id); message 'miniaturize:';
+    procedure deminiaturize(sender: id); message 'deminiaturize:';
+    function isZoomed: Boolean; message 'isZoomed';
+    procedure zoom(sender: id); message 'zoom:';
+    function isMiniaturized: Boolean; message 'isMiniaturized';
+    function tryToPerform_with(anAction: SEL; anObject: id): Boolean; message 'tryToPerform:with:';
+    function validRequestorForSendType_returnType(sendType: NSString; returnType: NSString): id; message 'validRequestorForSendType:returnType:';
+    procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
+    function backgroundColor: NSColor; message 'backgroundColor';
+    procedure setContentBorderThickness_forEdge(thickness: CGFloat; edge: NSRectEdge); message 'setContentBorderThickness:forEdge:';
+    function contentBorderThicknessForEdge(edge: NSRectEdge): CGFloat; message 'contentBorderThicknessForEdge:';
+    procedure setAutorecalculatesContentBorderThickness_forEdge(flag: Boolean; edge: NSRectEdge); message 'setAutorecalculatesContentBorderThickness:forEdge:';
+    function autorecalculatesContentBorderThicknessForEdge(edge: NSRectEdge): Boolean; message 'autorecalculatesContentBorderThicknessForEdge:';
+    procedure setMovableByWindowBackground(flag: Boolean); message 'setMovableByWindowBackground:';
+    function isMovableByWindowBackground: Boolean; message 'isMovableByWindowBackground';
+    procedure setHidesOnDeactivate(flag: Boolean); message 'setHidesOnDeactivate:';
+    function hidesOnDeactivate: Boolean; message 'hidesOnDeactivate';
+    procedure setCanHide(flag: Boolean); message 'setCanHide:';
+    function canHide: Boolean; message 'canHide';
+    procedure center; message 'center';
+    procedure makeKeyAndOrderFront(sender: id); message 'makeKeyAndOrderFront:';
+    procedure orderFront(sender: id); message 'orderFront:';
+    procedure orderBack(sender: id); message 'orderBack:';
+    procedure orderOut(sender: id); message 'orderOut:';
+    procedure orderWindow_relativeTo(place: NSWindowOrderingMode; otherWin: clong); message 'orderWindow:relativeTo:';
+    procedure orderFrontRegardless; message 'orderFrontRegardless';
+    procedure setMiniwindowImage(image: NSImage); message 'setMiniwindowImage:';
+    procedure setMiniwindowTitle(title_: NSString); message 'setMiniwindowTitle:';
+    function miniwindowImage: NSImage; message 'miniwindowImage';
+    function miniwindowTitle: NSString; message 'miniwindowTitle';
+    function dockTile: NSDockTile; message 'dockTile';
+    procedure setDocumentEdited(flag: Boolean); message 'setDocumentEdited:';
+    function isDocumentEdited: Boolean; message 'isDocumentEdited';
+    function isVisible: Boolean; message 'isVisible';
+    function isKeyWindow: Boolean; message 'isKeyWindow';
+    function isMainWindow: Boolean; message 'isMainWindow';
+    function canBecomeKeyWindow: Boolean; message 'canBecomeKeyWindow';
+    function canBecomeMainWindow: Boolean; message 'canBecomeMainWindow';
+    procedure makeKeyWindow; message 'makeKeyWindow';
+    procedure makeMainWindow; message 'makeMainWindow';
+    procedure becomeKeyWindow; message 'becomeKeyWindow';
+    procedure resignKeyWindow; message 'resignKeyWindow';
+    procedure becomeMainWindow; message 'becomeMainWindow';
+    procedure resignMainWindow; message 'resignMainWindow';
+    function worksWhenModal: Boolean; message 'worksWhenModal';
+    function convertBaseToScreen(aPoint: NSPoint): NSPoint; message 'convertBaseToScreen:';
+    function convertScreenToBase(aPoint: NSPoint): NSPoint; message 'convertScreenToBase:';
+    procedure performClose(sender: id); message 'performClose:';
+    procedure performMiniaturize(sender: id); message 'performMiniaturize:';
+    procedure performZoom(sender: id); message 'performZoom:';
+    function gState: clong; message 'gState';
+    procedure setOneShot(flag: Boolean); message 'setOneShot:';
+    function isOneShot: Boolean; message 'isOneShot';
+    function dataWithEPSInsideRect(rect: NSRect): NSData; message 'dataWithEPSInsideRect:';
+    function dataWithPDFInsideRect(rect: NSRect): NSData; message 'dataWithPDFInsideRect:';
+    procedure print(sender: id); message 'print:';
+    procedure disableCursorRects; message 'disableCursorRects';
+    procedure enableCursorRects; message 'enableCursorRects';
+    procedure discardCursorRects; message 'discardCursorRects';
+    function areCursorRectsEnabled: Boolean; message 'areCursorRectsEnabled';
+    procedure invalidateCursorRectsForView(aView: NSView); message 'invalidateCursorRectsForView:';
+    procedure resetCursorRects; message 'resetCursorRects';
+    procedure setAllowsToolTipsWhenApplicationIsInactive(allowWhenInactive: Boolean); message 'setAllowsToolTipsWhenApplicationIsInactive:';
+    function allowsToolTipsWhenApplicationIsInactive: Boolean; message 'allowsToolTipsWhenApplicationIsInactive';
+    procedure setBackingType(bufferingType: NSBackingStoreType); message 'setBackingType:';
+    function backingType: NSBackingStoreType; message 'backingType';
+    procedure setLevel(newLevel: clong); message 'setLevel:';
+    function level: clong; message 'level';
+    procedure setDepthLimit(limit: NSWindowDepth); message 'setDepthLimit:';
+    function depthLimit: NSWindowDepth; message 'depthLimit';
+    procedure setDynamicDepthLimit(flag: Boolean); message 'setDynamicDepthLimit:';
+    function hasDynamicDepthLimit: Boolean; message 'hasDynamicDepthLimit';
+    function screen: NSScreen; message 'screen';
+    function deepestScreen: NSScreen; message 'deepestScreen';
+    function canStoreColor: Boolean; message 'canStoreColor';
+    procedure setHasShadow(hasShadow_: Boolean); message 'setHasShadow:';
+    function hasShadow: Boolean; message 'hasShadow';
+    procedure invalidateShadow; message 'invalidateShadow';
+    procedure setAlphaValue(windowAlpha: CGFloat); message 'setAlphaValue:';
+    function alphaValue: CGFloat; message 'alphaValue';
+    procedure setOpaque(isOpaque_: Boolean); message 'setOpaque:';
+    function isOpaque: Boolean; message 'isOpaque';
+    procedure setSharingType(type_: NSWindowSharingType); message 'setSharingType:';
+    function sharingType: NSWindowSharingType; message 'sharingType';
+    procedure setPreferredBackingLocation(backingLocation_: NSWindowBackingLocation); message 'setPreferredBackingLocation:';
+    function preferredBackingLocation: NSWindowBackingLocation; message 'preferredBackingLocation';
+    function backingLocation: NSWindowBackingLocation; message 'backingLocation';
+    function displaysWhenScreenProfileChanges: Boolean; message 'displaysWhenScreenProfileChanges';
+    procedure setDisplaysWhenScreenProfileChanges(flag: Boolean); message 'setDisplaysWhenScreenProfileChanges:';
+    procedure disableScreenUpdatesUntilFlush; message 'disableScreenUpdatesUntilFlush';
+    function canBecomeVisibleWithoutLogin: Boolean; message 'canBecomeVisibleWithoutLogin';
+    procedure setCanBecomeVisibleWithoutLogin(flag: Boolean); message 'setCanBecomeVisibleWithoutLogin:';
+    procedure setCollectionBehavior(behavior: NSWindowCollectionBehavior); message 'setCollectionBehavior:';
+    function collectionBehavior: NSWindowCollectionBehavior; message 'collectionBehavior';
+    procedure setCanBeVisibleOnAllSpaces(flag: Boolean); message 'setCanBeVisibleOnAllSpaces:';
+    function stringWithSavedFrame: NSString; message 'stringWithSavedFrame';
+    procedure setFrameFromString(string_: NSString); message 'setFrameFromString:';
+    procedure saveFrameUsingName(name: NSString); message 'saveFrameUsingName:';
+    function setFrameUsingName_force(name: NSString; force: Boolean): Boolean; message 'setFrameUsingName:force:';
+    function setFrameUsingName(name: NSString): Boolean; message 'setFrameUsingName:';
+    function setFrameAutosaveName(name: NSString): Boolean; message 'setFrameAutosaveName:';
+    function frameAutosaveName: NSString; message 'frameAutosaveName';
+    class procedure removeFrameUsingName(name: NSString); message 'removeFrameUsingName:';
+    procedure cacheImageInRect(aRect: NSRect); message 'cacheImageInRect:';
+    procedure restoreCachedImage; message 'restoreCachedImage';
+    procedure discardCachedImage; message 'discardCachedImage';
+    function minSize: NSSize; message 'minSize';
+    function maxSize: NSSize; message 'maxSize';
+    procedure setMinSize(size: NSSize); message 'setMinSize:';
+    procedure setMaxSize(size: NSSize); message 'setMaxSize:';
+    function contentMinSize: NSSize; message 'contentMinSize';
+    function contentMaxSize: NSSize; message 'contentMaxSize';
+    procedure setContentMinSize(size: NSSize); message 'setContentMinSize:';
+    procedure setContentMaxSize(size: NSSize); message 'setContentMaxSize:';
+    function nextEventMatchingMask(mask: culong): NSEvent; message 'nextEventMatchingMask:';
+    function nextEventMatchingMask_untilDate_inMode_dequeue(mask: culong; expiration: NSDate; mode: NSString; deqFlag: Boolean): NSEvent; message 'nextEventMatchingMask:untilDate:inMode:dequeue:';
+    procedure discardEventsMatchingMask_beforeEvent(mask: culong; lastEvent: NSEvent); message 'discardEventsMatchingMask:beforeEvent:';
+    procedure postEvent_atStart(event: NSEvent; flag: Boolean); message 'postEvent:atStart:';
+    function currentEvent: NSEvent; message 'currentEvent';
+    procedure setAcceptsMouseMovedEvents(flag: Boolean); message 'setAcceptsMouseMovedEvents:';
+    function acceptsMouseMovedEvents: Boolean; message 'acceptsMouseMovedEvents';
+    procedure setIgnoresMouseEvents(flag: Boolean); message 'setIgnoresMouseEvents:';
+    function ignoresMouseEvents: Boolean; message 'ignoresMouseEvents';
+    function deviceDescription: NSDictionary; message 'deviceDescription';
+    procedure sendEvent(theEvent: NSEvent); message 'sendEvent:';
+    function mouseLocationOutsideOfEventStream: NSPoint; message 'mouseLocationOutsideOfEventStream';
+    class procedure menuChanged(menu_: NSMenu); message 'menuChanged:';
+    function windowController: id; message 'windowController';
+    procedure setWindowController(windowController_: NSWindowController); message 'setWindowController:';
+    function isSheet: Boolean; message 'isSheet';
+    function attachedSheet: NSWindow; message 'attachedSheet';
+    class function standardWindowButton_forStyleMask(b: NSWindowButton; styleMask_: culong): NSButton; message 'standardWindowButton:forStyleMask:';
+    function standardWindowButton(b: NSWindowButton): NSButton; message 'standardWindowButton:';
+    procedure addChildWindow_ordered(childWin: NSWindow; place: NSWindowOrderingMode); message 'addChildWindow:ordered:';
+    procedure removeChildWindow(childWin: NSWindow); message 'removeChildWindow:';
+    function childWindows: NSArray; message 'childWindows';
+    function parentWindow: NSWindow; message 'parentWindow';
+    procedure setParentWindow(window: NSWindow); message 'setParentWindow:';
+    function graphicsContext: NSGraphicsContext; message 'graphicsContext';
+    function userSpaceScaleFactor: CGFloat; message 'userSpaceScaleFactor';
+
+    { Category: NSKeyboardUI }
+    procedure setInitialFirstResponder(view: NSView); message 'setInitialFirstResponder:';
+    function initialFirstResponder: NSView; message 'initialFirstResponder';
+    procedure selectNextKeyView(sender: id); message 'selectNextKeyView:';
+    procedure selectPreviousKeyView(sender: id); message 'selectPreviousKeyView:';
+    procedure selectKeyViewFollowingView(aView: NSView); message 'selectKeyViewFollowingView:';
+    procedure selectKeyViewPrecedingView(aView: NSView); message 'selectKeyViewPrecedingView:';
+    function keyViewSelectionDirection: NSSelectionDirection; message 'keyViewSelectionDirection';
+    procedure setDefaultButtonCell(defButt: NSButtonCell); message 'setDefaultButtonCell:';
+    function defaultButtonCell: NSButtonCell; message 'defaultButtonCell';
+    procedure disableKeyEquivalentForDefaultButtonCell; message 'disableKeyEquivalentForDefaultButtonCell';
+    procedure enableKeyEquivalentForDefaultButtonCell; message 'enableKeyEquivalentForDefaultButtonCell';
+    procedure setAutorecalculatesKeyViewLoop(flag: Boolean); message 'setAutorecalculatesKeyViewLoop:';
+    function autorecalculatesKeyViewLoop: Boolean; message 'autorecalculatesKeyViewLoop';
+    procedure recalculateKeyViewLoop; message 'recalculateKeyViewLoop';
+
+    { Category: NSToolbarSupport }
+    procedure setToolbar(toolbar_: NSToolbar); message 'setToolbar:';
+    function toolbar: NSToolbar; message 'toolbar';
+    procedure toggleToolbarShown(sender: id); message 'toggleToolbarShown:';
+    procedure runToolbarCustomizationPalette(sender: id); message 'runToolbarCustomizationPalette:';
+    procedure setShowsToolbarButton(show: Boolean); message 'setShowsToolbarButton:';
+    function showsToolbarButton: Boolean; message 'showsToolbarButton';
+
+    { Category: NSDrag }
+    procedure dragImage_at_offset_event_pasteboard_source_slideBack(anImage: NSImage; baseLocation: NSPoint; initialOffset: NSSize; event: NSEvent; pboard: NSPasteboard; sourceObj: id; slideFlag: Boolean); message 'dragImage:at:offset:event:pasteboard:source:slideBack:';
+    procedure registerForDraggedTypes(newTypes: NSArray); message 'registerForDraggedTypes:';
+    procedure unregisterDraggedTypes; message 'unregisterDraggedTypes';
+
+    { Category: NSCarbonExtensions }
+    function initWithWindowRef(windowRef: Pointer): NSWindow; message 'initWithWindowRef:';
+    function windowRef: Pointer; message 'windowRef';
+
+    { Category: Drawers }
+    function drawers: NSArray; message 'drawers';
+
+    { Category: NSScripting }
+    function hasCloseBox: Boolean; message 'hasCloseBox';
+    function hasTitleBar: Boolean; message 'hasTitleBar';
+    function isFloatingPanel: Boolean; message 'isFloatingPanel';
+    function isMiniaturizable: Boolean; message 'isMiniaturizable';
+    function isModalPanel: Boolean; message 'isModalPanel';
+    function isResizable: Boolean; message 'isResizable';
+    function isZoomable: Boolean; message 'isZoomable';
+    function orderedIndex: clong; message 'orderedIndex';
+    procedure setIsMiniaturized(flag: Boolean); message 'setIsMiniaturized:';
+    procedure setIsVisible(flag: Boolean); message 'setIsVisible:';
+    procedure setIsZoomed(flag: Boolean); message 'setIsZoomed:';
+    procedure setOrderedIndex(index: clong); message 'setOrderedIndex:';
+    function handleCloseScriptCommand(command: NSCloseCommand): id; message 'handleCloseScriptCommand:';
+    function handlePrintScriptCommand(command: NSScriptCommand): id; message 'handlePrintScriptCommand:';
+    function handleSaveScriptCommand(command: NSScriptCommand): id; message 'handleSaveScriptCommand:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSWindowController.inc b/packages/cocoaint/src/appkit/NSWindowController.inc
new file mode 100644
index 0000000000..3e4c4b359d
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSWindowController.inc
@@ -0,0 +1,100 @@
+{ Parsed from Appkit.framework NSWindowController.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSWINDOWCONTROLLER_PAS_H}
+{$define NSWINDOWCONTROLLER_PAS_H}
+type
+  NSWindowControllerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSWINDOWCONTROLLER_PAS_T}
+{$define NSWINDOWCONTROLLER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSWINDOWCONTROLLER_PAS_R}
+{$define NSWINDOWCONTROLLER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSWINDOWCONTROLLER_PAS_F}
+{$define NSWINDOWCONTROLLER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSWINDOWCONTROLLER_PAS_T}
+{$define NSWINDOWCONTROLLER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSWindowController = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSWINDOWCONTROLLER_PAS_C}
+{$define NSWINDOWCONTROLLER_PAS_C}
+
+{ NSWindowController }
+  NSWindowController = objcclass(NSResponder, NSCodingProtocol)
+  private
+    __window: NSWindow;
+    __windowNibName: NSString;
+    __document: NSDocument;
+    __topLevelObjects: NSArray;
+    __owner: id;
+    __wcFlags: bitpacked record
+        shouldCloseDocument: 0..1;
+        shouldCascade: 0..1;
+        nibIsLoaded: 0..1;
+        nibNameIsPath: 0..1;
+        RESERVED: 0..((1 shl 28)-1);
+      end;
+    __frameAutosaveName: NSString;
+    __moreVars: id;
+    
+  public
+    class function alloc: NSWindowController; message 'alloc';
+
+    function initWithWindow(window_: NSWindow): id; message 'initWithWindow:';
+    function initWithWindowNibName(windowNibName_: NSString): id; message 'initWithWindowNibName:';
+    function initWithWindowNibName_owner(windowNibName_: NSString; owner_: id): id; message 'initWithWindowNibName:owner:';
+    function initWithWindowNibPath_owner(windowNibPath_: NSString; owner_: id): id; message 'initWithWindowNibPath:owner:';
+    function windowNibName: NSString; message 'windowNibName';
+    function windowNibPath: NSString; message 'windowNibPath';
+    function owner: id; message 'owner';
+    procedure setWindowFrameAutosaveName(name: NSString); message 'setWindowFrameAutosaveName:';
+    function windowFrameAutosaveName: NSString; message 'windowFrameAutosaveName';
+    procedure setShouldCascadeWindows(flag: Boolean); message 'setShouldCascadeWindows:';
+    function shouldCascadeWindows: Boolean; message 'shouldCascadeWindows';
+    function document: id; message 'document';
+    procedure setDocument(document_: NSDocument); message 'setDocument:';
+    procedure setDocumentEdited(dirtyFlag: Boolean); message 'setDocumentEdited:';
+    procedure setShouldCloseDocument(flag: Boolean); message 'setShouldCloseDocument:';
+    function shouldCloseDocument: Boolean; message 'shouldCloseDocument';
+    procedure setWindow(window_: NSWindow); message 'setWindow:';
+    function window: NSWindow; message 'window';
+    procedure synchronizeWindowTitleWithDocumentName; message 'synchronizeWindowTitleWithDocumentName';
+    function windowTitleForDocumentDisplayName(displayName: NSString): NSString; message 'windowTitleForDocumentDisplayName:';
+    procedure close; message 'close';
+    procedure showWindow(sender: id); message 'showWindow:';
+    function isWindowLoaded: Boolean; message 'isWindowLoaded';
+    procedure windowWillLoad; message 'windowWillLoad';
+    procedure windowDidLoad; message 'windowDidLoad';
+    procedure loadWindow; message 'loadWindow';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSWindowScripting.inc b/packages/cocoaint/src/appkit/NSWindowScripting.inc
new file mode 100644
index 0000000000..8be9e43445
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSWindowScripting.inc
@@ -0,0 +1,31 @@
+{ Parsed from Appkit.framework NSWindowScripting.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:02 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSWINDOWSCRIPTING_PAS_T}
+{$define NSWINDOWSCRIPTING_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSWINDOWSCRIPTING_PAS_R}
+{$define NSWINDOWSCRIPTING_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSWINDOWSCRIPTING_PAS_F}
+{$define NSWINDOWSCRIPTING_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSWINDOWSCRIPTING_PAS_T}
+{$define NSWINDOWSCRIPTING_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/appkit/NSWorkspace.inc b/packages/cocoaint/src/appkit/NSWorkspace.inc
new file mode 100644
index 0000000000..fc508c4f27
--- /dev/null
+++ b/packages/cocoaint/src/appkit/NSWorkspace.inc
@@ -0,0 +1,153 @@
+{ Parsed from Appkit.framework NSWorkspace.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:01 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSWORKSPACE_PAS_H}
+{$define NSWORKSPACE_PAS_H}
+type
+  NSWorkspacePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSWORKSPACE_PAS_T}
+{$define NSWORKSPACE_PAS_T}
+
+{ Types }
+type
+  NSWorkspaceLaunchOptions = culong;
+  NSWorkspaceIconCreationOptions = culong;
+
+{ Constants }
+
+const
+  NSWorkspaceLaunchAndPrint = $00000002;
+  NSWorkspaceLaunchInhibitingBackgroundOnly = $00000080;
+  NSWorkspaceLaunchWithoutAddingToRecents = $00000100;
+  NSWorkspaceLaunchWithoutActivation = $00000200;
+  NSWorkspaceLaunchAsync = $00010000;
+  NSWorkspaceLaunchAllowingClassicStartup = $00020000;
+  NSWorkspaceLaunchPreferringClassic = $00040000;
+  NSWorkspaceLaunchNewInstance = $00080000;
+  NSWorkspaceLaunchAndHide = $00100000;
+  NSWorkspaceLaunchAndHideOthers = $00200000;
+
+const
+  NSExcludeQuickDrawElementsIconCreationOption = 1  shl  1;
+  NSExclude10_4ElementsIconCreationOption = 1  shl  2;
+
+{ CFString constants }
+var
+  NSWorkspaceDidLaunchApplicationNotification: CFStringRef; external name '_NSWorkspaceDidLaunchApplicationNotification';
+  NSWorkspaceDidMountNotification: CFStringRef; external name '_NSWorkspaceDidMountNotification';
+  NSWorkspaceDidPerformFileOperationNotification: CFStringRef; external name '_NSWorkspaceDidPerformFileOperationNotification';
+  NSWorkspaceDidTerminateApplicationNotification: CFStringRef; external name '_NSWorkspaceDidTerminateApplicationNotification';
+  NSWorkspaceDidUnmountNotification: CFStringRef; external name '_NSWorkspaceDidUnmountNotification';
+  NSWorkspaceWillLaunchApplicationNotification: CFStringRef; external name '_NSWorkspaceWillLaunchApplicationNotification';
+  NSWorkspaceWillPowerOffNotification: CFStringRef; external name '_NSWorkspaceWillPowerOffNotification';
+  NSWorkspaceWillUnmountNotification: CFStringRef; external name '_NSWorkspaceWillUnmountNotification';
+  NSWorkspaceMoveOperation: CFStringRef; external name '_NSWorkspaceMoveOperation';
+  NSWorkspaceCopyOperation: CFStringRef; external name '_NSWorkspaceCopyOperation';
+  NSWorkspaceLinkOperation: CFStringRef; external name '_NSWorkspaceLinkOperation';
+  NSWorkspaceCompressOperation: CFStringRef; external name '_NSWorkspaceCompressOperation';
+  NSWorkspaceDecompressOperation: CFStringRef; external name '_NSWorkspaceDecompressOperation';
+  NSWorkspaceEncryptOperation: CFStringRef; external name '_NSWorkspaceEncryptOperation';
+  NSWorkspaceDecryptOperation: CFStringRef; external name '_NSWorkspaceDecryptOperation';
+  NSWorkspaceDestroyOperation: CFStringRef; external name '_NSWorkspaceDestroyOperation';
+  NSWorkspaceRecycleOperation: CFStringRef; external name '_NSWorkspaceRecycleOperation';
+  NSWorkspaceDuplicateOperation: CFStringRef; external name '_NSWorkspaceDuplicateOperation';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSWORKSPACE_PAS_R}
+{$define NSWORKSPACE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSWORKSPACE_PAS_F}
+{$define NSWORKSPACE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSWORKSPACE_PAS_T}
+{$define NSWORKSPACE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSWorkspace = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSWORKSPACE_PAS_C}
+{$define NSWORKSPACE_PAS_C}
+
+{ NSWorkspace }
+  NSWorkspace = objcclass(NSObject)
+  private
+    _notificationCenter: NSNotificationCenter;
+    {$ifndef cpu64}
+    _deviceStatusCount: cint;
+    _applicationStatusCount: cint;
+    {$endif}
+    __reservedWorkspace1: Pointer;
+    
+  public
+    class function alloc: NSWorkspace; message 'alloc';
+
+    class function sharedWorkspace: NSWorkspace; message 'sharedWorkspace';
+    function notificationCenter: NSNotificationCenter; message 'notificationCenter';
+    function openFile(fullPath: NSString): Boolean; message 'openFile:';
+    function openFile_withApplication(fullPath: NSString; appName: NSString): Boolean; message 'openFile:withApplication:';
+    function openFile_withApplication_andDeactivate(fullPath: NSString; appName: NSString; flag: Boolean): Boolean; message 'openFile:withApplication:andDeactivate:';
+    function openTempFile(fullPath: NSString): Boolean; message 'openTempFile:';
+    function openFile_fromImage_at_inView(fullPath: NSString; anImage: NSImage; point: NSPoint; aView: NSView): Boolean; message 'openFile:fromImage:at:inView:';
+    function openURL(url: NSURL): Boolean; message 'openURL:';
+    function launchApplication(appName: NSString): Boolean; message 'launchApplication:';
+    function launchApplication_showIcon_autolaunch(appName: NSString; showIcon: Boolean; autolaunch: Boolean): Boolean; message 'launchApplication:showIcon:autolaunch:';
+    function fullPathForApplication(appName: NSString): NSString; message 'fullPathForApplication:';
+    function selectFile_inFileViewerRootedAtPath(fullPath: NSString; rootFullpath: NSString): Boolean; message 'selectFile:inFileViewerRootedAtPath:';
+    procedure findApplications; message 'findApplications';
+    procedure noteFileSystemChanged; message 'noteFileSystemChanged';
+    function fileSystemChanged: Boolean; message 'fileSystemChanged';
+    procedure noteUserDefaultsChanged; message 'noteUserDefaultsChanged';
+    function userDefaultsChanged: Boolean; message 'userDefaultsChanged';
+    function getInfoForFile_application_type(fullPath: NSString; var appName: NSString; var type_: NSString): Boolean; message 'getInfoForFile:application:type:';
+    function isFilePackageAtPath(fullPath: NSString): Boolean; message 'isFilePackageAtPath:';
+    function iconForFile(fullPath: NSString): NSImage; message 'iconForFile:';
+    function iconForFiles(fullPaths: NSArray): NSImage; message 'iconForFiles:';
+    function iconForFileType(fileType: NSString): NSImage; message 'iconForFileType:';
+    function setIcon_forFile_options(image: NSImage; fullPath: NSString; options: NSWorkspaceIconCreationOptions): Boolean; message 'setIcon:forFile:options:';
+    function getFileSystemInfoForPath_isRemovable_isWritable_isUnmountable_description_type(fullPath: NSString; var removableFlag: Boolean; var writableFlag: Boolean; var unmountableFlag: Boolean; var description_: NSString; var fileSystemType: NSString): Boolean; message 'getFileSystemInfoForPath:isRemovable:isWritable:isUnmountable:description:type:';
+    function performFileOperation_source_destination_files_tag(operation: NSString; source: NSString; destination: NSString; files: NSArray; var tag: clong): Boolean; message 'performFileOperation:source:destination:files:tag:';
+    function unmountAndEjectDeviceAtPath(path: NSString): Boolean; message 'unmountAndEjectDeviceAtPath:';
+    function extendPowerOffBy(requested: clong): clong; message 'extendPowerOffBy:';
+    procedure slideImage_from_to(image: NSImage; fromPoint: NSPoint; toPoint: NSPoint); message 'slideImage:from:to:';
+    procedure hideOtherApplications; message 'hideOtherApplications';
+    function mountedLocalVolumePaths: NSArray; message 'mountedLocalVolumePaths';
+    function mountedRemovableMedia: NSArray; message 'mountedRemovableMedia';
+    function mountNewRemovableMedia: NSArray; message 'mountNewRemovableMedia';
+    procedure checkForRemovableMedia; message 'checkForRemovableMedia';
+    function absolutePathForAppBundleWithIdentifier(bundleIdentifier: NSString): NSString; message 'absolutePathForAppBundleWithIdentifier:';
+    function launchAppWithBundleIdentifier_options_additionalEventParamDescriptor_launchIdentifier(bundleIdentifier: NSString; options: NSWorkspaceLaunchOptions; descriptor: NSAppleEventDescriptor; var identifier: NSNumber): Boolean; message 'launchAppWithBundleIdentifier:options:additionalEventParamDescriptor:launchIdentifier:';
+    function openURLs_withAppBundleIdentifier_options_additionalEventParamDescriptor_launchIdentifiers(urls: NSArray; bundleIdentifier: NSString; options: NSWorkspaceLaunchOptions; descriptor: NSAppleEventDescriptor; var identifiers: NSArray): Boolean; message 'openURLs:withAppBundleIdentifier:options:additionalEventParamDescriptor:launchIdentifiers:';
+    function launchedApplications: NSArray; message 'launchedApplications';
+    function activeApplication: NSDictionary; message 'activeApplication';
+    function typeOfFile_error(absoluteFilePath: NSString; var outError: NSError): NSString; message 'typeOfFile:error:';
+    function localizedDescriptionForType(typeName: NSString): NSString; message 'localizedDescriptionForType:';
+    function preferredFilenameExtensionForType(typeName: NSString): NSString; message 'preferredFilenameExtensionForType:';
+    function filenameExtension_isValidForType(filenameExtension: NSString; typeName: NSString): Boolean; message 'filenameExtension:isValidForType:';
+    function type_conformsToType(firstTypeName: NSString; secondTypeName: NSString): Boolean; message 'type:conformsToType:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/Foundation.inc b/packages/cocoaint/src/foundation/Foundation.inc
new file mode 100644
index 0000000000..6fda528db7
--- /dev/null
+++ b/packages/cocoaint/src/foundation/Foundation.inc
@@ -0,0 +1,122 @@
+{	Foundation.h
+	Copyright (c) 1994-2007, Apple Inc. All rights reserved.
+}
+
+{ == PasCocoa Additions == }
+{$include NSObjCRuntime.inc} 
+{$include NSAffineTransform.inc} 
+{$include NSArray.inc} 
+{$include NSAttributedString.inc} 
+{$include NSAutoreleasePool.inc} 
+{$include NSBundle.inc} 
+{$include NSCalendar.inc} 
+{$include NSCharacterSet.inc} 
+{$include NSClassDescription.inc} 
+{$include NSCoder.inc} 
+{$include NSArchiver.inc} 
+{$include NSConnection.inc} 
+{$include NSData.inc} 
+{$include NSDate.inc} 
+{$include NSCalendarDate.inc} 
+{$include NSDecimal.inc} 
+{$include NSDictionary.inc} 
+{$include NSDistributedLock.inc} 
+{$include NSEnumerator.inc} 
+{$include NSError.inc} 
+{$include NSException.inc} 
+{$include NSFileHandle.inc} 
+{$include NSFileManager.inc} 
+{$include NSFormatter.inc} 
+{$include NSDateFormatter.inc}
+{$include NSGarbageCollector.inc} 
+{$include NSSet.inc} 
+{$include NSScanner.inc} 
+{$include NSValue.inc} 
+{$include NSDecimalNumber.inc}
+{$include NSValueTransformer.inc} 
+{$include NSGeometry.inc} 
+{$include NSHashTable.inc} 
+{$include NSHFSFileTypes.inc} 
+{$include NSHost.inc} 
+{$include NSIndexPath.inc} 
+{$include NSIndexSet.inc} 
+{$include NSKeyValueCoding.inc} 
+{$include NSKeyValueObserving.inc} 
+{$include NSKeyedArchiver.inc} 
+{$include NSLocale.inc} 
+{$include NSLock.inc} 
+{$include NSMapTable.inc} 
+{$include NSMetadata.inc} 
+{$include NSMethodSignature.inc} 
+{$include NSNetServices.inc} 
+{$include NSNotification.inc} 
+{$include NSNotificationQueue.inc} 
+{$include NSDistributedNotificationCenter.inc} 
+{$include NSNull.inc} 
+{$include NSNumberFormatter.inc} 
+{$include NSOperation.inc} 
+{$include NSPointerArray.inc} 
+{--------->WHERE DID THIS GO??}{include NSPointerFunctions.inc} 
+{$include NSPort.inc} 
+{$include NSPortCoder.inc} 
+{$include NSPortMessage.inc} 
+{$include NSPortNameServer.inc} 
+{$include NSProcessInfo.inc} 
+{$include NSPropertyList.inc} 
+{$include NSProxy.inc} 
+{$include NSProtocolChecker.inc} 
+{$include NSDistantObject.inc} 
+{$include NSRange.inc} 
+{$include NSRunLoop.inc} 
+{$include NSSortDescriptor.inc} 
+{$include NSSpellServer.inc} 
+{$include NSStream.inc} 
+{$include NSString.inc} 
+{$include NSPathUtilities.inc} 
+{$include NSTask.inc} 
+{$include NSThread.inc} 
+{$include NSTimeZone.inc} 
+{$include NSTimer.inc} 
+{$include NSUndoManager.inc} 
+{$include NSURL.inc} 
+{$include NSURLHandle.inc} 
+{$include NSUserDefaults.inc} 
+{$include NSXMLNode.inc} 
+{$include NSXMLDTD.inc} 
+{$include NSXMLDTDNode.inc} 
+{$include NSXMLDocument.inc} 
+{$include NSXMLElement.inc} 
+{$include NSXMLNodeOptions.inc} 
+{$include NSXMLParser.inc} 
+{$include NSZone.inc} 
+{$include NSExpression.inc} 
+{$include NSPredicate.inc} 
+{$include NSComparisonPredicate.inc} 
+{$include NSCompoundPredicate.inc} 
+{$include NSAppleEventDescriptor.inc} 
+{$include NSAppleEventManager.inc} 
+{$include NSAppleScript.inc} 
+{$include NSObjectScripting.inc} 
+{$include NSScriptClassDescription.inc} 
+{$include NSScriptCoercionHandler.inc} 
+{$include NSScriptCommand.inc} 
+{$include NSScriptCommandDescription.inc} 
+{$include NSScriptExecutionContext.inc} 
+{$include NSScriptKeyValueCoding.inc} 
+{$include NSScriptObjectSpecifiers.inc} 
+{$include NSScriptStandardSuiteCommands.inc} 
+{$include NSScriptSuiteRegistry.inc} 
+{$include NSScriptWhoseTests.inc} 
+{$include NSURLAuthenticationChallenge.inc} 
+{$include NSURLCredential.inc} 
+{$include NSURLCredentialStorage.inc} 
+{$include NSURLProtectionSpace.inc} 
+{$include NSURLCache.inc} 
+{$include NSURLConnection.inc} 
+{$include NSURLProtocol.inc} 
+{$include NSURLRequest.inc} 
+{$include NSURLResponse.inc} 
+{$include NSHTTPCookie.inc} 
+{$include NSHTTPCookieStorage.inc} 
+{$include NSURLDownload.inc} 
+{$include NSURLError.inc} 
\ No newline at end of file
diff --git a/packages/cocoaint/src/foundation/NSAffineTransform.inc b/packages/cocoaint/src/foundation/NSAffineTransform.inc
new file mode 100644
index 0000000000..e69de29bb2
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSAffineTransform.inc
diff --git a/packages/cocoaint/src/foundation/NSAppleEventDescriptor.inc b/packages/cocoaint/src/foundation/NSAppleEventDescriptor.inc
new file mode 100644
index 0000000000..174ac206e6
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSAppleEventDescriptor.inc
@@ -0,0 +1,107 @@
+{ Parsed from Foundation.framework NSAppleEventDescriptor.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSAPPLEEVENTDESCRIPTOR_PAS_H}
+{$define NSAPPLEEVENTDESCRIPTOR_PAS_H}
+type
+  NSAppleEventDescriptorPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSAPPLEEVENTDESCRIPTOR_PAS_T}
+{$define NSAPPLEEVENTDESCRIPTOR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSAPPLEEVENTDESCRIPTOR_PAS_R}
+{$define NSAPPLEEVENTDESCRIPTOR_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSAPPLEEVENTDESCRIPTOR_PAS_F}
+{$define NSAPPLEEVENTDESCRIPTOR_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSAPPLEEVENTDESCRIPTOR_PAS_T}
+{$define NSAPPLEEVENTDESCRIPTOR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSAppleEventDescriptor = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSAPPLEEVENTDESCRIPTOR_PAS_C}
+{$define NSAPPLEEVENTDESCRIPTOR_PAS_C}
+
+{ NSAppleEventDescriptor }
+  NSAppleEventDescriptor = objcclass(NSObject, NSCopyingProtocol)
+  private
+    __desc: AEDesc;
+    __hasValidDesc: Boolean;
+    __padding: char;
+    
+  public
+    class function alloc: NSAppleEventDescriptor; message 'alloc';
+
+    class function nullDescriptor: NSAppleEventDescriptor; message 'nullDescriptor';
+    class function descriptorWithDescriptorType_bytes_length(descriptorType_: DescType; bytes: Pointer; byteCount: culong): NSAppleEventDescriptor; message 'descriptorWithDescriptorType:bytes:length:';
+    class function descriptorWithDescriptorType_data(descriptorType_: DescType; data_: NSData): NSAppleEventDescriptor; message 'descriptorWithDescriptorType:data:';
+    class function descriptorWithBoolean(boolean: Boolean): NSAppleEventDescriptor; message 'descriptorWithBoolean:';
+    class function descriptorWithEnumCode(enumerator: OSType): NSAppleEventDescriptor; message 'descriptorWithEnumCode:';
+    class function descriptorWithInt32(signedInt: SInt32): NSAppleEventDescriptor; message 'descriptorWithInt32:';
+    class function descriptorWithTypeCode(typeCode: OSType): NSAppleEventDescriptor; message 'descriptorWithTypeCode:';
+    class function descriptorWithString(string_: NSString): NSAppleEventDescriptor; message 'descriptorWithString:';
+    class function appleEventWithEventClass_eventID_targetDescriptor_returnID_transactionID(eventClass_: AEEventClass; eventID_: AEEventID; targetDescriptor: NSAppleEventDescriptor; returnID_: AEReturnID; transactionID_: AETransactionID): NSAppleEventDescriptor; message 'appleEventWithEventClass:eventID:targetDescriptor:returnID:transactionID:';
+    class function listDescriptor: NSAppleEventDescriptor; message 'listDescriptor';
+    class function recordDescriptor: NSAppleEventDescriptor; message 'recordDescriptor';
+    function initWithAEDescNoCopy(var aeDesc_: aeDesc_): id; message 'initWithAEDescNoCopy:';
+    function initWithDescriptorType_bytes_length(descriptorType_: DescType; bytes: Pointer; byteCount: culong): id; message 'initWithDescriptorType:bytes:length:';
+    function initWithDescriptorType_data(descriptorType_: DescType; data_: NSData): id; message 'initWithDescriptorType:data:';
+    function initWithEventClass_eventID_targetDescriptor_returnID_transactionID(eventClass_: AEEventClass; eventID_: AEEventID; targetDescriptor: NSAppleEventDescriptor; returnID_: AEReturnID; transactionID_: AETransactionID): id; message 'initWithEventClass:eventID:targetDescriptor:returnID:transactionID:';
+    function initListDescriptor: id; message 'initListDescriptor';
+    function initRecordDescriptor: id; message 'initRecordDescriptor';
+    function aeDesc: aeDesc_; message 'aeDesc';
+    function descriptorType: DescType; message 'descriptorType';
+    function data: NSData; message 'data';
+    function booleanValue: Boolean; message 'booleanValue';
+    function enumCodeValue: OSType; message 'enumCodeValue';
+    function int32Value: SInt32; message 'int32Value';
+    function typeCodeValue: OSType; message 'typeCodeValue';
+    function stringValue: NSString; message 'stringValue';
+    function eventClass: AEEventClass; message 'eventClass';
+    function eventID: AEEventID; message 'eventID';
+    function returnID: AEReturnID; message 'returnID';
+    function transactionID: AETransactionID; message 'transactionID';
+    procedure setParamDescriptor_forKeyword(descriptor: NSAppleEventDescriptor; keyword: AEKeyword); message 'setParamDescriptor:forKeyword:';
+    function paramDescriptorForKeyword(keyword: AEKeyword): NSAppleEventDescriptor; message 'paramDescriptorForKeyword:';
+    procedure removeParamDescriptorWithKeyword(keyword: AEKeyword); message 'removeParamDescriptorWithKeyword:';
+    procedure setAttributeDescriptor_forKeyword(descriptor: NSAppleEventDescriptor; keyword: AEKeyword); message 'setAttributeDescriptor:forKeyword:';
+    function attributeDescriptorForKeyword(keyword: AEKeyword): NSAppleEventDescriptor; message 'attributeDescriptorForKeyword:';
+    function numberOfItems: clong; message 'numberOfItems';
+    procedure insertDescriptor_atIndex(descriptor: NSAppleEventDescriptor; index: clong); message 'insertDescriptor:atIndex:';
+    function descriptorAtIndex(index: clong): NSAppleEventDescriptor; message 'descriptorAtIndex:';
+    procedure removeDescriptorAtIndex(index: clong); message 'removeDescriptorAtIndex:';
+    procedure removeDecriptorAtIndex(index: clong); message 'removeDecriptorAtIndex:';
+    procedure setDescriptor_forKeyword(descriptor: NSAppleEventDescriptor; keyword: AEKeyword); message 'setDescriptor:forKeyword:';
+    function descriptorForKeyword(keyword: AEKeyword): NSAppleEventDescriptor; message 'descriptorForKeyword:';
+    procedure removeDescriptorWithKeyword(keyword: AEKeyword); message 'removeDescriptorWithKeyword:';
+    function keywordForDescriptorAtIndex(index: clong): AEKeyword; message 'keywordForDescriptorAtIndex:';
+    function coerceToDescriptorType(descriptorType_: DescType): NSAppleEventDescriptor; message 'coerceToDescriptorType:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSAppleEventManager.inc b/packages/cocoaint/src/foundation/NSAppleEventManager.inc
new file mode 100644
index 0000000000..1afba2f86f
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSAppleEventManager.inc
@@ -0,0 +1,77 @@
+{ Parsed from Foundation.framework NSAppleEventManager.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSAPPLEEVENTMANAGER_PAS_H}
+{$define NSAPPLEEVENTMANAGER_PAS_H}
+type
+  NSAppleEventManagerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSAPPLEEVENTMANAGER_PAS_T}
+{$define NSAPPLEEVENTMANAGER_PAS_T}
+
+{ Types }
+type
+  NSAppleEventManagerSuspensionID = __NSAppleEventManagerSuspension;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSAPPLEEVENTMANAGER_PAS_R}
+{$define NSAPPLEEVENTMANAGER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSAPPLEEVENTMANAGER_PAS_F}
+{$define NSAPPLEEVENTMANAGER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSAPPLEEVENTMANAGER_PAS_T}
+{$define NSAPPLEEVENTMANAGER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSAppleEventManager = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSAPPLEEVENTMANAGER_PAS_C}
+{$define NSAPPLEEVENTMANAGER_PAS_C}
+
+{ NSAppleEventManager }
+  NSAppleEventManager = objcclass(NSObject)
+  private
+    __isPreparedForDispatch: Boolean;
+    __padding: char;
+    
+  public
+    class function alloc: NSAppleEventManager; message 'alloc';
+
+    class function sharedAppleEventManager: NSAppleEventManager; message 'sharedAppleEventManager';
+    procedure setEventHandler_andSelector_forEventClass_andEventID(handler: id; handleEventSelector: SEL; eventClass: AEEventClass; eventID: AEEventID); message 'setEventHandler:andSelector:forEventClass:andEventID:';
+    procedure removeEventHandlerForEventClass_andEventID(eventClass: AEEventClass; eventID: AEEventID); message 'removeEventHandlerForEventClass:andEventID:';
+    function dispatchRawAppleEvent_withRawReply_handlerRefCon(var theAppleEvent: AppleEvent; var theReply: AppleEvent; handlerRefCon: SRefCon): OSErr; message 'dispatchRawAppleEvent:withRawReply:handlerRefCon:';
+    function currentAppleEvent: NSAppleEventDescriptor; message 'currentAppleEvent';
+    function currentReplyAppleEvent: NSAppleEventDescriptor; message 'currentReplyAppleEvent';
+    function suspendCurrentAppleEvent: NSAppleEventManagerSuspensionID; message 'suspendCurrentAppleEvent';
+    function appleEventForSuspensionID(suspensionID: NSAppleEventManagerSuspensionID): NSAppleEventDescriptor; message 'appleEventForSuspensionID:';
+    function replyAppleEventForSuspensionID(suspensionID: NSAppleEventManagerSuspensionID): NSAppleEventDescriptor; message 'replyAppleEventForSuspensionID:';
+    procedure setCurrentAppleEventAndReplyEventWithSuspensionID(suspensionID: NSAppleEventManagerSuspensionID); message 'setCurrentAppleEventAndReplyEventWithSuspensionID:';
+    procedure resumeWithSuspensionID(suspensionID: NSAppleEventManagerSuspensionID); message 'resumeWithSuspensionID:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSAppleScript.inc b/packages/cocoaint/src/foundation/NSAppleScript.inc
new file mode 100644
index 0000000000..d17f8b9320
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSAppleScript.inc
@@ -0,0 +1,74 @@
+{ Parsed from Foundation.framework NSAppleScript.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSAPPLESCRIPT_PAS_H}
+{$define NSAPPLESCRIPT_PAS_H}
+type
+  NSAppleScriptPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSAPPLESCRIPT_PAS_T}
+{$define NSAPPLESCRIPT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSAPPLESCRIPT_PAS_R}
+{$define NSAPPLESCRIPT_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSAPPLESCRIPT_PAS_F}
+{$define NSAPPLESCRIPT_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSAPPLESCRIPT_PAS_T}
+{$define NSAPPLESCRIPT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSAppleScript = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSAPPLESCRIPT_PAS_C}
+{$define NSAPPLESCRIPT_PAS_C}
+
+{ NSAppleScript }
+  NSAppleScript = objcclass(NSObject, NSCopyingProtocol)
+  private
+    __source: NSString;
+    __compiledScriptID: cuint;
+    __reserved1: Pointer;
+    __reserved2: Pointer;
+    
+  public
+    class function alloc: NSAppleScript; message 'alloc';
+
+    function initWithContentsOfURL_error(url: NSURL; var errorInfo: NSDictionary): id; message 'initWithContentsOfURL:error:';
+    function initWithSource(source_: NSString): id; message 'initWithSource:';
+    function source: NSString; message 'source';
+    function isCompiled: Boolean; message 'isCompiled';
+    function compileAndReturnError(var errorInfo: NSDictionary): Boolean; message 'compileAndReturnError:';
+    function executeAndReturnError(var errorInfo: NSDictionary): NSAppleEventDescriptor; message 'executeAndReturnError:';
+    function executeAppleEvent_error(event: NSAppleEventDescriptor; var errorInfo: NSDictionary): NSAppleEventDescriptor; message 'executeAppleEvent:error:';
+
+    { Category: NSExtensions }
+    function richTextSource: NSAttributedString; message 'richTextSource';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSArchiver.inc b/packages/cocoaint/src/foundation/NSArchiver.inc
new file mode 100644
index 0000000000..58f62cc3e0
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSArchiver.inc
@@ -0,0 +1,116 @@
+{ Parsed from Foundation.framework NSArchiver.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSARCHIVER_PAS_H}
+{$define NSARCHIVER_PAS_H}
+type
+  NSArchiverPointer = Pointer;
+  NSUnarchiverPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSARCHIVER_PAS_T}
+{$define NSARCHIVER_PAS_T}
+
+{ CFString constants }
+var
+  NSInconsistentArchiveException: CFStringRef; external name '_NSInconsistentArchiveException';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSARCHIVER_PAS_R}
+{$define NSARCHIVER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSARCHIVER_PAS_F}
+{$define NSARCHIVER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSARCHIVER_PAS_T}
+{$define NSARCHIVER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSArchiver = objcclass;
+  NSUnarchiver = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSARCHIVER_PAS_C}
+{$define NSARCHIVER_PAS_C}
+
+{ NSArchiver }
+  NSArchiver = objcclass(NSCoder)
+  private
+    _mdata: Pointer; {garbage collector: __strong }
+    _pointerTable: Pointer;
+    _stringTable: Pointer;
+    _ids: Pointer;
+    _map: Pointer;
+    _replacementTable: Pointer;
+    _reserved: Pointer;
+    
+  public
+    class function alloc: NSArchiver; message 'alloc';
+
+    function initForWritingWithMutableData(mdata: NSMutableData): id; message 'initForWritingWithMutableData:';
+    function archiverData: NSMutableData; message 'archiverData';
+    procedure encodeRootObject(rootObject: id); message 'encodeRootObject:';
+    procedure encodeConditionalObject(object_: id); message 'encodeConditionalObject:';
+    class function archivedDataWithRootObject(rootObject: id): NSData; message 'archivedDataWithRootObject:';
+    class function archiveRootObject_toFile(rootObject: id; path: NSString): Boolean; message 'archiveRootObject:toFile:';
+    procedure encodeClassName_intoClassName(trueName: NSString; inArchiveName: NSString); message 'encodeClassName:intoClassName:';
+    function classNameEncodedForTrueClassName(trueName: NSString): NSString; message 'classNameEncodedForTrueClassName:';
+    procedure replaceObject_withObject(object_: id; newObject: id); message 'replaceObject:withObject:';
+  end; external;
+
+{ NSUnarchiver }
+  NSUnarchiver = objcclass(NSCoder)
+  private
+    _datax: Pointer;
+    _cursor: culong;
+    _objectZone: NSZone;
+    _systemVersion: culong;
+    _streamerVersion: char;
+    _swap: char;
+    _unused1: char;
+    _unused2: char;
+    _pointerTable: Pointer;
+    _stringTable: Pointer;
+    _classVersions: id;
+    _lastLabel: clong;
+    _map: Pointer;
+    _allUnarchivedObjects: Pointer;
+    _reserved: id;
+    
+  public
+    class function alloc: NSUnarchiver; message 'alloc';
+
+    function initForReadingWithData(data: NSData): id; message 'initForReadingWithData:';
+    procedure setObjectZone(var zone_: NSZone); message 'setObjectZone:';
+    function objectZone: NSZone; message 'objectZone';
+    function isAtEnd: Boolean; message 'isAtEnd';
+    function systemVersion: cuint; message 'systemVersion';
+    class function unarchiveObjectWithData(data: NSData): id; message 'unarchiveObjectWithData:';
+    class function unarchiveObjectWithFile(path: NSString): id; message 'unarchiveObjectWithFile:';
+    class procedure decodeClassName_asClassName(inArchiveName: NSString; trueName: NSString); message 'decodeClassName:asClassName:';
+    class function classNameDecodedForArchiveClassName(inArchiveName: NSString): NSString; message 'classNameDecodedForArchiveClassName:';
+    procedure replaceObject_withObject(object_: id; newObject: id); message 'replaceObject:withObject:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSArray.inc b/packages/cocoaint/src/foundation/NSArray.inc
new file mode 100644
index 0000000000..834ba87e72
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSArray.inc
@@ -0,0 +1,174 @@
+{ Parsed from Foundation.framework NSArray.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSARRAY_PAS_H}
+{$define NSARRAY_PAS_H}
+type
+  NSArrayPointer = Pointer;
+  NSMutableArrayPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSARRAY_PAS_T}
+{$define NSARRAY_PAS_T}
+
+{ Callbacks }
+type
+  NSArrayComparator = function (param1: id; param2: id; param3: Pointer): NSInteger; cdecl;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSARRAY_PAS_R}
+{$define NSARRAY_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSARRAY_PAS_F}
+{$define NSARRAY_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSARRAY_PAS_T}
+{$define NSARRAY_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSArray = objcclass;
+  NSMutableArray = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSARRAY_PAS_C}
+{$define NSARRAY_PAS_C}
+
+{ NSArray }
+  NSArray = objcclass(NSObject, NSCopyingProtocol, NSMutableCopyingProtocol, NSCodingProtocol, NSFastEnumerationProtocol)
+    
+  public
+    class function alloc: NSArray; message 'alloc';
+
+    function count: culong; message 'count';
+    function objectAtIndex(index: culong): id; message 'objectAtIndex:';
+
+    { Category: NSExtendedArray }
+    function arrayByAddingObject(anObject: id): NSArray; message 'arrayByAddingObject:';
+    function arrayByAddingObjectsFromArray(otherArray: NSArray): NSArray; message 'arrayByAddingObjectsFromArray:';
+    function componentsJoinedByString(separator: NSString): NSString; message 'componentsJoinedByString:';
+    function containsObject(anObject: id): Boolean; message 'containsObject:';
+    function description: NSString; message 'description';
+    function descriptionWithLocale(locale: id): NSString; message 'descriptionWithLocale:';
+    function descriptionWithLocale_indent(locale: id; level: culong): NSString; message 'descriptionWithLocale:indent:';
+    function firstObjectCommonWithArray(otherArray: NSArray): id; message 'firstObjectCommonWithArray:';
+    procedure getObjects(objects: id); message 'getObjects:';
+    procedure getObjects_range(objects: id; range: NSRange); message 'getObjects:range:';
+    function indexOfObject(anObject: id): culong; message 'indexOfObject:';
+    function indexOfObject_inRange(anObject: id; range: NSRange): culong; message 'indexOfObject:inRange:';
+    function indexOfObjectIdenticalTo(anObject: id): culong; message 'indexOfObjectIdenticalTo:';
+    function indexOfObjectIdenticalTo_inRange(anObject: id; range: NSRange): culong; message 'indexOfObjectIdenticalTo:inRange:';
+    function isEqualToArray(otherArray: NSArray): Boolean; message 'isEqualToArray:';
+    function lastObject: id; message 'lastObject';
+    function objectEnumerator: NSEnumerator; message 'objectEnumerator';
+    function reverseObjectEnumerator: NSEnumerator; message 'reverseObjectEnumerator';
+    function sortedArrayHint: NSData; message 'sortedArrayHint';
+    function sortedArrayUsingFunction_context(comparator: NSArrayComparator; context: Pointer): NSArray; message 'sortedArrayUsingFunction:context:';
+    function sortedArrayUsingFunction_context_hint(comparator: NSArrayComparator; context: Pointer; hint: NSData): NSArray; message 'sortedArrayUsingFunction:context:hint:';
+    function sortedArrayUsingSelector(comparator: SEL): NSArray; message 'sortedArrayUsingSelector:';
+    function subarrayWithRange(range: NSRange): NSArray; message 'subarrayWithRange:';
+    function writeToFile_atomically(path: NSString; useAuxiliaryFile: Boolean): Boolean; message 'writeToFile:atomically:';
+    function writeToURL_atomically(url: NSURL; atomically: Boolean): Boolean; message 'writeToURL:atomically:';
+    procedure makeObjectsPerformSelector(aSelector: SEL); message 'makeObjectsPerformSelector:';
+    procedure makeObjectsPerformSelector_withObject(aSelector: SEL; argument: id); message 'makeObjectsPerformSelector:withObject:';
+    function objectsAtIndexes(indexes: NSIndexSet): NSArray; message 'objectsAtIndexes:';
+
+    { Category: NSArrayCreation }
+    class function array_: id; message 'array';
+    class function arrayWithObject(anObject: id): id; message 'arrayWithObject:';
+    class function arrayWithObjects_count(objects: NSObjectArrayOfObjectsPtr; cnt: culong): id; message 'arrayWithObjects:count:';
+    class function arrayWithObjects(firstObj: id; objParams: array of const): id; message 'arrayWithObjects:';
+    class function arrayWithArray(array__: NSArray): id; message 'arrayWithArray:';
+    function initWithObjects_count(objects: NSObjectArrayOfObjectsPtr; cnt: culong): id; message 'initWithObjects:count:';
+    function initWithObjects(firstObj: id; objParams: array of const): id; message 'initWithObjects:';
+    function initWithArray(array__: NSArray): id; message 'initWithArray:';
+    function initWithArray_copyItems(array__: NSArray; flag: Boolean): id; message 'initWithArray:copyItems:';
+    class function arrayWithContentsOfFile(path: NSString): id; message 'arrayWithContentsOfFile:';
+    class function arrayWithContentsOfURL(url: NSURL): id; message 'arrayWithContentsOfURL:';
+    function initWithContentsOfFile(path: NSString): id; message 'initWithContentsOfFile:';
+    function initWithContentsOfURL(url: NSURL): id; message 'initWithContentsOfURL:';
+
+    { Category: NSKeyValueCoding }
+    function valueForKey(key: NSString): id; message 'valueForKey:';
+    procedure setValue_forKey(value: id; key: NSString); message 'setValue:forKey:';
+
+    { Category: NSKeyValueObserverRegistration }
+    procedure addObserver_toObjectsAtIndexes_forKeyPath_options_context(observer: NSObject; indexes: NSIndexSet; keyPath: NSString; options: NSKeyValueObservingOptions; context: Pointer); message 'addObserver:toObjectsAtIndexes:forKeyPath:options:context:';
+    procedure removeObserver_fromObjectsAtIndexes_forKeyPath(observer: NSObject; indexes: NSIndexSet; keyPath: NSString); message 'removeObserver:fromObjectsAtIndexes:forKeyPath:';
+    procedure addObserver_forKeyPath_options_context(observer: NSObject; keyPath: NSString; options: NSKeyValueObservingOptions; context: Pointer); message 'addObserver:forKeyPath:options:context:';
+    procedure removeObserver_forKeyPath(observer: NSObject; keyPath: NSString); message 'removeObserver:forKeyPath:';
+
+    { Category: NSSortDescriptorSorting }
+    function sortedArrayUsingDescriptors(sortDescriptors: NSArray): NSArray; message 'sortedArrayUsingDescriptors:';
+
+    { Category: NSArrayPathExtensions }
+    function pathsMatchingExtensions(filterTypes: NSArray): NSArray; message 'pathsMatchingExtensions:';
+
+    { Category: NSPredicateSupport }
+    function filteredArrayUsingPredicate(predicate: NSPredicate): NSArray; message 'filteredArrayUsingPredicate:';
+  end; external;
+
+{ NSMutableArray }
+  NSMutableArray = objcclass(NSArray)
+    
+  public
+    class function alloc: NSMutableArray; message 'alloc';
+
+    procedure addObject(anObject: id); message 'addObject:';
+    procedure insertObject_atIndex(anObject: id; index: culong); message 'insertObject:atIndex:';
+    procedure removeLastObject; message 'removeLastObject';
+    procedure removeObjectAtIndex(index: culong); message 'removeObjectAtIndex:';
+    procedure replaceObjectAtIndex_withObject(index: culong; anObject: id); message 'replaceObjectAtIndex:withObject:';
+
+    { Category: NSExtendedMutableArray }
+    procedure addObjectsFromArray(otherArray: NSArray); message 'addObjectsFromArray:';
+    procedure exchangeObjectAtIndex_withObjectAtIndex(idx: culong; idx1: culong); message 'exchangeObjectAtIndex:withObjectAtIndex:';
+    procedure removeAllObjects; message 'removeAllObjects';
+    procedure removeObject_inRange(anObject: id; range: NSRange); message 'removeObject:inRange:';
+    procedure removeObject(anObject: id); message 'removeObject:';
+    procedure removeObjectIdenticalTo_inRange(anObject: id; range: NSRange); message 'removeObjectIdenticalTo:inRange:';
+    procedure removeObjectIdenticalTo(anObject: id); message 'removeObjectIdenticalTo:';
+    procedure removeObjectsFromIndices_numIndices(var indices: culong; cnt: culong); message 'removeObjectsFromIndices:numIndices:';
+    procedure removeObjectsInArray(otherArray: NSArray); message 'removeObjectsInArray:';
+    procedure removeObjectsInRange(range: NSRange); message 'removeObjectsInRange:';
+    procedure replaceObjectsInRange_withObjectsFromArray_range(range: NSRange; otherArray: NSArray; otherRange: NSRange); message 'replaceObjectsInRange:withObjectsFromArray:range:';
+    procedure replaceObjectsInRange_withObjectsFromArray(range: NSRange; otherArray: NSArray); message 'replaceObjectsInRange:withObjectsFromArray:';
+    procedure setArray(otherArray: NSArray); message 'setArray:';
+    procedure sortUsingFunction_context(compare: NSArrayComparator; context: Pointer); message 'sortUsingFunction:context:';
+    procedure sortUsingSelector(comparator: SEL); message 'sortUsingSelector:';
+    procedure insertObjects_atIndexes(objects: NSArray; indexes: NSIndexSet); message 'insertObjects:atIndexes:';
+    procedure removeObjectsAtIndexes(indexes: NSIndexSet); message 'removeObjectsAtIndexes:';
+    procedure replaceObjectsAtIndexes_withObjects(indexes: NSIndexSet; objects: NSArray); message 'replaceObjectsAtIndexes:withObjects:';
+
+    { Category: NSMutableArrayCreation }
+    class function arrayWithCapacity(numItems: culong): id; message 'arrayWithCapacity:';
+    function initWithCapacity(numItems: culong): id; message 'initWithCapacity:';
+
+    { Category: NSSortDescriptorSorting }
+    procedure sortUsingDescriptors(sortDescriptors: NSArray); message 'sortUsingDescriptors:';
+
+    { Category: NSPredicateSupport }
+    procedure filterUsingPredicate(predicate: NSPredicate); message 'filterUsingPredicate:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSAttributedString.inc b/packages/cocoaint/src/foundation/NSAttributedString.inc
new file mode 100644
index 0000000000..e69de29bb2
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSAttributedString.inc
diff --git a/packages/cocoaint/src/foundation/NSAutoreleasePool.inc b/packages/cocoaint/src/foundation/NSAutoreleasePool.inc
new file mode 100644
index 0000000000..d453d62526
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSAutoreleasePool.inc
@@ -0,0 +1,66 @@
+{ Parsed from Foundation.framework NSAutoreleasePool.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSAUTORELEASEPOOL_PAS_H}
+{$define NSAUTORELEASEPOOL_PAS_H}
+type
+  NSAutoreleasePoolPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSAUTORELEASEPOOL_PAS_T}
+{$define NSAUTORELEASEPOOL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSAUTORELEASEPOOL_PAS_R}
+{$define NSAUTORELEASEPOOL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSAUTORELEASEPOOL_PAS_F}
+{$define NSAUTORELEASEPOOL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSAUTORELEASEPOOL_PAS_T}
+{$define NSAUTORELEASEPOOL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSAutoreleasePool = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSAUTORELEASEPOOL_PAS_C}
+{$define NSAUTORELEASEPOOL_PAS_C}
+
+{ NSAutoreleasePool }
+  NSAutoreleasePool = objcclass(NSObject)
+  private
+    __token: Pointer;
+    __reserved3: Pointer;
+    __reserved2: Pointer;
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSAutoreleasePool; message 'alloc';
+
+    class procedure addObject(anObject: id); message 'addObject:';
+    procedure drain; message 'drain';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSBundle.inc b/packages/cocoaint/src/foundation/NSBundle.inc
new file mode 100644
index 0000000000..8409fcac76
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSBundle.inc
@@ -0,0 +1,132 @@
+{ Parsed from Foundation.framework NSBundle.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSBUNDLE_PAS_H}
+{$define NSBUNDLE_PAS_H}
+type
+  NSBundlePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSBUNDLE_PAS_T}
+{$define NSBUNDLE_PAS_T}
+
+{ Constants }
+
+const
+  NSBundleExecutableArchitectureI386 = $00000007;
+  NSBundleExecutableArchitecturePPC = $00000012;
+  NSBundleExecutableArchitectureX86_64 = $01000007;
+  NSBundleExecutableArchitecturePPC64 = $01000012;
+
+{ CFString constants }
+var
+  NSBundleDidLoadNotification: CFStringRef; external name '_NSBundleDidLoadNotification';
+  NSLoadedClasses: CFStringRef; external name '_NSLoadedClasses';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSBUNDLE_PAS_R}
+{$define NSBUNDLE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSBUNDLE_PAS_F}
+{$define NSBUNDLE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSBUNDLE_PAS_T}
+{$define NSBUNDLE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSBundle = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSBUNDLE_PAS_C}
+{$define NSBUNDLE_PAS_C}
+
+{ NSBundle }
+  NSBundle = objcclass(NSObject)
+  private
+    __flags: culong;
+    __cfBundle: id;
+    __refCount: culong;
+    __principalClass: Pobjc_class;
+    __tmp1: id;
+    __tmp2: id;
+    __reserved1: Pointer;
+    __reserved0: Pointer;
+    
+  public
+    class function alloc: NSBundle; message 'alloc';
+
+    class function mainBundle: NSBundle; message 'mainBundle';
+    class function bundleWithPath(path: NSString): NSBundle; message 'bundleWithPath:';
+    function initWithPath(path: NSString): id; message 'initWithPath:';
+    class function bundleForClass(aClass: Pobjc_class): NSBundle; message 'bundleForClass:';
+    class function bundleWithIdentifier(identifier: NSString): NSBundle; message 'bundleWithIdentifier:';
+    class function allBundles: NSArray; message 'allBundles';
+    class function allFrameworks: NSArray; message 'allFrameworks';
+    function load: Boolean; message 'load';
+    function isLoaded: Boolean; message 'isLoaded';
+    function unload: Boolean; message 'unload';
+    function preflightAndReturnError(var error: NSError): Boolean; message 'preflightAndReturnError:';
+    function loadAndReturnError(var error: NSError): Boolean; message 'loadAndReturnError:';
+    function bundlePath: NSString; message 'bundlePath';
+    function resourcePath: NSString; message 'resourcePath';
+    function executablePath: NSString; message 'executablePath';
+    function pathForAuxiliaryExecutable(executableName: NSString): NSString; message 'pathForAuxiliaryExecutable:';
+    function privateFrameworksPath: NSString; message 'privateFrameworksPath';
+    function sharedFrameworksPath: NSString; message 'sharedFrameworksPath';
+    function sharedSupportPath: NSString; message 'sharedSupportPath';
+    function builtInPlugInsPath: NSString; message 'builtInPlugInsPath';
+    function bundleIdentifier: NSString; message 'bundleIdentifier';
+    function classNamed(className_: NSString): Pobjc_class; message 'classNamed:';
+    function principalClass: Pobjc_class; message 'principalClass';
+    class function pathForResource_ofType_inDirectory(name: NSString; ext: NSString; bundlePath_: NSString): NSString; message 'pathForResource:ofType:inDirectory:';
+    function pathForResource_ofType(name: NSString; ext: NSString): NSString; message 'pathForResource:ofType:';
+    function pathForResource_ofType_inDirectory_forLocalization(name: NSString; ext: NSString; subpath: NSString; localizationName: NSString): NSString; message 'pathForResource:ofType:inDirectory:forLocalization:';
+    class function pathsForResourcesOfType_inDirectory(ext: NSString; bundlePath_: NSString): NSArray; message 'pathsForResourcesOfType:inDirectory:';
+    function pathsForResourcesOfType_inDirectory_forLocalization(ext: NSString; subpath: NSString; localizationName: NSString): NSArray; message 'pathsForResourcesOfType:inDirectory:forLocalization:';
+    function localizedStringForKey_value_table(key: NSString; value: NSString; tableName: NSString): NSString; message 'localizedStringForKey:value:table:';
+    function infoDictionary: NSDictionary; message 'infoDictionary';
+    function localizedInfoDictionary: NSDictionary; message 'localizedInfoDictionary';
+    function objectForInfoDictionaryKey(key: NSString): id; message 'objectForInfoDictionaryKey:';
+    function localizations: NSArray; message 'localizations';
+    function preferredLocalizations: NSArray; message 'preferredLocalizations';
+    function developmentLocalization: NSString; message 'developmentLocalization';
+    class function preferredLocalizationsFromArray(localizationsArray: NSArray): NSArray; message 'preferredLocalizationsFromArray:';
+    class function preferredLocalizationsFromArray_forPreferences(localizationsArray: NSArray; preferencesArray: NSArray): NSArray; message 'preferredLocalizationsFromArray:forPreferences:';
+    function executableArchitectures: NSArray; message 'executableArchitectures';
+
+    { Category: NSBundleHelpExtension }
+    function contextHelpForKey(key: NSString): NSAttributedString; message 'contextHelpForKey:';
+
+    { Category: NSBundleImageExtension }
+    function pathForImageResource(name: NSString): NSString; message 'pathForImageResource:';
+
+    { Category: NSNibLoading }
+    class function loadNibFile_externalNameTable_withZone(fileName: NSString; context: NSDictionary; var zone_: NSZone): Boolean; message 'loadNibFile:externalNameTable:withZone:';
+    class function loadNibNamed_owner(nibName: NSString; owner: id): Boolean; message 'loadNibNamed:owner:';
+
+    { Category: NSBundleSoundExtensions }
+    function pathForSoundResource(name: NSString): NSString; message 'pathForSoundResource:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSCalendar.inc b/packages/cocoaint/src/foundation/NSCalendar.inc
new file mode 100644
index 0000000000..2bf1948fc1
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSCalendar.inc
@@ -0,0 +1,130 @@
+{ Parsed from Foundation.framework NSCalendar.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCALENDAR_PAS_H}
+{$define NSCALENDAR_PAS_H}
+type
+  NSCalendarPointer = Pointer;
+  NSDateComponentsPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCALENDAR_PAS_T}
+{$define NSCALENDAR_PAS_T}
+
+{ Constants }
+
+const
+  NSEraCalendarUnit = kCFCalendarUnitEra;
+  NSYearCalendarUnit = kCFCalendarUnitYear;
+  NSMonthCalendarUnit = kCFCalendarUnitMonth;
+  NSDayCalendarUnit = kCFCalendarUnitDay;
+  NSHourCalendarUnit = kCFCalendarUnitHour;
+  NSMinuteCalendarUnit = kCFCalendarUnitMinute;
+  NSSecondCalendarUnit = kCFCalendarUnitSecond;
+  NSWeekCalendarUnit = kCFCalendarUnitWeek;
+  NSWeekdayCalendarUnit = kCFCalendarUnitWeekday;
+  NSWeekdayOrdinalCalendarUnit = kCFCalendarUnitWeekdayOrdinal;
+
+const
+  NSUndefinedDateComponent = NSIntegerMax;
+
+{ Types }
+type
+  NSCalendarUnit = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCALENDAR_PAS_R}
+{$define NSCALENDAR_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCALENDAR_PAS_F}
+{$define NSCALENDAR_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCALENDAR_PAS_T}
+{$define NSCALENDAR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSCalendar = objcclass;
+  NSDateComponents = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCALENDAR_PAS_C}
+{$define NSCALENDAR_PAS_C}
+
+{ NSCalendar }
+  NSCalendar = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+    
+  public
+    class function alloc: NSCalendar; message 'alloc';
+
+    class function currentCalendar: id; message 'currentCalendar';
+    function initWithCalendarIdentifier(ident: NSString): id; message 'initWithCalendarIdentifier:';
+    function calendarIdentifier: NSString; message 'calendarIdentifier';
+    procedure setLocale(locale_: NSLocale); message 'setLocale:';
+    function locale: NSLocale; message 'locale';
+    procedure setTimeZone(tz: NSTimeZone); message 'setTimeZone:';
+    function timeZone: NSTimeZone; message 'timeZone';
+    procedure setFirstWeekday(weekday: culong); message 'setFirstWeekday:';
+    function firstWeekday: culong; message 'firstWeekday';
+    procedure setMinimumDaysInFirstWeek(mdw: culong); message 'setMinimumDaysInFirstWeek:';
+    function minimumDaysInFirstWeek: culong; message 'minimumDaysInFirstWeek';
+    function minimumRangeOfUnit(unit_: NSCalendarUnit): NSRange; message 'minimumRangeOfUnit:';
+    function maximumRangeOfUnit(unit_: NSCalendarUnit): NSRange; message 'maximumRangeOfUnit:';
+    function rangeOfUnit_inUnit_forDate(smaller: NSCalendarUnit; larger: NSCalendarUnit; date: NSDate): NSRange; message 'rangeOfUnit:inUnit:forDate:';
+    function ordinalityOfUnit_inUnit_forDate(smaller: NSCalendarUnit; larger: NSCalendarUnit; date: NSDate): culong; message 'ordinalityOfUnit:inUnit:forDate:';
+    function rangeOfUnit_startDate_interval_forDate(unit_: NSCalendarUnit; var datep: NSDate; var tip: NSTimeInterval; date: NSDate): Boolean; message 'rangeOfUnit:startDate:interval:forDate:';
+    function dateFromComponents(comps: NSDateComponents): NSDate; message 'dateFromComponents:';
+    function components_fromDate(unitFlags: culong; date: NSDate): NSDateComponents; message 'components:fromDate:';
+    function dateByAddingComponents_toDate_options(comps: NSDateComponents; date: NSDate; opts: culong): NSDate; message 'dateByAddingComponents:toDate:options:';
+    function components_fromDate_toDate_options(unitFlags: culong; startingDate: NSDate; resultDate: NSDate; opts: culong): NSDateComponents; message 'components:fromDate:toDate:options:';
+  end; external;
+
+{ NSDateComponents }
+  NSDateComponents = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+    
+  public
+    class function alloc: NSDateComponents; message 'alloc';
+
+    function era: clong; message 'era';
+    function year: clong; message 'year';
+    function month: clong; message 'month';
+    function day: clong; message 'day';
+    function hour: clong; message 'hour';
+    function minute: clong; message 'minute';
+    function second: clong; message 'second';
+    function week: clong; message 'week';
+    function weekday: clong; message 'weekday';
+    function weekdayOrdinal: clong; message 'weekdayOrdinal';
+    procedure setEra(v: clong); message 'setEra:';
+    procedure setYear(v: clong); message 'setYear:';
+    procedure setMonth(v: clong); message 'setMonth:';
+    procedure setDay(v: clong); message 'setDay:';
+    procedure setHour(v: clong); message 'setHour:';
+    procedure setMinute(v: clong); message 'setMinute:';
+    procedure setSecond(v: clong); message 'setSecond:';
+    procedure setWeek(v: clong); message 'setWeek:';
+    procedure setWeekday(v: clong); message 'setWeekday:';
+    procedure setWeekdayOrdinal(v: clong); message 'setWeekdayOrdinal:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSCalendarDate.inc b/packages/cocoaint/src/foundation/NSCalendarDate.inc
new file mode 100644
index 0000000000..92cb5fe47b
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSCalendarDate.inc
@@ -0,0 +1,92 @@
+{ Parsed from Foundation.framework NSCalendarDate.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCALENDARDATE_PAS_H}
+{$define NSCALENDARDATE_PAS_H}
+type
+  NSCalendarDatePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCALENDARDATE_PAS_T}
+{$define NSCALENDARDATE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCALENDARDATE_PAS_R}
+{$define NSCALENDARDATE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCALENDARDATE_PAS_F}
+{$define NSCALENDARDATE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCALENDARDATE_PAS_T}
+{$define NSCALENDARDATE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSCalendarDate = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCALENDARDATE_PAS_C}
+{$define NSCALENDARDATE_PAS_C}
+
+{ NSCalendarDate }
+  NSCalendarDate = objcclass(NSDate)
+  private
+    _refCount: culong;
+    __timeIntervalSinceReferenceDate: NSTimeInterval;
+    __timeZone: NSTimeZone;
+    __formatString: NSString;
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSCalendarDate; message 'alloc';
+
+    class function dateWithYear_month_day_hour_minute_second_timeZone(year: clong; month: culong; day: culong; hour: culong; minute: culong; second: culong; aTimeZone: NSTimeZone): id; message 'dateWithYear:month:day:hour:minute:second:timeZone:';
+    class function dateWithString_calendarFormat(description_: NSString; format: NSString): id; message 'dateWithString:calendarFormat:';
+    class function dateWithString_calendarFormat_locale(description_: NSString; format: NSString; locale: id): id; message 'dateWithString:calendarFormat:locale:';
+    class function calendarDate: id; message 'calendarDate';
+    function initWithYear_month_day_hour_minute_second_timeZone(year: clong; month: culong; day: culong; hour: culong; minute: culong; second: culong; aTimeZone: NSTimeZone): id; message 'initWithYear:month:day:hour:minute:second:timeZone:';
+    function initWithString(description_: NSString): id; message 'initWithString:';
+    function initWithString_calendarFormat(description_: NSString; format: NSString): id; message 'initWithString:calendarFormat:';
+    function initWithString_calendarFormat_locale(description_: NSString; format: NSString; locale: id): id; message 'initWithString:calendarFormat:locale:';
+    function timeZone: NSTimeZone; message 'timeZone';
+    procedure setTimeZone(aTimeZone: NSTimeZone); message 'setTimeZone:';
+    function calendarFormat: NSString; message 'calendarFormat';
+    procedure setCalendarFormat(format: NSString); message 'setCalendarFormat:';
+    function yearOfCommonEra: clong; message 'yearOfCommonEra';
+    function monthOfYear: clong; message 'monthOfYear';
+    function dayOfMonth: clong; message 'dayOfMonth';
+    function dayOfWeek: clong; message 'dayOfWeek';
+    function dayOfYear: clong; message 'dayOfYear';
+    function dayOfCommonEra: clong; message 'dayOfCommonEra';
+    function hourOfDay: clong; message 'hourOfDay';
+    function minuteOfHour: clong; message 'minuteOfHour';
+    function secondOfMinute: clong; message 'secondOfMinute';
+    function dateByAddingYears_months_days_hours_minutes_seconds(year: clong; month: clong; day: clong; hour: clong; minute: clong; second: clong): NSCalendarDate; message 'dateByAddingYears:months:days:hours:minutes:seconds:';
+    procedure years_months_days_hours_minutes_seconds_sinceDate(var yp: clong; var mop: clong; var dp: clong; var hp: clong; var mip: clong; var sp: clong; date_: NSCalendarDate); message 'years:months:days:hours:minutes:seconds:sinceDate:';
+    function description: NSString; message 'description';
+    function descriptionWithLocale(locale: id): NSString; message 'descriptionWithLocale:';
+    function descriptionWithCalendarFormat(format: NSString): NSString; message 'descriptionWithCalendarFormat:';
+    function descriptionWithCalendarFormat_locale(format: NSString; locale: id): NSString; message 'descriptionWithCalendarFormat:locale:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSCharacterSet.inc b/packages/cocoaint/src/foundation/NSCharacterSet.inc
new file mode 100644
index 0000000000..09289b2038
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSCharacterSet.inc
@@ -0,0 +1,106 @@
+{ Parsed from Foundation.framework NSCharacterSet.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCHARACTERSET_PAS_H}
+{$define NSCHARACTERSET_PAS_H}
+type
+  NSCharacterSetPointer = Pointer;
+  NSMutableCharacterSetPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCHARACTERSET_PAS_T}
+{$define NSCHARACTERSET_PAS_T}
+
+{ Constants }
+
+const
+  NSOpenStepUnicodeReservedBase = $F400;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCHARACTERSET_PAS_R}
+{$define NSCHARACTERSET_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCHARACTERSET_PAS_F}
+{$define NSCHARACTERSET_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCHARACTERSET_PAS_T}
+{$define NSCHARACTERSET_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSCharacterSet = objcclass;
+  NSMutableCharacterSet = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCHARACTERSET_PAS_C}
+{$define NSCHARACTERSET_PAS_C}
+
+{ NSCharacterSet }
+  NSCharacterSet = objcclass(NSObject, NSCopyingProtocol, NSMutableCopyingProtocol, NSCodingProtocol)
+    
+  public
+    class function alloc: NSCharacterSet; message 'alloc';
+
+    class function controlCharacterSet: id; message 'controlCharacterSet';
+    class function whitespaceCharacterSet: id; message 'whitespaceCharacterSet';
+    class function whitespaceAndNewlineCharacterSet: id; message 'whitespaceAndNewlineCharacterSet';
+    class function decimalDigitCharacterSet: id; message 'decimalDigitCharacterSet';
+    class function letterCharacterSet: id; message 'letterCharacterSet';
+    class function lowercaseLetterCharacterSet: id; message 'lowercaseLetterCharacterSet';
+    class function uppercaseLetterCharacterSet: id; message 'uppercaseLetterCharacterSet';
+    class function nonBaseCharacterSet: id; message 'nonBaseCharacterSet';
+    class function alphanumericCharacterSet: id; message 'alphanumericCharacterSet';
+    class function decomposableCharacterSet: id; message 'decomposableCharacterSet';
+    class function illegalCharacterSet: id; message 'illegalCharacterSet';
+    class function punctuationCharacterSet: id; message 'punctuationCharacterSet';
+    class function capitalizedLetterCharacterSet: id; message 'capitalizedLetterCharacterSet';
+    class function symbolCharacterSet: id; message 'symbolCharacterSet';
+    class function newlineCharacterSet: id; message 'newlineCharacterSet';
+    class function characterSetWithRange(aRange: NSRange): id; message 'characterSetWithRange:';
+    class function characterSetWithCharactersInString(aString: NSString): id; message 'characterSetWithCharactersInString:';
+    class function characterSetWithBitmapRepresentation(data: NSData): id; message 'characterSetWithBitmapRepresentation:';
+    class function characterSetWithContentsOfFile(fName: NSString): id; message 'characterSetWithContentsOfFile:';
+    function characterIsMember(aCharacter: unichar): Boolean; message 'characterIsMember:';
+    function bitmapRepresentation: NSData; message 'bitmapRepresentation';
+    function invertedSet: NSCharacterSet; message 'invertedSet';
+    function longCharacterIsMember(theLongChar: UTF32Char): Boolean; message 'longCharacterIsMember:';
+    function isSupersetOfSet(theOtherSet: NSCharacterSet): Boolean; message 'isSupersetOfSet:';
+    function hasMemberInPlane(thePlane: byte): Boolean; message 'hasMemberInPlane:';
+  end; external;
+
+{ NSMutableCharacterSet }
+  NSMutableCharacterSet = objcclass(NSCharacterSet, NSCopyingProtocol, NSMutableCopyingProtocol)
+    
+  public
+    class function alloc: NSMutableCharacterSet; message 'alloc';
+
+    procedure addCharactersInRange(aRange: NSRange); message 'addCharactersInRange:';
+    procedure removeCharactersInRange(aRange: NSRange); message 'removeCharactersInRange:';
+    procedure addCharactersInString(aString: NSString); message 'addCharactersInString:';
+    procedure removeCharactersInString(aString: NSString); message 'removeCharactersInString:';
+    procedure formUnionWithCharacterSet(otherSet: NSCharacterSet); message 'formUnionWithCharacterSet:';
+    procedure formIntersectionWithCharacterSet(otherSet: NSCharacterSet); message 'formIntersectionWithCharacterSet:';
+    procedure invert; message 'invert';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSClassDescription.inc b/packages/cocoaint/src/foundation/NSClassDescription.inc
new file mode 100644
index 0000000000..0902c7aedd
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSClassDescription.inc
@@ -0,0 +1,70 @@
+{ Parsed from Foundation.framework NSClassDescription.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCLASSDESCRIPTION_PAS_H}
+{$define NSCLASSDESCRIPTION_PAS_H}
+type
+  NSClassDescriptionPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCLASSDESCRIPTION_PAS_T}
+{$define NSCLASSDESCRIPTION_PAS_T}
+
+{ CFString constants }
+var
+  NSClassDescriptionNeededForClassNotification: CFStringRef; external name '_NSClassDescriptionNeededForClassNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCLASSDESCRIPTION_PAS_R}
+{$define NSCLASSDESCRIPTION_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCLASSDESCRIPTION_PAS_F}
+{$define NSCLASSDESCRIPTION_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCLASSDESCRIPTION_PAS_T}
+{$define NSCLASSDESCRIPTION_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSClassDescription = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCLASSDESCRIPTION_PAS_C}
+{$define NSCLASSDESCRIPTION_PAS_C}
+
+{ NSClassDescription }
+  NSClassDescription = objcclass(NSObject)
+    
+  public
+    class function alloc: NSClassDescription; message 'alloc';
+
+    class procedure registerClassDescription_forClass(description_: NSClassDescription; aClass: Pobjc_class); message 'registerClassDescription:forClass:';
+    class procedure invalidateClassDescriptionCache; message 'invalidateClassDescriptionCache';
+    class function classDescriptionForClass(aClass: Pobjc_class): NSClassDescription; message 'classDescriptionForClass:';
+    function attributeKeys: NSArray; message 'attributeKeys';
+    function toOneRelationshipKeys: NSArray; message 'toOneRelationshipKeys';
+    function toManyRelationshipKeys: NSArray; message 'toManyRelationshipKeys';
+    function inverseForRelationshipKey(relationshipKey: NSString): NSString; message 'inverseForRelationshipKey:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSCoder.inc b/packages/cocoaint/src/foundation/NSCoder.inc
new file mode 100644
index 0000000000..35be282beb
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSCoder.inc
@@ -0,0 +1,121 @@
+{ Parsed from Foundation.framework NSCoder.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCODER_PAS_H}
+{$define NSCODER_PAS_H}
+type
+  NSCoderPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCODER_PAS_T}
+{$define NSCODER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCODER_PAS_R}
+{$define NSCODER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCODER_PAS_F}
+{$define NSCODER_PAS_F}
+
+{ Functions }
+function NXReadNSObjectFromCoder(var decoder: NSCoder): NSObject; cdecl; external name 'NXReadNSObjectFromCoder';
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCODER_PAS_T}
+{$define NSCODER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSCoder = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCODER_PAS_C}
+{$define NSCODER_PAS_C}
+
+{ NSCoder }
+  NSCoder = objcclass(NSObject)
+    
+  public
+    class function alloc: NSCoder; message 'alloc';
+
+    procedure encodeValueOfObjCType_at(type_: PChar; addr: Pointer); message 'encodeValueOfObjCType:at:';
+    procedure encodeDataObject(data: NSData); message 'encodeDataObject:';
+    procedure decodeValueOfObjCType_at(type_: PChar; data: Pointer); message 'decodeValueOfObjCType:at:';
+    function decodeDataObject: NSData; message 'decodeDataObject';
+    function versionForClassName(className_: NSString): clong; message 'versionForClassName:';
+
+    { Category: NSExtendedCoder }
+    procedure encodeObject(object_: id); message 'encodeObject:';
+    procedure encodePropertyList(aPropertyList: id); message 'encodePropertyList:';
+    procedure encodeRootObject(rootObject: id); message 'encodeRootObject:';
+    procedure encodeBycopyObject(anObject: id); message 'encodeBycopyObject:';
+    procedure encodeByrefObject(anObject: id); message 'encodeByrefObject:';
+    procedure encodeConditionalObject(object_: id); message 'encodeConditionalObject:';
+    procedure encodeValuesOfObjCTypes(types: PChar); message 'encodeValuesOfObjCTypes:';
+    procedure encodeArrayOfObjCType_count_at(type_: PChar; count: culong; array_: Pointer); message 'encodeArrayOfObjCType:count:at:';
+    procedure encodeBytes_length(byteaddr: Pointer; length: culong); message 'encodeBytes:length:';
+    function decodeObject: id; message 'decodeObject';
+    function decodePropertyList: id; message 'decodePropertyList';
+    procedure decodeValuesOfObjCTypes(types: PChar); message 'decodeValuesOfObjCTypes:';
+    procedure decodeArrayOfObjCType_count_at(itemType: PChar; count: culong; array_: Pointer); message 'decodeArrayOfObjCType:count:at:';
+    function decodeBytesWithReturnedLength(var lengthp: culong): Pointer; message 'decodeBytesWithReturnedLength:';
+    procedure setObjectZone(var zone_: NSZone); message 'setObjectZone:';
+    function objectZone: NSZone; message 'objectZone';
+    function systemVersion: cuint; message 'systemVersion';
+    function allowsKeyedCoding: Boolean; message 'allowsKeyedCoding';
+    procedure encodeObject_forKey(objv: id; key: NSString); message 'encodeObject:forKey:';
+    procedure encodeConditionalObject_forKey(objv: id; key: NSString); message 'encodeConditionalObject:forKey:';
+    procedure encodeBool_forKey(boolv: Boolean; key: NSString); message 'encodeBool:forKey:';
+    procedure encodeInt_forKey(intv: cint; key: NSString); message 'encodeInt:forKey:';
+    procedure encodeInt32_forKey(intv: longint; key: NSString); message 'encodeInt32:forKey:';
+    procedure encodeInt64_forKey(intv: clonglong; key: NSString); message 'encodeInt64:forKey:';
+    procedure encodeFloat_forKey(realv: single; key: NSString); message 'encodeFloat:forKey:';
+    procedure encodeDouble_forKey(realv: double; key: NSString); message 'encodeDouble:forKey:';
+    procedure encodeBytes_length_forKey(var bytesp: byte; lenv: culong; key: NSString); message 'encodeBytes:length:forKey:';
+    function containsValueForKey(key: NSString): Boolean; message 'containsValueForKey:';
+    function decodeObjectForKey(key: NSString): id; message 'decodeObjectForKey:';
+    function decodeBoolForKey(key: NSString): Boolean; message 'decodeBoolForKey:';
+    function decodeIntForKey(key: NSString): cint; message 'decodeIntForKey:';
+    function decodeInt32ForKey(key: NSString): longint; message 'decodeInt32ForKey:';
+    function decodeInt64ForKey(key: NSString): clonglong; message 'decodeInt64ForKey:';
+    function decodeFloatForKey(key: NSString): single; message 'decodeFloatForKey:';
+    function decodeDoubleForKey(key: NSString): double; message 'decodeDoubleForKey:';
+    function decodeBytesForKey_returnedLength(key: NSString; var lengthp: culong): byte; message 'decodeBytesForKey:returnedLength:';
+    procedure encodeInteger_forKey(intv: clong; key: NSString); message 'encodeInteger:forKey:';
+    function decodeIntegerForKey(key: NSString): clong; message 'decodeIntegerForKey:';
+
+    { Category: NSTypedstreamCompatibility }
+    procedure encodeNXObject(object_: id); message 'encodeNXObject:';
+
+    { Category: NSGeometryKeyedCoding }
+    procedure encodePoint_forKey(point: NSPoint; key: NSString); message 'encodePoint:forKey:';
+    procedure encodeSize_forKey(size: NSSize; key: NSString); message 'encodeSize:forKey:';
+    procedure encodeRect_forKey(rect: NSRect; key: NSString); message 'encodeRect:forKey:';
+    function decodePointForKey(key: NSString): NSPoint; message 'decodePointForKey:';
+    function decodeSizeForKey(key: NSString): NSSize; message 'decodeSizeForKey:';
+    function decodeRectForKey(key: NSString): NSRect; message 'decodeRectForKey:';
+
+    { Category: NSAppKitColorExtensions }
+    function decodeNXColor: NSColor; message 'decodeNXColor';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSComparisonPredicate.inc b/packages/cocoaint/src/foundation/NSComparisonPredicate.inc
new file mode 100644
index 0000000000..650dbc89c8
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSComparisonPredicate.inc
@@ -0,0 +1,94 @@
+{ Parsed from Foundation.framework NSComparisonPredicate.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCOMPARISONPREDICATE_PAS_H}
+{$define NSCOMPARISONPREDICATE_PAS_H}
+type
+  NSComparisonPredicatePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCOMPARISONPREDICATE_PAS_T}
+{$define NSCOMPARISONPREDICATE_PAS_T}
+
+{ Constants }
+
+const
+  NSCaseInsensitivePredicateOption = $01;
+  NSDiacriticInsensitivePredicateOption = $02;
+
+const
+  NSMatchesPredicateOperatorType = 0;
+  NSLikePredicateOperatorType = 1;
+  NSBeginsWithPredicateOperatorType = 2;
+  NSEndsWithPredicateOperatorType = 3;
+  NSCustomSelectorPredicateOperatorType = 4;
+  NSContainsPredicateOperatorType = 99;
+  NSBetweenPredicateOperatorType = 5;
+
+{ Types }
+type
+  NSComparisonPredicateModifier = culong;
+  NSPredicateOperatorType = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCOMPARISONPREDICATE_PAS_R}
+{$define NSCOMPARISONPREDICATE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCOMPARISONPREDICATE_PAS_F}
+{$define NSCOMPARISONPREDICATE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCOMPARISONPREDICATE_PAS_T}
+{$define NSCOMPARISONPREDICATE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSComparisonPredicate = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCOMPARISONPREDICATE_PAS_C}
+{$define NSCOMPARISONPREDICATE_PAS_C}
+
+{ NSComparisonPredicate }
+  NSComparisonPredicate = objcclass(NSPredicate)
+  private
+    __reserved2: Pointer;
+    __predicateOperator: NSPredicateOperator;
+    __lhs: NSExpression;
+    __rhs: NSExpression;
+    
+  public
+    class function alloc: NSComparisonPredicate; message 'alloc';
+
+    class function predicateWithLeftExpression_rightExpression_modifier_type_options(lhs: NSExpression; rhs: NSExpression; modifier: NSComparisonPredicateModifier; type_: NSPredicateOperatorType; options_: culong): NSPredicate; message 'predicateWithLeftExpression:rightExpression:modifier:type:options:';
+    class function predicateWithLeftExpression_rightExpression_customSelector(lhs: NSExpression; rhs: NSExpression; selector: SEL): NSPredicate; message 'predicateWithLeftExpression:rightExpression:customSelector:';
+    function initWithLeftExpression_rightExpression_modifier_type_options(lhs: NSExpression; rhs: NSExpression; modifier: NSComparisonPredicateModifier; type_: NSPredicateOperatorType; options_: culong): id; message 'initWithLeftExpression:rightExpression:modifier:type:options:';
+    function initWithLeftExpression_rightExpression_customSelector(lhs: NSExpression; rhs: NSExpression; selector: SEL): id; message 'initWithLeftExpression:rightExpression:customSelector:';
+    function predicateOperatorType: NSPredicateOperatorType; message 'predicateOperatorType';
+    function comparisonPredicateModifier: NSComparisonPredicateModifier; message 'comparisonPredicateModifier';
+    function leftExpression: NSExpression; message 'leftExpression';
+    function rightExpression: NSExpression; message 'rightExpression';
+    function customSelector: SEL; message 'customSelector';
+    function options: culong; message 'options';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSCompoundPredicate.inc b/packages/cocoaint/src/foundation/NSCompoundPredicate.inc
new file mode 100644
index 0000000000..4bd6631fda
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSCompoundPredicate.inc
@@ -0,0 +1,80 @@
+{ Parsed from Foundation.framework NSCompoundPredicate.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCOMPOUNDPREDICATE_PAS_H}
+{$define NSCOMPOUNDPREDICATE_PAS_H}
+type
+  NSCompoundPredicatePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCOMPOUNDPREDICATE_PAS_T}
+{$define NSCOMPOUNDPREDICATE_PAS_T}
+
+{ Constants }
+
+const
+  NSNotPredicateType = 0;
+  NSAndPredicateType = 0;
+  NSOrPredicateType = 1;
+
+{ Types }
+type
+  NSCompoundPredicateType = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCOMPOUNDPREDICATE_PAS_R}
+{$define NSCOMPOUNDPREDICATE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCOMPOUNDPREDICATE_PAS_F}
+{$define NSCOMPOUNDPREDICATE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCOMPOUNDPREDICATE_PAS_T}
+{$define NSCOMPOUNDPREDICATE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSCompoundPredicate = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCOMPOUNDPREDICATE_PAS_C}
+{$define NSCOMPOUNDPREDICATE_PAS_C}
+
+{ NSCompoundPredicate }
+  NSCompoundPredicate = objcclass(NSPredicate)
+  private
+    __reserved2: Pointer;
+    __type: culong;
+    __subpredicates: NSArray;
+    
+  public
+    class function alloc: NSCompoundPredicate; message 'alloc';
+
+    function initWithType_subpredicates(type_: NSCompoundPredicateType; subpredicates_: NSArray): id; message 'initWithType:subpredicates:';
+    function compoundPredicateType: NSCompoundPredicateType; message 'compoundPredicateType';
+    function subpredicates: NSArray; message 'subpredicates';
+    class function andPredicateWithSubpredicates(subpredicates_: NSArray): NSPredicate; message 'andPredicateWithSubpredicates:';
+    class function orPredicateWithSubpredicates(subpredicates_: NSArray): NSPredicate; message 'orPredicateWithSubpredicates:';
+    class function notPredicateWithSubpredicate(predicate: NSPredicate): NSPredicate; message 'notPredicateWithSubpredicate:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSConnection.inc b/packages/cocoaint/src/foundation/NSConnection.inc
new file mode 100644
index 0000000000..9407eae480
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSConnection.inc
@@ -0,0 +1,149 @@
+{ Parsed from Foundation.framework NSConnection.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSCONNECTION_PAS_H}
+{$define NSCONNECTION_PAS_H}
+type
+  NSConnectionPointer = Pointer;
+  NSDistantObjectRequestPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSCONNECTION_PAS_T}
+{$define NSCONNECTION_PAS_T}
+
+{ CFString constants }
+var
+  NSConnectionReplyMode: CFStringRef; external name '_NSConnectionReplyMode';
+  NSConnectionDidDieNotification: CFStringRef; external name '_NSConnectionDidDieNotification';
+  NSFailedAuthenticationException: CFStringRef; external name '_NSFailedAuthenticationException';
+  NSConnectionDidInitializeNotification: CFStringRef; external name '_NSConnectionDidInitializeNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSCONNECTION_PAS_R}
+{$define NSCONNECTION_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSCONNECTION_PAS_F}
+{$define NSCONNECTION_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSCONNECTION_PAS_T}
+{$define NSCONNECTION_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSConnection = objcclass;
+  NSDistantObjectRequest = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSCONNECTION_PAS_C}
+{$define NSCONNECTION_PAS_C}
+
+{ NSConnection }
+  NSConnection = objcclass(NSObject)
+  private
+    _receivePort: id;
+    _sendPort: id;
+    _delegate: id;
+    _busy: longint;
+    _localProxyCount: longint;
+    _waitCount: longint;
+    _delayedRL: id;
+    _statistics: id;
+    _isDead: char;
+    _isValid: char;
+    _wantsInvalid: char;
+    _authGen: 0..1;
+    _authCheck: 0..1;
+    _encryptFlag: 0..1;
+    _decryptFlag: 0..1;
+    _doRequest: 0..1;
+    _isQueueing: 0..1;
+    _isMulti: 0..1;
+    _invalidateRP: 0..1;
+    ____1: id;
+    ____2: id;
+    _runLoops: id;
+    _requestModes: id;
+    _rootObject: id;
+    _registerInfo: Pointer;
+    _replMode: id;
+    _classInfoImported: id;
+    _releasedProxies: id;
+    _reserved: Pointer;
+    
+  public
+    class function alloc: NSConnection; message 'alloc';
+
+    function statistics: NSDictionary; message 'statistics';
+    class function allConnections: NSArray; message 'allConnections';
+    class function defaultConnection: NSConnection; message 'defaultConnection';
+    class function connectionWithRegisteredName_host(name: NSString; hostName: NSString): id; message 'connectionWithRegisteredName:host:';
+    class function connectionWithRegisteredName_host_usingNameServer(name: NSString; hostName: NSString; server: NSPortNameServer): id; message 'connectionWithRegisteredName:host:usingNameServer:';
+    class function rootProxyForConnectionWithRegisteredName_host(name: NSString; hostName: NSString): NSDistantObject; message 'rootProxyForConnectionWithRegisteredName:host:';
+    class function rootProxyForConnectionWithRegisteredName_host_usingNameServer(name: NSString; hostName: NSString; server: NSPortNameServer): NSDistantObject; message 'rootProxyForConnectionWithRegisteredName:host:usingNameServer:';
+    class function serviceConnectionWithName_rootObject_usingNameServer(name: NSString; root: id; server: NSPortNameServer): id; message 'serviceConnectionWithName:rootObject:usingNameServer:';
+    class function serviceConnectionWithName_rootObject(name: NSString; root: id): id; message 'serviceConnectionWithName:rootObject:';
+    procedure setRequestTimeout(ti: NSTimeInterval); message 'setRequestTimeout:';
+    function requestTimeout: NSTimeInterval; message 'requestTimeout';
+    procedure setReplyTimeout(ti: NSTimeInterval); message 'setReplyTimeout:';
+    function replyTimeout: NSTimeInterval; message 'replyTimeout';
+    procedure setRootObject(anObject: id); message 'setRootObject:';
+    function rootObject: id; message 'rootObject';
+    function rootProxy: NSDistantObject; message 'rootProxy';
+    procedure setDelegate(anObject: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
+    procedure setIndependentConversationQueueing(yorn: Boolean); message 'setIndependentConversationQueueing:';
+    function independentConversationQueueing: Boolean; message 'independentConversationQueueing';
+    function isValid: Boolean; message 'isValid';
+    procedure invalidate; message 'invalidate';
+    procedure addRequestMode(rmode: NSString); message 'addRequestMode:';
+    procedure removeRequestMode(rmode: NSString); message 'removeRequestMode:';
+    function requestModes: NSArray; message 'requestModes';
+    function registerName(name: NSString): Boolean; message 'registerName:';
+    function registerName_withNameServer(name: NSString; server: NSPortNameServer): Boolean; message 'registerName:withNameServer:';
+    class function connectionWithReceivePort_sendPort(receivePort_: NSPort; sendPort_: NSPort): id; message 'connectionWithReceivePort:sendPort:';
+    class function currentConversation: id; message 'currentConversation';
+    function initWithReceivePort_sendPort(receivePort_: NSPort; sendPort_: NSPort): id; message 'initWithReceivePort:sendPort:';
+    function sendPort: NSPort; message 'sendPort';
+    function receivePort: NSPort; message 'receivePort';
+    procedure enableMultipleThreads; message 'enableMultipleThreads';
+    function multipleThreadsEnabled: Boolean; message 'multipleThreadsEnabled';
+    procedure addRunLoop(runloop: NSRunLoop); message 'addRunLoop:';
+    procedure removeRunLoop(runloop: NSRunLoop); message 'removeRunLoop:';
+    procedure runInNewThread; message 'runInNewThread';
+    function remoteObjects: NSArray; message 'remoteObjects';
+    function localObjects: NSArray; message 'localObjects';
+  end; external;
+
+{ NSDistantObjectRequest }
+  NSDistantObjectRequest = objcclass(NSObject)
+    
+  public
+    class function alloc: NSDistantObjectRequest; message 'alloc';
+
+    function invocation: NSInvocation; message 'invocation';
+    function connection: NSConnection; message 'connection';
+    function conversation: id; message 'conversation';
+    procedure replyWithException(exception: NSException); message 'replyWithException:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSData.inc b/packages/cocoaint/src/foundation/NSData.inc
new file mode 100644
index 0000000000..d523826588
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSData.inc
@@ -0,0 +1,121 @@
+{ Parsed from Foundation.framework NSData.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSDATA_PAS_H}
+{$define NSDATA_PAS_H}
+type
+  NSDataPointer = Pointer;
+  NSMutableDataPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSDATA_PAS_T}
+{$define NSDATA_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSDATA_PAS_R}
+{$define NSDATA_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSDATA_PAS_F}
+{$define NSDATA_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSDATA_PAS_T}
+{$define NSDATA_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSData = objcclass;
+  NSMutableData = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSDATA_PAS_C}
+{$define NSDATA_PAS_C}
+
+{ NSData }
+  NSData = objcclass(NSObject, NSCopyingProtocol, NSMutableCopyingProtocol, NSCodingProtocol)
+    
+  public
+    class function alloc: NSData; message 'alloc';
+
+    function length: culong; message 'length';
+    function bytes: Pointer; message 'bytes';
+
+    { Category: NSExtendedData }
+    function description: NSString; message 'description';
+    procedure getBytes(buffer: Pointer); message 'getBytes:';
+    procedure getBytes_length(buffer: Pointer; length_: culong); message 'getBytes:length:';
+    procedure getBytes_range(buffer: Pointer; range: NSRange); message 'getBytes:range:';
+    function isEqualToData(other: NSData): Boolean; message 'isEqualToData:';
+    function subdataWithRange(range: NSRange): NSData; message 'subdataWithRange:';
+    function writeToFile_atomically(path: NSString; useAuxiliaryFile: Boolean): Boolean; message 'writeToFile:atomically:';
+    function writeToURL_atomically(url: NSURL; atomically: Boolean): Boolean; message 'writeToURL:atomically:';
+    function writeToFile_options_error(path: NSString; writeOptionsMask: culong; errorPtr: NSErrorPointer): Boolean; message 'writeToFile:options:error:';
+    function writeToURL_options_error(url: NSURL; writeOptionsMask: culong; errorPtr: NSErrorPointer): Boolean; message 'writeToURL:options:error:';
+
+    { Category: NSDataCreation }
+    class function data: id; message 'data';
+    class function dataWithBytes_length(bytes_: Pointer; length_: culong): id; message 'dataWithBytes:length:';
+    class function dataWithBytesNoCopy_length(bytes_: Pointer; length_: culong): id; message 'dataWithBytesNoCopy:length:';
+    class function dataWithBytesNoCopy_length_freeWhenDone(bytes_: Pointer; length_: culong; b: Boolean): id; message 'dataWithBytesNoCopy:length:freeWhenDone:';
+    class function dataWithContentsOfFile_options_error(path: NSString; readOptionsMask: culong; errorPtr: NSErrorPointer): id; message 'dataWithContentsOfFile:options:error:';
+    class function dataWithContentsOfURL_options_error(url: NSURL; readOptionsMask: culong; errorPtr: NSErrorPointer): id; message 'dataWithContentsOfURL:options:error:';
+    class function dataWithContentsOfFile(path: NSString): id; message 'dataWithContentsOfFile:';
+    class function dataWithContentsOfURL(url: NSURL): id; message 'dataWithContentsOfURL:';
+    class function dataWithContentsOfMappedFile(path: NSString): id; message 'dataWithContentsOfMappedFile:';
+    function initWithBytes_length(bytes_: Pointer; length_: culong): id; message 'initWithBytes:length:';
+    function initWithBytesNoCopy_length(bytes_: Pointer; length_: culong): id; message 'initWithBytesNoCopy:length:';
+    function initWithBytesNoCopy_length_freeWhenDone(bytes_: Pointer; length_: culong; b: Boolean): id; message 'initWithBytesNoCopy:length:freeWhenDone:';
+    function initWithContentsOfFile_options_error(path: NSString; readOptionsMask: culong; errorPtr: NSErrorPointer): id; message 'initWithContentsOfFile:options:error:';
+    function initWithContentsOfURL_options_error(url: NSURL; readOptionsMask: culong; errorPtr: NSErrorPointer): id; message 'initWithContentsOfURL:options:error:';
+    function initWithContentsOfFile(path: NSString): id; message 'initWithContentsOfFile:';
+    function initWithContentsOfURL(url: NSURL): id; message 'initWithContentsOfURL:';
+    function initWithContentsOfMappedFile(path: NSString): id; message 'initWithContentsOfMappedFile:';
+    function initWithData(data_: NSData): id; message 'initWithData:';
+    class function dataWithData(data_: NSData): id; message 'dataWithData:';
+  end; external;
+
+{ NSMutableData }
+  NSMutableData = objcclass(NSData)
+    
+  public
+    class function alloc: NSMutableData; message 'alloc';
+
+    function mutableBytes: Pointer; message 'mutableBytes';
+    procedure setLength(length_: culong); message 'setLength:';
+
+    { Category: NSExtendedMutableData }
+    procedure appendBytes_length(bytes_: Pointer; length_: culong); message 'appendBytes:length:';
+    procedure appendData(other: NSData); message 'appendData:';
+    procedure increaseLengthBy(extraLength: culong); message 'increaseLengthBy:';
+    procedure replaceBytesInRange_withBytes(range: NSRange; bytes_: Pointer); message 'replaceBytesInRange:withBytes:';
+    procedure resetBytesInRange(range: NSRange); message 'resetBytesInRange:';
+    procedure setData(data_: NSData); message 'setData:';
+    procedure replaceBytesInRange_withBytes_length(range: NSRange; replacementBytes: Pointer; replacementLength: culong); message 'replaceBytesInRange:withBytes:length:';
+
+    { Category: NSMutableDataCreation }
+    class function dataWithCapacity(aNumItems: culong): id; message 'dataWithCapacity:';
+    class function dataWithLength(length_: culong): id; message 'dataWithLength:';
+    function initWithCapacity(capacity: culong): id; message 'initWithCapacity:';
+    function initWithLength(length_: culong): id; message 'initWithLength:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSDate.inc b/packages/cocoaint/src/foundation/NSDate.inc
new file mode 100644
index 0000000000..5e9cf0233f
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSDate.inc
@@ -0,0 +1,100 @@
+{ Parsed from Foundation.framework NSDate.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSDATE_PAS_H}
+{$define NSDATE_PAS_H}
+type
+  NSDatePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSDATE_PAS_T}
+{$define NSDATE_PAS_T}
+
+{ Types }
+type
+  NSTimeInterval = double;
+
+{ Defines }
+const
+  NSTimeIntervalSince1970 = 978307200.0;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSDATE_PAS_R}
+{$define NSDATE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSDATE_PAS_F}
+{$define NSDATE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSDATE_PAS_T}
+{$define NSDATE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSDate = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSDATE_PAS_C}
+{$define NSDATE_PAS_C}
+
+{ NSDate }
+  NSDate = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+    
+  public
+    class function alloc: NSDate; message 'alloc';
+
+    function timeIntervalSinceReferenceDate: NSTimeInterval; message 'timeIntervalSinceReferenceDate';
+
+    { Category: NSExtendedDate }
+    function timeIntervalSinceDate(anotherDate: NSDate): NSTimeInterval; message 'timeIntervalSinceDate:';
+    function timeIntervalSinceNow: NSTimeInterval; message 'timeIntervalSinceNow';
+    function timeIntervalSince1970: NSTimeInterval; message 'timeIntervalSince1970';
+    function addTimeInterval(seconds: NSTimeInterval): id; message 'addTimeInterval:';
+    function earlierDate(anotherDate: NSDate): NSDate; message 'earlierDate:';
+    function laterDate(anotherDate: NSDate): NSDate; message 'laterDate:';
+    function compare(other: NSDate): NSComparisonResult; message 'compare:';
+    function description: NSString; message 'description';
+    function isEqualToDate(otherDate: NSDate): Boolean; message 'isEqualToDate:';
+
+    { Category: NSDateCreation }
+    class function date: id; message 'date';
+    class function dateWithTimeIntervalSinceNow(secs: NSTimeInterval): id; message 'dateWithTimeIntervalSinceNow:';
+    class function dateWithTimeIntervalSinceReferenceDate(secs: NSTimeInterval): id; message 'dateWithTimeIntervalSinceReferenceDate:';
+    class function dateWithTimeIntervalSince1970(secs: NSTimeInterval): id; message 'dateWithTimeIntervalSince1970:';
+    class function distantFuture: id; message 'distantFuture';
+    class function distantPast: id; message 'distantPast';
+    function init: id; message 'init';
+    function initWithTimeIntervalSinceReferenceDate(secsToBeAdded: NSTimeInterval): id; message 'initWithTimeIntervalSinceReferenceDate:';
+    function initWithTimeInterval_sinceDate(secsToBeAdded: NSTimeInterval; anotherDate: NSDate): id; message 'initWithTimeInterval:sinceDate:';
+    function initWithTimeIntervalSinceNow(secsToBeAddedToNow: NSTimeInterval): id; message 'initWithTimeIntervalSinceNow:';
+
+    { Category: NSCalendarDateExtras }
+    class function dateWithString(aString: NSString): id; message 'dateWithString:';
+    function initWithString(description_: NSString): id; message 'initWithString:';
+    function dateWithCalendarFormat_timeZone(format: NSString; aTimeZone: NSTimeZone): NSCalendarDate; message 'dateWithCalendarFormat:timeZone:';
+    function descriptionWithLocale(locale: id): NSString; message 'descriptionWithLocale:';
+    function descriptionWithCalendarFormat_timeZone_locale(format: NSString; aTimeZone: NSTimeZone; locale: id): NSString; message 'descriptionWithCalendarFormat:timeZone:locale:';
+
+    { Category: NSNaturalLangage }
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSDateFormatter.inc b/packages/cocoaint/src/foundation/NSDateFormatter.inc
new file mode 100644
index 0000000000..97da90a496
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSDateFormatter.inc
@@ -0,0 +1,142 @@
+{ Parsed from Foundation.framework NSDateFormatter.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSDATEFORMATTER_PAS_H}
+{$define NSDATEFORMATTER_PAS_H}
+type
+  NSDateFormatterPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSDATEFORMATTER_PAS_T}
+{$define NSDATEFORMATTER_PAS_T}
+
+{ Constants }
+
+const
+  NSDateFormatterNoStyle = kCFDateFormatterNoStyle;
+  NSDateFormatterShortStyle = kCFDateFormatterShortStyle;
+  NSDateFormatterMediumStyle = kCFDateFormatterMediumStyle;
+  NSDateFormatterLongStyle = kCFDateFormatterLongStyle;
+  NSDateFormatterFullStyle = kCFDateFormatterFullStyle;
+
+const
+  NSDateFormatterBehaviorDefault = 0;
+  NSDateFormatterBehavior10_0 = 1000;
+  NSDateFormatterBehavior10_4 = 1040;
+
+{ Types }
+type
+  NSDateFormatterStyle = culong;
+  NSDateFormatterBehavior = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSDATEFORMATTER_PAS_R}
+{$define NSDATEFORMATTER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSDATEFORMATTER_PAS_F}
+{$define NSDATEFORMATTER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSDATEFORMATTER_PAS_T}
+{$define NSDATEFORMATTER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSDateFormatter = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSDATEFORMATTER_PAS_C}
+{$define NSDATEFORMATTER_PAS_C}
+
+{ NSDateFormatter }
+  NSDateFormatter = objcclass(NSFormatter)
+  private
+    __attributes: NSMutableDictionary;
+    __formatter: CFDateFormatterRef; {garbage collector: __strong }
+    __counter: culong;
+    
+  public
+    class function alloc: NSDateFormatter; message 'alloc';
+
+    function init: id; message 'init';
+    function getObjectValue_forString_range_error(obj: id; string_: NSString; var rangep: NSRange; var error: NSError): Boolean; message 'getObjectValue:forString:range:error:';
+    function stringFromDate(date: NSDate): NSString; message 'stringFromDate:';
+    function dateFromString(string_: NSString): NSDate; message 'dateFromString:';
+    function dateFormat: NSString; message 'dateFormat';
+    function dateStyle: NSDateFormatterStyle; message 'dateStyle';
+    procedure setDateStyle(style: NSDateFormatterStyle); message 'setDateStyle:';
+    function timeStyle: NSDateFormatterStyle; message 'timeStyle';
+    procedure setTimeStyle(style: NSDateFormatterStyle); message 'setTimeStyle:';
+    function locale: NSLocale; message 'locale';
+    procedure setLocale(locale_: NSLocale); message 'setLocale:';
+    function generatesCalendarDates: Boolean; message 'generatesCalendarDates';
+    procedure setGeneratesCalendarDates(b: Boolean); message 'setGeneratesCalendarDates:';
+    function formatterBehavior: NSDateFormatterBehavior; message 'formatterBehavior';
+    procedure setFormatterBehavior(behavior: NSDateFormatterBehavior); message 'setFormatterBehavior:';
+    class function defaultFormatterBehavior: NSDateFormatterBehavior; message 'defaultFormatterBehavior';
+    class procedure setDefaultFormatterBehavior(behavior: NSDateFormatterBehavior); message 'setDefaultFormatterBehavior:';
+    procedure setDateFormat(string_: NSString); message 'setDateFormat:';
+    function timeZone: NSTimeZone; message 'timeZone';
+    procedure setTimeZone(tz: NSTimeZone); message 'setTimeZone:';
+    function calendar: NSCalendar; message 'calendar';
+    procedure setCalendar(calendar_: NSCalendar); message 'setCalendar:';
+    function isLenient: Boolean; message 'isLenient';
+    procedure setLenient(b: Boolean); message 'setLenient:';
+    function twoDigitStartDate: NSDate; message 'twoDigitStartDate';
+    procedure setTwoDigitStartDate(date: NSDate); message 'setTwoDigitStartDate:';
+    function defaultDate: NSDate; message 'defaultDate';
+    procedure setDefaultDate(date: NSDate); message 'setDefaultDate:';
+    function eraSymbols: NSArray; message 'eraSymbols';
+    procedure setEraSymbols(array_: NSArray); message 'setEraSymbols:';
+    function monthSymbols: NSArray; message 'monthSymbols';
+    procedure setMonthSymbols(array_: NSArray); message 'setMonthSymbols:';
+    function shortMonthSymbols: NSArray; message 'shortMonthSymbols';
+    procedure setShortMonthSymbols(array_: NSArray); message 'setShortMonthSymbols:';
+    function weekdaySymbols: NSArray; message 'weekdaySymbols';
+    procedure setWeekdaySymbols(array_: NSArray); message 'setWeekdaySymbols:';
+    function shortWeekdaySymbols: NSArray; message 'shortWeekdaySymbols';
+    procedure setShortWeekdaySymbols(array_: NSArray); message 'setShortWeekdaySymbols:';
+    function AMSymbol: NSString; message 'AMSymbol';
+    procedure setAMSymbol(string_: NSString); message 'setAMSymbol:';
+    function PMSymbol: NSString; message 'PMSymbol';
+    procedure setPMSymbol(string_: NSString); message 'setPMSymbol:';
+    procedure setLongEraSymbols(array_: NSArray); message 'setLongEraSymbols:';
+    procedure setVeryShortMonthSymbols(array_: NSArray); message 'setVeryShortMonthSymbols:';
+    procedure setStandaloneMonthSymbols(array_: NSArray); message 'setStandaloneMonthSymbols:';
+    procedure setShortStandaloneMonthSymbols(array_: NSArray); message 'setShortStandaloneMonthSymbols:';
+    procedure setVeryShortStandaloneMonthSymbols(array_: NSArray); message 'setVeryShortStandaloneMonthSymbols:';
+    procedure setVeryShortWeekdaySymbols(array_: NSArray); message 'setVeryShortWeekdaySymbols:';
+    procedure setStandaloneWeekdaySymbols(array_: NSArray); message 'setStandaloneWeekdaySymbols:';
+    procedure setShortStandaloneWeekdaySymbols(array_: NSArray); message 'setShortStandaloneWeekdaySymbols:';
+    procedure setVeryShortStandaloneWeekdaySymbols(array_: NSArray); message 'setVeryShortStandaloneWeekdaySymbols:';
+    procedure setQuarterSymbols(array_: NSArray); message 'setQuarterSymbols:';
+    procedure setShortQuarterSymbols(array_: NSArray); message 'setShortQuarterSymbols:';
+    procedure setStandaloneQuarterSymbols(array_: NSArray); message 'setStandaloneQuarterSymbols:';
+    procedure setShortStandaloneQuarterSymbols(array_: NSArray); message 'setShortStandaloneQuarterSymbols:';
+    procedure setGregorianStartDate(date: NSDate); message 'setGregorianStartDate:';
+
+    { Category: NSDateFormatterCompatibility }
+    function initWithDateFormat_allowNaturalLanguage(format: NSString; flag: Boolean): id; message 'initWithDateFormat:allowNaturalLanguage:';
+    function allowsNaturalLanguage: Boolean; message 'allowsNaturalLanguage';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSDecimal.inc b/packages/cocoaint/src/foundation/NSDecimal.inc
new file mode 100644
index 0000000000..4740fa3928
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSDecimal.inc
@@ -0,0 +1,68 @@
+{ Parsed from Foundation.framework NSDecimal.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSDECIMAL_PAS_T}
+{$define NSDECIMAL_PAS_T}
+
+{ Types }
+type
+  NSRoundingMode = culong;
+  NSCalculationError = culong;
+
+{ Constants }
+
+const
+  NSCalculationNoError = 0;
+  NSCalculationDivideByZero = 0;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSDECIMAL_PAS_R}
+{$define NSDECIMAL_PAS_R}
+
+{ Records }
+type
+  NSDecimal = record
+    _exponent: cint;
+    _length: cuint;
+    _isNegative: cuint;
+    _isCompact: cuint;
+    _reserved: cuint;
+    _mantissa: cushort;
+  end;
+
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSDECIMAL_PAS_F}
+{$define NSDECIMAL_PAS_F}
+
+{ Functions }
+procedure NSDecimalCopy(var destination: NSDecimal; var source: NSDecimal); cdecl; external name 'NSDecimalCopy';
+procedure NSDecimalCompact(var number: NSDecimal); cdecl; external name 'NSDecimalCompact';
+function NSDecimalCompare(var leftOperand: NSDecimal; var rightOperand: NSDecimal): NSComparisonResult; cdecl; external name 'NSDecimalCompare';
+procedure NSDecimalRound(var result: NSDecimal; var number: NSDecimal; scale: clong; roundingMode: NSRoundingMode); cdecl; external name 'NSDecimalRound';
+function NSDecimalNormalize(var number1: NSDecimal; var number2: NSDecimal; roundingMode: NSRoundingMode): NSCalculationError; cdecl; external name 'NSDecimalNormalize';
+function NSDecimalAdd(var result: NSDecimal; var leftOperand: NSDecimal; var rightOperand: NSDecimal; roundingMode: NSRoundingMode): NSCalculationError; cdecl; external name 'NSDecimalAdd';
+function NSDecimalSubtract(var result: NSDecimal; var leftOperand: NSDecimal; var rightOperand: NSDecimal; roundingMode: NSRoundingMode): NSCalculationError; cdecl; external name 'NSDecimalSubtract';
+function NSDecimalMultiply(var result: NSDecimal; var leftOperand: NSDecimal; var rightOperand: NSDecimal; roundingMode: NSRoundingMode): NSCalculationError; cdecl; external name 'NSDecimalMultiply';
+function NSDecimalDivide(var result: NSDecimal; var leftOperand: NSDecimal; var rightOperand: NSDecimal; roundingMode: NSRoundingMode): NSCalculationError; cdecl; external name 'NSDecimalDivide';
+function NSDecimalPower(var result: NSDecimal; var number: NSDecimal; power: culong; roundingMode: NSRoundingMode): NSCalculationError; cdecl; external name 'NSDecimalPower';
+function NSDecimalMultiplyByPowerOf10(var result: NSDecimal; var number: NSDecimal; power: cshort; roundingMode: NSRoundingMode): NSCalculationError; cdecl; external name 'NSDecimalMultiplyByPowerOf10';
+function NSDecimalString(var dcm: NSDecimal; locale: id): NSString; cdecl; external name 'NSDecimalString';
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSDECIMAL_PAS_T}
+{$define NSDECIMAL_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSDecimalNumber.inc b/packages/cocoaint/src/foundation/NSDecimalNumber.inc
new file mode 100644
index 0000000000..a3f002e4c5
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSDecimalNumber.inc
@@ -0,0 +1,144 @@
+{ Parsed from Foundation.framework NSDecimalNumber.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSDECIMALNUMBER_PAS_H}
+{$define NSDECIMALNUMBER_PAS_H}
+type
+  NSDecimalNumberPointer = Pointer;
+  NSDecimalNumberHandlerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSDECIMALNUMBER_PAS_T}
+{$define NSDECIMALNUMBER_PAS_T}
+
+{ CFString constants }
+var
+  NSDecimalNumberExactnessException: CFStringRef; external name '_NSDecimalNumberExactnessException';
+  NSDecimalNumberOverflowException: CFStringRef; external name '_NSDecimalNumberOverflowException';
+  NSDecimalNumberUnderflowException: CFStringRef; external name '_NSDecimalNumberUnderflowException';
+  NSDecimalNumberDivideByZeroException: CFStringRef; external name '_NSDecimalNumberDivideByZeroException';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSDECIMALNUMBER_PAS_R}
+{$define NSDECIMALNUMBER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSDECIMALNUMBER_PAS_F}
+{$define NSDECIMALNUMBER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSDECIMALNUMBER_PAS_T}
+{$define NSDECIMALNUMBER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSDecimalNumberBehaviorsProtocol = objcprotocol;
+  NSDecimalNumber = objcclass;
+  NSDecimalNumberHandler = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSDECIMALNUMBER_PAS_C}
+{$define NSDECIMALNUMBER_PAS_C}
+
+{ NSDecimalNumber }
+  NSDecimalNumber = objcclass(NSNumber)
+  private
+    __exponent: 0..((1 shl 8)-1);
+    __length: 0..((1 shl 4)-1);
+    __isNegative: 0..1;
+    __isCompact: 0..1;
+    __reserved: 0..1;
+    __hasExternalRefCount: 0..1;
+    __refs: 0..((1 shl 16)-1);
+    __mantissa: cushort;
+    
+  public
+    class function alloc: NSDecimalNumber; message 'alloc';
+
+    function initWithMantissa_exponent_isNegative(mantissa: culonglong; exponent: cshort; flag: Boolean): id; message 'initWithMantissa:exponent:isNegative:';
+    function initWithDecimal(dcm: NSDecimal): id; message 'initWithDecimal:';
+    function initWithString(numberValue: NSString): id; message 'initWithString:';
+    function initWithString_locale(numberValue: NSString; locale_: id): id; message 'initWithString:locale:';
+    function descriptionWithLocale(locale_: id): NSString; message 'descriptionWithLocale:';
+    function decimalValue: NSDecimal; message 'decimalValue';
+    class function decimalNumberWithMantissa_exponent_isNegative(mantissa: culonglong; exponent: cshort; flag: Boolean): NSDecimalNumber; message 'decimalNumberWithMantissa:exponent:isNegative:';
+    class function decimalNumberWithDecimal(dcm: NSDecimal): NSDecimalNumber; message 'decimalNumberWithDecimal:';
+    class function decimalNumberWithString(numberValue: NSString): NSDecimalNumber; message 'decimalNumberWithString:';
+    class function decimalNumberWithString_locale(numberValue: NSString; locale_: id): NSDecimalNumber; message 'decimalNumberWithString:locale:';
+    class function zero: NSDecimalNumber; message 'zero';
+    class function one: NSDecimalNumber; message 'one';
+    class function minimumDecimalNumber: NSDecimalNumber; message 'minimumDecimalNumber';
+    class function maximumDecimalNumber: NSDecimalNumber; message 'maximumDecimalNumber';
+    class function notANumber: NSDecimalNumber; message 'notANumber';
+    function decimalNumberByAdding(decimalNumber: NSDecimalNumber): NSDecimalNumber; message 'decimalNumberByAdding:';
+    function decimalNumberByAdding_withBehavior(decimalNumber: NSDecimalNumber; behavior: id): NSDecimalNumber; message 'decimalNumberByAdding:withBehavior:';
+    function decimalNumberBySubtracting(decimalNumber: NSDecimalNumber): NSDecimalNumber; message 'decimalNumberBySubtracting:';
+    function decimalNumberBySubtracting_withBehavior(decimalNumber: NSDecimalNumber; behavior: id): NSDecimalNumber; message 'decimalNumberBySubtracting:withBehavior:';
+    function decimalNumberByMultiplyingBy(decimalNumber: NSDecimalNumber): NSDecimalNumber; message 'decimalNumberByMultiplyingBy:';
+    function decimalNumberByMultiplyingBy_withBehavior(decimalNumber: NSDecimalNumber; behavior: id): NSDecimalNumber; message 'decimalNumberByMultiplyingBy:withBehavior:';
+    function decimalNumberByDividingBy(decimalNumber: NSDecimalNumber): NSDecimalNumber; message 'decimalNumberByDividingBy:';
+    function decimalNumberByDividingBy_withBehavior(decimalNumber: NSDecimalNumber; behavior: id): NSDecimalNumber; message 'decimalNumberByDividingBy:withBehavior:';
+    function decimalNumberByRaisingToPower(power: culong): NSDecimalNumber; message 'decimalNumberByRaisingToPower:';
+    function decimalNumberByRaisingToPower_withBehavior(power: culong; behavior: id): NSDecimalNumber; message 'decimalNumberByRaisingToPower:withBehavior:';
+    function decimalNumberByMultiplyingByPowerOf10(power: cshort): NSDecimalNumber; message 'decimalNumberByMultiplyingByPowerOf10:';
+    function decimalNumberByMultiplyingByPowerOf10_withBehavior(power: cshort; behavior: id): NSDecimalNumber; message 'decimalNumberByMultiplyingByPowerOf10:withBehavior:';
+    function decimalNumberByRoundingAccordingToBehavior(behavior: id): NSDecimalNumber; message 'decimalNumberByRoundingAccordingToBehavior:';
+    function compare(decimalNumber: NSNumber): NSComparisonResult; message 'compare:';
+    class procedure setDefaultBehavior(behavior: id); message 'setDefaultBehavior:';
+    class function defaultBehavior: id; message 'defaultBehavior';
+    function objCType: char; message 'objCType';
+    function doubleValue: double; message 'doubleValue';
+  end; external;
+
+{ NSDecimalNumberHandler }
+  NSDecimalNumberHandler = objcclass(NSObject, NSDecimalNumberBehaviorsProtocol, NSCodingProtocol)
+  private
+    __scale: 0..((1 shl 16)-1);
+    __roundingMode: 0..((1 shl 3)-1);
+    __raiseOnExactness: 0..1;
+    __raiseOnOverflow: 0..1;
+    __raiseOnUnderflow: 0..1;
+    __raiseOnDivideByZero: 0..1;
+    __unused: 0..((1 shl 9)-1);
+    __reserved2: Pointer;
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSDecimalNumberHandler; message 'alloc';
+
+    class function defaultDecimalNumberHandler: id; message 'defaultDecimalNumberHandler';
+    function initWithRoundingMode_scale_raiseOnExactness_raiseOnOverflow_raiseOnUnderflow_raiseOnDivideByZero(roundingMode: NSRoundingMode; scale: cshort; exact: Boolean; overflow: Boolean; underflow: Boolean; divideByZero: Boolean): id; message 'initWithRoundingMode:scale:raiseOnExactness:raiseOnOverflow:raiseOnUnderflow:raiseOnDivideByZero:';
+    class function decimalNumberHandlerWithRoundingMode_scale_raiseOnExactness_raiseOnOverflow_raiseOnUnderflow_raiseOnDivideByZero(roundingMode: NSRoundingMode; scale: cshort; exact: Boolean; overflow: Boolean; underflow: Boolean; divideByZero: Boolean): id; message 'decimalNumberHandlerWithRoundingMode:scale:raiseOnExactness:raiseOnOverflow:raiseOnUnderflow:raiseOnDivideByZero:';
+  end; external;
+
+{$endif}
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSDECIMALNUMBER_PAS_P}
+{$define NSDECIMALNUMBER_PAS_P}
+  
+{ NSDecimalNumberBehaviors Protocol }
+  NSDecimalNumberBehaviorsProtocol = objcprotocol
+    function roundingMode: NSRoundingMode; message 'roundingMode';
+    function scale: cshort; message 'scale';
+    function exceptionDuringOperation_error_leftOperand_rightOperand(operation: SEL; error: NSCalculationError; leftOperand: NSDecimalNumber; rightOperand: NSDecimalNumber): NSDecimalNumber; message 'exceptionDuringOperation:error:leftOperand:rightOperand:';
+  end; external name 'NSDecimalNumberBehaviors';
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSDelegatesAll.inc b/packages/cocoaint/src/foundation/NSDelegatesAll.inc
new file mode 100644
index 0000000000..1fdd9bf6c0
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSDelegatesAll.inc
@@ -0,0 +1,31 @@
+{ Parsed from Foundation.framework NSDelegatesAll.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSDELEGATESALL_PAS_T}
+{$define NSDELEGATESALL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSDELEGATESALL_PAS_R}
+{$define NSDELEGATESALL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSDELEGATESALL_PAS_F}
+{$define NSDELEGATESALL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSDELEGATESALL_PAS_T}
+{$define NSDELEGATESALL_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSDictionary.inc b/packages/cocoaint/src/foundation/NSDictionary.inc
new file mode 100644
index 0000000000..7ba54e2235
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSDictionary.inc
@@ -0,0 +1,141 @@
+{ Parsed from Foundation.framework NSDictionary.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSDICTIONARY_PAS_H}
+{$define NSDICTIONARY_PAS_H}
+type
+  NSDictionaryPointer = Pointer;
+  NSMutableDictionaryPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSDICTIONARY_PAS_T}
+{$define NSDICTIONARY_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSDICTIONARY_PAS_R}
+{$define NSDICTIONARY_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSDICTIONARY_PAS_F}
+{$define NSDICTIONARY_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSDICTIONARY_PAS_T}
+{$define NSDICTIONARY_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSDictionary = objcclass;
+  NSMutableDictionary = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSDICTIONARY_PAS_C}
+{$define NSDICTIONARY_PAS_C}
+
+{ NSDictionary }
+  NSDictionary = objcclass(NSObject, NSCopyingProtocol, NSMutableCopyingProtocol, NSCodingProtocol, NSFastEnumerationProtocol)
+    
+  public
+    class function alloc: NSDictionary; message 'alloc';
+
+    function count: culong; message 'count';
+    function objectForKey(aKey: id): id; message 'objectForKey:';
+    function keyEnumerator: NSEnumerator; message 'keyEnumerator';
+
+    { Category: NSExtendedDictionary }
+    function allKeys: NSArray; message 'allKeys';
+    function allKeysForObject(anObject: id): NSArray; message 'allKeysForObject:';
+    function allValues: NSArray; message 'allValues';
+    function description: NSString; message 'description';
+    function descriptionInStringsFileFormat: NSString; message 'descriptionInStringsFileFormat';
+    function descriptionWithLocale(locale: id): NSString; message 'descriptionWithLocale:';
+    function descriptionWithLocale_indent(locale: id; level: culong): NSString; message 'descriptionWithLocale:indent:';
+    function isEqualToDictionary(otherDictionary: NSDictionary): Boolean; message 'isEqualToDictionary:';
+    function objectEnumerator: NSEnumerator; message 'objectEnumerator';
+    function objectsForKeys_notFoundMarker(keys: NSArray; marker: id): NSArray; message 'objectsForKeys:notFoundMarker:';
+    function writeToFile_atomically(path: NSString; useAuxiliaryFile: Boolean): Boolean; message 'writeToFile:atomically:';
+    function writeToURL_atomically(url: NSURL; atomically: Boolean): Boolean; message 'writeToURL:atomically:';
+    function keysSortedByValueUsingSelector(comparator: SEL): NSArray; message 'keysSortedByValueUsingSelector:';
+    procedure getObjects_andKeys(objects: id; keys: id); message 'getObjects:andKeys:';
+
+    { Category: NSDictionaryCreation }
+    class function dictionary: id; message 'dictionary';
+    class function dictionaryWithObject_forKey(object_: id; key: id): id; message 'dictionaryWithObject:forKey:';
+    class function dictionaryWithObjects_forKeys_count(objects: id; keys: id; cnt: culong): id; message 'dictionaryWithObjects:forKeys:count:';
+    class function dictionaryWithObjectsAndKeys(firstObject: id; objParams: array of const): id; message 'dictionaryWithObjectsAndKeys:';
+    class function dictionaryWithDictionary(dict: NSDictionary): id; message 'dictionaryWithDictionary:';
+    class function dictionaryWithObjects_forKeys(objects: NSArray; keys: NSArray): id; message 'dictionaryWithObjects:forKeys:';
+    function initWithObjects_forKeys_count(objects: id; keys: id; cnt: culong): id; message 'initWithObjects:forKeys:count:';
+    function initWithObjectsAndKeys(firstObject: id; objParams: array of const): id; message 'initWithObjectsAndKeys:';
+    function initWithDictionary(otherDictionary: NSDictionary): id; message 'initWithDictionary:';
+    function initWithDictionary_copyItems(otherDictionary: NSDictionary; flag: Boolean): id; message 'initWithDictionary:copyItems:';
+    function initWithObjects_forKeys(objects: NSArray; keys: NSArray): id; message 'initWithObjects:forKeys:';
+    class function dictionaryWithContentsOfFile(path: NSString): id; message 'dictionaryWithContentsOfFile:';
+    class function dictionaryWithContentsOfURL(url: NSURL): id; message 'dictionaryWithContentsOfURL:';
+    function initWithContentsOfFile(path: NSString): id; message 'initWithContentsOfFile:';
+    function initWithContentsOfURL(url: NSURL): id; message 'initWithContentsOfURL:';
+
+    { Category: NSFileAttributes }
+    function fileSize: culonglong; message 'fileSize';
+    function fileModificationDate: NSDate; message 'fileModificationDate';
+    function fileType: NSString; message 'fileType';
+    function filePosixPermissions: culong; message 'filePosixPermissions';
+    function fileOwnerAccountName: NSString; message 'fileOwnerAccountName';
+    function fileGroupOwnerAccountName: NSString; message 'fileGroupOwnerAccountName';
+    function fileSystemNumber: clong; message 'fileSystemNumber';
+    function fileSystemFileNumber: culong; message 'fileSystemFileNumber';
+    function fileExtensionHidden: Boolean; message 'fileExtensionHidden';
+    function fileHFSCreatorCode: OSType; message 'fileHFSCreatorCode';
+    function fileHFSTypeCode: OSType; message 'fileHFSTypeCode';
+    function fileIsImmutable: Boolean; message 'fileIsImmutable';
+    function fileIsAppendOnly: Boolean; message 'fileIsAppendOnly';
+    function fileCreationDate: NSDate; message 'fileCreationDate';
+    function fileOwnerAccountID: NSNumber; message 'fileOwnerAccountID';
+    function fileGroupOwnerAccountID: NSNumber; message 'fileGroupOwnerAccountID';
+
+    { Category: NSKeyValueCoding }
+    function valueForKey(key: NSString): id; message 'valueForKey:';
+  end; external;
+
+{ NSMutableDictionary }
+  NSMutableDictionary = objcclass(NSDictionary)
+    
+  public
+    class function alloc: NSMutableDictionary; message 'alloc';
+
+    procedure removeObjectForKey(aKey: id); message 'removeObjectForKey:';
+    procedure setObject_forKey(anObject: id; aKey: id); message 'setObject:forKey:';
+
+    { Category: NSExtendedMutableDictionary }
+    procedure addEntriesFromDictionary(otherDictionary: NSDictionary); message 'addEntriesFromDictionary:';
+    procedure removeAllObjects; message 'removeAllObjects';
+    procedure removeObjectsForKeys(keyArray: NSArray); message 'removeObjectsForKeys:';
+    procedure setDictionary(otherDictionary: NSDictionary); message 'setDictionary:';
+
+    { Category: NSMutableDictionaryCreation }
+    class function dictionaryWithCapacity(numItems: culong): id; message 'dictionaryWithCapacity:';
+    function initWithCapacity(numItems: culong): id; message 'initWithCapacity:';
+
+    { Category: NSKeyValueCoding }
+    procedure setValue_forKey(value: id; key: NSString); message 'setValue:forKey:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSDistantObject.inc b/packages/cocoaint/src/foundation/NSDistantObject.inc
new file mode 100644
index 0000000000..51f354ed97
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSDistantObject.inc
@@ -0,0 +1,74 @@
+{ Parsed from Foundation.framework NSDistantObject.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSDISTANTOBJECT_PAS_H}
+{$define NSDISTANTOBJECT_PAS_H}
+type
+  NSDistantObjectPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSDISTANTOBJECT_PAS_T}
+{$define NSDISTANTOBJECT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSDISTANTOBJECT_PAS_R}
+{$define NSDISTANTOBJECT_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSDISTANTOBJECT_PAS_F}
+{$define NSDISTANTOBJECT_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSDISTANTOBJECT_PAS_T}
+{$define NSDISTANTOBJECT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSDistantObject = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSDISTANTOBJECT_PAS_C}
+{$define NSDISTANTOBJECT_PAS_C}
+
+{ NSDistantObject }
+  NSDistantObject = objcclass(NSProxy, NSCodingProtocol)
+  private
+    __knownSelectors: id;
+    __wireCount: culong;
+    __refCount: culong;
+    __proto: id;
+    ____2: word;
+    ____1: byte;
+    __wireType: byte;
+    __remoteClass: id;
+    
+  public
+    class function alloc: NSDistantObject; message 'alloc';
+
+    class function proxyWithTarget_connection(target: id; connection: NSConnection): NSDistantObject; message 'proxyWithTarget:connection:';
+    function initWithTarget_connection(target: id; connection: NSConnection): id; message 'initWithTarget:connection:';
+    class function proxyWithLocal_connection(target: id; connection: NSConnection): NSDistantObject; message 'proxyWithLocal:connection:';
+    function initWithLocal_connection(target: id; connection: NSConnection): id; message 'initWithLocal:connection:';
+    procedure setProtocolForProxy(proto: objc_protocol); message 'setProtocolForProxy:';
+    function connectionForProxy: NSConnection; message 'connectionForProxy';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSDistributedLock.inc b/packages/cocoaint/src/foundation/NSDistributedLock.inc
new file mode 100644
index 0000000000..e3811b7f5e
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSDistributedLock.inc
@@ -0,0 +1,67 @@
+{ Parsed from Foundation.framework NSDistributedLock.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSDISTRIBUTEDLOCK_PAS_H}
+{$define NSDISTRIBUTEDLOCK_PAS_H}
+type
+  NSDistributedLockPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSDISTRIBUTEDLOCK_PAS_T}
+{$define NSDISTRIBUTEDLOCK_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSDISTRIBUTEDLOCK_PAS_R}
+{$define NSDISTRIBUTEDLOCK_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSDISTRIBUTEDLOCK_PAS_F}
+{$define NSDISTRIBUTEDLOCK_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSDISTRIBUTEDLOCK_PAS_T}
+{$define NSDISTRIBUTEDLOCK_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSDistributedLock = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSDISTRIBUTEDLOCK_PAS_C}
+{$define NSDISTRIBUTEDLOCK_PAS_C}
+
+{ NSDistributedLock }
+  NSDistributedLock = objcclass(NSObject)
+  private
+    __priv: Pointer;
+    
+  public
+    class function alloc: NSDistributedLock; message 'alloc';
+
+    class function lockWithPath(path: NSString): NSDistributedLock; message 'lockWithPath:';
+    function initWithPath(path: NSString): id; message 'initWithPath:';
+    function tryLock: Boolean; message 'tryLock';
+    procedure unlock; message 'unlock';
+    procedure breakLock; message 'breakLock';
+    function lockDate: NSDate; message 'lockDate';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSDistributedNotificationCenter.inc b/packages/cocoaint/src/foundation/NSDistributedNotificationCenter.inc
new file mode 100644
index 0000000000..29c6796093
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSDistributedNotificationCenter.inc
@@ -0,0 +1,83 @@
+{ Parsed from Foundation.framework NSDistributedNotificationCenter.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSDISTRIBUTEDNOTIFICATIONCENTER_PAS_H}
+{$define NSDISTRIBUTEDNOTIFICATIONCENTER_PAS_H}
+type
+  NSDistributedNotificationCenterPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSDISTRIBUTEDNOTIFICATIONCENTER_PAS_T}
+{$define NSDISTRIBUTEDNOTIFICATIONCENTER_PAS_T}
+
+{ CFString constants }
+var
+  NSLocalNotificationCenterType: CFStringRef; external name '_NSLocalNotificationCenterType';
+
+{ Constants }
+
+const
+  NSNotificationSuspensionBehaviorDrop = 1;
+  NSNotificationSuspensionBehaviorCoalesce = 2;
+  NSNotificationSuspensionBehaviorHold = 3;
+  NSNotificationSuspensionBehaviorDeliverImmediately = 4;
+
+const
+  NSNotificationDeliverImmediately = 1  shl  0;
+  NSNotificationPostToAllSessions = 1  shl  1;
+
+{ Types }
+type
+  NSNotificationSuspensionBehavior = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSDISTRIBUTEDNOTIFICATIONCENTER_PAS_R}
+{$define NSDISTRIBUTEDNOTIFICATIONCENTER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSDISTRIBUTEDNOTIFICATIONCENTER_PAS_F}
+{$define NSDISTRIBUTEDNOTIFICATIONCENTER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSDISTRIBUTEDNOTIFICATIONCENTER_PAS_T}
+{$define NSDISTRIBUTEDNOTIFICATIONCENTER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSDistributedNotificationCenter = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSDISTRIBUTEDNOTIFICATIONCENTER_PAS_C}
+{$define NSDISTRIBUTEDNOTIFICATIONCENTER_PAS_C}
+
+{ NSDistributedNotificationCenter }
+  NSDistributedNotificationCenter = objcclass(NSNotificationCenter)
+    
+  public
+    class function alloc: NSDistributedNotificationCenter; message 'alloc';
+
+    class function notificationCenterForType(notificationCenterType: NSString): NSDistributedNotificationCenter; message 'notificationCenterForType:';
+    class function defaultCenter: id; message 'defaultCenter';
+    procedure addObserver_selector_name_object_suspensionBehavior(observer: id; selector: SEL; name: NSString; object_: NSString; suspensionBehavior: NSNotificationSuspensionBehavior); message 'addObserver:selector:name:object:suspensionBehavior:';
+    procedure postNotificationName_object_userInfo_deliverImmediately(name: NSString; object_: NSString; userInfo: NSDictionary; deliverImmediately: Boolean); message 'postNotificationName:object:userInfo:deliverImmediately:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSEnumerator.inc b/packages/cocoaint/src/foundation/NSEnumerator.inc
new file mode 100644
index 0000000000..8724604f72
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSEnumerator.inc
@@ -0,0 +1,84 @@
+{ Parsed from Foundation.framework NSEnumerator.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSENUMERATOR_PAS_H}
+{$define NSENUMERATOR_PAS_H}
+type
+  NSEnumeratorPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSENUMERATOR_PAS_T}
+{$define NSENUMERATOR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSENUMERATOR_PAS_R}
+{$define NSENUMERATOR_PAS_R}
+
+{ Records }
+type
+  NSFastEnumerationState = record
+    state: culong;
+    itemsPtr: id;
+    mutationsPtr: culong;
+    extra: culong;
+  end;
+
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSENUMERATOR_PAS_F}
+{$define NSENUMERATOR_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSENUMERATOR_PAS_T}
+{$define NSENUMERATOR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSFastEnumerationProtocol = objcprotocol;
+  NSEnumerator = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSENUMERATOR_PAS_C}
+{$define NSENUMERATOR_PAS_C}
+
+{ NSEnumerator }
+  NSEnumerator = objcclass(NSObject, NSFastEnumerationProtocol)
+    
+  public
+    class function alloc: NSEnumerator; message 'alloc';
+
+    function nextObject: id; message 'nextObject';
+
+    { Category: NSExtendedEnumerator }
+    function allObjects: NSArray; message 'allObjects';
+  end; external;
+
+{$endif}
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSENUMERATOR_PAS_P}
+{$define NSENUMERATOR_PAS_P}
+  
+{ NSFastEnumeration Protocol }
+  NSFastEnumerationProtocol = objcprotocol
+    function countByEnumeratingWithState_objects_count(var state: NSFastEnumerationState; stackbuf: id; len: culong): culong; message 'countByEnumeratingWithState:objects:count:';
+  end; external name 'NSFastEnumeration';
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSError.inc b/packages/cocoaint/src/foundation/NSError.inc
new file mode 100644
index 0000000000..f4aa316741
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSError.inc
@@ -0,0 +1,74 @@
+{ Parsed from Foundation.framework NSError.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSERROR_PAS_H}
+{$define NSERROR_PAS_H}
+type
+  NSErrorPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSERROR_PAS_T}
+{$define NSERROR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSERROR_PAS_R}
+{$define NSERROR_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSERROR_PAS_F}
+{$define NSERROR_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSERROR_PAS_T}
+{$define NSERROR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSError = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSERROR_PAS_C}
+{$define NSERROR_PAS_C}
+
+{ NSError }
+  NSError = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __reserved: Pointer;
+    __code: clong;
+    __domain: NSString;
+    __userInfo: NSDictionary;
+    
+  public
+    class function alloc: NSError; message 'alloc';
+
+    function initWithDomain_code_userInfo(domain_: NSString; code_: clong; dict: NSDictionary): id; message 'initWithDomain:code:userInfo:';
+    class function errorWithDomain_code_userInfo(domain_: NSString; code_: clong; dict: NSDictionary): id; message 'errorWithDomain:code:userInfo:';
+    function domain: NSString; message 'domain';
+    function code: clong; message 'code';
+    function userInfo: NSDictionary; message 'userInfo';
+    function localizedDescription: NSString; message 'localizedDescription';
+    function localizedFailureReason: NSString; message 'localizedFailureReason';
+    function localizedRecoverySuggestion: NSString; message 'localizedRecoverySuggestion';
+    function localizedRecoveryOptions: NSArray; message 'localizedRecoveryOptions';
+    function recoveryAttempter: id; message 'recoveryAttempter';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSException.inc b/packages/cocoaint/src/foundation/NSException.inc
new file mode 100644
index 0000000000..bc07da7a4c
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSException.inc
@@ -0,0 +1,110 @@
+{ Parsed from Foundation.framework NSException.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSEXCEPTION_PAS_H}
+{$define NSEXCEPTION_PAS_H}
+type
+  NSExceptionPointer = Pointer;
+  NSAssertionHandlerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSEXCEPTION_PAS_T}
+{$define NSEXCEPTION_PAS_T}
+
+{ CFString constants }
+var
+  NSGenericException: CFStringRef; external name '_NSGenericException';
+  NSRangeException: CFStringRef; external name '_NSRangeException';
+  NSInvalidArgumentException: CFStringRef; external name '_NSInvalidArgumentException';
+  NSInternalInconsistencyException: CFStringRef; external name '_NSInternalInconsistencyException';
+  NSMallocException: CFStringRef; external name '_NSMallocException';
+  NSObjectInaccessibleException: CFStringRef; external name '_NSObjectInaccessibleException';
+  NSObjectNotAvailableException: CFStringRef; external name '_NSObjectNotAvailableException';
+  NSDestinationInvalidException: CFStringRef; external name '_NSDestinationInvalidException';
+  NSPortTimeoutException: CFStringRef; external name '_NSPortTimeoutException';
+  NSInvalidSendPortException: CFStringRef; external name '_NSInvalidSendPortException';
+  NSInvalidReceivePortException: CFStringRef; external name '_NSInvalidReceivePortException';
+  NSPortSendException: CFStringRef; external name '_NSPortSendException';
+  NSPortReceiveException: CFStringRef; external name '_NSPortReceiveException';
+  NSOldStyleException: CFStringRef; external name '_NSOldStyleException';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSEXCEPTION_PAS_R}
+{$define NSEXCEPTION_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSEXCEPTION_PAS_F}
+{$define NSEXCEPTION_PAS_F}
+
+{ Functions }
+function NSGetUncaughtExceptionHandler: NSUncaughtExceptionHandler; cdecl; external name 'NSGetUncaughtExceptionHandler';
+procedure NSSetUncaughtExceptionHandler(var_: NSUncaughtExceptionHandler); cdecl; external name 'NSSetUncaughtExceptionHandler';
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSEXCEPTION_PAS_T}
+{$define NSEXCEPTION_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSException = objcclass;
+  NSAssertionHandler = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSEXCEPTION_PAS_C}
+{$define NSEXCEPTION_PAS_C}
+
+{ NSException }
+  NSException = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    _name: NSString;
+    _reason: NSString;
+    _userInfo: NSDictionary;
+    _reserved: id;
+    
+  public
+    class function alloc: NSException; message 'alloc';
+
+    class function exceptionWithName_reason_userInfo(name_: NSString; reason_: NSString; userInfo_: NSDictionary): NSException; message 'exceptionWithName:reason:userInfo:';
+    function initWithName_reason_userInfo(aName: NSString; aReason: NSString; aUserInfo: NSDictionary): id; message 'initWithName:reason:userInfo:';
+    function name: NSString; message 'name';
+    function reason: NSString; message 'reason';
+    function userInfo: NSDictionary; message 'userInfo';
+    procedure raise_; message 'raise';
+
+    { Category: NSExceptionRaisingConveniences }
+    class procedure raise_format(name_: NSString; format: NSString); message 'raise:format:';
+    class procedure raise_format_arguments(name_: NSString; format: NSString; argList: va_list); message 'raise:format:arguments:';
+  end; external;
+
+{ NSAssertionHandler }
+  NSAssertionHandler = objcclass(NSObject)
+  private
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSAssertionHandler; message 'alloc';
+
+    class function currentHandler: NSAssertionHandler; message 'currentHandler';
+    procedure handleFailureInMethod_object_file_lineNumber_description(selector: SEL; object_: id; fileName: NSString; line: clong; format: NSString); message 'handleFailureInMethod:object:file:lineNumber:description:';
+    procedure handleFailureInFunction_file_lineNumber_description(functionName: NSString; fileName: NSString; line: clong; format: NSString); message 'handleFailureInFunction:file:lineNumber:description:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSExpression.inc b/packages/cocoaint/src/foundation/NSExpression.inc
new file mode 100644
index 0000000000..f23f1bdbb0
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSExpression.inc
@@ -0,0 +1,96 @@
+{ Parsed from Foundation.framework NSExpression.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSEXPRESSION_PAS_H}
+{$define NSEXPRESSION_PAS_H}
+type
+  NSExpressionPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSEXPRESSION_PAS_T}
+{$define NSEXPRESSION_PAS_T}
+
+{ Constants }
+
+const
+  NSSubqueryExpressionType = 13;
+  NSAggregateExpressionType = 0;
+
+{ Types }
+type
+  NSExpressionType = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSEXPRESSION_PAS_R}
+{$define NSEXPRESSION_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSEXPRESSION_PAS_F}
+{$define NSEXPRESSION_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSEXPRESSION_PAS_T}
+{$define NSEXPRESSION_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSExpression = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSEXPRESSION_PAS_C}
+{$define NSEXPRESSION_PAS_C}
+
+{ NSExpression }
+  NSExpression = objcclass(NSObject, NSCodingProtocol, NSCopyingProtocol)
+  private
+    __reserved: Pointer;
+    __expressionType: NSExpressionType;
+    
+  public
+    class function alloc: NSExpression; message 'alloc';
+
+    class function expressionForConstantValue(obj: id): NSExpression; message 'expressionForConstantValue:';
+    class function expressionForEvaluatedObject: NSExpression; message 'expressionForEvaluatedObject';
+    class function expressionForVariable(string_: NSString): NSExpression; message 'expressionForVariable:';
+    class function expressionForKeyPath(keyPath_: NSString): NSExpression; message 'expressionForKeyPath:';
+    class function expressionForFunction_arguments(name: NSString; parameters: NSArray): NSExpression; message 'expressionForFunction:arguments:';
+    class function expressionForAggregate(subexpressions: NSArray): NSExpression; message 'expressionForAggregate:';
+    class function expressionForUnionSet_with(left: NSExpression; right: NSExpression): NSExpression; message 'expressionForUnionSet:with:';
+    class function expressionForIntersectSet_with(left: NSExpression; right: NSExpression): NSExpression; message 'expressionForIntersectSet:with:';
+    class function expressionForMinusSet_with(left: NSExpression; right: NSExpression): NSExpression; message 'expressionForMinusSet:with:';
+    class function expressionForSubquery_usingIteratorVariable_predicate(expression: NSExpression; variable_: NSString; predicate_: id): NSExpression; message 'expressionForSubquery:usingIteratorVariable:predicate:';
+    class function expressionForFunction_selectorName_arguments(target: NSExpression; name: NSString; parameters: NSArray): NSExpression; message 'expressionForFunction:selectorName:arguments:';
+    function initWithExpressionType(type_: NSExpressionType): id; message 'initWithExpressionType:';
+    function expressionType: NSExpressionType; message 'expressionType';
+    function constantValue: id; message 'constantValue';
+    function keyPath: NSString; message 'keyPath';
+    function function_: NSString; message 'function';
+    function variable: NSString; message 'variable';
+    function operand: NSExpression; message 'operand';
+    function arguments: NSArray; message 'arguments';
+    function collection: id; message 'collection';
+    function predicate: NSPredicate; message 'predicate';
+    function leftExpression: NSExpression; message 'leftExpression';
+    function rightExpression: NSExpression; message 'rightExpression';
+    function expressionValueWithObject_context(object_: id; context: NSMutableDictionary): id; message 'expressionValueWithObject:context:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSFileHandle.inc b/packages/cocoaint/src/foundation/NSFileHandle.inc
new file mode 100644
index 0000000000..f866b15d0f
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSFileHandle.inc
@@ -0,0 +1,118 @@
+{ Parsed from Foundation.framework NSFileHandle.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSFILEHANDLE_PAS_H}
+{$define NSFILEHANDLE_PAS_H}
+type
+  NSFileHandlePointer = Pointer;
+  NSPipePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSFILEHANDLE_PAS_T}
+{$define NSFILEHANDLE_PAS_T}
+
+{ CFString constants }
+var
+  NSFileHandleOperationException: CFStringRef; external name '_NSFileHandleOperationException';
+  NSFileHandleReadCompletionNotification: CFStringRef; external name '_NSFileHandleReadCompletionNotification';
+  NSFileHandleReadToEndOfFileCompletionNotification: CFStringRef; external name '_NSFileHandleReadToEndOfFileCompletionNotification';
+  NSFileHandleConnectionAcceptedNotification: CFStringRef; external name '_NSFileHandleConnectionAcceptedNotification';
+  NSFileHandleDataAvailableNotification: CFStringRef; external name '_NSFileHandleDataAvailableNotification';
+  NSFileHandleNotificationDataItem: CFStringRef; external name '_NSFileHandleNotificationDataItem';
+  NSFileHandleNotificationFileHandleItem: CFStringRef; external name '_NSFileHandleNotificationFileHandleItem';
+  NSFileHandleNotificationMonitorModes: CFStringRef; external name '_NSFileHandleNotificationMonitorModes';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSFILEHANDLE_PAS_R}
+{$define NSFILEHANDLE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSFILEHANDLE_PAS_F}
+{$define NSFILEHANDLE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSFILEHANDLE_PAS_T}
+{$define NSFILEHANDLE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSFileHandle = objcclass;
+  NSPipe = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSFILEHANDLE_PAS_C}
+{$define NSFILEHANDLE_PAS_C}
+
+{ NSFileHandle }
+  NSFileHandle = objcclass(NSObject)
+    
+  public
+    class function alloc: NSFileHandle; message 'alloc';
+
+    function availableData: NSData; message 'availableData';
+    function readDataToEndOfFile: NSData; message 'readDataToEndOfFile';
+    function readDataOfLength(length: culong): NSData; message 'readDataOfLength:';
+    procedure writeData(data: NSData); message 'writeData:';
+    function offsetInFile: culonglong; message 'offsetInFile';
+    function seekToEndOfFile: culonglong; message 'seekToEndOfFile';
+    procedure seekToFileOffset(offset: culonglong); message 'seekToFileOffset:';
+    procedure truncateFileAtOffset(offset: culonglong); message 'truncateFileAtOffset:';
+    procedure synchronizeFile; message 'synchronizeFile';
+    procedure closeFile; message 'closeFile';
+
+    { Category: NSFileHandleCreation }
+    class function fileHandleWithStandardInput: id; message 'fileHandleWithStandardInput';
+    class function fileHandleWithStandardOutput: id; message 'fileHandleWithStandardOutput';
+    class function fileHandleWithStandardError: id; message 'fileHandleWithStandardError';
+    class function fileHandleWithNullDevice: id; message 'fileHandleWithNullDevice';
+    class function fileHandleForReadingAtPath(path: NSString): id; message 'fileHandleForReadingAtPath:';
+    class function fileHandleForWritingAtPath(path: NSString): id; message 'fileHandleForWritingAtPath:';
+    class function fileHandleForUpdatingAtPath(path: NSString): id; message 'fileHandleForUpdatingAtPath:';
+
+    { Category: NSFileHandleAsynchronousAccess }
+    procedure readInBackgroundAndNotifyForModes(modes: NSArray); message 'readInBackgroundAndNotifyForModes:';
+    procedure readInBackgroundAndNotify; message 'readInBackgroundAndNotify';
+    procedure readToEndOfFileInBackgroundAndNotifyForModes(modes: NSArray); message 'readToEndOfFileInBackgroundAndNotifyForModes:';
+    procedure readToEndOfFileInBackgroundAndNotify; message 'readToEndOfFileInBackgroundAndNotify';
+    procedure acceptConnectionInBackgroundAndNotifyForModes(modes: NSArray); message 'acceptConnectionInBackgroundAndNotifyForModes:';
+    procedure acceptConnectionInBackgroundAndNotify; message 'acceptConnectionInBackgroundAndNotify';
+    procedure waitForDataInBackgroundAndNotifyForModes(modes: NSArray); message 'waitForDataInBackgroundAndNotifyForModes:';
+    procedure waitForDataInBackgroundAndNotify; message 'waitForDataInBackgroundAndNotify';
+
+    { Category: NSFileHandlePlatformSpecific }
+    function initWithFileDescriptor_closeOnDealloc(fd: cint; closeopt: Boolean): id; message 'initWithFileDescriptor:closeOnDealloc:';
+    function initWithFileDescriptor(fd: cint): id; message 'initWithFileDescriptor:';
+    function fileDescriptor: cint; message 'fileDescriptor';
+  end; external;
+
+{ NSPipe }
+  NSPipe = objcclass(NSObject)
+    
+  public
+    class function alloc: NSPipe; message 'alloc';
+
+    function fileHandleForReading: NSFileHandle; message 'fileHandleForReading';
+    function fileHandleForWriting: NSFileHandle; message 'fileHandleForWriting';
+    function init: id; message 'init';
+    class function pipe: id; message 'pipe';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSFileManager.inc b/packages/cocoaint/src/foundation/NSFileManager.inc
new file mode 100644
index 0000000000..ab383d64c6
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSFileManager.inc
@@ -0,0 +1,145 @@
+{ Parsed from Foundation.framework NSFileManager.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSFILEMANAGER_PAS_H}
+{$define NSFILEMANAGER_PAS_H}
+type
+  NSFileManagerPointer = Pointer;
+  NSDirectoryEnumeratorPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSFILEMANAGER_PAS_T}
+{$define NSFILEMANAGER_PAS_T}
+
+{ Defines }
+const
+  NSFoundationVersionWithFileManagerResourceForkSupport = 412;
+
+{ CFString constants }
+var
+  NSFileType: CFStringRef; external name '_NSFileType';
+  NSFileSize: CFStringRef; external name '_NSFileSize';
+  NSFileModificationDate: CFStringRef; external name '_NSFileModificationDate';
+  NSFileReferenceCount: CFStringRef; external name '_NSFileReferenceCount';
+  NSFileDeviceIdentifier: CFStringRef; external name '_NSFileDeviceIdentifier';
+  NSFileOwnerAccountName: CFStringRef; external name '_NSFileOwnerAccountName';
+  NSFileGroupOwnerAccountName: CFStringRef; external name '_NSFileGroupOwnerAccountName';
+  NSFilePosixPermissions: CFStringRef; external name '_NSFilePosixPermissions';
+  NSFileSystemNumber: CFStringRef; external name '_NSFileSystemNumber';
+  NSFileSystemFileNumber: CFStringRef; external name '_NSFileSystemFileNumber';
+  NSFileExtensionHidden: CFStringRef; external name '_NSFileExtensionHidden';
+  NSFileHFSCreatorCode: CFStringRef; external name '_NSFileHFSCreatorCode';
+  NSFileHFSTypeCode: CFStringRef; external name '_NSFileHFSTypeCode';
+  NSFileImmutable: CFStringRef; external name '_NSFileImmutable';
+  NSFileAppendOnly: CFStringRef; external name '_NSFileAppendOnly';
+  NSFileCreationDate: CFStringRef; external name '_NSFileCreationDate';
+  NSFileOwnerAccountID: CFStringRef; external name '_NSFileOwnerAccountID';
+  NSFileGroupOwnerAccountID: CFStringRef; external name '_NSFileGroupOwnerAccountID';
+  NSFileBusy: CFStringRef; external name '_NSFileBusy';
+  NSFileSystemSize: CFStringRef; external name '_NSFileSystemSize';
+  NSFileSystemFreeSize: CFStringRef; external name '_NSFileSystemFreeSize';
+  NSFileSystemNodes: CFStringRef; external name '_NSFileSystemNodes';
+  NSFileSystemFreeNodes: CFStringRef; external name '_NSFileSystemFreeNodes';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSFILEMANAGER_PAS_R}
+{$define NSFILEMANAGER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSFILEMANAGER_PAS_F}
+{$define NSFILEMANAGER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSFILEMANAGER_PAS_T}
+{$define NSFILEMANAGER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSFileManager = objcclass;
+  NSDirectoryEnumerator = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSFILEMANAGER_PAS_C}
+{$define NSFILEMANAGER_PAS_C}
+
+{ NSFileManager }
+  NSFileManager = objcclass(NSObject)
+    
+  public
+    class function alloc: NSFileManager; message 'alloc';
+
+    class function defaultManager: NSFileManager; message 'defaultManager';
+    procedure setDelegate(delegate_: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
+    function setAttributes_ofItemAtPath_error(attributes: NSDictionary; path: NSString; var error: NSError): Boolean; message 'setAttributes:ofItemAtPath:error:';
+    function createDirectoryAtPath_withIntermediateDirectories_attributes_error(path: NSString; createIntermediates: Boolean; attributes: NSDictionary; var error: NSError): Boolean; message 'createDirectoryAtPath:withIntermediateDirectories:attributes:error:';
+    function contentsOfDirectoryAtPath_error(path: NSString; var error: NSError): NSArray; message 'contentsOfDirectoryAtPath:error:';
+    function subpathsOfDirectoryAtPath_error(path: NSString; var error: NSError): NSArray; message 'subpathsOfDirectoryAtPath:error:';
+    function attributesOfItemAtPath_error(path: NSString; var error: NSError): NSDictionary; message 'attributesOfItemAtPath:error:';
+    function attributesOfFileSystemForPath_error(path: NSString; var error: NSError): NSDictionary; message 'attributesOfFileSystemForPath:error:';
+    function createSymbolicLinkAtPath_withDestinationPath_error(path: NSString; destPath: NSString; var error: NSError): Boolean; message 'createSymbolicLinkAtPath:withDestinationPath:error:';
+    function destinationOfSymbolicLinkAtPath_error(path: NSString; var error: NSError): NSString; message 'destinationOfSymbolicLinkAtPath:error:';
+    function copyItemAtPath_toPath_error(srcPath: NSString; dstPath: NSString; var error: NSError): Boolean; message 'copyItemAtPath:toPath:error:';
+    function moveItemAtPath_toPath_error(srcPath: NSString; dstPath: NSString; var error: NSError): Boolean; message 'moveItemAtPath:toPath:error:';
+    function linkItemAtPath_toPath_error(srcPath: NSString; dstPath: NSString; var error: NSError): Boolean; message 'linkItemAtPath:toPath:error:';
+    function removeItemAtPath_error(path: NSString; var error: NSError): Boolean; message 'removeItemAtPath:error:';
+    function fileAttributesAtPath_traverseLink(path: NSString; yorn: Boolean): NSDictionary; message 'fileAttributesAtPath:traverseLink:';
+    function changeFileAttributes_atPath(attributes: NSDictionary; path: NSString): Boolean; message 'changeFileAttributes:atPath:';
+    function directoryContentsAtPath(path: NSString): NSArray; message 'directoryContentsAtPath:';
+    function fileSystemAttributesAtPath(path: NSString): NSDictionary; message 'fileSystemAttributesAtPath:';
+    function pathContentOfSymbolicLinkAtPath(path: NSString): NSString; message 'pathContentOfSymbolicLinkAtPath:';
+    function createSymbolicLinkAtPath_pathContent(path: NSString; otherpath: NSString): Boolean; message 'createSymbolicLinkAtPath:pathContent:';
+    function createDirectoryAtPath_attributes(path: NSString; attributes: NSDictionary): Boolean; message 'createDirectoryAtPath:attributes:';
+    function linkPath_toPath_handler(src: NSString; dest: NSString; handler: id): Boolean; message 'linkPath:toPath:handler:';
+    function copyPath_toPath_handler(src: NSString; dest: NSString; handler: id): Boolean; message 'copyPath:toPath:handler:';
+    function movePath_toPath_handler(src: NSString; dest: NSString; handler: id): Boolean; message 'movePath:toPath:handler:';
+    function removeFileAtPath_handler(path: NSString; handler: id): Boolean; message 'removeFileAtPath:handler:';
+    function currentDirectoryPath: NSString; message 'currentDirectoryPath';
+    function changeCurrentDirectoryPath(path: NSString): Boolean; message 'changeCurrentDirectoryPath:';
+    function fileExistsAtPath(path: NSString): Boolean; message 'fileExistsAtPath:';
+    function fileExistsAtPath_isDirectory(path: NSString; var isDirectory: Boolean): Boolean; message 'fileExistsAtPath:isDirectory:';
+    function isReadableFileAtPath(path: NSString): Boolean; message 'isReadableFileAtPath:';
+    function isWritableFileAtPath(path: NSString): Boolean; message 'isWritableFileAtPath:';
+    function isExecutableFileAtPath(path: NSString): Boolean; message 'isExecutableFileAtPath:';
+    function isDeletableFileAtPath(path: NSString): Boolean; message 'isDeletableFileAtPath:';
+    function contentsEqualAtPath_andPath(path: NSString; path1: NSString): Boolean; message 'contentsEqualAtPath:andPath:';
+    function displayNameAtPath(path: NSString): NSString; message 'displayNameAtPath:';
+    function componentsToDisplayForPath(path: NSString): NSArray; message 'componentsToDisplayForPath:';
+    function enumeratorAtPath(path: NSString): NSDirectoryEnumerator; message 'enumeratorAtPath:';
+    function subpathsAtPath(path: NSString): NSArray; message 'subpathsAtPath:';
+    function contentsAtPath(path: NSString): NSData; message 'contentsAtPath:';
+    function createFileAtPath_contents_attributes(path: NSString; data: NSData; attr: NSDictionary): Boolean; message 'createFileAtPath:contents:attributes:';
+    function fileSystemRepresentationWithPath(path: NSString): char; message 'fileSystemRepresentationWithPath:';
+    function stringWithFileSystemRepresentation_length(str: PChar; len: culong): NSString; message 'stringWithFileSystemRepresentation:length:';
+  end; external;
+
+{ NSDirectoryEnumerator }
+  NSDirectoryEnumerator = objcclass(NSEnumerator)
+    
+  public
+    class function alloc: NSDirectoryEnumerator; message 'alloc';
+
+    function fileAttributes: NSDictionary; message 'fileAttributes';
+    function directoryAttributes: NSDictionary; message 'directoryAttributes';
+    procedure skipDescendents; message 'skipDescendents';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSFormatter.inc b/packages/cocoaint/src/foundation/NSFormatter.inc
new file mode 100644
index 0000000000..29e85198a6
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSFormatter.inc
@@ -0,0 +1,65 @@
+{ Parsed from Foundation.framework NSFormatter.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSFORMATTER_PAS_H}
+{$define NSFORMATTER_PAS_H}
+type
+  NSFormatterPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSFORMATTER_PAS_T}
+{$define NSFORMATTER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSFORMATTER_PAS_R}
+{$define NSFORMATTER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSFORMATTER_PAS_F}
+{$define NSFORMATTER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSFORMATTER_PAS_T}
+{$define NSFORMATTER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSFormatter = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSFORMATTER_PAS_C}
+{$define NSFORMATTER_PAS_C}
+
+{ NSFormatter }
+  NSFormatter = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+    
+  public
+    class function alloc: NSFormatter; message 'alloc';
+
+    function stringForObjectValue(obj: id): NSString; message 'stringForObjectValue:';
+    function attributedStringForObjectValue_withDefaultAttributes(obj: id; attrs: NSDictionary): NSAttributedString; message 'attributedStringForObjectValue:withDefaultAttributes:';
+    function editingStringForObjectValue(obj: id): NSString; message 'editingStringForObjectValue:';
+    function getObjectValue_forString_errorDescription(obj: id; string_: NSString; var error: NSString): Boolean; message 'getObjectValue:forString:errorDescription:';
+    function isPartialStringValid_newEditingString_errorDescription(partialString: NSString; var newString: NSString; var error: NSString): Boolean; message 'isPartialStringValid:newEditingString:errorDescription:';
+    function isPartialStringValid_proposedSelectedRange_originalString_originalSelectedRange_errorDescription(partialStringPtr: NSStringPointer; proposedSelRangePtr: NSRangePointerPointer; origString: NSString; origSelRange: NSRange; var error: NSString): Boolean; message 'isPartialStringValid:proposedSelectedRange:originalString:originalSelectedRange:errorDescription:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSGarbageCollector.inc b/packages/cocoaint/src/foundation/NSGarbageCollector.inc
new file mode 100644
index 0000000000..21911c8700
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSGarbageCollector.inc
@@ -0,0 +1,69 @@
+{ Parsed from Foundation.framework NSGarbageCollector.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSGARBAGECOLLECTOR_PAS_H}
+{$define NSGARBAGECOLLECTOR_PAS_H}
+type
+  NSGarbageCollectorPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSGARBAGECOLLECTOR_PAS_T}
+{$define NSGARBAGECOLLECTOR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSGARBAGECOLLECTOR_PAS_R}
+{$define NSGARBAGECOLLECTOR_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSGARBAGECOLLECTOR_PAS_F}
+{$define NSGARBAGECOLLECTOR_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSGARBAGECOLLECTOR_PAS_T}
+{$define NSGARBAGECOLLECTOR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSGarbageCollector = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSGARBAGECOLLECTOR_PAS_C}
+{$define NSGARBAGECOLLECTOR_PAS_C}
+
+{ NSGarbageCollector }
+  NSGarbageCollector = objcclass(NSObject)
+    
+  public
+    class function alloc: NSGarbageCollector; message 'alloc';
+
+    class function defaultCollector: id; message 'defaultCollector';
+    function isCollecting: Boolean; message 'isCollecting';
+    procedure disable; message 'disable';
+    procedure enable; message 'enable';
+    function isEnabled: Boolean; message 'isEnabled';
+    procedure collectIfNeeded; message 'collectIfNeeded';
+    procedure collectExhaustively; message 'collectExhaustively';
+    procedure disableCollectorForPointer(ptr: Pointer); message 'disableCollectorForPointer:';
+    procedure enableCollectorForPointer(ptr: Pointer); message 'enableCollectorForPointer:';
+    function zone_: NSZone; message 'zone';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSGeometry.inc b/packages/cocoaint/src/foundation/NSGeometry.inc
new file mode 100644
index 0000000000..e4388bdc91
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSGeometry.inc
@@ -0,0 +1,82 @@
+{ Parsed from Foundation.framework NSGeometry.h }
+{ Version 1.0 beta - Wed Mar 18 15:38:09 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSGEOMETRY_PAS_T}
+{$define NSGEOMETRY_PAS_T}
+
+{ Sets }
+
+type
+  NSRectEdge = (NSMinXEdge = 0, NSMinYEdge = 1, NSMaxXEdge = 2, NSMaxYEdge = 3);
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSGEOMETRY_PAS_R}
+{$define NSGEOMETRY_PAS_R}
+
+{ Records }
+type
+  _NSPoint = packed record
+    x: CGFloat;
+    y: CGFloat;
+  end;
+  
+{$ifdef NSGEOMETRY_TYPES_SAME_AS_CGGEOMETRY_TYPES}
+NSPoint = CGPoint;
+{$else}
+NSPoint = _NSPoint;
+{$endif}
+
+NSPointPointer = ^NSPoint;
+TNSPointArray = array[word] of NSPoint;
+PNSPointArray = ^TNSPointArray;
+NSPointArray = ^NSPoint;
+
+type
+  _NSSize = packed record
+    width: CGFloat;
+    height: CGFloat;
+  end;
+  
+{$ifdef NSGEOMETRY_TYPES_SAME_AS_CGGEOMETRY_TYPES}
+NSSize = CGSize;
+{$else}
+NSSize = _NSSize;
+{$endif}
+
+NSSizePointer = ^NSSize;
+TNSSizeArray = array[word] of NSSize;
+PNSSizeArray = ^TNSSizeArray;
+NSSizeArray = ^NSSize;
+
+type
+  _NSRect = packed record
+    origin: NSPoint;
+    size: NSSize;
+  end;
+  
+{$ifdef NSGEOMETRY_TYPES_SAME_AS_CGGEOMETRY_TYPES}
+NSRect = CGRect;
+{$else}
+NSRect = _NSRect;
+{$endif}
+
+NSRectPointer = ^NSRect;
+TNSRectArray = array[word] of NSRect;
+PNSRectArray = ^TNSRectArray;
+NSRectArray = PNSRectArray;
+
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSGEOMETRY_PAS_F}
+{$define NSGEOMETRY_PAS_F}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSHFSFileTypes.inc b/packages/cocoaint/src/foundation/NSHFSFileTypes.inc
new file mode 100644
index 0000000000..971961cd50
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSHFSFileTypes.inc
@@ -0,0 +1,36 @@
+{ Parsed from Foundation.framework NSHFSFileTypes.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSHFSFILETYPES_PAS_T}
+{$define NSHFSFILETYPES_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSHFSFILETYPES_PAS_R}
+{$define NSHFSFILETYPES_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSHFSFILETYPES_PAS_F}
+{$define NSHFSFILETYPES_PAS_F}
+
+{ Functions }
+function NSFileTypeForHFSTypeCode(hfsFileTypeCode: OSType): NSString; cdecl; external name 'NSFileTypeForHFSTypeCode';
+function NSHFSTypeCodeFromFileType(var fileTypeString: NSString): OSType; cdecl; external name 'NSHFSTypeCodeFromFileType';
+function NSHFSTypeOfFile(var fullFilePath: NSString): NSString; cdecl; external name 'NSHFSTypeOfFile';
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSHFSFILETYPES_PAS_T}
+{$define NSHFSFILETYPES_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSHTTPCookie.inc b/packages/cocoaint/src/foundation/NSHTTPCookie.inc
new file mode 100644
index 0000000000..7ce749baea
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSHTTPCookie.inc
@@ -0,0 +1,77 @@
+{ Parsed from Foundation.framework NSHTTPCookie.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSHTTPCOOKIE_PAS_H}
+{$define NSHTTPCOOKIE_PAS_H}
+type
+  NSHTTPCookiePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSHTTPCOOKIE_PAS_T}
+{$define NSHTTPCOOKIE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSHTTPCOOKIE_PAS_R}
+{$define NSHTTPCOOKIE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSHTTPCOOKIE_PAS_F}
+{$define NSHTTPCOOKIE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSHTTPCOOKIE_PAS_T}
+{$define NSHTTPCOOKIE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSHTTPCookie = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSHTTPCOOKIE_PAS_C}
+{$define NSHTTPCOOKIE_PAS_C}
+
+{ NSHTTPCookie }
+  NSHTTPCookie = objcclass(NSObject)
+  private
+    __cookiePrivate: NSHTTPCookieInternal;
+    
+  public
+    class function alloc: NSHTTPCookie; message 'alloc';
+
+    function initWithProperties(properties_: NSDictionary): id; message 'initWithProperties:';
+    class function cookieWithProperties(properties_: NSDictionary): id; message 'cookieWithProperties:';
+    class function requestHeaderFieldsWithCookies(cookies: NSArray): NSDictionary; message 'requestHeaderFieldsWithCookies:';
+    class function cookiesWithResponseHeaderFields_forURL(headerFields: NSDictionary; URL: NSURL): NSArray; message 'cookiesWithResponseHeaderFields:forURL:';
+    function properties: NSDictionary; message 'properties';
+    function version: culong; message 'version';
+    function name: NSString; message 'name';
+    function value: NSString; message 'value';
+    function expiresDate: NSDate; message 'expiresDate';
+    function isSessionOnly: Boolean; message 'isSessionOnly';
+    function domain: NSString; message 'domain';
+    function path: NSString; message 'path';
+    function isSecure: Boolean; message 'isSecure';
+    function comment: NSString; message 'comment';
+    function commentURL: NSURL; message 'commentURL';
+    function portList: NSArray; message 'portList';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSHTTPCookieStorage.inc b/packages/cocoaint/src/foundation/NSHTTPCookieStorage.inc
new file mode 100644
index 0000000000..b5c2a63ea0
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSHTTPCookieStorage.inc
@@ -0,0 +1,80 @@
+{ Parsed from Foundation.framework NSHTTPCookieStorage.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSHTTPCOOKIESTORAGE_PAS_H}
+{$define NSHTTPCOOKIESTORAGE_PAS_H}
+type
+  NSHTTPCookieStoragePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSHTTPCOOKIESTORAGE_PAS_T}
+{$define NSHTTPCOOKIESTORAGE_PAS_T}
+
+{ Constants }
+
+const
+  NSHTTPCookieAcceptPolicyAlways = 0;
+  NSHTTPCookieAcceptPolicyNever = 1;
+  NSHTTPCookieAcceptPolicyOnlyFromMainDocumentDomain = 2;
+
+{ Types }
+type
+  NSHTTPCookieAcceptPolicy = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSHTTPCOOKIESTORAGE_PAS_R}
+{$define NSHTTPCOOKIESTORAGE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSHTTPCOOKIESTORAGE_PAS_F}
+{$define NSHTTPCOOKIESTORAGE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSHTTPCOOKIESTORAGE_PAS_T}
+{$define NSHTTPCOOKIESTORAGE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSHTTPCookieStorage = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSHTTPCOOKIESTORAGE_PAS_C}
+{$define NSHTTPCOOKIESTORAGE_PAS_C}
+
+{ NSHTTPCookieStorage }
+  NSHTTPCookieStorage = objcclass(NSObject)
+  private
+    __internal: NSHTTPCookieStorageInternal;
+    
+  public
+    class function alloc: NSHTTPCookieStorage; message 'alloc';
+
+    class function sharedHTTPCookieStorage: NSHTTPCookieStorage; message 'sharedHTTPCookieStorage';
+    function cookies: NSArray; message 'cookies';
+    procedure setCookie(cookie: NSHTTPCookie); message 'setCookie:';
+    procedure deleteCookie(cookie: NSHTTPCookie); message 'deleteCookie:';
+    function cookiesForURL(URL: NSURL): NSArray; message 'cookiesForURL:';
+    procedure setCookies_forURL_mainDocumentURL(cookies_: NSArray; URL: NSURL; mainDocumentURL: NSURL); message 'setCookies:forURL:mainDocumentURL:';
+    function cookieAcceptPolicy: NSHTTPCookieAcceptPolicy; message 'cookieAcceptPolicy';
+    procedure setCookieAcceptPolicy(cookieAcceptPolicy_: NSHTTPCookieAcceptPolicy); message 'setCookieAcceptPolicy:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSHashTable.inc b/packages/cocoaint/src/foundation/NSHashTable.inc
new file mode 100644
index 0000000000..2de58e29f8
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSHashTable.inc
@@ -0,0 +1,130 @@
+{ Parsed from Foundation.framework NSHashTable.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSHASHTABLE_PAS_H}
+{$define NSHASHTABLE_PAS_H}
+type
+  NSHashTablePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSHASHTABLE_PAS_T}
+{$define NSHASHTABLE_PAS_T}
+
+{ Constants }
+
+const
+  NSHashTableZeroingWeakMemory = NSPointerFunctionsZeroingWeakMemory;
+  NSHashTableCopyIn = NSPointerFunctionsCopyIn;
+  NSHashTableObjectPointerPersonality = NSPointerFunctionsObjectPointerPersonality;
+
+{ Types }
+type
+  NSHashTableOptions = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSHASHTABLE_PAS_R}
+{$define NSHASHTABLE_PAS_R}
+
+{ Records }
+type
+  NSHashTableCallBacks = record
+    hash: function (context: Pointer {bad params!!}): culong; cdecl;
+    isEqual: function (context: Pointer {bad params!!}): Boolean; cdecl;
+    retain: procedure (context: Pointer {bad params!!}); cdecl;
+    release: procedure (context: Pointer {bad params!!}); cdecl;
+    describe: function (context: Pointer {bad params!!}): id; cdecl;
+  end;
+
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSHASHTABLE_PAS_F}
+{$define NSHASHTABLE_PAS_F}
+
+{ Functions }
+procedure NSFreeHashTable(var table: NSHashTable); cdecl; external name 'NSFreeHashTable';
+procedure NSResetHashTable(var table: NSHashTable); cdecl; external name 'NSResetHashTable';
+function NSCompareHashTables(var table1: NSHashTable; var table2: NSHashTable): Boolean; cdecl; external name 'NSCompareHashTables';
+function NSCopyHashTableWithZone(var table: NSHashTable; var zone: NSZone): NSHashTable; cdecl; external name 'NSCopyHashTableWithZone';
+procedure NSHashGet(var table: NSHashTable; var pointer: Pointer); cdecl; external name 'NSHashGet';
+procedure NSHashInsert(var table: NSHashTable; var pointer: Pointer); cdecl; external name 'NSHashInsert';
+procedure NSHashInsertKnownAbsent(var table: NSHashTable; var pointer: Pointer); cdecl; external name 'NSHashInsertKnownAbsent';
+procedure NSHashInsertIfAbsent(var table: NSHashTable; var pointer: Pointer); cdecl; external name 'NSHashInsertIfAbsent';
+procedure NSHashRemove(var table: NSHashTable; var pointer: Pointer); cdecl; external name 'NSHashRemove';
+function NSEnumerateHashTable(var table: NSHashTable): NSHashEnumerator; cdecl; external name 'NSEnumerateHashTable';
+procedure NSNextHashEnumeratorItem(var enumerator: NSHashEnumerator); cdecl; external name 'NSNextHashEnumeratorItem';
+procedure NSEndHashTableEnumeration(var enumerator: NSHashEnumerator); cdecl; external name 'NSEndHashTableEnumeration';
+function NSCountHashTable(var table: NSHashTable): culong; cdecl; external name 'NSCountHashTable';
+function NSStringFromHashTable(var table: NSHashTable): NSString; cdecl; external name 'NSStringFromHashTable';
+function NSAllHashTableObjects(var table: NSHashTable): NSArray; cdecl; external name 'NSAllHashTableObjects';
+function NSCreateHashTableWithZone(callBacks: NSHashTableCallBacks; capacity: culong; var zone: NSZone): NSHashTable; cdecl; external name 'NSCreateHashTableWithZone';
+function NSCreateHashTable(callBacks: NSHashTableCallBacks; capacity: culong): NSHashTable; cdecl; external name 'NSCreateHashTable';
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSHASHTABLE_PAS_T}
+{$define NSHASHTABLE_PAS_T}
+
+{ External symbols }
+var
+  NSNonOwnedPointerHashCallBacks: NSHashTableCallBacks; external name '_NSNonOwnedPointerHashCallBacks';
+  NSNonRetainedObjectHashCallBacks: NSHashTableCallBacks; external name '_NSNonRetainedObjectHashCallBacks';
+  NSObjectHashCallBacks: NSHashTableCallBacks; external name '_NSObjectHashCallBacks';
+  NSOwnedObjectIdentityHashCallBacks: NSHashTableCallBacks; external name '_NSOwnedObjectIdentityHashCallBacks';
+  NSOwnedPointerHashCallBacks: NSHashTableCallBacks; external name '_NSOwnedPointerHashCallBacks';
+  NSPointerToStructHashCallBacks: NSHashTableCallBacks; external name '_NSPointerToStructHashCallBacks';
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSHashTable = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSHASHTABLE_PAS_C}
+{$define NSHASHTABLE_PAS_C}
+
+{ NSHashTable }
+  NSHashTable = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol, NSFastEnumerationProtocol)
+    
+  public
+    class function alloc: NSHashTable; message 'alloc';
+
+    function initWithOptions_capacity(options: NSPointerFunctionsOptions; initialCapacity: culong): id; message 'initWithOptions:capacity:';
+    function initWithPointerFunctions_capacity(functions: NSPointerFunctions; initialCapacity: culong): id; message 'initWithPointerFunctions:capacity:';
+    class function hashTableWithOptions(options: NSPointerFunctionsOptions): id; message 'hashTableWithOptions:';
+    class function hashTableWithWeakObjects: id; message 'hashTableWithWeakObjects';
+    function pointerFunctions: NSPointerFunctions; message 'pointerFunctions';
+    function count: culong; message 'count';
+    function member(object_: id): id; message 'member:';
+    function objectEnumerator: NSEnumerator; message 'objectEnumerator';
+    procedure addObject(object_: id); message 'addObject:';
+    procedure removeObject(object_: id); message 'removeObject:';
+    procedure removeAllObjects; message 'removeAllObjects';
+    function allObjects: NSArray; message 'allObjects';
+    function anyObject: id; message 'anyObject';
+    function containsObject(anObject: id): Boolean; message 'containsObject:';
+    function intersectsHashTable(other: NSHashTable): Boolean; message 'intersectsHashTable:';
+    function isEqualToHashTable(other: NSHashTable): Boolean; message 'isEqualToHashTable:';
+    function isSubsetOfHashTable(other: NSHashTable): Boolean; message 'isSubsetOfHashTable:';
+    procedure intersectHashTable(other: NSHashTable); message 'intersectHashTable:';
+    procedure unionHashTable(other: NSHashTable); message 'unionHashTable:';
+    procedure minusHashTable(other: NSHashTable); message 'minusHashTable:';
+    function setRepresentation: NSSet; message 'setRepresentation';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSHost.inc b/packages/cocoaint/src/foundation/NSHost.inc
new file mode 100644
index 0000000000..b53c1e075b
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSHost.inc
@@ -0,0 +1,74 @@
+{ Parsed from Foundation.framework NSHost.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSHOST_PAS_H}
+{$define NSHOST_PAS_H}
+type
+  NSHostPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSHOST_PAS_T}
+{$define NSHOST_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSHOST_PAS_R}
+{$define NSHOST_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSHOST_PAS_F}
+{$define NSHOST_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSHOST_PAS_T}
+{$define NSHOST_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSHost = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSHOST_PAS_C}
+{$define NSHOST_PAS_C}
+
+{ NSHost }
+  NSHost = objcclass(NSObject)
+  private
+    _names: NSArray;
+    _addresses: NSArray;
+    _reserved: Pointer;
+    
+  public
+    class function alloc: NSHost; message 'alloc';
+
+    class function currentHost: NSHost; message 'currentHost';
+    class function hostWithName(name_: NSString): NSHost; message 'hostWithName:';
+    class function hostWithAddress(address_: NSString): NSHost; message 'hostWithAddress:';
+    class procedure setHostCacheEnabled(flag: Boolean); message 'setHostCacheEnabled:';
+    class function isHostCacheEnabled: Boolean; message 'isHostCacheEnabled';
+    class procedure flushHostCache; message 'flushHostCache';
+    function isEqualToHost(aHost: NSHost): Boolean; message 'isEqualToHost:';
+    function name: NSString; message 'name';
+    function names: NSArray; message 'names';
+    function address: NSString; message 'address';
+    function addresses: NSArray; message 'addresses';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSIndexPath.inc b/packages/cocoaint/src/foundation/NSIndexPath.inc
new file mode 100644
index 0000000000..5b93d7e3e8
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSIndexPath.inc
@@ -0,0 +1,74 @@
+{ Parsed from Foundation.framework NSIndexPath.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSINDEXPATH_PAS_H}
+{$define NSINDEXPATH_PAS_H}
+type
+  NSIndexPathPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSINDEXPATH_PAS_T}
+{$define NSINDEXPATH_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSINDEXPATH_PAS_R}
+{$define NSINDEXPATH_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSINDEXPATH_PAS_F}
+{$define NSINDEXPATH_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSINDEXPATH_PAS_T}
+{$define NSINDEXPATH_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSIndexPath = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSINDEXPATH_PAS_C}
+{$define NSINDEXPATH_PAS_C}
+
+{ NSIndexPath }
+  NSIndexPath = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  private
+    __indexes: culong;
+    __hash: culong;
+    __length: culong;
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSIndexPath; message 'alloc';
+
+    class function indexPathWithIndex(index: culong): id; message 'indexPathWithIndex:';
+    class function indexPathWithIndexes_length(var indexes: culong; length_: culong): id; message 'indexPathWithIndexes:length:';
+    function initWithIndex(index: culong): id; message 'initWithIndex:';
+    function initWithIndexes_length(var indexes: culong; length_: culong): id; message 'initWithIndexes:length:';
+    function indexPathByAddingIndex(index: culong): NSIndexPath; message 'indexPathByAddingIndex:';
+    function indexPathByRemovingLastIndex: NSIndexPath; message 'indexPathByRemovingLastIndex';
+    function indexAtPosition(position: culong): culong; message 'indexAtPosition:';
+    function length: culong; message 'length';
+    procedure getIndexes(var indexes: culong); message 'getIndexes:';
+    function compare(otherObject: NSIndexPath): NSComparisonResult; message 'compare:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSIndexSet.inc b/packages/cocoaint/src/foundation/NSIndexSet.inc
new file mode 100644
index 0000000000..00ad799dd8
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSIndexSet.inc
@@ -0,0 +1,116 @@
+{ Parsed from Foundation.framework NSIndexSet.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSINDEXSET_PAS_H}
+{$define NSINDEXSET_PAS_H}
+type
+  NSIndexSetPointer = Pointer;
+  NSMutableIndexSetPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSINDEXSET_PAS_T}
+{$define NSINDEXSET_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSINDEXSET_PAS_R}
+{$define NSINDEXSET_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSINDEXSET_PAS_F}
+{$define NSINDEXSET_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSINDEXSET_PAS_T}
+{$define NSINDEXSET_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSIndexSet = objcclass;
+  NSMutableIndexSet = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSINDEXSET_PAS_C}
+{$define NSINDEXSET_PAS_C}
+
+{ NSIndexSet }
+  NSIndexSet = objcclass(NSObject, NSCopyingProtocol, NSMutableCopyingProtocol, NSCodingProtocol)
+  private
+    __indexSetFlags: bitpacked record
+        _isEmpty: 0..1;
+        _hasSingleRange: 0..1;
+        _cacheValid: 0..1;
+        _reservedArrayBinderController: 0..((1 shl 29)-1);
+      end;
+    __singleRange: record
+        _range: NSRange;
+      end;
+    __multipleRanges: record
+        _data: Pointer; {garbage collector: __strong }
+        _reserved: Pointer;
+      end;
+    __internal: record
+      end;
+    
+  public
+    class function alloc: NSIndexSet; message 'alloc';
+
+    class function indexSet: id; message 'indexSet';
+    class function indexSetWithIndex(value: culong): id; message 'indexSetWithIndex:';
+    class function indexSetWithIndexesInRange(range: NSRange): id; message 'indexSetWithIndexesInRange:';
+    function init: id; message 'init';
+    function initWithIndex(value: culong): id; message 'initWithIndex:';
+    function initWithIndexesInRange(range: NSRange): id; message 'initWithIndexesInRange:';
+    function initWithIndexSet(indexSet_: NSIndexSet): id; message 'initWithIndexSet:';
+    function isEqualToIndexSet(indexSet_: NSIndexSet): Boolean; message 'isEqualToIndexSet:';
+    function count: culong; message 'count';
+    function firstIndex: culong; message 'firstIndex';
+    function lastIndex: culong; message 'lastIndex';
+    function indexGreaterThanIndex(value: culong): culong; message 'indexGreaterThanIndex:';
+    function indexLessThanIndex(value: culong): culong; message 'indexLessThanIndex:';
+    function indexGreaterThanOrEqualToIndex(value: culong): culong; message 'indexGreaterThanOrEqualToIndex:';
+    function indexLessThanOrEqualToIndex(value: culong): culong; message 'indexLessThanOrEqualToIndex:';
+    function getIndexes_maxCount_inIndexRange(var indexBuffer: culong; bufferSize: culong; range: NSRangePointer): culong; message 'getIndexes:maxCount:inIndexRange:';
+    function countOfIndexesInRange(range: NSRange): culong; message 'countOfIndexesInRange:';
+    function containsIndex(value: culong): Boolean; message 'containsIndex:';
+    function containsIndexesInRange(range: NSRange): Boolean; message 'containsIndexesInRange:';
+    function containsIndexes(indexSet_: NSIndexSet): Boolean; message 'containsIndexes:';
+    function intersectsIndexesInRange(range: NSRange): Boolean; message 'intersectsIndexesInRange:';
+  end; external;
+
+{ NSMutableIndexSet }
+  NSMutableIndexSet = objcclass(NSIndexSet)
+  private
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSMutableIndexSet; message 'alloc';
+
+    procedure addIndexes(indexSet_: NSIndexSet); message 'addIndexes:';
+    procedure removeIndexes(indexSet_: NSIndexSet); message 'removeIndexes:';
+    procedure removeAllIndexes; message 'removeAllIndexes';
+    procedure addIndex(value: culong); message 'addIndex:';
+    procedure removeIndex(value: culong); message 'removeIndex:';
+    procedure addIndexesInRange(range: NSRange); message 'addIndexesInRange:';
+    procedure removeIndexesInRange(range: NSRange); message 'removeIndexesInRange:';
+    procedure shiftIndexesStartingAtIndex_by(index: culong; delta: clong); message 'shiftIndexesStartingAtIndex:by:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSKeyValueCoding.inc b/packages/cocoaint/src/foundation/NSKeyValueCoding.inc
new file mode 100644
index 0000000000..b29cda0cd8
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSKeyValueCoding.inc
@@ -0,0 +1,31 @@
+{ Parsed from Foundation.framework NSKeyValueCoding.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSKEYVALUECODING_PAS_T}
+{$define NSKEYVALUECODING_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSKEYVALUECODING_PAS_R}
+{$define NSKEYVALUECODING_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSKEYVALUECODING_PAS_F}
+{$define NSKEYVALUECODING_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSKEYVALUECODING_PAS_T}
+{$define NSKEYVALUECODING_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSKeyValueObserving.inc b/packages/cocoaint/src/foundation/NSKeyValueObserving.inc
new file mode 100644
index 0000000000..822df8aba4
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSKeyValueObserving.inc
@@ -0,0 +1,57 @@
+{ Parsed from Foundation.framework NSKeyValueObserving.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSKEYVALUEOBSERVING_PAS_T}
+{$define NSKEYVALUEOBSERVING_PAS_T}
+
+{ Constants }
+
+const
+  NSKeyValueObservingOptionNew = $01;
+  NSKeyValueObservingOptionOld = $02;
+  NSKeyValueObservingOptionInitial = $04;
+  NSKeyValueObservingOptionPrior = $08;
+
+const
+  NSKeyValueChangeSetting = 1;
+  NSKeyValueChangeInsertion = 2;
+  NSKeyValueChangeRemoval = 3;
+  NSKeyValueChangeReplacement = 4;
+
+const
+  NSKeyValueUnionSetMutation = 1;
+  NSKeyValueMinusSetMutation = 2;
+  NSKeyValueIntersectSetMutation = 3;
+  NSKeyValueSetSetMutation = 4;
+
+{ Types }
+type
+  NSKeyValueObservingOptions = culong;
+  NSKeyValueChange = culong;
+  NSKeyValueSetMutationKind = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSKEYVALUEOBSERVING_PAS_R}
+{$define NSKEYVALUEOBSERVING_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSKEYVALUEOBSERVING_PAS_F}
+{$define NSKEYVALUEOBSERVING_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSKEYVALUEOBSERVING_PAS_T}
+{$define NSKEYVALUEOBSERVING_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSKeyedArchiver.inc b/packages/cocoaint/src/foundation/NSKeyedArchiver.inc
new file mode 100644
index 0000000000..41416d3fa0
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSKeyedArchiver.inc
@@ -0,0 +1,145 @@
+{ Parsed from Foundation.framework NSKeyedArchiver.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSKEYEDARCHIVER_PAS_H}
+{$define NSKEYEDARCHIVER_PAS_H}
+type
+  NSKeyedArchiverPointer = Pointer;
+  NSKeyedUnarchiverPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSKEYEDARCHIVER_PAS_T}
+{$define NSKEYEDARCHIVER_PAS_T}
+
+{ CFString constants }
+var
+  NSInvalidArchiveOperationException: CFStringRef; external name '_NSInvalidArchiveOperationException';
+  NSInvalidUnarchiveOperationException: CFStringRef; external name '_NSInvalidUnarchiveOperationException';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSKEYEDARCHIVER_PAS_R}
+{$define NSKEYEDARCHIVER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSKEYEDARCHIVER_PAS_F}
+{$define NSKEYEDARCHIVER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSKEYEDARCHIVER_PAS_T}
+{$define NSKEYEDARCHIVER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSKeyedArchiver = objcclass;
+  NSKeyedUnarchiver = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSKEYEDARCHIVER_PAS_C}
+{$define NSKEYEDARCHIVER_PAS_C}
+
+{ NSKeyedArchiver }
+  NSKeyedArchiver = objcclass(NSCoder)
+  private
+    __stream: Pointer;
+    __flags: culong;
+    __delegate: id;
+    __containers: id;
+    __objects: id;
+    __objRefMap: id;
+    __replacementMap: id;
+    __classNameMap: id;
+    __conditionals: id;
+    __classes: id;
+    __genericKey: culong;
+    __cache: Pointer;
+    __cacheSize: culong;
+    __reserved3: Pointer;
+    __reserved2: Pointer;
+    __reserved1: Pointer;
+    __reserved0: Pointer; {garbage collector: __strong }
+    
+  public
+    class function alloc: NSKeyedArchiver; message 'alloc';
+
+    class function archivedDataWithRootObject(rootObject: id): NSData; message 'archivedDataWithRootObject:';
+    class function archiveRootObject_toFile(rootObject: id; path: NSString): Boolean; message 'archiveRootObject:toFile:';
+    function initForWritingWithMutableData(data: NSMutableData): id; message 'initForWritingWithMutableData:';
+    procedure setDelegate(delegate_: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
+    procedure setOutputFormat(format: NSPropertyListFormat); message 'setOutputFormat:';
+    function outputFormat: NSPropertyListFormat; message 'outputFormat';
+    procedure finishEncoding; message 'finishEncoding';
+    class procedure setClassName_forClass(codedName: NSString; cls: Pobjc_class); message 'setClassName:forClass:';
+    class function classNameForClass(cls: Pobjc_class): NSString; message 'classNameForClass:';
+    procedure encodeObject_forKey(objv: id; key: NSString); message 'encodeObject:forKey:';
+    procedure encodeConditionalObject_forKey(objv: id; key: NSString); message 'encodeConditionalObject:forKey:';
+    procedure encodeBool_forKey(boolv: Boolean; key: NSString); message 'encodeBool:forKey:';
+    procedure encodeInt_forKey(intv: cint; key: NSString); message 'encodeInt:forKey:';
+    procedure encodeInt32_forKey(intv: longint; key: NSString); message 'encodeInt32:forKey:';
+    procedure encodeInt64_forKey(intv: clonglong; key: NSString); message 'encodeInt64:forKey:';
+    procedure encodeFloat_forKey(realv: single; key: NSString); message 'encodeFloat:forKey:';
+    procedure encodeDouble_forKey(realv: double; key: NSString); message 'encodeDouble:forKey:';
+    procedure encodeBytes_length_forKey(var bytesp: byte; lenv: culong; key: NSString); message 'encodeBytes:length:forKey:';
+  end; external;
+
+{ NSKeyedUnarchiver }
+  NSKeyedUnarchiver = objcclass(NSCoder)
+  private
+    __delegate: id;
+    __flags: cardinal;
+    __objRefMap: id;
+    __replacementMap: id;
+    __nameClassMap: id;
+    __tmpRefObjMap: id;
+    __refObjMap: id;
+    __genericKey: longint;
+    __data: id;
+    __offsetData: Pointer;
+    __containers: id;
+    __objects: id;
+    __bytes: byte;
+    __len: clonglong;
+    __white: id;
+    __reserved0: Pointer; {garbage collector: __strong }
+    
+  public
+    class function alloc: NSKeyedUnarchiver; message 'alloc';
+
+    class function unarchiveObjectWithData(data: NSData): id; message 'unarchiveObjectWithData:';
+    class function unarchiveObjectWithFile(path: NSString): id; message 'unarchiveObjectWithFile:';
+    function initForReadingWithData(data: NSData): id; message 'initForReadingWithData:';
+    procedure setDelegate(delegate_: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
+    procedure finishDecoding; message 'finishDecoding';
+    class procedure setClass_forClassName(cls: Pobjc_class; codedName: NSString); message 'setClass:forClassName:';
+    class function classForClassName(codedName: NSString): Pobjc_class; message 'classForClassName:';
+    function containsValueForKey(key: NSString): Boolean; message 'containsValueForKey:';
+    function decodeObjectForKey(key: NSString): id; message 'decodeObjectForKey:';
+    function decodeBoolForKey(key: NSString): Boolean; message 'decodeBoolForKey:';
+    function decodeIntForKey(key: NSString): cint; message 'decodeIntForKey:';
+    function decodeInt32ForKey(key: NSString): longint; message 'decodeInt32ForKey:';
+    function decodeInt64ForKey(key: NSString): clonglong; message 'decodeInt64ForKey:';
+    function decodeFloatForKey(key: NSString): single; message 'decodeFloatForKey:';
+    function decodeDoubleForKey(key: NSString): double; message 'decodeDoubleForKey:';
+    function decodeBytesForKey_returnedLength(key: NSString; var lengthp: culong): byte; message 'decodeBytesForKey:returnedLength:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSLocale.inc b/packages/cocoaint/src/foundation/NSLocale.inc
new file mode 100644
index 0000000000..34c19d6ad3
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSLocale.inc
@@ -0,0 +1,78 @@
+{ Parsed from Foundation.framework NSLocale.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSLOCALE_PAS_H}
+{$define NSLOCALE_PAS_H}
+type
+  NSLocalePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSLOCALE_PAS_T}
+{$define NSLOCALE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSLOCALE_PAS_R}
+{$define NSLOCALE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSLOCALE_PAS_F}
+{$define NSLOCALE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSLOCALE_PAS_T}
+{$define NSLOCALE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSLocale = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSLOCALE_PAS_C}
+{$define NSLOCALE_PAS_C}
+
+{ NSLocale }
+  NSLocale = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+    
+  public
+    class function alloc: NSLocale; message 'alloc';
+
+    function objectForKey(key: id): id; message 'objectForKey:';
+    function displayNameForKey_value(key: id; value: id): NSString; message 'displayNameForKey:value:';
+
+    { Category: NSExtendedLocale }
+    function localeIdentifier: NSString; message 'localeIdentifier';
+
+    { Category: NSLocaleCreation }
+    class function systemLocale: id; message 'systemLocale';
+    class function currentLocale: id; message 'currentLocale';
+    function initWithLocaleIdentifier(string_: NSString): id; message 'initWithLocaleIdentifier:';
+
+    { Category: NSLocaleGeneralInfo }
+    class function availableLocaleIdentifiers: NSArray; message 'availableLocaleIdentifiers';
+    class function ISOLanguageCodes: NSArray; message 'ISOLanguageCodes';
+    class function ISOCountryCodes: NSArray; message 'ISOCountryCodes';
+    class function ISOCurrencyCodes: NSArray; message 'ISOCurrencyCodes';
+    class function componentsFromLocaleIdentifier(string_: NSString): NSDictionary; message 'componentsFromLocaleIdentifier:';
+    class function localeIdentifierFromComponents(dict: NSDictionary): NSString; message 'localeIdentifierFromComponents:';
+    class function canonicalLocaleIdentifierFromString(string_: NSString): NSString; message 'canonicalLocaleIdentifierFromString:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSLock.inc b/packages/cocoaint/src/foundation/NSLock.inc
new file mode 100644
index 0000000000..bf5ace9cdc
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSLock.inc
@@ -0,0 +1,129 @@
+{ Parsed from Foundation.framework NSLock.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSLOCK_PAS_H}
+{$define NSLOCK_PAS_H}
+type
+  NSLockPointer = Pointer;
+  NSConditionLockPointer = Pointer;
+  NSRecursiveLockPointer = Pointer;
+  NSConditionPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSLOCK_PAS_T}
+{$define NSLOCK_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSLOCK_PAS_R}
+{$define NSLOCK_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSLOCK_PAS_F}
+{$define NSLOCK_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSLOCK_PAS_T}
+{$define NSLOCK_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSLockingProtocol = objcprotocol;
+  NSLock = objcclass;
+  NSConditionLock = objcclass;
+  NSRecursiveLock = objcclass;
+  NSCondition = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSLOCK_PAS_C}
+{$define NSLOCK_PAS_C}
+
+{ NSLock }
+  NSLock = objcclass(NSObject, NSLockingProtocol)
+  private
+    __priv: Pointer;
+    
+  public
+    class function alloc: NSLock; message 'alloc';
+
+    function tryLock: Boolean; message 'tryLock';
+    function lockBeforeDate(limit: NSDate): Boolean; message 'lockBeforeDate:';
+    procedure setName(n: NSString); message 'setName:';
+  end; external;
+
+{ NSConditionLock }
+  NSConditionLock = objcclass(NSObject, NSLockingProtocol)
+  private
+    __priv: Pointer;
+    
+  public
+    class function alloc: NSConditionLock; message 'alloc';
+
+    function initWithCondition(condition_: clong): id; message 'initWithCondition:';
+    function condition: clong; message 'condition';
+    procedure lockWhenCondition(condition_: clong); message 'lockWhenCondition:';
+    function tryLock: Boolean; message 'tryLock';
+    function tryLockWhenCondition(condition_: clong): Boolean; message 'tryLockWhenCondition:';
+    procedure unlockWithCondition(condition_: clong); message 'unlockWithCondition:';
+    function lockBeforeDate(limit: NSDate): Boolean; message 'lockBeforeDate:';
+    function lockWhenCondition_beforeDate(condition_: clong; limit: NSDate): Boolean; message 'lockWhenCondition:beforeDate:';
+    procedure setName(n: NSString); message 'setName:';
+  end; external;
+
+{ NSRecursiveLock }
+  NSRecursiveLock = objcclass(NSObject, NSLockingProtocol)
+  private
+    __priv: Pointer;
+    
+  public
+    class function alloc: NSRecursiveLock; message 'alloc';
+
+    function tryLock: Boolean; message 'tryLock';
+    function lockBeforeDate(limit: NSDate): Boolean; message 'lockBeforeDate:';
+    procedure setName(n: NSString); message 'setName:';
+  end; external;
+
+{ NSCondition }
+  NSCondition = objcclass(NSObject, NSLockingProtocol)
+  private
+    __priv: Pointer;
+    
+  public
+    class function alloc: NSCondition; message 'alloc';
+
+    procedure wait; message 'wait';
+    function waitUntilDate(limit: NSDate): Boolean; message 'waitUntilDate:';
+    procedure signal; message 'signal';
+    procedure broadcast; message 'broadcast';
+    procedure setName(n: NSString); message 'setName:';
+  end; external;
+
+{$endif}
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSLOCK_PAS_P}
+{$define NSLOCK_PAS_P}
+  
+{ NSLocking Protocol }
+  NSLockingProtocol = objcprotocol
+    procedure lock; message 'lock';
+    procedure unlock; message 'unlock';
+  end; external name 'NSLocking';
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSMapTable.inc b/packages/cocoaint/src/foundation/NSMapTable.inc
new file mode 100644
index 0000000000..52067e11e1
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSMapTable.inc
@@ -0,0 +1,139 @@
+{ Parsed from Foundation.framework NSMapTable.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSMAPTABLE_PAS_H}
+{$define NSMAPTABLE_PAS_H}
+type
+  NSMapTablePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSMAPTABLE_PAS_T}
+{$define NSMAPTABLE_PAS_T}
+
+{ Constants }
+
+const
+  NSMapTableZeroingWeakMemory = NSPointerFunctionsZeroingWeakMemory;
+  NSMapTableCopyIn = NSPointerFunctionsCopyIn;
+  NSMapTableObjectPointerPersonality = NSPointerFunctionsObjectPointerPersonality;
+
+{ Types }
+type
+  NSMapTableOptions = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSMAPTABLE_PAS_R}
+{$define NSMAPTABLE_PAS_R}
+
+{ Records }
+type
+  NSMapTableKeyCallBacks = record
+    hash: function (context: Pointer {bad params!!}): culong; cdecl;
+    isEqual: function (context: Pointer {bad params!!}): Boolean; cdecl;
+    retain: procedure (context: Pointer {bad params!!}); cdecl;
+    release: procedure (context: Pointer {bad params!!}); cdecl;
+    describe: function (context: Pointer {bad params!!}): id; cdecl;
+    notAKeyMarker: Pointer;
+  end;
+
+type
+  NSMapTableValueCallBacks = record
+    retain: procedure (context: Pointer {bad params!!}); cdecl;
+    release: procedure (context: Pointer {bad params!!}); cdecl;
+    describe: function (context: Pointer {bad params!!}): id; cdecl;
+  end;
+
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSMAPTABLE_PAS_F}
+{$define NSMAPTABLE_PAS_F}
+
+{ Functions }
+procedure NSFreeMapTable(var table: NSMapTable); cdecl; external name 'NSFreeMapTable';
+procedure NSResetMapTable(var table: NSMapTable); cdecl; external name 'NSResetMapTable';
+function NSCompareMapTables(var table1: NSMapTable; var table2: NSMapTable): Boolean; cdecl; external name 'NSCompareMapTables';
+function NSCopyMapTableWithZone(var table: NSMapTable; var zone: NSZone): NSMapTable; cdecl; external name 'NSCopyMapTableWithZone';
+function NSMapMember(var table: NSMapTable; var key: Pointer; originalKey: Pointer {Pointer}; value: Pointer {Pointer}): Boolean; cdecl; external name 'NSMapMember';
+procedure NSMapGet(var table: NSMapTable; var key: Pointer); cdecl; external name 'NSMapGet';
+procedure NSMapInsert(var table: NSMapTable; var key: Pointer; var value: Pointer); cdecl; external name 'NSMapInsert';
+procedure NSMapInsertKnownAbsent(var table: NSMapTable; var key: Pointer; var value: Pointer); cdecl; external name 'NSMapInsertKnownAbsent';
+procedure NSMapInsertIfAbsent(var table: NSMapTable; var key: Pointer; var value: Pointer); cdecl; external name 'NSMapInsertIfAbsent';
+procedure NSMapRemove(var table: NSMapTable; var key: Pointer); cdecl; external name 'NSMapRemove';
+function NSEnumerateMapTable(var table: NSMapTable): NSMapEnumerator; cdecl; external name 'NSEnumerateMapTable';
+function NSNextMapEnumeratorPair(var enumerator: NSMapEnumerator; key: Pointer {Pointer}; value: Pointer {Pointer}): Boolean; cdecl; external name 'NSNextMapEnumeratorPair';
+procedure NSEndMapTableEnumeration(var enumerator: NSMapEnumerator); cdecl; external name 'NSEndMapTableEnumeration';
+function NSCountMapTable(var table: NSMapTable): culong; cdecl; external name 'NSCountMapTable';
+function NSStringFromMapTable(var table: NSMapTable): NSString; cdecl; external name 'NSStringFromMapTable';
+function NSAllMapTableKeys(var table: NSMapTable): NSArray; cdecl; external name 'NSAllMapTableKeys';
+function NSAllMapTableValues(var table: NSMapTable): NSArray; cdecl; external name 'NSAllMapTableValues';
+function NSCreateMapTableWithZone(keyCallBacks: NSMapTableKeyCallBacks; valueCallBacks: NSMapTableValueCallBacks; capacity: culong; var zone: NSZone): NSMapTable; cdecl; external name 'NSCreateMapTableWithZone';
+function NSCreateMapTable(keyCallBacks: NSMapTableKeyCallBacks; valueCallBacks: NSMapTableValueCallBacks; capacity: culong): NSMapTable; cdecl; external name 'NSCreateMapTable';
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSMAPTABLE_PAS_T}
+{$define NSMAPTABLE_PAS_T}
+
+{ External symbols }
+var
+  NSNonOwnedPointerMapKeyCallBacks: NSMapTableKeyCallBacks; external name '_NSNonOwnedPointerMapKeyCallBacks';
+  NSNonOwnedPointerOrNullMapKeyCallBacks: NSMapTableKeyCallBacks; external name '_NSNonOwnedPointerOrNullMapKeyCallBacks';
+  NSNonRetainedObjectMapKeyCallBacks: NSMapTableKeyCallBacks; external name '_NSNonRetainedObjectMapKeyCallBacks';
+  NSObjectMapKeyCallBacks: NSMapTableKeyCallBacks; external name '_NSObjectMapKeyCallBacks';
+  NSOwnedPointerMapKeyCallBacks: NSMapTableKeyCallBacks; external name '_NSOwnedPointerMapKeyCallBacks';
+  NSNonOwnedPointerMapValueCallBacks: NSMapTableValueCallBacks; external name '_NSNonOwnedPointerMapValueCallBacks';
+  NSObjectMapValueCallBacks: NSMapTableValueCallBacks; external name '_NSObjectMapValueCallBacks';
+  NSNonRetainedObjectMapValueCallBacks: NSMapTableValueCallBacks; external name '_NSNonRetainedObjectMapValueCallBacks';
+  NSOwnedPointerMapValueCallBacks: NSMapTableValueCallBacks; external name '_NSOwnedPointerMapValueCallBacks';
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSMapTable = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSMAPTABLE_PAS_C}
+{$define NSMAPTABLE_PAS_C}
+
+{ NSMapTable }
+  NSMapTable = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol, NSFastEnumerationProtocol)
+    
+  public
+    class function alloc: NSMapTable; message 'alloc';
+
+    function initWithKeyOptions_valueOptions_capacity(keyOptions: NSPointerFunctionsOptions; valueOptions: NSPointerFunctionsOptions; initialCapacity: culong): id; message 'initWithKeyOptions:valueOptions:capacity:';
+    function initWithKeyPointerFunctions_valuePointerFunctions_capacity(keyFunctions: NSPointerFunctions; valueFunctions: NSPointerFunctions; initialCapacity: culong): id; message 'initWithKeyPointerFunctions:valuePointerFunctions:capacity:';
+    class function mapTableWithKeyOptions_valueOptions(keyOptions: NSPointerFunctionsOptions; valueOptions: NSPointerFunctionsOptions): id; message 'mapTableWithKeyOptions:valueOptions:';
+    class function mapTableWithStrongToStrongObjects: id; message 'mapTableWithStrongToStrongObjects';
+    class function mapTableWithWeakToStrongObjects: id; message 'mapTableWithWeakToStrongObjects';
+    class function mapTableWithStrongToWeakObjects: id; message 'mapTableWithStrongToWeakObjects';
+    class function mapTableWithWeakToWeakObjects: id; message 'mapTableWithWeakToWeakObjects';
+    function keyPointerFunctions: NSPointerFunctions; message 'keyPointerFunctions';
+    function valuePointerFunctions: NSPointerFunctions; message 'valuePointerFunctions';
+    function objectForKey(aKey: id): id; message 'objectForKey:';
+    procedure removeObjectForKey(aKey: id); message 'removeObjectForKey:';
+    procedure setObject_forKey(anObject: id; aKey: id); message 'setObject:forKey:';
+    function count: culong; message 'count';
+    function keyEnumerator: NSEnumerator; message 'keyEnumerator';
+    function objectEnumerator: NSEnumerator; message 'objectEnumerator';
+    procedure removeAllObjects; message 'removeAllObjects';
+    function dictionaryRepresentation: NSDictionary; message 'dictionaryRepresentation';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSMetadata.inc b/packages/cocoaint/src/foundation/NSMetadata.inc
new file mode 100644
index 0000000000..955f66e539
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSMetadata.inc
@@ -0,0 +1,147 @@
+{ Parsed from Foundation.framework NSMetadata.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSMETADATA_PAS_H}
+{$define NSMETADATA_PAS_H}
+type
+  NSMetadataQueryPointer = Pointer;
+  NSMetadataItemPointer = Pointer;
+  NSMetadataQueryAttributeValueTuplePointer = Pointer;
+  NSMetadataQueryResultGroupPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSMETADATA_PAS_T}
+{$define NSMETADATA_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSMETADATA_PAS_R}
+{$define NSMETADATA_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSMETADATA_PAS_F}
+{$define NSMETADATA_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSMETADATA_PAS_T}
+{$define NSMETADATA_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSMetadataQuery = objcclass;
+  NSMetadataItem = objcclass;
+  NSMetadataQueryAttributeValueTuple = objcclass;
+  NSMetadataQueryResultGroup = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSMETADATA_PAS_C}
+{$define NSMETADATA_PAS_C}
+
+{ NSMetadataQuery }
+  NSMetadataQuery = objcclass(NSObject)
+  private
+    __flags: culong;
+    __interval: NSTimeInterval;
+    __private: id;
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSMetadataQuery; message 'alloc';
+
+    function init: id; message 'init';
+    function delegate: id; message 'delegate';
+    procedure setDelegate(delegate_: id); message 'setDelegate:';
+    function predicate: NSPredicate; message 'predicate';
+    procedure setPredicate(predicate_: NSPredicate); message 'setPredicate:';
+    function sortDescriptors: NSArray; message 'sortDescriptors';
+    procedure setSortDescriptors(descriptors: NSArray); message 'setSortDescriptors:';
+    function valueListAttributes: NSArray; message 'valueListAttributes';
+    procedure setValueListAttributes(attrs: NSArray); message 'setValueListAttributes:';
+    function groupingAttributes: NSArray; message 'groupingAttributes';
+    procedure setGroupingAttributes(attrs: NSArray); message 'setGroupingAttributes:';
+    function notificationBatchingInterval: NSTimeInterval; message 'notificationBatchingInterval';
+    procedure setNotificationBatchingInterval(ti: NSTimeInterval); message 'setNotificationBatchingInterval:';
+    function searchScopes: NSArray; message 'searchScopes';
+    procedure setSearchScopes(scopes: NSArray); message 'setSearchScopes:';
+    function startQuery: Boolean; message 'startQuery';
+    procedure stopQuery; message 'stopQuery';
+    function isStarted: Boolean; message 'isStarted';
+    function isGathering: Boolean; message 'isGathering';
+    function isStopped: Boolean; message 'isStopped';
+    procedure disableUpdates; message 'disableUpdates';
+    procedure enableUpdates; message 'enableUpdates';
+    function resultCount: culong; message 'resultCount';
+    function resultAtIndex(idx: culong): id; message 'resultAtIndex:';
+    function results: NSArray; message 'results';
+    function indexOfResult(result_: id): culong; message 'indexOfResult:';
+    function valueLists: NSDictionary; message 'valueLists';
+    function groupedResults: NSArray; message 'groupedResults';
+    function valueOfAttribute_forResultAtIndex(attrName: NSString; idx: culong): id; message 'valueOfAttribute:forResultAtIndex:';
+  end; external;
+
+{ NSMetadataItem }
+  NSMetadataItem = objcclass(NSObject)
+  private
+    __item: id;
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSMetadataItem; message 'alloc';
+
+    function valueForAttribute(key: NSString): id; message 'valueForAttribute:';
+    function valuesForAttributes(keys: NSArray): NSDictionary; message 'valuesForAttributes:';
+    function attributes: NSArray; message 'attributes';
+  end; external;
+
+{ NSMetadataQueryAttributeValueTuple }
+  NSMetadataQueryAttributeValueTuple = objcclass(NSObject)
+  private
+    __attr: id;
+    __value: id;
+    __count: culong;
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSMetadataQueryAttributeValueTuple; message 'alloc';
+
+    function attribute: NSString; message 'attribute';
+    function value: id; message 'value';
+    function count: culong; message 'count';
+  end; external;
+
+{ NSMetadataQueryResultGroup }
+  NSMetadataQueryResultGroup = objcclass(NSObject)
+  private
+    __private: id;
+    __private2: culong;
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSMetadataQueryResultGroup; message 'alloc';
+
+    function attribute: NSString; message 'attribute';
+    function value: id; message 'value';
+    function subgroups: NSArray; message 'subgroups';
+    function resultCount: culong; message 'resultCount';
+    function resultAtIndex(idx: culong): id; message 'resultAtIndex:';
+    function results: NSArray; message 'results';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSMethodSignature.inc b/packages/cocoaint/src/foundation/NSMethodSignature.inc
new file mode 100644
index 0000000000..434b5befd6
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSMethodSignature.inc
@@ -0,0 +1,69 @@
+{ Parsed from Foundation.framework NSMethodSignature.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSMETHODSIGNATURE_PAS_H}
+{$define NSMETHODSIGNATURE_PAS_H}
+type
+  NSMethodSignaturePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSMETHODSIGNATURE_PAS_T}
+{$define NSMETHODSIGNATURE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSMETHODSIGNATURE_PAS_R}
+{$define NSMETHODSIGNATURE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSMETHODSIGNATURE_PAS_F}
+{$define NSMETHODSIGNATURE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSMETHODSIGNATURE_PAS_T}
+{$define NSMETHODSIGNATURE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSMethodSignature = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSMETHODSIGNATURE_PAS_C}
+{$define NSMETHODSIGNATURE_PAS_C}
+
+{ NSMethodSignature }
+  NSMethodSignature = objcclass(NSObject)
+  private
+    __private: Pointer;
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSMethodSignature; message 'alloc';
+
+    class function signatureWithObjCTypes(types: PChar): NSMethodSignature; message 'signatureWithObjCTypes:';
+    function numberOfArguments: culong; message 'numberOfArguments';
+    function getArgumentTypeAtIndex(idx: culong): char; message 'getArgumentTypeAtIndex:';
+    function frameLength: culong; message 'frameLength';
+    function isOneway: Boolean; message 'isOneway';
+    function methodReturnType: char; message 'methodReturnType';
+    function methodReturnLength: culong; message 'methodReturnLength';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSNetServices.inc b/packages/cocoaint/src/foundation/NSNetServices.inc
new file mode 100644
index 0000000000..4e22f31eef
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSNetServices.inc
@@ -0,0 +1,142 @@
+{ Parsed from Foundation.framework NSNetServices.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSNETSERVICES_PAS_H}
+{$define NSNETSERVICES_PAS_H}
+type
+  NSNetServicePointer = Pointer;
+  NSNetServiceBrowserPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSNETSERVICES_PAS_T}
+{$define NSNETSERVICES_PAS_T}
+
+{ CFString constants }
+var
+  NSNetServicesErrorCode: CFStringRef; external name '_NSNetServicesErrorCode';
+  NSNetServicesErrorDomain: CFStringRef; external name '_NSNetServicesErrorDomain';
+
+{ Constants }
+
+const
+  NSNetServicesUnknownError = -72000;
+  NSNetServicesCollisionError = -72001;
+  NSNetServicesNotFoundError = -72002;
+  NSNetServicesActivityInProgress = -72003;
+  NSNetServicesBadArgumentError = -72004;
+  NSNetServicesCancelledError = -72005;
+  NSNetServicesInvalidError = -72006;
+  NSNetServicesTimeoutError = -72007;
+
+const
+  NSNetServiceNoAutoRename = 1  shl  0;
+
+{ Types }
+type
+  NSNetServicesError = clong;
+  NSNetServiceOptions = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSNETSERVICES_PAS_R}
+{$define NSNETSERVICES_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSNETSERVICES_PAS_F}
+{$define NSNETSERVICES_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSNETSERVICES_PAS_T}
+{$define NSNETSERVICES_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSNetService = objcclass;
+  NSNetServiceBrowser = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSNETSERVICES_PAS_C}
+{$define NSNETSERVICES_PAS_C}
+
+{ NSNetService }
+  NSNetService = objcclass(NSObject)
+  private
+    __netService: id;
+    __delegate: id;
+    __reserved: id;
+    
+  public
+    class function alloc: NSNetService; message 'alloc';
+
+    function initWithDomain_type_name_port(domain_: NSString; type__: NSString; name_: NSString; port_: cint): id; message 'initWithDomain:type:name:port:';
+    function initWithDomain_type_name(domain_: NSString; type__: NSString; name_: NSString): id; message 'initWithDomain:type:name:';
+    function delegate: id; message 'delegate';
+    procedure setDelegate(delegate_: id); message 'setDelegate:';
+    procedure scheduleInRunLoop_forMode(aRunLoop: NSRunLoop; mode: NSString); message 'scheduleInRunLoop:forMode:';
+    procedure removeFromRunLoop_forMode(aRunLoop: NSRunLoop; mode: NSString); message 'removeFromRunLoop:forMode:';
+    function domain: NSString; message 'domain';
+    function type_: NSString; message 'type';
+    function name: NSString; message 'name';
+    function addresses: NSArray; message 'addresses';
+    function port: clong; message 'port';
+    procedure publish; message 'publish';
+    procedure publishWithOptions(options: NSNetServiceOptions); message 'publishWithOptions:';
+    procedure resolve; message 'resolve';
+    procedure stop; message 'stop';
+    class function dictionaryFromTXTRecordData(txtData: NSData): NSDictionary; message 'dictionaryFromTXTRecordData:';
+    class function dataFromTXTRecordDictionary(txtDictionary: NSDictionary): NSData; message 'dataFromTXTRecordDictionary:';
+    function hostName: NSString; message 'hostName';
+    procedure resolveWithTimeout(timeout: NSTimeInterval); message 'resolveWithTimeout:';
+    function getInputStream_outputStream(var inputStream: NSInputStream; var outputStream: NSOutputStream): Boolean; message 'getInputStream:outputStream:';
+    function setTXTRecordData(recordData: NSData): Boolean; message 'setTXTRecordData:';
+    function TXTRecordData: NSData; message 'TXTRecordData';
+    procedure startMonitoring; message 'startMonitoring';
+    procedure stopMonitoring; message 'stopMonitoring';
+
+    { Category: NSDeprecated }
+    function protocolSpecificInformation: NSString; message 'protocolSpecificInformation';
+    procedure setProtocolSpecificInformation(specificInformation: NSString); message 'setProtocolSpecificInformation:';
+  end; external;
+
+{ NSNetServiceBrowser }
+  NSNetServiceBrowser = objcclass(NSObject)
+  private
+    __netServiceBrowser: id;
+    __delegate: id;
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSNetServiceBrowser; message 'alloc';
+
+    function init: id; message 'init';
+    function delegate: id; message 'delegate';
+    procedure setDelegate(delegate_: id); message 'setDelegate:';
+    procedure scheduleInRunLoop_forMode(aRunLoop: NSRunLoop; mode: NSString); message 'scheduleInRunLoop:forMode:';
+    procedure removeFromRunLoop_forMode(aRunLoop: NSRunLoop; mode: NSString); message 'removeFromRunLoop:forMode:';
+    procedure searchForBrowsableDomains; message 'searchForBrowsableDomains';
+    procedure searchForRegistrationDomains; message 'searchForRegistrationDomains';
+    procedure searchForServicesOfType_inDomain(type_: NSString; domainString: NSString); message 'searchForServicesOfType:inDomain:';
+    procedure stop; message 'stop';
+
+    { Category: NSDeprecated }
+    procedure searchForAllDomains; message 'searchForAllDomains';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSNotification.inc b/packages/cocoaint/src/foundation/NSNotification.inc
new file mode 100644
index 0000000000..4280c3c561
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSNotification.inc
@@ -0,0 +1,87 @@
+{ Parsed from Foundation.framework NSNotification.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSNOTIFICATION_PAS_H}
+{$define NSNOTIFICATION_PAS_H}
+type
+  NSNotificationPointer = Pointer;
+  NSNotificationCenterPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSNOTIFICATION_PAS_T}
+{$define NSNOTIFICATION_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSNOTIFICATION_PAS_R}
+{$define NSNOTIFICATION_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSNOTIFICATION_PAS_F}
+{$define NSNOTIFICATION_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSNOTIFICATION_PAS_T}
+{$define NSNOTIFICATION_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSNotification = objcclass;
+  NSNotificationCenter = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSNOTIFICATION_PAS_C}
+{$define NSNOTIFICATION_PAS_C}
+
+{ NSNotification }
+  NSNotification = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+    
+  public
+    class function alloc: NSNotification; message 'alloc';
+
+    function name: NSString; message 'name';
+    function object_: id; message 'object';
+    function userInfo: NSDictionary; message 'userInfo';
+
+    { Category: NSNotificationCreation }
+    class function notificationWithName_object(aName: NSString; anObject: id): id; message 'notificationWithName:object:';
+    class function notificationWithName_object_userInfo(aName: NSString; anObject: id; aUserInfo: NSDictionary): id; message 'notificationWithName:object:userInfo:';
+  end; external;
+
+{ NSNotificationCenter }
+  NSNotificationCenter = objcclass(NSObject)
+  private
+    __impl: Pointer; {garbage collector: __strong }
+    __callback_block: Pointer;
+    __pad: Pointer;
+    
+  public
+    class function alloc: NSNotificationCenter; message 'alloc';
+
+    class function defaultCenter: id; message 'defaultCenter';
+    procedure addObserver_selector_name_object(observer: id; aSelector: SEL; aName: NSString; anObject: id); message 'addObserver:selector:name:object:';
+    procedure postNotification(notification: NSNotification); message 'postNotification:';
+    procedure postNotificationName_object(aName: NSString; anObject: id); message 'postNotificationName:object:';
+    procedure postNotificationName_object_userInfo(aName: NSString; anObject: id; aUserInfo: NSDictionary); message 'postNotificationName:object:userInfo:';
+    procedure removeObserver(observer: id); message 'removeObserver:';
+    procedure removeObserver_name_object(observer: id; aName: NSString; anObject: id); message 'removeObserver:name:object:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSNotificationQueue.inc b/packages/cocoaint/src/foundation/NSNotificationQueue.inc
new file mode 100644
index 0000000000..1bafcb7a8d
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSNotificationQueue.inc
@@ -0,0 +1,87 @@
+{ Parsed from Foundation.framework NSNotificationQueue.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSNOTIFICATIONQUEUE_PAS_H}
+{$define NSNOTIFICATIONQUEUE_PAS_H}
+type
+  NSNotificationQueuePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSNOTIFICATIONQUEUE_PAS_T}
+{$define NSNOTIFICATIONQUEUE_PAS_T}
+
+{ Constants }
+
+const
+  NSPostWhenIdle = 1;
+  NSPostASAP = 2;
+  NSPostNow = 3;
+
+const
+  NSNotificationNoCoalescing = 0;
+  NSNotificationCoalescingOnName = 1;
+  NSNotificationCoalescingOnSender = 2;
+
+{ Types }
+type
+  NSPostingStyle = culong;
+  NSNotificationCoalescing = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSNOTIFICATIONQUEUE_PAS_R}
+{$define NSNOTIFICATIONQUEUE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSNOTIFICATIONQUEUE_PAS_F}
+{$define NSNOTIFICATIONQUEUE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSNOTIFICATIONQUEUE_PAS_T}
+{$define NSNOTIFICATIONQUEUE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSNotificationQueue = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSNOTIFICATIONQUEUE_PAS_C}
+{$define NSNOTIFICATIONQUEUE_PAS_C}
+
+{ NSNotificationQueue }
+  NSNotificationQueue = objcclass(NSObject)
+  private
+    __notificationCenter: id;
+    __asapQueue: id;
+    __asapObs: id;
+    __idleQueue: id;
+    __idleObs: id;
+    
+  public
+    class function alloc: NSNotificationQueue; message 'alloc';
+
+    class function defaultQueue: id; message 'defaultQueue';
+    function initWithNotificationCenter(notificationCenter: NSNotificationCenter): id; message 'initWithNotificationCenter:';
+    procedure enqueueNotification_postingStyle(notification: NSNotification; postingStyle: NSPostingStyle); message 'enqueueNotification:postingStyle:';
+    procedure enqueueNotification_postingStyle_coalesceMask_forModes(notification: NSNotification; postingStyle: NSPostingStyle; coalesceMask: culong; modes: NSArray); message 'enqueueNotification:postingStyle:coalesceMask:forModes:';
+    procedure dequeueNotificationsMatching_coalesceMask(notification: NSNotification; coalesceMask: culong); message 'dequeueNotificationsMatching:coalesceMask:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSNull.inc b/packages/cocoaint/src/foundation/NSNull.inc
new file mode 100644
index 0000000000..a218f4a350
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSNull.inc
@@ -0,0 +1,60 @@
+{ Parsed from Foundation.framework NSNull.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSNULL_PAS_H}
+{$define NSNULL_PAS_H}
+type
+  NSNullPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSNULL_PAS_T}
+{$define NSNULL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSNULL_PAS_R}
+{$define NSNULL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSNULL_PAS_F}
+{$define NSNULL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSNULL_PAS_T}
+{$define NSNULL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSNull = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSNULL_PAS_C}
+{$define NSNULL_PAS_C}
+
+{ NSNull }
+  NSNull = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+    
+  public
+    class function alloc: NSNull; message 'alloc';
+
+    class function null: NSNull; message 'null';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSNumberFormatter.inc b/packages/cocoaint/src/foundation/NSNumberFormatter.inc
new file mode 100644
index 0000000000..136fe646f5
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSNumberFormatter.inc
@@ -0,0 +1,231 @@
+{ Parsed from Foundation.framework NSNumberFormatter.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSNUMBERFORMATTER_PAS_H}
+{$define NSNUMBERFORMATTER_PAS_H}
+type
+  NSNumberFormatterPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSNUMBERFORMATTER_PAS_T}
+{$define NSNUMBERFORMATTER_PAS_T}
+
+{ Constants }
+
+const
+  NSNumberFormatterNoStyle = kCFNumberFormatterNoStyle;
+  NSNumberFormatterDecimalStyle = kCFNumberFormatterDecimalStyle;
+  NSNumberFormatterCurrencyStyle = kCFNumberFormatterCurrencyStyle;
+  NSNumberFormatterPercentStyle = kCFNumberFormatterPercentStyle;
+  NSNumberFormatterScientificStyle = kCFNumberFormatterScientificStyle;
+  NSNumberFormatterSpellOutStyle = kCFNumberFormatterSpellOutStyle;
+
+const
+  NSNumberFormatterBehaviorDefault = 0;
+  NSNumberFormatterBehavior10_0 = 1000;
+  NSNumberFormatterBehavior10_4 = 1040;
+
+const
+  NSNumberFormatterPadBeforePrefix = kCFNumberFormatterPadBeforePrefix;
+  NSNumberFormatterPadAfterPrefix = kCFNumberFormatterPadAfterPrefix;
+  NSNumberFormatterPadBeforeSuffix = kCFNumberFormatterPadBeforeSuffix;
+  NSNumberFormatterPadAfterSuffix = kCFNumberFormatterPadAfterSuffix;
+
+const
+  NSNumberFormatterRoundCeiling = kCFNumberFormatterRoundCeiling;
+  NSNumberFormatterRoundFloor = kCFNumberFormatterRoundFloor;
+  NSNumberFormatterRoundDown = kCFNumberFormatterRoundDown;
+  NSNumberFormatterRoundUp = kCFNumberFormatterRoundUp;
+  NSNumberFormatterRoundHalfEven = kCFNumberFormatterRoundHalfEven;
+  NSNumberFormatterRoundHalfDown = kCFNumberFormatterRoundHalfDown;
+  NSNumberFormatterRoundHalfUp = kCFNumberFormatterRoundHalfUp;
+
+{ Types }
+type
+  NSNumberFormatterStyle = culong;
+  NSNumberFormatterBehavior = culong;
+  NSNumberFormatterPadPosition = culong;
+  NSNumberFormatterRoundingMode = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSNUMBERFORMATTER_PAS_R}
+{$define NSNUMBERFORMATTER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSNUMBERFORMATTER_PAS_F}
+{$define NSNUMBERFORMATTER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSNUMBERFORMATTER_PAS_T}
+{$define NSNUMBERFORMATTER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSNumberFormatter = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSNUMBERFORMATTER_PAS_C}
+{$define NSNUMBERFORMATTER_PAS_C}
+
+{ NSNumberFormatter }
+  NSNumberFormatter = objcclass(NSFormatter)
+  private
+    __attributes: NSMutableDictionary;
+    __formatter: CFNumberFormatterRef; {garbage collector: __strong }
+    __counter: culong;
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSNumberFormatter; message 'alloc';
+
+    function init: id; message 'init';
+    function getObjectValue_forString_range_error(obj: id; string_: NSString; var rangep: NSRange; var error: NSError): Boolean; message 'getObjectValue:forString:range:error:';
+    function stringFromNumber(number: NSNumber): NSString; message 'stringFromNumber:';
+    function numberFromString(string_: NSString): NSNumber; message 'numberFromString:';
+    function numberStyle: NSNumberFormatterStyle; message 'numberStyle';
+    procedure setNumberStyle(style: NSNumberFormatterStyle); message 'setNumberStyle:';
+    function locale: NSLocale; message 'locale';
+    procedure setLocale(locale_: NSLocale); message 'setLocale:';
+    function generatesDecimalNumbers: Boolean; message 'generatesDecimalNumbers';
+    procedure setGeneratesDecimalNumbers(b: Boolean); message 'setGeneratesDecimalNumbers:';
+    function formatterBehavior: NSNumberFormatterBehavior; message 'formatterBehavior';
+    procedure setFormatterBehavior(behavior: NSNumberFormatterBehavior); message 'setFormatterBehavior:';
+    class function defaultFormatterBehavior: NSNumberFormatterBehavior; message 'defaultFormatterBehavior';
+    class procedure setDefaultFormatterBehavior(behavior: NSNumberFormatterBehavior); message 'setDefaultFormatterBehavior:';
+    function negativeFormat: NSString; message 'negativeFormat';
+    procedure setNegativeFormat(format_: NSString); message 'setNegativeFormat:';
+    function textAttributesForNegativeValues: NSDictionary; message 'textAttributesForNegativeValues';
+    procedure setTextAttributesForNegativeValues(newAttributes: NSDictionary); message 'setTextAttributesForNegativeValues:';
+    function positiveFormat: NSString; message 'positiveFormat';
+    procedure setPositiveFormat(format_: NSString); message 'setPositiveFormat:';
+    function textAttributesForPositiveValues: NSDictionary; message 'textAttributesForPositiveValues';
+    procedure setTextAttributesForPositiveValues(newAttributes: NSDictionary); message 'setTextAttributesForPositiveValues:';
+    function allowsFloats: Boolean; message 'allowsFloats';
+    procedure setAllowsFloats(flag: Boolean); message 'setAllowsFloats:';
+    function decimalSeparator: NSString; message 'decimalSeparator';
+    procedure setDecimalSeparator(string_: NSString); message 'setDecimalSeparator:';
+    function alwaysShowsDecimalSeparator: Boolean; message 'alwaysShowsDecimalSeparator';
+    procedure setAlwaysShowsDecimalSeparator(b: Boolean); message 'setAlwaysShowsDecimalSeparator:';
+    function currencyDecimalSeparator: NSString; message 'currencyDecimalSeparator';
+    procedure setCurrencyDecimalSeparator(string_: NSString); message 'setCurrencyDecimalSeparator:';
+    function usesGroupingSeparator: Boolean; message 'usesGroupingSeparator';
+    procedure setUsesGroupingSeparator(b: Boolean); message 'setUsesGroupingSeparator:';
+    function groupingSeparator: NSString; message 'groupingSeparator';
+    procedure setGroupingSeparator(string_: NSString); message 'setGroupingSeparator:';
+    function zeroSymbol: NSString; message 'zeroSymbol';
+    procedure setZeroSymbol(string_: NSString); message 'setZeroSymbol:';
+    function textAttributesForZero: NSDictionary; message 'textAttributesForZero';
+    procedure setTextAttributesForZero(newAttributes: NSDictionary); message 'setTextAttributesForZero:';
+    function nilSymbol: NSString; message 'nilSymbol';
+    procedure setNilSymbol(string_: NSString); message 'setNilSymbol:';
+    function textAttributesForNil: NSDictionary; message 'textAttributesForNil';
+    procedure setTextAttributesForNil(newAttributes: NSDictionary); message 'setTextAttributesForNil:';
+    function notANumberSymbol: NSString; message 'notANumberSymbol';
+    procedure setNotANumberSymbol(string_: NSString); message 'setNotANumberSymbol:';
+    function textAttributesForNotANumber: NSDictionary; message 'textAttributesForNotANumber';
+    procedure setTextAttributesForNotANumber(newAttributes: NSDictionary); message 'setTextAttributesForNotANumber:';
+    function positiveInfinitySymbol: NSString; message 'positiveInfinitySymbol';
+    procedure setPositiveInfinitySymbol(string_: NSString); message 'setPositiveInfinitySymbol:';
+    function textAttributesForPositiveInfinity: NSDictionary; message 'textAttributesForPositiveInfinity';
+    procedure setTextAttributesForPositiveInfinity(newAttributes: NSDictionary); message 'setTextAttributesForPositiveInfinity:';
+    function negativeInfinitySymbol: NSString; message 'negativeInfinitySymbol';
+    procedure setNegativeInfinitySymbol(string_: NSString); message 'setNegativeInfinitySymbol:';
+    function textAttributesForNegativeInfinity: NSDictionary; message 'textAttributesForNegativeInfinity';
+    procedure setTextAttributesForNegativeInfinity(newAttributes: NSDictionary); message 'setTextAttributesForNegativeInfinity:';
+    function positivePrefix: NSString; message 'positivePrefix';
+    procedure setPositivePrefix(string_: NSString); message 'setPositivePrefix:';
+    function positiveSuffix: NSString; message 'positiveSuffix';
+    procedure setPositiveSuffix(string_: NSString); message 'setPositiveSuffix:';
+    function negativePrefix: NSString; message 'negativePrefix';
+    procedure setNegativePrefix(string_: NSString); message 'setNegativePrefix:';
+    function negativeSuffix: NSString; message 'negativeSuffix';
+    procedure setNegativeSuffix(string_: NSString); message 'setNegativeSuffix:';
+    function currencyCode: NSString; message 'currencyCode';
+    procedure setCurrencyCode(string_: NSString); message 'setCurrencyCode:';
+    function currencySymbol: NSString; message 'currencySymbol';
+    procedure setCurrencySymbol(string_: NSString); message 'setCurrencySymbol:';
+    function internationalCurrencySymbol: NSString; message 'internationalCurrencySymbol';
+    procedure setInternationalCurrencySymbol(string_: NSString); message 'setInternationalCurrencySymbol:';
+    function percentSymbol: NSString; message 'percentSymbol';
+    procedure setPercentSymbol(string_: NSString); message 'setPercentSymbol:';
+    function perMillSymbol: NSString; message 'perMillSymbol';
+    procedure setPerMillSymbol(string_: NSString); message 'setPerMillSymbol:';
+    function minusSign: NSString; message 'minusSign';
+    procedure setMinusSign(string_: NSString); message 'setMinusSign:';
+    function plusSign: NSString; message 'plusSign';
+    procedure setPlusSign(string_: NSString); message 'setPlusSign:';
+    function exponentSymbol: NSString; message 'exponentSymbol';
+    procedure setExponentSymbol(string_: NSString); message 'setExponentSymbol:';
+    function groupingSize: culong; message 'groupingSize';
+    procedure setGroupingSize(number: culong); message 'setGroupingSize:';
+    function secondaryGroupingSize: culong; message 'secondaryGroupingSize';
+    procedure setSecondaryGroupingSize(number: culong); message 'setSecondaryGroupingSize:';
+    function multiplier: NSNumber; message 'multiplier';
+    procedure setMultiplier(number: NSNumber); message 'setMultiplier:';
+    function formatWidth: culong; message 'formatWidth';
+    procedure setFormatWidth(number: culong); message 'setFormatWidth:';
+    function paddingCharacter: NSString; message 'paddingCharacter';
+    procedure setPaddingCharacter(string_: NSString); message 'setPaddingCharacter:';
+    function paddingPosition: NSNumberFormatterPadPosition; message 'paddingPosition';
+    procedure setPaddingPosition(position: NSNumberFormatterPadPosition); message 'setPaddingPosition:';
+    function roundingMode: NSNumberFormatterRoundingMode; message 'roundingMode';
+    procedure setRoundingMode(mode: NSNumberFormatterRoundingMode); message 'setRoundingMode:';
+    function roundingIncrement: NSNumber; message 'roundingIncrement';
+    procedure setRoundingIncrement(number: NSNumber); message 'setRoundingIncrement:';
+    function minimumIntegerDigits: culong; message 'minimumIntegerDigits';
+    procedure setMinimumIntegerDigits(number: culong); message 'setMinimumIntegerDigits:';
+    function maximumIntegerDigits: culong; message 'maximumIntegerDigits';
+    procedure setMaximumIntegerDigits(number: culong); message 'setMaximumIntegerDigits:';
+    function minimumFractionDigits: culong; message 'minimumFractionDigits';
+    procedure setMinimumFractionDigits(number: culong); message 'setMinimumFractionDigits:';
+    function maximumFractionDigits: culong; message 'maximumFractionDigits';
+    procedure setMaximumFractionDigits(number: culong); message 'setMaximumFractionDigits:';
+    function minimum: NSNumber; message 'minimum';
+    procedure setMinimum(number: NSNumber); message 'setMinimum:';
+    function maximum: NSNumber; message 'maximum';
+    procedure setMaximum(number: NSNumber); message 'setMaximum:';
+    procedure setCurrencyGroupingSeparator(string_: NSString); message 'setCurrencyGroupingSeparator:';
+    procedure setLenient(b: Boolean); message 'setLenient:';
+    procedure setUsesSignificantDigits(b: Boolean); message 'setUsesSignificantDigits:';
+    procedure setMinimumSignificantDigits(number: culong); message 'setMinimumSignificantDigits:';
+    procedure setMaximumSignificantDigits(number: culong); message 'setMaximumSignificantDigits:';
+    procedure setPartialStringValidationEnabled(b: Boolean); message 'setPartialStringValidationEnabled:';
+
+    { Category: NSNumberFormatterCompatibility }
+    function hasThousandSeparators: Boolean; message 'hasThousandSeparators';
+    procedure setHasThousandSeparators(flag: Boolean); message 'setHasThousandSeparators:';
+    function thousandSeparator: NSString; message 'thousandSeparator';
+    procedure setThousandSeparator(newSeparator: NSString); message 'setThousandSeparator:';
+    function localizesFormat: Boolean; message 'localizesFormat';
+    procedure setLocalizesFormat(flag: Boolean); message 'setLocalizesFormat:';
+    function format: NSString; message 'format';
+    procedure setFormat(string_: NSString); message 'setFormat:';
+    function attributedStringForZero: NSAttributedString; message 'attributedStringForZero';
+    procedure setAttributedStringForZero(newAttributedString: NSAttributedString); message 'setAttributedStringForZero:';
+    function attributedStringForNil: NSAttributedString; message 'attributedStringForNil';
+    procedure setAttributedStringForNil(newAttributedString: NSAttributedString); message 'setAttributedStringForNil:';
+    function attributedStringForNotANumber: NSAttributedString; message 'attributedStringForNotANumber';
+    procedure setAttributedStringForNotANumber(newAttributedString: NSAttributedString); message 'setAttributedStringForNotANumber:';
+    function roundingBehavior: NSDecimalNumberHandler; message 'roundingBehavior';
+    procedure setRoundingBehavior(newRoundingBehavior: NSDecimalNumberHandler); message 'setRoundingBehavior:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSObjCRuntime.inc b/packages/cocoaint/src/foundation/NSObjCRuntime.inc
new file mode 100644
index 0000000000..d507716097
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSObjCRuntime.inc
@@ -0,0 +1,93 @@
+{ Parsed from Foundation.framework NSObjCRuntime.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSOBJCRUNTIME_PAS_T}
+{$define NSOBJCRUNTIME_PAS_T}
+
+{ Defines }
+const
+  NSFoundationVersionNumber10_0 = 397.40;
+  NSFoundationVersionNumber10_1 = 425.00;
+  NSFoundationVersionNumber10_1_1 = 425.00;
+  NSFoundationVersionNumber10_1_2 = 425.00;
+  NSFoundationVersionNumber10_1_3 = 425.00;
+  NSFoundationVersionNumber10_1_4 = 425.00;
+  NSFoundationVersionNumber10_2 = 462.00;
+  NSFoundationVersionNumber10_2_1 = 462.00;
+  NSFoundationVersionNumber10_2_2 = 462.00;
+  NSFoundationVersionNumber10_2_3 = 462.00;
+  NSFoundationVersionNumber10_2_4 = 462.00;
+  NSFoundationVersionNumber10_2_5 = 462.00;
+  NSFoundationVersionNumber10_2_6 = 462.00;
+  NSFoundationVersionNumber10_2_7 = 462.70;
+  NSFoundationVersionNumber10_2_8 = 462.70;
+  NSFoundationVersionNumber10_3 = 500.00;
+  NSFoundationVersionNumber10_3_1 = 500.00;
+  NSFoundationVersionNumber10_3_2 = 500.30;
+  NSFoundationVersionNumber10_3_3 = 500.54;
+  NSFoundationVersionNumber10_3_4 = 500.56;
+  NSFoundationVersionNumber10_3_5 = 500.56;
+  NSFoundationVersionNumber10_3_6 = 500.56;
+  NSFoundationVersionNumber10_3_7 = 500.56;
+  NSFoundationVersionNumber10_3_8 = 500.56;
+  NSFoundationVersionNumber10_3_9 = 500.58;
+  NSFoundationVersionNumber10_4 = 567.00;
+  NSFoundationVersionNumber10_4_1 = 567.00;
+  NSFoundationVersionNumber10_4_2 = 567.12;
+  NSFoundationVersionNumber10_4_3 = 567.21;
+  NSFoundationVersionNumber10_4_4_Intel = 567.23;
+  NSFoundationVersionNumber10_4_4_PowerPC = 567.21;
+  NSFoundationVersionNumber10_4_5 = 567.25;
+  NSFoundationVersionNumber10_4_6 = 567.26;
+  NSFoundationVersionNumber10_4_7 = 567.27;
+  NSFoundationVersionNumber10_4_8 = 567.28;
+  NSFoundationVersionNumber10_4_9 = 567.29;
+  NSFoundationVersionNumber10_4_10 = 567.29;
+  NSFoundationVersionNumber10_4_11 = 567.36;
+  NSINTEGER_DEFINED = 1;
+
+{ Types }
+type
+  NSInteger = cint;
+  NSUInteger = cuint;
+  NSComparisonResult = clong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSOBJCRUNTIME_PAS_R}
+{$define NSOBJCRUNTIME_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSOBJCRUNTIME_PAS_F}
+{$define NSOBJCRUNTIME_PAS_F}
+
+{ Functions }
+function NSStringFromSelector(aSelector: SEL): NSString; cdecl; external name 'NSStringFromSelector';
+function NSSelectorFromString(var aSelectorName: NSString): SEL; cdecl; external name 'NSSelectorFromString';
+function NSStringFromClass(aClass: Pobjc_class): NSString; cdecl; external name 'NSStringFromClass';
+function NSClassFromString(var aClassName: NSString): Pobjc_class; cdecl; external name 'NSClassFromString';
+function NSStringFromProtocol(var proto: Protocol): NSString; cdecl; external name 'NSStringFromProtocol';
+function NSProtocolFromString(var namestr: NSString): Protocol; cdecl; external name 'NSProtocolFromString';
+function NSGetSizeAndAlignment(var typePtr: char; var sizep: culong; var alignp: culong): char; cdecl; external name 'NSGetSizeAndAlignment';
+procedure NSLogv(var format: NSString; args: va_list); cdecl; external name 'NSLogv';
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSOBJCRUNTIME_PAS_T}
+{$define NSOBJCRUNTIME_PAS_T}
+
+{ External symbols }
+var
+  NSFoundationVersionNumber: double; external name '_NSFoundationVersionNumber';
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSObject.inc b/packages/cocoaint/src/foundation/NSObject.inc
new file mode 100644
index 0000000000..90a9e5fd60
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSObject.inc
@@ -0,0 +1,293 @@
+{ Parsed from Foundation.framework NSObject.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:30:59 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSOBJECT_PAS_H}
+{$define NSOBJECT_PAS_H}
+type
+  NSObjectPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSOBJECT_PAS_T}
+{$define NSOBJECT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSOBJECT_PAS_R}
+{$define NSOBJECT_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSOBJECT_PAS_F}
+{$define NSOBJECT_PAS_F}
+
+{ Functions }
+function NSAllocateObject(aClass: Pobjc_class; extraBytes: culong; var zone: NSZone): id; cdecl; external name 'NSAllocateObject';
+procedure NSDeallocateObject(object_: id); cdecl; external name 'NSDeallocateObject';
+function NSCopyObject(object_: id; extraBytes: culong; var zone: NSZone): id; cdecl; external name 'NSCopyObject';
+function NSShouldRetainWithZone(anObject: id; var requestedZone: NSZone): Boolean; cdecl; external name 'NSShouldRetainWithZone';
+procedure NSIncrementExtraRefCount(object_: id); cdecl; external name 'NSIncrementExtraRefCount';
+function NSDecrementExtraRefCountWasZero(object_: id): Boolean; cdecl; external name 'NSDecrementExtraRefCountWasZero';
+function NSExtraRefCount(object_: id): culong; cdecl; external name 'NSExtraRefCount';
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSOBJECT_PAS_T}
+{$define NSOBJECT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSObjectProtocol = objcprotocol;
+  NSCopyingProtocol = objcprotocol;
+  NSMutableCopyingProtocol = objcprotocol;
+  NSCodingProtocol = objcprotocol;
+  NSObject = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSOBJECT_PAS_C}
+{$define NSOBJECT_PAS_C}
+
+{ NSObject }
+  NSObject = objcclass(NSObject, NSObjectProtocol)
+  private
+    _isa: Pobjc_class;
+    
+  public
+    class function alloc: NSObject; message 'alloc';
+
+    class procedure load; message 'load';
+    class procedure initialize; message 'initialize';
+    function init: id; message 'init';
+    class function new_: id; message 'new';
+    class function allocWithZone(var zone_: NSZone): id; message 'allocWithZone:';
+    class function alloc: id; message 'alloc';
+    procedure dealloc; message 'dealloc';
+    function copy: id; message 'copy';
+    function mutableCopy: id; message 'mutableCopy';
+    class function copyWithZone(var zone_: NSZone): id; message 'copyWithZone:';
+    class function mutableCopyWithZone(var zone_: NSZone): id; message 'mutableCopyWithZone:';
+    class function superclass: Pobjc_class; message 'superclass';
+    class function class_: Pobjc_class; message 'class';
+    class function instancesRespondToSelector(aSelector: SEL): Boolean; message 'instancesRespondToSelector:';
+    class function conformsToProtocol(protocol: objc_protocol): Boolean; message 'conformsToProtocol:';
+    function methodForSelector(aSelector: SEL): IMP; message 'methodForSelector:';
+    class function instanceMethodForSelector(aSelector: SEL): IMP; message 'instanceMethodForSelector:';
+    procedure doesNotRecognizeSelector(aSelector: SEL); message 'doesNotRecognizeSelector:';
+    procedure forwardInvocation(anInvocation: NSInvocation); message 'forwardInvocation:';
+    function methodSignatureForSelector(aSelector: SEL): NSMethodSignature; message 'methodSignatureForSelector:';
+    class function instanceMethodSignatureForSelector(aSelector: SEL): NSMethodSignature; message 'instanceMethodSignatureForSelector:';
+    class function description: NSString; message 'description';
+    class function isSubclassOfClass(aClass: Pobjc_class): Boolean; message 'isSubclassOfClass:';
+    class function resolveClassMethod(sel: SEL): Boolean; message 'resolveClassMethod:';
+    class function resolveInstanceMethod(sel: SEL): Boolean; message 'resolveInstanceMethod:';
+
+    { Category: NSCoderMethods }
+    class function version: clong; message 'version';
+    class procedure setVersion(aVersion: clong); message 'setVersion:';
+    function classForCoder: Pobjc_class; message 'classForCoder';
+    function replacementObjectForCoder(aCoder: NSCoder): id; message 'replacementObjectForCoder:';
+    function awakeAfterUsingCoder(aDecoder: NSCoder): id; message 'awakeAfterUsingCoder:';
+
+    { Category: NSDeprecatedMethods }
+    class procedure poseAsClass(aClass: Pobjc_class); message 'poseAsClass:';
+
+    { Category: NSClassDescriptionPrimitives }
+    function classDescription: NSClassDescription; message 'classDescription';
+    function attributeKeys: NSArray; message 'attributeKeys';
+    function toOneRelationshipKeys: NSArray; message 'toOneRelationshipKeys';
+    function toManyRelationshipKeys: NSArray; message 'toManyRelationshipKeys';
+    function inverseForRelationshipKey(relationshipKey: NSString): NSString; message 'inverseForRelationshipKey:';
+
+    { Category: NSArchiverCallback }
+    function classForArchiver: Pobjc_class; message 'classForArchiver';
+    function replacementObjectForArchiver(archiver: NSArchiver): id; message 'replacementObjectForArchiver:';
+
+    { Category: NSErrorRecoveryAttempting }
+    procedure attemptRecoveryFromError_optionIndex_delegate_didRecoverSelector_contextInfo(error: NSError; recoveryOptionIndex: culong; delegate: id; didRecoverSelector: SEL; contextInfo: Pointer); message 'attemptRecoveryFromError:optionIndex:delegate:didRecoverSelector:contextInfo:';
+    function attemptRecoveryFromError_optionIndex(error: NSError; recoveryOptionIndex: culong): Boolean; message 'attemptRecoveryFromError:optionIndex:';
+
+    { Category: NSKeyValueCoding }
+    class function accessInstanceVariablesDirectly: Boolean; message 'accessInstanceVariablesDirectly';
+    function valueForKey(key: NSString): id; message 'valueForKey:';
+    procedure setValue_forKey(value: id; key: NSString); message 'setValue:forKey:';
+    function validateValue_forKey_error(ioValue: id; inKey: NSString; var outError: NSError): Boolean; message 'validateValue:forKey:error:';
+    function mutableArrayValueForKey(key: NSString): NSMutableArray; message 'mutableArrayValueForKey:';
+    function mutableSetValueForKey(key: NSString): NSMutableSet; message 'mutableSetValueForKey:';
+    function valueForKeyPath(keyPath: NSString): id; message 'valueForKeyPath:';
+    procedure setValue_forKeyPath(value: id; keyPath: NSString); message 'setValue:forKeyPath:';
+    function validateValue_forKeyPath_error(ioValue: id; inKeyPath: NSString; var outError: NSError): Boolean; message 'validateValue:forKeyPath:error:';
+    function mutableArrayValueForKeyPath(keyPath: NSString): NSMutableArray; message 'mutableArrayValueForKeyPath:';
+    function mutableSetValueForKeyPath(keyPath: NSString): NSMutableSet; message 'mutableSetValueForKeyPath:';
+    function valueForUndefinedKey(key: NSString): id; message 'valueForUndefinedKey:';
+    procedure setValue_forUndefinedKey(value: id; key: NSString); message 'setValue:forUndefinedKey:';
+    procedure setNilValueForKey(key: NSString); message 'setNilValueForKey:';
+    function dictionaryWithValuesForKeys(keys: NSArray): NSDictionary; message 'dictionaryWithValuesForKeys:';
+    procedure setValuesForKeysWithDictionary(keyedValues: NSDictionary); message 'setValuesForKeysWithDictionary:';
+
+    { Category: NSDeprecatedKeyValueCoding }
+    class function useStoredAccessor: Boolean; message 'useStoredAccessor';
+    function storedValueForKey(key: NSString): id; message 'storedValueForKey:';
+    procedure takeStoredValue_forKey(value: id; key: NSString); message 'takeStoredValue:forKey:';
+    procedure takeValue_forKey(value: id; key: NSString); message 'takeValue:forKey:';
+    procedure takeValue_forKeyPath(value: id; keyPath: NSString); message 'takeValue:forKeyPath:';
+    function handleQueryWithUnboundKey(key: NSString): id; message 'handleQueryWithUnboundKey:';
+    procedure handleTakeValue_forUnboundKey(value: id; key: NSString); message 'handleTakeValue:forUnboundKey:';
+    procedure unableToSetNilForKey(key: NSString); message 'unableToSetNilForKey:';
+    function valuesForKeys(keys: NSArray): NSDictionary; message 'valuesForKeys:';
+    procedure takeValuesFromDictionary(properties: NSDictionary); message 'takeValuesFromDictionary:';
+
+    { Category: NSKeyValueObserving }
+    procedure observeValueForKeyPath_ofObject_change_context(keyPath: NSString; object_: id; change: NSDictionary; context: Pointer); message 'observeValueForKeyPath:ofObject:change:context:';
+
+    { Category: NSKeyValueObserverRegistration }
+    procedure addObserver_forKeyPath_options_context(observer: NSObject; keyPath: NSString; options: NSKeyValueObservingOptions; context: Pointer); message 'addObserver:forKeyPath:options:context:';
+    procedure removeObserver_forKeyPath(observer: NSObject; keyPath: NSString); message 'removeObserver:forKeyPath:';
+
+    { Category: NSKeyValueObservingCustomization }
+    class function keyPathsForValuesAffectingValueForKey(key: NSString): NSSet; message 'keyPathsForValuesAffectingValueForKey:';
+    class function automaticallyNotifiesObserversForKey(key: NSString): Boolean; message 'automaticallyNotifiesObserversForKey:';
+    procedure setObservationInfo(observationInfo: Pointer); message 'setObservationInfo:';
+
+    { Category: NSDeprecatedKeyValueObservingCustomization }
+    class procedure setKeys_triggerChangeNotificationsForDependentKey(keys: NSArray; dependentKey: NSString); message 'setKeys:triggerChangeNotificationsForDependentKey:';
+
+    { Category: NSKeyedArchiverObjectSubstitution }
+    function classForKeyedArchiver: Pobjc_class; message 'classForKeyedArchiver';
+    function replacementObjectForKeyedArchiver(archiver: NSKeyedArchiver): id; message 'replacementObjectForKeyedArchiver:';
+    class function classFallbacksForKeyedArchiver: NSArray; message 'classFallbacksForKeyedArchiver';
+
+    { Category: NSKeyedUnarchiverObjectSubstitution }
+    class function classForKeyedUnarchiver: Pobjc_class; message 'classForKeyedUnarchiver';
+
+    { Category: NSDistributedObjects }
+    function classForPortCoder: Pobjc_class; message 'classForPortCoder';
+    function replacementObjectForPortCoder(coder: NSPortCoder): id; message 'replacementObjectForPortCoder:';
+
+    { Category: NSDelayedPerforming }
+    procedure performSelector_withObject_afterDelay_inModes(aSelector: SEL; anArgument: id; delay: NSTimeInterval; modes: NSArray); message 'performSelector:withObject:afterDelay:inModes:';
+    procedure performSelector_withObject_afterDelay(aSelector: SEL; anArgument: id; delay: NSTimeInterval); message 'performSelector:withObject:afterDelay:';
+    class procedure cancelPreviousPerformRequestsWithTarget_selector_object(aTarget: id; aSelector: SEL; anArgument: id); message 'cancelPreviousPerformRequestsWithTarget:selector:object:';
+    class procedure cancelPreviousPerformRequestsWithTarget(aTarget: id); message 'cancelPreviousPerformRequestsWithTarget:';
+
+    { Category: NSThreadPerformAdditions }
+    procedure performSelectorOnMainThread_withObject_waitUntilDone_modes(aSelector: SEL; arg: id; wait: Boolean; array_: NSArray); message 'performSelectorOnMainThread:withObject:waitUntilDone:modes:';
+    procedure performSelectorOnMainThread_withObject_waitUntilDone(aSelector: SEL; arg: id; wait: Boolean); message 'performSelectorOnMainThread:withObject:waitUntilDone:';
+    procedure performSelector_onThread_withObject_waitUntilDone_modes(aSelector: SEL; thr: NSThread; arg: id; wait: Boolean; array_: NSArray); message 'performSelector:onThread:withObject:waitUntilDone:modes:';
+    procedure performSelector_onThread_withObject_waitUntilDone(aSelector: SEL; thr: NSThread; arg: id; wait: Boolean); message 'performSelector:onThread:withObject:waitUntilDone:';
+    procedure performSelectorInBackground_withObject(aSelector: SEL; arg: id); message 'performSelectorInBackground:withObject:';
+
+    { Category: NSScriptKeyValueCoding }
+    function valueAtIndex_inPropertyWithKey(index: culong; key: NSString): id; message 'valueAtIndex:inPropertyWithKey:';
+    function valueWithName_inPropertyWithKey(name: NSString; key: NSString): id; message 'valueWithName:inPropertyWithKey:';
+    function valueWithUniqueID_inPropertyWithKey(uniqueID: id; key: NSString): id; message 'valueWithUniqueID:inPropertyWithKey:';
+    procedure insertValue_atIndex_inPropertyWithKey(value: id; index: culong; key: NSString); message 'insertValue:atIndex:inPropertyWithKey:';
+    procedure removeValueAtIndex_fromPropertyWithKey(index: culong; key: NSString); message 'removeValueAtIndex:fromPropertyWithKey:';
+    procedure replaceValueAtIndex_inPropertyWithKey_withValue(index: culong; key: NSString; value: id); message 'replaceValueAtIndex:inPropertyWithKey:withValue:';
+    procedure insertValue_inPropertyWithKey(value: id; key: NSString); message 'insertValue:inPropertyWithKey:';
+    function coerceValue_forKey(value: id; key: NSString): id; message 'coerceValue:forKey:';
+
+    { Category: NSComparisonMethods }
+    function isEqualTo(object_: id): Boolean; message 'isEqualTo:';
+    function isLessThanOrEqualTo(object_: id): Boolean; message 'isLessThanOrEqualTo:';
+    function isLessThan(object_: id): Boolean; message 'isLessThan:';
+    function isGreaterThanOrEqualTo(object_: id): Boolean; message 'isGreaterThanOrEqualTo:';
+    function isGreaterThan(object_: id): Boolean; message 'isGreaterThan:';
+    function isNotEqualTo(object_: id): Boolean; message 'isNotEqualTo:';
+    function doesContain(object_: id): Boolean; message 'doesContain:';
+    function isLike(object_: NSString): Boolean; message 'isLike:';
+    function isCaseInsensitiveLike(object_: NSString): Boolean; message 'isCaseInsensitiveLike:';
+
+    { Category: NSAccessibility }
+    function accessibilityAttributeNames: NSArray; message 'accessibilityAttributeNames';
+    function accessibilityAttributeValue(attribute: NSString): id; message 'accessibilityAttributeValue:';
+    function accessibilityIsAttributeSettable(attribute: NSString): Boolean; message 'accessibilityIsAttributeSettable:';
+    procedure accessibilitySetValue_forAttribute(value: id; attribute: NSString); message 'accessibilitySetValue:forAttribute:';
+    function accessibilityParameterizedAttributeNames: NSArray; message 'accessibilityParameterizedAttributeNames';
+    function accessibilityAttributeValue_forParameter(attribute: NSString; parameter: id): id; message 'accessibilityAttributeValue:forParameter:';
+    function accessibilityActionNames: NSArray; message 'accessibilityActionNames';
+    function accessibilityActionDescription(action: NSString): NSString; message 'accessibilityActionDescription:';
+    procedure accessibilityPerformAction(action: NSString); message 'accessibilityPerformAction:';
+    function accessibilityIsIgnored: Boolean; message 'accessibilityIsIgnored';
+    function accessibilityHitTest(point: NSPoint): id; message 'accessibilityHitTest:';
+    function accessibilityFocusedUIElement: id; message 'accessibilityFocusedUIElement';
+
+    { Category: NSAccessibilityAdditions }
+    function accessibilitySetOverrideValue_forAttribute(value: id; attribute: NSString): Boolean; message 'accessibilitySetOverrideValue:forAttribute:';
+
+    { Category: NSServicesRequests }
+    function writeSelectionToPasteboard_types(pboard: NSPasteboard; types: NSArray): Boolean; message 'writeSelectionToPasteboard:types:';
+    function readSelectionFromPasteboard(pboard: NSPasteboard): Boolean; message 'readSelectionFromPasteboard:';
+
+    { Category: NSKeyValueBindingCreation }
+    class procedure exposeBinding(binding: NSString); message 'exposeBinding:';
+    function exposedBindings: NSArray; message 'exposedBindings';
+    function valueClassForBinding(binding: NSString): Pobjc_class; message 'valueClassForBinding:';
+    procedure bind_toObject_withKeyPath_options(binding: NSString; observable: id; keyPath: NSString; options: NSDictionary); message 'bind:toObject:withKeyPath:options:';
+    procedure unbind(binding: NSString); message 'unbind:';
+    function infoForBinding(binding: NSString): NSDictionary; message 'infoForBinding:';
+    function optionDescriptionsForBinding(aBinding: NSString): NSArray; message 'optionDescriptionsForBinding:';
+
+    { Category: NSPlaceholders }
+    class procedure setDefaultPlaceholder_forMarker_withBinding(placeholder: id; marker: id; binding: NSString); message 'setDefaultPlaceholder:forMarker:withBinding:';
+    class function defaultPlaceholderForMarker_withBinding(marker: id; binding: NSString): id; message 'defaultPlaceholderForMarker:withBinding:';
+  end; external;
+
+{$endif}
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSOBJECT_PAS_P}
+{$define NSOBJECT_PAS_P}
+  
+{ NSObject Protocol }
+  NSObjectProtocol = objcprotocol
+    function isEqual(object_: id): Boolean; message 'isEqual:';
+    function hash: culong; message 'hash';
+    function superclass: Pobjc_class; message 'superclass';
+    function class_: Pobjc_class; message 'class';
+    function self_: id; message 'self';
+    function zone_: NSZone; message 'zone';
+    function performSelector(aSelector: SEL): id; message 'performSelector:';
+    function performSelector_withObject(aSelector: SEL; object_: id): id; message 'performSelector:withObject:';
+    function performSelector_withObject_withObject(aSelector: SEL; object_: id; object_1: id): id; message 'performSelector:withObject:withObject:';
+    function isProxy: Boolean; message 'isProxy';
+    function isKindOfClass(aClass: Pobjc_class): Boolean; message 'isKindOfClass:';
+    function isMemberOfClass(aClass: Pobjc_class): Boolean; message 'isMemberOfClass:';
+    function conformsToProtocol(aProtocol: objc_protocol): Boolean; message 'conformsToProtocol:';
+    function respondsToSelector(aSelector: SEL): Boolean; message 'respondsToSelector:';
+    function retain: id; message 'retain';
+    function release: oneway void; message 'release';
+    function autorelease: id; message 'autorelease';
+    function retainCount: culong; message 'retainCount';
+    function description: NSString; message 'description';
+  end; external name 'NSObject';
+  
+{ NSCopying Protocol }
+  NSCopyingProtocol = objcprotocol
+    function copyWithZone(var zone_: NSZone): id; message 'copyWithZone:';
+  end; external name 'NSCopying';
+  
+{ NSMutableCopying Protocol }
+  NSMutableCopyingProtocol = objcprotocol
+    function mutableCopyWithZone(var zone_: NSZone): id; message 'mutableCopyWithZone:';
+  end; external name 'NSMutableCopying';
+  
+{ NSCoding Protocol }
+  NSCodingProtocol = objcprotocol
+    procedure encodeWithCoder(aCoder: NSCoder); message 'encodeWithCoder:';
+    function initWithCoder(aDecoder: NSCoder): id; message 'initWithCoder:';
+  end; external name 'NSCoding';
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSObjectScripting.inc b/packages/cocoaint/src/foundation/NSObjectScripting.inc
new file mode 100644
index 0000000000..b54be9809d
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSObjectScripting.inc
@@ -0,0 +1,31 @@
+{ Parsed from Foundation.framework NSObjectScripting.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSOBJECTSCRIPTING_PAS_T}
+{$define NSOBJECTSCRIPTING_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSOBJECTSCRIPTING_PAS_R}
+{$define NSOBJECTSCRIPTING_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSOBJECTSCRIPTING_PAS_F}
+{$define NSOBJECTSCRIPTING_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSOBJECTSCRIPTING_PAS_T}
+{$define NSOBJECTSCRIPTING_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSOperation.inc b/packages/cocoaint/src/foundation/NSOperation.inc
new file mode 100644
index 0000000000..f26205d6d7
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSOperation.inc
@@ -0,0 +1,136 @@
+{ Parsed from Foundation.framework NSOperation.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSOPERATION_PAS_H}
+{$define NSOPERATION_PAS_H}
+type
+  NSOperationPointer = Pointer;
+  NSInvocationOperationPointer = Pointer;
+  NSOperationQueuePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSOPERATION_PAS_T}
+{$define NSOPERATION_PAS_T}
+
+{ Constants }
+
+const
+  NSOperationQueuePriorityVeryLow = -8;
+  NSOperationQueuePriorityLow = -4;
+  NSOperationQueuePriorityNormal = 0;
+  NSOperationQueuePriorityHigh = 4;
+  NSOperationQueuePriorityVeryHigh = 8;
+
+const
+  NSOperationQueueDefaultMaxConcurrentOperationCount = -1;
+
+{ Types }
+type
+  NSOperationQueuePriority = clong;
+
+{ CFString constants }
+var
+  NSInvocationOperationVoidResultException: CFStringRef; external name '_NSInvocationOperationVoidResultException';
+  NSInvocationOperationCancelledException: CFStringRef; external name '_NSInvocationOperationCancelledException';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSOPERATION_PAS_R}
+{$define NSOPERATION_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSOPERATION_PAS_F}
+{$define NSOPERATION_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSOPERATION_PAS_T}
+{$define NSOPERATION_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSOperation = objcclass;
+  NSInvocationOperation = objcclass;
+  NSOperationQueue = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSOPERATION_PAS_C}
+{$define NSOPERATION_PAS_C}
+
+{ NSOperation }
+  NSOperation = objcclass(NSObject)
+  private
+    __private: id;
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSOperation; message 'alloc';
+
+    function init: id; message 'init';
+    procedure start; message 'start';
+    procedure main; message 'main';
+    function isCancelled: Boolean; message 'isCancelled';
+    procedure cancel; message 'cancel';
+    function isExecuting: Boolean; message 'isExecuting';
+    function isFinished: Boolean; message 'isFinished';
+    function isConcurrent: Boolean; message 'isConcurrent';
+    function isReady: Boolean; message 'isReady';
+    procedure addDependency(op: NSOperation); message 'addDependency:';
+    procedure removeDependency(op: NSOperation); message 'removeDependency:';
+    function dependencies: NSArray; message 'dependencies';
+    function queuePriority: NSOperationQueuePriority; message 'queuePriority';
+    procedure setQueuePriority(p: NSOperationQueuePriority); message 'setQueuePriority:';
+  end; external;
+
+{ NSInvocationOperation }
+  NSInvocationOperation = objcclass(NSOperation)
+  private
+    __inv: id;
+    __exception: id;
+    __reserved2: Pointer;
+    
+  public
+    class function alloc: NSInvocationOperation; message 'alloc';
+
+    function initWithTarget_selector_object(target: id; sel: SEL; arg: id): id; message 'initWithTarget:selector:object:';
+    function initWithInvocation(inv: NSInvocation): id; message 'initWithInvocation:';
+    function invocation: NSInvocation; message 'invocation';
+    function result_: id; message 'result';
+  end; external;
+
+{ NSOperationQueue }
+  NSOperationQueue = objcclass(NSObject)
+  private
+    __private: id;
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSOperationQueue; message 'alloc';
+
+    procedure addOperation(op: NSOperation); message 'addOperation:';
+    function operations: NSArray; message 'operations';
+    function maxConcurrentOperationCount: clong; message 'maxConcurrentOperationCount';
+    procedure setMaxConcurrentOperationCount(cnt: clong); message 'setMaxConcurrentOperationCount:';
+    procedure setSuspended(b: Boolean); message 'setSuspended:';
+    function isSuspended: Boolean; message 'isSuspended';
+    procedure cancelAllOperations; message 'cancelAllOperations';
+    procedure waitUntilAllOperationsAreFinished; message 'waitUntilAllOperationsAreFinished';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSPathUtilities.inc b/packages/cocoaint/src/foundation/NSPathUtilities.inc
new file mode 100644
index 0000000000..efaf307c2b
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSPathUtilities.inc
@@ -0,0 +1,50 @@
+{ Parsed from Foundation.framework NSPathUtilities.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSPATHUTILITIES_PAS_T}
+{$define NSPATHUTILITIES_PAS_T}
+
+{ Types }
+type
+  NSSearchPathDirectory = culong;
+  NSSearchPathDomainMask = culong;
+
+{ Constants }
+
+const
+  NSAllDomainsMask = $0ffff;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPATHUTILITIES_PAS_R}
+{$define NSPATHUTILITIES_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPATHUTILITIES_PAS_F}
+{$define NSPATHUTILITIES_PAS_F}
+
+{ Functions }
+function NSUserName: NSString; cdecl; external name 'NSUserName';
+function NSFullUserName: NSString; cdecl; external name 'NSFullUserName';
+function NSHomeDirectory: NSString; cdecl; external name 'NSHomeDirectory';
+function NSHomeDirectoryForUser(var userName: NSString): NSString; cdecl; external name 'NSHomeDirectoryForUser';
+function NSTemporaryDirectory: NSString; cdecl; external name 'NSTemporaryDirectory';
+function NSOpenStepRootDirectory: NSString; cdecl; external name 'NSOpenStepRootDirectory';
+function NSSearchPathForDirectoriesInDomains(directory: NSSearchPathDirectory; domainMask: NSSearchPathDomainMask; expandTilde: Boolean): NSArray; cdecl; external name 'NSSearchPathForDirectoriesInDomains';
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPATHUTILITIES_PAS_T}
+{$define NSPATHUTILITIES_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSPointerArray.inc b/packages/cocoaint/src/foundation/NSPointerArray.inc
new file mode 100644
index 0000000000..7af3f83776
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSPointerArray.inc
@@ -0,0 +1,71 @@
+{ Parsed from Foundation.framework NSPointerArray.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPOINTERARRAY_PAS_H}
+{$define NSPOINTERARRAY_PAS_H}
+type
+  NSPointerArrayPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPOINTERARRAY_PAS_T}
+{$define NSPOINTERARRAY_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPOINTERARRAY_PAS_R}
+{$define NSPOINTERARRAY_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPOINTERARRAY_PAS_F}
+{$define NSPOINTERARRAY_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPOINTERARRAY_PAS_T}
+{$define NSPOINTERARRAY_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPointerArray = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPOINTERARRAY_PAS_C}
+{$define NSPOINTERARRAY_PAS_C}
+
+{ NSPointerArray }
+  NSPointerArray = objcclass(NSObject, NSFastEnumerationProtocol, NSCopyingProtocol, NSCodingProtocol)
+    
+  public
+    class function alloc: NSPointerArray; message 'alloc';
+
+    function pointerFunctions: NSPointerFunctions; message 'pointerFunctions';
+    function pointerAtIndex(index: culong): Pointer; message 'pointerAtIndex:';
+    procedure addPointer(pointer_: Pointer); message 'addPointer:';
+    procedure removePointerAtIndex(index: culong); message 'removePointerAtIndex:';
+    procedure insertPointer_atIndex(item: Pointer; index: culong); message 'insertPointer:atIndex:';
+    procedure replacePointerAtIndex_withPointer(index: culong; item: Pointer); message 'replacePointerAtIndex:withPointer:';
+    procedure compact; message 'compact';
+    function count: culong; message 'count';
+    procedure setCount(count_: culong); message 'setCount:';
+
+    { Category: NSArrayConveniences }
+    function allObjects: NSArray; message 'allObjects';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSPort.inc b/packages/cocoaint/src/foundation/NSPort.inc
new file mode 100644
index 0000000000..280dec4099
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSPort.inc
@@ -0,0 +1,153 @@
+{ Parsed from Foundation.framework NSPort.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPORT_PAS_H}
+{$define NSPORT_PAS_H}
+type
+  NSPortPointer = Pointer;
+  NSMachPortPointer = Pointer;
+  NSMessagePortPointer = Pointer;
+  NSSocketPortPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPORT_PAS_T}
+{$define NSPORT_PAS_T}
+
+{ Types }
+type
+  NSSocketNativeHandle = cint;
+
+{ CFString constants }
+var
+  NSPortDidBecomeInvalidNotification: CFStringRef; external name '_NSPortDidBecomeInvalidNotification';
+
+{ Constants }
+
+const
+  NSMachPortDeallocateNone = 0;
+  NSMachPortDeallocateSendRight = 1  shl  0;
+  NSMachPortDeallocateReceiveRight = 1  shl  1;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPORT_PAS_R}
+{$define NSPORT_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPORT_PAS_F}
+{$define NSPORT_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPORT_PAS_T}
+{$define NSPORT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPort = objcclass;
+  NSMachPort = objcclass;
+  NSMessagePort = objcclass;
+  NSSocketPort = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPORT_PAS_C}
+{$define NSPORT_PAS_C}
+
+{ NSPort }
+  NSPort = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+    
+  public
+    class function alloc: NSPort; message 'alloc';
+
+    class function allocWithZone(var zone_: NSZone): id; message 'allocWithZone:';
+    class function port: NSPort; message 'port';
+    procedure invalidate; message 'invalidate';
+    function isValid: Boolean; message 'isValid';
+    procedure setDelegate(anId: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
+    procedure scheduleInRunLoop_forMode(runLoop: NSRunLoop; mode: NSString); message 'scheduleInRunLoop:forMode:';
+    procedure removeFromRunLoop_forMode(runLoop: NSRunLoop; mode: NSString); message 'removeFromRunLoop:forMode:';
+    function reservedSpaceLength: culong; message 'reservedSpaceLength';
+    function sendBeforeDate_components_from_reserved(limitDate: NSDate; components: NSMutableArray; receivePort: NSPort; headerSpaceReserved: culong): Boolean; message 'sendBeforeDate:components:from:reserved:';
+    function sendBeforeDate_msgid_components_from_reserved(limitDate: NSDate; msgID: culong; components: NSMutableArray; receivePort: NSPort; headerSpaceReserved: culong): Boolean; message 'sendBeforeDate:msgid:components:from:reserved:';
+    procedure addConnection_toRunLoop_forMode(conn: NSConnection; runLoop: NSRunLoop; mode: NSString); message 'addConnection:toRunLoop:forMode:';
+    procedure removeConnection_fromRunLoop_forMode(conn: NSConnection; runLoop: NSRunLoop; mode: NSString); message 'removeConnection:fromRunLoop:forMode:';
+  end; external;
+
+{ NSMachPort }
+  NSMachPort = objcclass(NSPort)
+  private
+    __delegate: id;
+    __flags: culong;
+    __machPort: cardinal;
+    __reserved: culong;
+    
+  public
+    class function alloc: NSMachPort; message 'alloc';
+
+    class function portWithMachPort(machPort_: cardinal): NSPort; message 'portWithMachPort:';
+    function initWithMachPort(machPort_: cardinal): id; message 'initWithMachPort:';
+    class function portWithMachPort_options(machPort_: cardinal; f: culong): NSPort; message 'portWithMachPort:options:';
+    function initWithMachPort_options(machPort_: cardinal; f: culong): id; message 'initWithMachPort:options:';
+    function machPort: cardinal; message 'machPort';
+    procedure scheduleInRunLoop_forMode(runLoop: NSRunLoop; mode: NSString); message 'scheduleInRunLoop:forMode:';
+    procedure removeFromRunLoop_forMode(runLoop: NSRunLoop; mode: NSString); message 'removeFromRunLoop:forMode:';
+  end; external;
+
+{ NSMessagePort }
+  NSMessagePort = objcclass(NSPort)
+  private
+    __port: Pointer; {garbage collector: __strong }
+    __delegate: id;
+    
+  public
+    class function alloc: NSMessagePort; message 'alloc';
+  end; external;
+
+{ NSSocketPort }
+  NSSocketPort = objcclass(NSPort)
+  private
+    __receiver: Pointer;
+    __connectors: Pointer;
+    __loops: Pointer;
+    __data: Pointer;
+    __signature: id;
+    __delegate: id;
+    __lock: id;
+    __maxSize: culong;
+    __maxSockets: culong;
+    __reserved: culong;
+    
+  public
+    class function alloc: NSSocketPort; message 'alloc';
+
+    function init: id; message 'init';
+    function initWithTCPPort(port_: cushort): id; message 'initWithTCPPort:';
+    function initWithProtocolFamily_socketType_protocol_address(family: cint; type_: cint; protocol_: cint; address_: NSData): id; message 'initWithProtocolFamily:socketType:protocol:address:';
+    function initWithProtocolFamily_socketType_protocol_socket(family: cint; type_: cint; protocol_: cint; sock: NSSocketNativeHandle): id; message 'initWithProtocolFamily:socketType:protocol:socket:';
+    function initRemoteWithTCPPort_host(port_: cushort; hostName: NSString): id; message 'initRemoteWithTCPPort:host:';
+    function initRemoteWithProtocolFamily_socketType_protocol_address(family: cint; type_: cint; protocol_: cint; address_: NSData): id; message 'initRemoteWithProtocolFamily:socketType:protocol:address:';
+    function protocolFamily: cint; message 'protocolFamily';
+    function socketType: cint; message 'socketType';
+    function protocol: cint; message 'protocol';
+    function address: NSData; message 'address';
+    function socket: NSSocketNativeHandle; message 'socket';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSPortCoder.inc b/packages/cocoaint/src/foundation/NSPortCoder.inc
new file mode 100644
index 0000000000..8811abc8b6
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSPortCoder.inc
@@ -0,0 +1,66 @@
+{ Parsed from Foundation.framework NSPortCoder.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPORTCODER_PAS_H}
+{$define NSPORTCODER_PAS_H}
+type
+  NSPortCoderPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPORTCODER_PAS_T}
+{$define NSPORTCODER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPORTCODER_PAS_R}
+{$define NSPORTCODER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPORTCODER_PAS_F}
+{$define NSPORTCODER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPORTCODER_PAS_T}
+{$define NSPORTCODER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPortCoder = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPORTCODER_PAS_C}
+{$define NSPORTCODER_PAS_C}
+
+{ NSPortCoder }
+  NSPortCoder = objcclass(NSCoder)
+    
+  public
+    class function alloc: NSPortCoder; message 'alloc';
+
+    function isBycopy: Boolean; message 'isBycopy';
+    function isByref: Boolean; message 'isByref';
+    function connection: NSConnection; message 'connection';
+    procedure encodePortObject(aport: NSPort); message 'encodePortObject:';
+    function decodePortObject: NSPort; message 'decodePortObject';
+    function initWithReceivePort_sendPort_components(rcvPort: NSPort; sndPort: NSPort; comps: NSArray): id; message 'initWithReceivePort:sendPort:components:';
+    procedure dispatch; message 'dispatch';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSPortMessage.inc b/packages/cocoaint/src/foundation/NSPortMessage.inc
new file mode 100644
index 0000000000..6a029e0ff4
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSPortMessage.inc
@@ -0,0 +1,73 @@
+{ Parsed from Foundation.framework NSPortMessage.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPORTMESSAGE_PAS_H}
+{$define NSPORTMESSAGE_PAS_H}
+type
+  NSPortMessagePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPORTMESSAGE_PAS_T}
+{$define NSPORTMESSAGE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPORTMESSAGE_PAS_R}
+{$define NSPORTMESSAGE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPORTMESSAGE_PAS_F}
+{$define NSPORTMESSAGE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPORTMESSAGE_PAS_T}
+{$define NSPORTMESSAGE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPortMessage = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPORTMESSAGE_PAS_C}
+{$define NSPORTMESSAGE_PAS_C}
+
+{ NSPortMessage }
+  NSPortMessage = objcclass(NSObject)
+  private
+    _localPort: NSPort;
+    _remotePort: NSPort;
+    _components: NSMutableArray;
+    _msgid: cardinal;
+    _reserved2: Pointer;
+    _reserved: Pointer;
+    
+  public
+    class function alloc: NSPortMessage; message 'alloc';
+
+    function initWithSendPort_receivePort_components(sendPort_: NSPort; replyPort: NSPort; components_: NSArray): id; message 'initWithSendPort:receivePort:components:';
+    function components: NSArray; message 'components';
+    function receivePort: NSPort; message 'receivePort';
+    function sendPort: NSPort; message 'sendPort';
+    function sendBeforeDate(date: NSDate): Boolean; message 'sendBeforeDate:';
+    function msgid: cardinal; message 'msgid';
+    procedure setMsgid(msgid_: cardinal); message 'setMsgid:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSPortNameServer.inc b/packages/cocoaint/src/foundation/NSPortNameServer.inc
new file mode 100644
index 0000000000..181f5a9d01
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSPortNameServer.inc
@@ -0,0 +1,111 @@
+{ Parsed from Foundation.framework NSPortNameServer.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPORTNAMESERVER_PAS_H}
+{$define NSPORTNAMESERVER_PAS_H}
+type
+  NSPortNameServerPointer = Pointer;
+  NSMachBootstrapServerPointer = Pointer;
+  NSMessagePortNameServerPointer = Pointer;
+  NSSocketPortNameServerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPORTNAMESERVER_PAS_T}
+{$define NSPORTNAMESERVER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPORTNAMESERVER_PAS_R}
+{$define NSPORTNAMESERVER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPORTNAMESERVER_PAS_F}
+{$define NSPORTNAMESERVER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPORTNAMESERVER_PAS_T}
+{$define NSPORTNAMESERVER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPortNameServer = objcclass;
+  NSMachBootstrapServer = objcclass;
+  NSMessagePortNameServer = objcclass;
+  NSSocketPortNameServer = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPORTNAMESERVER_PAS_C}
+{$define NSPORTNAMESERVER_PAS_C}
+
+{ NSPortNameServer }
+  NSPortNameServer = objcclass(NSObject)
+    
+  public
+    class function alloc: NSPortNameServer; message 'alloc';
+
+    class function systemDefaultPortNameServer: NSPortNameServer; message 'systemDefaultPortNameServer';
+    function portForName(name: NSString): NSPort; message 'portForName:';
+    function portForName_host(name: NSString; host: NSString): NSPort; message 'portForName:host:';
+    function registerPort_name(port: NSPort; name: NSString): Boolean; message 'registerPort:name:';
+    function removePortForName(name: NSString): Boolean; message 'removePortForName:';
+  end; external;
+
+{ NSMachBootstrapServer }
+  NSMachBootstrapServer = objcclass(NSPortNameServer)
+    
+  public
+    class function alloc: NSMachBootstrapServer; message 'alloc';
+
+    class function sharedInstance: id; message 'sharedInstance';
+    function portForName(name: NSString): NSPort; message 'portForName:';
+    function portForName_host(name: NSString; host: NSString): NSPort; message 'portForName:host:';
+    function registerPort_name(port: NSPort; name: NSString): Boolean; message 'registerPort:name:';
+    function servicePortWithName(name: NSString): NSPort; message 'servicePortWithName:';
+  end; external;
+
+{ NSMessagePortNameServer }
+  NSMessagePortNameServer = objcclass(NSPortNameServer)
+    
+  public
+    class function alloc: NSMessagePortNameServer; message 'alloc';
+
+    class function sharedInstance: id; message 'sharedInstance';
+    function portForName(name: NSString): NSPort; message 'portForName:';
+    function portForName_host(name: NSString; host: NSString): NSPort; message 'portForName:host:';
+  end; external;
+
+{ NSSocketPortNameServer }
+  NSSocketPortNameServer = objcclass(NSPortNameServer)
+    
+  public
+    class function alloc: NSSocketPortNameServer; message 'alloc';
+
+    class function sharedInstance: id; message 'sharedInstance';
+    function portForName(name: NSString): NSPort; message 'portForName:';
+    function portForName_host(name: NSString; host: NSString): NSPort; message 'portForName:host:';
+    function registerPort_name(port: NSPort; name: NSString): Boolean; message 'registerPort:name:';
+    function removePortForName(name: NSString): Boolean; message 'removePortForName:';
+    function portForName_host_nameServerPortNumber(name: NSString; host: NSString; portNumber: word): NSPort; message 'portForName:host:nameServerPortNumber:';
+    function registerPort_name_nameServerPortNumber(port: NSPort; name: NSString; portNumber: word): Boolean; message 'registerPort:name:nameServerPortNumber:';
+    procedure setDefaultNameServerPortNumber(portNumber: word); message 'setDefaultNameServerPortNumber:';
+    function defaultNameServerPortNumber: word; message 'defaultNameServerPortNumber';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSPredicate.inc b/packages/cocoaint/src/foundation/NSPredicate.inc
new file mode 100644
index 0000000000..9390efcc32
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSPredicate.inc
@@ -0,0 +1,69 @@
+{ Parsed from Foundation.framework NSPredicate.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPREDICATE_PAS_H}
+{$define NSPREDICATE_PAS_H}
+type
+  NSPredicatePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPREDICATE_PAS_T}
+{$define NSPREDICATE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPREDICATE_PAS_R}
+{$define NSPREDICATE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPREDICATE_PAS_F}
+{$define NSPREDICATE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPREDICATE_PAS_T}
+{$define NSPREDICATE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPredicate = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPREDICATE_PAS_C}
+{$define NSPREDICATE_PAS_C}
+
+{ NSPredicate }
+  NSPredicate = objcclass(NSObject, NSCodingProtocol, NSCopyingProtocol)
+  private
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSPredicate; message 'alloc';
+
+    class function predicateWithFormat_argumentArray(predicateFormat_: NSString; arguments: NSArray): NSPredicate; message 'predicateWithFormat:argumentArray:';
+    class function predicateWithFormat(predicateFormat_: NSString): NSPredicate; message 'predicateWithFormat:';
+    class function predicateWithFormat_arguments(predicateFormat_: NSString; argList: va_list): NSPredicate; message 'predicateWithFormat:arguments:';
+    class function predicateWithValue(value: Boolean): NSPredicate; message 'predicateWithValue:';
+    function predicateFormat: NSString; message 'predicateFormat';
+    function predicateWithSubstitutionVariables(variables: NSDictionary): NSPredicate; message 'predicateWithSubstitutionVariables:';
+    function evaluateWithObject(object_: id): Boolean; message 'evaluateWithObject:';
+    function evaluateWithObject_substitutionVariables(object_: id; bindings: NSDictionary): Boolean; message 'evaluateWithObject:substitutionVariables:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSProcessInfo.inc b/packages/cocoaint/src/foundation/NSProcessInfo.inc
new file mode 100644
index 0000000000..53eadcfd61
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSProcessInfo.inc
@@ -0,0 +1,90 @@
+{ Parsed from Foundation.framework NSProcessInfo.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPROCESSINFO_PAS_H}
+{$define NSPROCESSINFO_PAS_H}
+type
+  NSProcessInfoPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPROCESSINFO_PAS_T}
+{$define NSPROCESSINFO_PAS_T}
+
+{ Constants }
+
+const
+  NSWindowsNTOperatingSystem = 1;
+  NSWindows95OperatingSystem = 0;
+  NSSolarisOperatingSystem = 1;
+  NSHPUXOperatingSystem = 2;
+  NSMACHOperatingSystem = 3;
+  NSSunOSOperatingSystem = 4;
+  NSOSF1OperatingSystem = 5;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPROCESSINFO_PAS_R}
+{$define NSPROCESSINFO_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPROCESSINFO_PAS_F}
+{$define NSPROCESSINFO_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPROCESSINFO_PAS_T}
+{$define NSPROCESSINFO_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSProcessInfo = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPROCESSINFO_PAS_C}
+{$define NSPROCESSINFO_PAS_C}
+
+{ NSProcessInfo }
+  NSProcessInfo = objcclass(NSObject)
+  private
+    _environment: NSDictionary;
+    _arguments: NSArray;
+    _hostName: NSString;
+    _name: NSString;
+    _reserved: Pointer;
+    
+  public
+    class function alloc: NSProcessInfo; message 'alloc';
+
+    class function processInfo: NSProcessInfo; message 'processInfo';
+    function environment: NSDictionary; message 'environment';
+    function arguments: NSArray; message 'arguments';
+    function hostName: NSString; message 'hostName';
+    function processName: NSString; message 'processName';
+    function processIdentifier: cint; message 'processIdentifier';
+    procedure setProcessName(newName: NSString); message 'setProcessName:';
+    function globallyUniqueString: NSString; message 'globallyUniqueString';
+    function operatingSystem: culong; message 'operatingSystem';
+    function operatingSystemName: NSString; message 'operatingSystemName';
+    function operatingSystemVersionString: NSString; message 'operatingSystemVersionString';
+    function processorCount: culong; message 'processorCount';
+    function activeProcessorCount: culong; message 'activeProcessorCount';
+    function physicalMemory: culonglong; message 'physicalMemory';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSPropertyList.inc b/packages/cocoaint/src/foundation/NSPropertyList.inc
new file mode 100644
index 0000000000..69566b5f0e
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSPropertyList.inc
@@ -0,0 +1,79 @@
+{ Parsed from Foundation.framework NSPropertyList.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPROPERTYLIST_PAS_H}
+{$define NSPROPERTYLIST_PAS_H}
+type
+  NSPropertyListSerializationPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPROPERTYLIST_PAS_T}
+{$define NSPROPERTYLIST_PAS_T}
+
+{ Constants }
+
+const
+  NSPropertyListImmutable = kCFPropertyListImmutable;
+  NSPropertyListMutableContainers = kCFPropertyListMutableContainers;
+  NSPropertyListMutableContainersAndLeaves = kCFPropertyListMutableContainersAndLeaves;
+
+const
+  NSPropertyListOpenStepFormat = kCFPropertyListOpenStepFormat;
+
+{ Types }
+type
+  NSPropertyListMutabilityOptions = culong;
+  NSPropertyListFormat = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPROPERTYLIST_PAS_R}
+{$define NSPROPERTYLIST_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPROPERTYLIST_PAS_F}
+{$define NSPROPERTYLIST_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPROPERTYLIST_PAS_T}
+{$define NSPROPERTYLIST_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSPropertyListSerialization = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPROPERTYLIST_PAS_C}
+{$define NSPROPERTYLIST_PAS_C}
+
+{ NSPropertyListSerialization }
+  NSPropertyListSerialization = objcclass(NSObject)
+  private
+    _reserved: Pointer;
+    
+  public
+    class function alloc: NSPropertyListSerialization; message 'alloc';
+
+    class function propertyList_isValidForFormat(plist: id; format: NSPropertyListFormat): Boolean; message 'propertyList:isValidForFormat:';
+    class function dataFromPropertyList_format_errorDescription(plist: id; format: NSPropertyListFormat; var errorString: NSString): NSData; message 'dataFromPropertyList:format:errorDescription:';
+    class function propertyListFromData_mutabilityOption_format_errorDescription(data: NSData; opt: NSPropertyListMutabilityOptions; var format: NSPropertyListFormat; var errorString: NSString): id; message 'propertyListFromData:mutabilityOption:format:errorDescription:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSProtocolChecker.inc b/packages/cocoaint/src/foundation/NSProtocolChecker.inc
new file mode 100644
index 0000000000..c13f33f9d3
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSProtocolChecker.inc
@@ -0,0 +1,65 @@
+{ Parsed from Foundation.framework NSProtocolChecker.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPROTOCOLCHECKER_PAS_H}
+{$define NSPROTOCOLCHECKER_PAS_H}
+type
+  NSProtocolCheckerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPROTOCOLCHECKER_PAS_T}
+{$define NSPROTOCOLCHECKER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPROTOCOLCHECKER_PAS_R}
+{$define NSPROTOCOLCHECKER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPROTOCOLCHECKER_PAS_F}
+{$define NSPROTOCOLCHECKER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPROTOCOLCHECKER_PAS_T}
+{$define NSPROTOCOLCHECKER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSProtocolChecker = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPROTOCOLCHECKER_PAS_C}
+{$define NSPROTOCOLCHECKER_PAS_C}
+
+{ NSProtocolChecker }
+  NSProtocolChecker = objcclass(NSProxy)
+    
+  public
+    class function alloc: NSProtocolChecker; message 'alloc';
+
+    function protocol: objc_protocol; message 'protocol';
+    function target: NSObject; message 'target';
+
+    { Category: NSProtocolCheckerCreation }
+    class function protocolCheckerWithTarget_protocol(anObject: NSObject; aProtocol: objc_protocol): id; message 'protocolCheckerWithTarget:protocol:';
+    function initWithTarget_protocol(anObject: NSObject; aProtocol: objc_protocol): id; message 'initWithTarget:protocol:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSProxy.inc b/packages/cocoaint/src/foundation/NSProxy.inc
new file mode 100644
index 0000000000..4b5e1109d4
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSProxy.inc
@@ -0,0 +1,70 @@
+{ Parsed from Foundation.framework NSProxy.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSPROXY_PAS_H}
+{$define NSPROXY_PAS_H}
+type
+  NSProxyPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSPROXY_PAS_T}
+{$define NSPROXY_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSPROXY_PAS_R}
+{$define NSPROXY_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSPROXY_PAS_F}
+{$define NSPROXY_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSPROXY_PAS_T}
+{$define NSPROXY_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSProxy = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSPROXY_PAS_C}
+{$define NSPROXY_PAS_C}
+
+{ NSProxy }
+  NSProxy = objcclass(NSObject, NSObjectProtocol)
+  private
+    _isa: Pobjc_class;
+    
+  public
+    class function alloc: NSProxy; message 'alloc';
+
+    class function alloc: id; message 'alloc';
+    class function allocWithZone(var zone_: NSZone): id; message 'allocWithZone:';
+    class function class_: Pobjc_class; message 'class';
+    procedure forwardInvocation(invocation: NSInvocation); message 'forwardInvocation:';
+    function methodSignatureForSelector(sel: SEL): NSMethodSignature; message 'methodSignatureForSelector:';
+    procedure dealloc; message 'dealloc';
+    procedure finalize; message 'finalize';
+    function description: NSString; message 'description';
+    class function respondsToSelector(aSelector: SEL): Boolean; message 'respondsToSelector:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSRange.inc b/packages/cocoaint/src/foundation/NSRange.inc
new file mode 100644
index 0000000000..74e89736b6
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSRange.inc
@@ -0,0 +1,43 @@
+{ Parsed from Foundation.framework NSRange.h }
+{ Version 1.0 beta - Wed Mar 18 15:38:12 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSRANGE_PAS_T}
+{$define NSRANGE_PAS_T}
+
+{ Records }
+type
+  _NSRange = packed record
+    location: UInt32;
+    length: UInt32;
+  end;
+  
+{$ifdef NSGEOMETRY_TYPES_SAME_AS_CGGEOMETRY_TYPES}
+NSRange = CFRange;
+{$else}
+NSRange = _NSRange;
+{$endif}
+
+NSRangePointer = ^NSRange;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSRANGE_PAS_R}
+{$define NSRANGE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSRANGE_PAS_F}
+{$define NSRANGE_PAS_F}
+
+function NSUnionRange(range1: NSRange; range2: NSRange): NSRange; cdecl; external name 'NSUnionRange';
+function NSIntersectionRange(range1: NSRange; range2: NSRange): NSRange; cdecl; external name 'NSIntersectionRange';
+function NSRangeFromString(var aString: CFStringRef): NSRange; cdecl; external name 'NSRangeFromString';
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSRunLoop.inc b/packages/cocoaint/src/foundation/NSRunLoop.inc
new file mode 100644
index 0000000000..b27ef95ea2
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSRunLoop.inc
@@ -0,0 +1,86 @@
+{ Parsed from Foundation.framework NSRunLoop.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSRUNLOOP_PAS_H}
+{$define NSRUNLOOP_PAS_H}
+type
+  NSRunLoopPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSRUNLOOP_PAS_T}
+{$define NSRUNLOOP_PAS_T}
+
+{ CFString constants }
+var
+  NSDefaultRunLoopMode: CFStringRef; external name '_NSDefaultRunLoopMode';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSRUNLOOP_PAS_R}
+{$define NSRUNLOOP_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSRUNLOOP_PAS_F}
+{$define NSRUNLOOP_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSRUNLOOP_PAS_T}
+{$define NSRUNLOOP_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSRunLoop = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSRUNLOOP_PAS_C}
+{$define NSRUNLOOP_PAS_C}
+
+{ NSRunLoop }
+  NSRunLoop = objcclass(NSObject)
+  private
+    __rl: id;
+    __dperf: id;
+    __perft: id;
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSRunLoop; message 'alloc';
+
+    class function currentRunLoop: NSRunLoop; message 'currentRunLoop';
+    function currentMode: NSString; message 'currentMode';
+    function getCFRunLoop: CFRunLoopRef; message 'getCFRunLoop';
+    procedure addTimer_forMode(timer: NSTimer; mode: NSString); message 'addTimer:forMode:';
+    procedure addPort_forMode(aPort: NSPort; mode: NSString); message 'addPort:forMode:';
+    procedure removePort_forMode(aPort: NSPort; mode: NSString); message 'removePort:forMode:';
+    function limitDateForMode(mode: NSString): NSDate; message 'limitDateForMode:';
+    procedure acceptInputForMode_beforeDate(mode: NSString; limitDate: NSDate); message 'acceptInputForMode:beforeDate:';
+
+    { Category: NSRunLoopConveniences }
+    procedure run; message 'run';
+    procedure runUntilDate(limitDate: NSDate); message 'runUntilDate:';
+    function runMode_beforeDate(mode: NSString; limitDate: NSDate): Boolean; message 'runMode:beforeDate:';
+
+    { Category: NSOrderedPerform }
+    procedure performSelector_target_argument_order_modes(aSelector: SEL; target: id; arg: id; order: culong; modes: NSArray); message 'performSelector:target:argument:order:modes:';
+    procedure cancelPerformSelector_target_argument(aSelector: SEL; target: id; arg: id); message 'cancelPerformSelector:target:argument:';
+    procedure cancelPerformSelectorsWithTarget(target: id); message 'cancelPerformSelectorsWithTarget:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSScanner.inc b/packages/cocoaint/src/foundation/NSScanner.inc
new file mode 100644
index 0000000000..ad32a3270f
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSScanner.inc
@@ -0,0 +1,90 @@
+{ Parsed from Foundation.framework NSScanner.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSCANNER_PAS_H}
+{$define NSSCANNER_PAS_H}
+type
+  NSScannerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSCANNER_PAS_T}
+{$define NSSCANNER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSCANNER_PAS_R}
+{$define NSSCANNER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSCANNER_PAS_F}
+{$define NSSCANNER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSCANNER_PAS_T}
+{$define NSSCANNER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSScanner = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSCANNER_PAS_C}
+{$define NSSCANNER_PAS_C}
+
+{ NSScanner }
+  NSScanner = objcclass(NSObject, NSCopyingProtocol)
+    
+  public
+    class function alloc: NSScanner; message 'alloc';
+
+    function string_: NSString; message 'string';
+    function scanLocation: culong; message 'scanLocation';
+    procedure setScanLocation(pos: culong); message 'setScanLocation:';
+    procedure setCharactersToBeSkipped(set_: NSCharacterSet); message 'setCharactersToBeSkipped:';
+    procedure setCaseSensitive(flag: Boolean); message 'setCaseSensitive:';
+    procedure setLocale(locale_: id); message 'setLocale:';
+
+    { Category: NSExtendedScanner }
+    function charactersToBeSkipped: NSCharacterSet; message 'charactersToBeSkipped';
+    function caseSensitive: Boolean; message 'caseSensitive';
+    function locale: id; message 'locale';
+    function scanInt(var value: cint): Boolean; message 'scanInt:';
+    function scanInteger(var value: clong): Boolean; message 'scanInteger:';
+    function scanHexLongLong(var result_: culonglong): Boolean; message 'scanHexLongLong:';
+    function scanHexFloat(var result_: single): Boolean; message 'scanHexFloat:';
+    function scanHexDouble(var result_: double): Boolean; message 'scanHexDouble:';
+    function scanHexInt(value: Pointer): Boolean; message 'scanHexInt:';
+    function scanLongLong(var value: clonglong): Boolean; message 'scanLongLong:';
+    function scanFloat(var value: single): Boolean; message 'scanFloat:';
+    function scanDouble(var value: double): Boolean; message 'scanDouble:';
+    function scanString_intoString(string__: NSString; var value: NSString): Boolean; message 'scanString:intoString:';
+    function scanCharactersFromSet_intoString(set_: NSCharacterSet; var value: NSString): Boolean; message 'scanCharactersFromSet:intoString:';
+    function scanUpToString_intoString(string__: NSString; var value: NSString): Boolean; message 'scanUpToString:intoString:';
+    function scanUpToCharactersFromSet_intoString(set_: NSCharacterSet; var value: NSString): Boolean; message 'scanUpToCharactersFromSet:intoString:';
+    function isAtEnd: Boolean; message 'isAtEnd';
+    function initWithString(string__: NSString): id; message 'initWithString:';
+    class function scannerWithString(string__: NSString): id; message 'scannerWithString:';
+    class function localizedScannerWithString(string__: NSString): id; message 'localizedScannerWithString:';
+
+    { Category: NSDecimalNumberScanning }
+    function scanDecimal(var dcm: NSDecimal): Boolean; message 'scanDecimal:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSScriptClassDescription.inc b/packages/cocoaint/src/foundation/NSScriptClassDescription.inc
new file mode 100644
index 0000000000..e2f4a3a703
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSScriptClassDescription.inc
@@ -0,0 +1,92 @@
+{ Parsed from Foundation.framework NSScriptClassDescription.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSCRIPTCLASSDESCRIPTION_PAS_H}
+{$define NSSCRIPTCLASSDESCRIPTION_PAS_H}
+type
+  NSScriptClassDescriptionPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSCRIPTCLASSDESCRIPTION_PAS_T}
+{$define NSSCRIPTCLASSDESCRIPTION_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSCRIPTCLASSDESCRIPTION_PAS_R}
+{$define NSSCRIPTCLASSDESCRIPTION_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSCRIPTCLASSDESCRIPTION_PAS_F}
+{$define NSSCRIPTCLASSDESCRIPTION_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSCRIPTCLASSDESCRIPTION_PAS_T}
+{$define NSSCRIPTCLASSDESCRIPTION_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSScriptClassDescription = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSCRIPTCLASSDESCRIPTION_PAS_C}
+{$define NSSCRIPTCLASSDESCRIPTION_PAS_C}
+
+{ NSScriptClassDescription }
+  NSScriptClassDescription = objcclass(NSClassDescription)
+  private
+    __suiteName: NSString;
+    __objcClassName: NSString;
+    __appleEventCode: FourCharCode;
+    __superclassNameOrDescription: NSObject;
+    __attributeDescriptions: NSArray;
+    __toOneRelationshipDescriptions: NSArray;
+    __toManyRelationshipDescriptions: NSArray;
+    __commandMethodSelectorsByName: NSDictionary;
+    __moreVars: id;
+    
+  public
+    class function alloc: NSScriptClassDescription; message 'alloc';
+
+    class function classDescriptionForClass(aClass: Pobjc_class): NSScriptClassDescription; message 'classDescriptionForClass:';
+    function initWithSuiteName_className_dictionary(suiteName_: NSString; className__: NSString; classDeclaration: NSDictionary): id; message 'initWithSuiteName:className:dictionary:';
+    function suiteName: NSString; message 'suiteName';
+    function className_: NSString; message 'className';
+    function implementationClassName: NSString; message 'implementationClassName';
+    function superclassDescription: NSScriptClassDescription; message 'superclassDescription';
+    function appleEventCode: FourCharCode; message 'appleEventCode';
+    function matchesAppleEventCode(appleEventCode_: FourCharCode): Boolean; message 'matchesAppleEventCode:';
+    function supportsCommand(commandDescription: NSScriptCommandDescription): Boolean; message 'supportsCommand:';
+    function selectorForCommand(commandDescription: NSScriptCommandDescription): SEL; message 'selectorForCommand:';
+    function typeForKey(key: NSString): NSString; message 'typeForKey:';
+    function classDescriptionForKey(key: NSString): NSScriptClassDescription; message 'classDescriptionForKey:';
+    function appleEventCodeForKey(key: NSString): FourCharCode; message 'appleEventCodeForKey:';
+    function keyWithAppleEventCode(appleEventCode_: FourCharCode): NSString; message 'keyWithAppleEventCode:';
+    function defaultSubcontainerAttributeKey: NSString; message 'defaultSubcontainerAttributeKey';
+    function isLocationRequiredToCreateForKey(toManyRelationshipKey: NSString): Boolean; message 'isLocationRequiredToCreateForKey:';
+    function hasPropertyForKey(key: NSString): Boolean; message 'hasPropertyForKey:';
+    function hasOrderedToManyRelationshipForKey(key: NSString): Boolean; message 'hasOrderedToManyRelationshipForKey:';
+    function hasReadablePropertyForKey(key: NSString): Boolean; message 'hasReadablePropertyForKey:';
+    function hasWritablePropertyForKey(key: NSString): Boolean; message 'hasWritablePropertyForKey:';
+
+    { Category: NSDeprecated }
+    function isReadOnlyKey(key: NSString): Boolean; message 'isReadOnlyKey:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSScriptCoercionHandler.inc b/packages/cocoaint/src/foundation/NSScriptCoercionHandler.inc
new file mode 100644
index 0000000000..9cd99e9395
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSScriptCoercionHandler.inc
@@ -0,0 +1,64 @@
+{ Parsed from Foundation.framework NSScriptCoercionHandler.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSCRIPTCOERCIONHANDLER_PAS_H}
+{$define NSSCRIPTCOERCIONHANDLER_PAS_H}
+type
+  NSScriptCoercionHandlerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSCRIPTCOERCIONHANDLER_PAS_T}
+{$define NSSCRIPTCOERCIONHANDLER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSCRIPTCOERCIONHANDLER_PAS_R}
+{$define NSSCRIPTCOERCIONHANDLER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSCRIPTCOERCIONHANDLER_PAS_F}
+{$define NSSCRIPTCOERCIONHANDLER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSCRIPTCOERCIONHANDLER_PAS_T}
+{$define NSSCRIPTCOERCIONHANDLER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSScriptCoercionHandler = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSCRIPTCOERCIONHANDLER_PAS_C}
+{$define NSSCRIPTCOERCIONHANDLER_PAS_C}
+
+{ NSScriptCoercionHandler }
+  NSScriptCoercionHandler = objcclass(NSObject)
+  private
+    __coercers: id;
+    
+  public
+    class function alloc: NSScriptCoercionHandler; message 'alloc';
+
+    class function sharedCoercionHandler: NSScriptCoercionHandler; message 'sharedCoercionHandler';
+    function coerceValue_toClass(value: id; toClass: Pobjc_class): id; message 'coerceValue:toClass:';
+    procedure registerCoercer_selector_toConvertFromClass_toClass(coercer: id; selector: SEL; fromClass: Pobjc_class; toClass: Pobjc_class); message 'registerCoercer:selector:toConvertFromClass:toClass:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSScriptCommand.inc b/packages/cocoaint/src/foundation/NSScriptCommand.inc
new file mode 100644
index 0000000000..f0c4e54f8c
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSScriptCommand.inc
@@ -0,0 +1,105 @@
+{ Parsed from Foundation.framework NSScriptCommand.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSCRIPTCOMMAND_PAS_H}
+{$define NSSCRIPTCOMMAND_PAS_H}
+type
+  NSScriptCommandPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSCRIPTCOMMAND_PAS_T}
+{$define NSSCRIPTCOMMAND_PAS_T}
+
+{ Constants }
+
+const
+  NSNoScriptError = 0;
+  NSOperationNotSupportedForKeyScriptError = 0;
+  NSCannotCreateScriptCommandError = 1;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSCRIPTCOMMAND_PAS_R}
+{$define NSSCRIPTCOMMAND_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSCRIPTCOMMAND_PAS_F}
+{$define NSSCRIPTCOMMAND_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSCRIPTCOMMAND_PAS_T}
+{$define NSSCRIPTCOMMAND_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSScriptCommand = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSCRIPTCOMMAND_PAS_C}
+{$define NSSCRIPTCOMMAND_PAS_C}
+
+{ NSScriptCommand }
+  NSScriptCommand = objcclass(NSObject, NSCodingProtocol)
+  private
+    __commandDescription: NSScriptCommandDescription;
+    __directParameter: id;
+    __receiversSpecifier: NSScriptObjectSpecifier;
+    __evaluatedReceivers: id;
+    __arguments: NSDictionary;
+    __evaluatedArguments: NSMutableDictionary;
+    __flags: bitpacked record
+        hasEvaluatedReceivers: 0..1;
+        hasEvaluatedArguments: 0..1;
+        RESERVED: 0..((1 shl 30)-1);
+      end;
+    __moreVars: id;
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSScriptCommand; message 'alloc';
+
+    function initWithCommandDescription(commandDef: NSScriptCommandDescription): id; message 'initWithCommandDescription:';
+    function commandDescription: NSScriptCommandDescription; message 'commandDescription';
+    procedure setDirectParameter(directParameter_: id); message 'setDirectParameter:';
+    function directParameter: id; message 'directParameter';
+    procedure setReceiversSpecifier(receiversRef: NSScriptObjectSpecifier); message 'setReceiversSpecifier:';
+    function receiversSpecifier: NSScriptObjectSpecifier; message 'receiversSpecifier';
+    function evaluatedReceivers: id; message 'evaluatedReceivers';
+    procedure setArguments(args: NSDictionary); message 'setArguments:';
+    function arguments: NSDictionary; message 'arguments';
+    function evaluatedArguments: NSDictionary; message 'evaluatedArguments';
+    function isWellFormed: Boolean; message 'isWellFormed';
+    function performDefaultImplementation: id; message 'performDefaultImplementation';
+    function executeCommand: id; message 'executeCommand';
+    procedure setScriptErrorNumber(errorNumber: cint); message 'setScriptErrorNumber:';
+    procedure setScriptErrorOffendingObjectDescriptor(errorOffendingObjectDescriptor: NSAppleEventDescriptor); message 'setScriptErrorOffendingObjectDescriptor:';
+    procedure setScriptErrorExpectedTypeDescriptor(errorExpectedTypeDescriptor: NSAppleEventDescriptor); message 'setScriptErrorExpectedTypeDescriptor:';
+    procedure setScriptErrorString(errorString: NSString); message 'setScriptErrorString:';
+    function scriptErrorNumber: cint; message 'scriptErrorNumber';
+    function scriptErrorOffendingObjectDescriptor: NSAppleEventDescriptor; message 'scriptErrorOffendingObjectDescriptor';
+    function scriptErrorExpectedTypeDescriptor: NSAppleEventDescriptor; message 'scriptErrorExpectedTypeDescriptor';
+    function scriptErrorString: NSString; message 'scriptErrorString';
+    class function currentCommand: NSScriptCommand; message 'currentCommand';
+    function appleEvent: NSAppleEventDescriptor; message 'appleEvent';
+    procedure suspendExecution; message 'suspendExecution';
+    procedure resumeExecutionWithResult(result_: id); message 'resumeExecutionWithResult:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSScriptCommandDescription.inc b/packages/cocoaint/src/foundation/NSScriptCommandDescription.inc
new file mode 100644
index 0000000000..3da932f7eb
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSScriptCommandDescription.inc
@@ -0,0 +1,82 @@
+{ Parsed from Foundation.framework NSScriptCommandDescription.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSCRIPTCOMMANDDESCRIPTION_PAS_H}
+{$define NSSCRIPTCOMMANDDESCRIPTION_PAS_H}
+type
+  NSScriptCommandDescriptionPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSCRIPTCOMMANDDESCRIPTION_PAS_T}
+{$define NSSCRIPTCOMMANDDESCRIPTION_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSCRIPTCOMMANDDESCRIPTION_PAS_R}
+{$define NSSCRIPTCOMMANDDESCRIPTION_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSCRIPTCOMMANDDESCRIPTION_PAS_F}
+{$define NSSCRIPTCOMMANDDESCRIPTION_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSCRIPTCOMMANDDESCRIPTION_PAS_T}
+{$define NSSCRIPTCOMMANDDESCRIPTION_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSScriptCommandDescription = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSCRIPTCOMMANDDESCRIPTION_PAS_C}
+{$define NSSCRIPTCOMMANDDESCRIPTION_PAS_C}
+
+{ NSScriptCommandDescription }
+  NSScriptCommandDescription = objcclass(NSObject, NSCodingProtocol)
+  private
+    __suiteName: NSString;
+    __plistCommandName: NSString;
+    __classAppleEventCode: FourCharCode;
+    __idAppleEventCode: FourCharCode;
+    __objcClassName: NSString;
+    __resultTypeNameOrDescription: NSObject;
+    __plistResultTypeAppleEventCode: FourCharCode;
+    __moreVars: id;
+    
+  public
+    class function alloc: NSScriptCommandDescription; message 'alloc';
+
+    function initWithSuiteName_commandName_dictionary(suiteName_: NSString; commandName_: NSString; commandDeclaration: NSDictionary): id; message 'initWithSuiteName:commandName:dictionary:';
+    function suiteName: NSString; message 'suiteName';
+    function commandName: NSString; message 'commandName';
+    function appleEventClassCode: FourCharCode; message 'appleEventClassCode';
+    function appleEventCode: FourCharCode; message 'appleEventCode';
+    function commandClassName: NSString; message 'commandClassName';
+    function returnType: NSString; message 'returnType';
+    function appleEventCodeForReturnType: FourCharCode; message 'appleEventCodeForReturnType';
+    function argumentNames: NSArray; message 'argumentNames';
+    function typeForArgumentWithName(argumentName: NSString): NSString; message 'typeForArgumentWithName:';
+    function appleEventCodeForArgumentWithName(argumentName: NSString): FourCharCode; message 'appleEventCodeForArgumentWithName:';
+    function isOptionalArgumentWithName(argumentName: NSString): Boolean; message 'isOptionalArgumentWithName:';
+    function createCommandInstance: NSScriptCommand; message 'createCommandInstance';
+    function createCommandInstanceWithZone(var zone_: NSZone): NSScriptCommand; message 'createCommandInstanceWithZone:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSScriptExecutionContext.inc b/packages/cocoaint/src/foundation/NSScriptExecutionContext.inc
new file mode 100644
index 0000000000..7ebabf1803
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSScriptExecutionContext.inc
@@ -0,0 +1,71 @@
+{ Parsed from Foundation.framework NSScriptExecutionContext.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSCRIPTEXECUTIONCONTEXT_PAS_H}
+{$define NSSCRIPTEXECUTIONCONTEXT_PAS_H}
+type
+  NSScriptExecutionContextPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSCRIPTEXECUTIONCONTEXT_PAS_T}
+{$define NSSCRIPTEXECUTIONCONTEXT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSCRIPTEXECUTIONCONTEXT_PAS_R}
+{$define NSSCRIPTEXECUTIONCONTEXT_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSCRIPTEXECUTIONCONTEXT_PAS_F}
+{$define NSSCRIPTEXECUTIONCONTEXT_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSCRIPTEXECUTIONCONTEXT_PAS_T}
+{$define NSSCRIPTEXECUTIONCONTEXT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSScriptExecutionContext = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSCRIPTEXECUTIONCONTEXT_PAS_C}
+{$define NSSCRIPTEXECUTIONCONTEXT_PAS_C}
+
+{ NSScriptExecutionContext }
+  NSScriptExecutionContext = objcclass(NSObject)
+  private
+    __topLevelObject: id;
+    __objectBeingTested: id;
+    __rangeContainerObject: id;
+    __moreVars: id;
+    
+  public
+    class function alloc: NSScriptExecutionContext; message 'alloc';
+
+    class function sharedScriptExecutionContext: NSScriptExecutionContext; message 'sharedScriptExecutionContext';
+    function topLevelObject: id; message 'topLevelObject';
+    procedure setTopLevelObject(obj: id); message 'setTopLevelObject:';
+    function objectBeingTested: id; message 'objectBeingTested';
+    procedure setObjectBeingTested(obj: id); message 'setObjectBeingTested:';
+    function rangeContainerObject: id; message 'rangeContainerObject';
+    procedure setRangeContainerObject(obj: id); message 'setRangeContainerObject:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSScriptKeyValueCoding.inc b/packages/cocoaint/src/foundation/NSScriptKeyValueCoding.inc
new file mode 100644
index 0000000000..6c12e1cd45
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSScriptKeyValueCoding.inc
@@ -0,0 +1,31 @@
+{ Parsed from Foundation.framework NSScriptKeyValueCoding.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSSCRIPTKEYVALUECODING_PAS_T}
+{$define NSSCRIPTKEYVALUECODING_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSCRIPTKEYVALUECODING_PAS_R}
+{$define NSSCRIPTKEYVALUECODING_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSCRIPTKEYVALUECODING_PAS_F}
+{$define NSSCRIPTKEYVALUECODING_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSCRIPTKEYVALUECODING_PAS_T}
+{$define NSSCRIPTKEYVALUECODING_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSScriptObjectSpecifiers.inc b/packages/cocoaint/src/foundation/NSScriptObjectSpecifiers.inc
new file mode 100644
index 0000000000..2d10ca7501
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSScriptObjectSpecifiers.inc
@@ -0,0 +1,280 @@
+{ Parsed from Foundation.framework NSScriptObjectSpecifiers.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSCRIPTOBJECTSPECIFIERS_PAS_H}
+{$define NSSCRIPTOBJECTSPECIFIERS_PAS_H}
+type
+  NSScriptObjectSpecifierPointer = Pointer;
+  NSIndexSpecifierPointer = Pointer;
+  NSMiddleSpecifierPointer = Pointer;
+  NSNameSpecifierPointer = Pointer;
+  NSPositionalSpecifierPointer = Pointer;
+  NSPropertySpecifierPointer = Pointer;
+  NSRandomSpecifierPointer = Pointer;
+  NSRangeSpecifierPointer = Pointer;
+  NSRelativeSpecifierPointer = Pointer;
+  NSUniqueIDSpecifierPointer = Pointer;
+  NSWhoseSpecifierPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSCRIPTOBJECTSPECIFIERS_PAS_T}
+{$define NSSCRIPTOBJECTSPECIFIERS_PAS_T}
+
+{ Constants }
+
+const
+  NSNoSpecifierError = 0;
+
+const
+  NSPositionAfter = 0;
+  NSPositionBefore = 1;
+  NSPositionBeginning = 2;
+  NSPositionEnd = 3;
+  NSPositionReplace = 4;
+
+const
+  NSRelativeAfter = 0;
+  NSRelativeBefore = 0;
+
+const
+  NSIndexSubelement = 0;
+  NSEverySubelement = 1;
+  NSMiddleSubelement = 2;
+  NSRandomSubelement = 3;
+
+{ Types }
+type
+  NSInsertionPosition = culong;
+  NSRelativePosition = culong;
+  NSWhoseSubelementIdentifier = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSCRIPTOBJECTSPECIFIERS_PAS_R}
+{$define NSSCRIPTOBJECTSPECIFIERS_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSCRIPTOBJECTSPECIFIERS_PAS_F}
+{$define NSSCRIPTOBJECTSPECIFIERS_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSCRIPTOBJECTSPECIFIERS_PAS_T}
+{$define NSSCRIPTOBJECTSPECIFIERS_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSScriptObjectSpecifier = objcclass;
+  NSIndexSpecifier = objcclass;
+  NSMiddleSpecifier = objcclass;
+  NSNameSpecifier = objcclass;
+  NSPositionalSpecifier = objcclass;
+  NSPropertySpecifier = objcclass;
+  NSRandomSpecifier = objcclass;
+  NSRangeSpecifier = objcclass;
+  NSRelativeSpecifier = objcclass;
+  NSUniqueIDSpecifier = objcclass;
+  NSWhoseSpecifier = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSCRIPTOBJECTSPECIFIERS_PAS_C}
+{$define NSSCRIPTOBJECTSPECIFIERS_PAS_C}
+
+{ NSScriptObjectSpecifier }
+  NSScriptObjectSpecifier = objcclass(NSObject, NSCodingProtocol)
+  private
+    __container: NSScriptObjectSpecifier;
+    __child: NSScriptObjectSpecifier;
+    __key: NSString;
+    __containerClassDescription: NSScriptClassDescription;
+    __containerIsObjectBeingTested: Boolean;
+    __containerIsRangeContainerObject: Boolean;
+    __padding: char;
+    __descriptor: NSAppleEventDescriptor;
+    __error: clong;
+    
+  public
+    class function alloc: NSScriptObjectSpecifier; message 'alloc';
+
+    class function objectSpecifierWithDescriptor(descriptor_: NSAppleEventDescriptor): NSScriptObjectSpecifier; message 'objectSpecifierWithDescriptor:';
+    function initWithContainerSpecifier_key(container: NSScriptObjectSpecifier; property_: NSString): id; message 'initWithContainerSpecifier:key:';
+    function initWithContainerClassDescription_containerSpecifier_key(classDesc: NSScriptClassDescription; container: NSScriptObjectSpecifier; property_: NSString): id; message 'initWithContainerClassDescription:containerSpecifier:key:';
+    function childSpecifier: NSScriptObjectSpecifier; message 'childSpecifier';
+    procedure setChildSpecifier(child: NSScriptObjectSpecifier); message 'setChildSpecifier:';
+    function containerSpecifier: NSScriptObjectSpecifier; message 'containerSpecifier';
+    procedure setContainerSpecifier(subRef: NSScriptObjectSpecifier); message 'setContainerSpecifier:';
+    function containerIsObjectBeingTested: Boolean; message 'containerIsObjectBeingTested';
+    procedure setContainerIsObjectBeingTested(flag: Boolean); message 'setContainerIsObjectBeingTested:';
+    function containerIsRangeContainerObject: Boolean; message 'containerIsRangeContainerObject';
+    procedure setContainerIsRangeContainerObject(flag: Boolean); message 'setContainerIsRangeContainerObject:';
+    function key: NSString; message 'key';
+    procedure setKey(key_: NSString); message 'setKey:';
+    function containerClassDescription: NSScriptClassDescription; message 'containerClassDescription';
+    procedure setContainerClassDescription(classDesc: NSScriptClassDescription); message 'setContainerClassDescription:';
+    function keyClassDescription: NSScriptClassDescription; message 'keyClassDescription';
+    function indicesOfObjectsByEvaluatingWithContainer_count(container: id; var count: clong): clong; message 'indicesOfObjectsByEvaluatingWithContainer:count:';
+    function objectsByEvaluatingWithContainers(containers: id): id; message 'objectsByEvaluatingWithContainers:';
+    function objectsByEvaluatingSpecifier: id; message 'objectsByEvaluatingSpecifier';
+    function evaluationErrorNumber: clong; message 'evaluationErrorNumber';
+    procedure setEvaluationErrorNumber(error: clong); message 'setEvaluationErrorNumber:';
+    function evaluationErrorSpecifier: NSScriptObjectSpecifier; message 'evaluationErrorSpecifier';
+    function descriptor: NSAppleEventDescriptor; message 'descriptor';
+  end; external;
+
+{ NSIndexSpecifier }
+  NSIndexSpecifier = objcclass(NSScriptObjectSpecifier)
+  private
+    __index: clong;
+    
+  public
+    class function alloc: NSIndexSpecifier; message 'alloc';
+
+    function initWithContainerClassDescription_containerSpecifier_key_index(classDesc: NSScriptClassDescription; container: NSScriptObjectSpecifier; property_: NSString; index_: clong): id; message 'initWithContainerClassDescription:containerSpecifier:key:index:';
+    function index: clong; message 'index';
+    procedure setIndex(index_: clong); message 'setIndex:';
+  end; external;
+
+{ NSMiddleSpecifier }
+  NSMiddleSpecifier = objcclass(NSScriptObjectSpecifier)
+    
+  public
+    class function alloc: NSMiddleSpecifier; message 'alloc';
+  end; external;
+
+{ NSNameSpecifier }
+  NSNameSpecifier = objcclass(NSScriptObjectSpecifier)
+  private
+    __name: NSString;
+    
+  public
+    class function alloc: NSNameSpecifier; message 'alloc';
+
+    function initWithContainerClassDescription_containerSpecifier_key_name(classDesc: NSScriptClassDescription; container: NSScriptObjectSpecifier; property_: NSString; name_: NSString): id; message 'initWithContainerClassDescription:containerSpecifier:key:name:';
+    function name: NSString; message 'name';
+    procedure setName(name_: NSString); message 'setName:';
+  end; external;
+
+{ NSPositionalSpecifier }
+  NSPositionalSpecifier = objcclass(NSObject)
+  private
+    __specifier: NSScriptObjectSpecifier;
+    __unadjustedPosition: NSInsertionPosition;
+    __insertionClassDescription: NSScriptClassDescription;
+    __moreVars: id;
+    __reserved0: Pointer;
+    
+  public
+    class function alloc: NSPositionalSpecifier; message 'alloc';
+
+    function initWithPosition_objectSpecifier(position_: NSInsertionPosition; specifier: NSScriptObjectSpecifier): id; message 'initWithPosition:objectSpecifier:';
+    function position: NSInsertionPosition; message 'position';
+    function objectSpecifier: NSScriptObjectSpecifier; message 'objectSpecifier';
+    procedure setInsertionClassDescription(classDescription_: NSScriptClassDescription); message 'setInsertionClassDescription:';
+    procedure evaluate; message 'evaluate';
+    function insertionContainer: id; message 'insertionContainer';
+    function insertionKey: NSString; message 'insertionKey';
+    function insertionIndex: clong; message 'insertionIndex';
+    function insertionReplaces: Boolean; message 'insertionReplaces';
+  end; external;
+
+{ NSPropertySpecifier }
+  NSPropertySpecifier = objcclass(NSScriptObjectSpecifier)
+    
+  public
+    class function alloc: NSPropertySpecifier; message 'alloc';
+  end; external;
+
+{ NSRandomSpecifier }
+  NSRandomSpecifier = objcclass(NSScriptObjectSpecifier)
+    
+  public
+    class function alloc: NSRandomSpecifier; message 'alloc';
+  end; external;
+
+{ NSRangeSpecifier }
+  NSRangeSpecifier = objcclass(NSScriptObjectSpecifier)
+  private
+    __startSpec: NSScriptObjectSpecifier;
+    __endSpec: NSScriptObjectSpecifier;
+    
+  public
+    class function alloc: NSRangeSpecifier; message 'alloc';
+
+    function initWithContainerClassDescription_containerSpecifier_key_startSpecifier_endSpecifier(classDesc: NSScriptClassDescription; container: NSScriptObjectSpecifier; property_: NSString; startSpec: NSScriptObjectSpecifier; endSpec: NSScriptObjectSpecifier): id; message 'initWithContainerClassDescription:containerSpecifier:key:startSpecifier:endSpecifier:';
+    function startSpecifier: NSScriptObjectSpecifier; message 'startSpecifier';
+    procedure setStartSpecifier(startSpec: NSScriptObjectSpecifier); message 'setStartSpecifier:';
+    function endSpecifier: NSScriptObjectSpecifier; message 'endSpecifier';
+    procedure setEndSpecifier(endSpec: NSScriptObjectSpecifier); message 'setEndSpecifier:';
+  end; external;
+
+{ NSRelativeSpecifier }
+  NSRelativeSpecifier = objcclass(NSScriptObjectSpecifier)
+  private
+    __relativePosition: NSRelativePosition;
+    __baseSpecifier: NSScriptObjectSpecifier;
+    
+  public
+    class function alloc: NSRelativeSpecifier; message 'alloc';
+
+    function initWithContainerClassDescription_containerSpecifier_key_relativePosition_baseSpecifier(classDesc: NSScriptClassDescription; container: NSScriptObjectSpecifier; property_: NSString; relPos: NSRelativePosition; baseSpecifier_: NSScriptObjectSpecifier): id; message 'initWithContainerClassDescription:containerSpecifier:key:relativePosition:baseSpecifier:';
+    function relativePosition: NSRelativePosition; message 'relativePosition';
+    procedure setRelativePosition(relPos: NSRelativePosition); message 'setRelativePosition:';
+    function baseSpecifier: NSScriptObjectSpecifier; message 'baseSpecifier';
+    procedure setBaseSpecifier(baseSpecifier_: NSScriptObjectSpecifier); message 'setBaseSpecifier:';
+  end; external;
+
+{ NSUniqueIDSpecifier }
+  NSUniqueIDSpecifier = objcclass(NSScriptObjectSpecifier)
+  private
+    __uniqueID: id;
+    
+  public
+    class function alloc: NSUniqueIDSpecifier; message 'alloc';
+
+    function initWithContainerClassDescription_containerSpecifier_key_uniqueID(classDesc: NSScriptClassDescription; container: NSScriptObjectSpecifier; property_: NSString; uniqueID_: id): id; message 'initWithContainerClassDescription:containerSpecifier:key:uniqueID:';
+    function uniqueID: id; message 'uniqueID';
+    procedure setUniqueID(uniqueID_: id); message 'setUniqueID:';
+  end; external;
+
+{ NSWhoseSpecifier }
+  NSWhoseSpecifier = objcclass(NSScriptObjectSpecifier)
+  private
+    __test: NSScriptWhoseTest;
+    __startSubelementIdentifier: NSWhoseSubelementIdentifier;
+    __startSubelementIndex: clong;
+    __endSubelementIdentifier: NSWhoseSubelementIdentifier;
+    __endSubelementIndex: clong;
+    
+  public
+    class function alloc: NSWhoseSpecifier; message 'alloc';
+
+    function initWithContainerClassDescription_containerSpecifier_key_test(classDesc: NSScriptClassDescription; container: NSScriptObjectSpecifier; property_: NSString; test_: NSScriptWhoseTest): id; message 'initWithContainerClassDescription:containerSpecifier:key:test:';
+    function test: NSScriptWhoseTest; message 'test';
+    procedure setTest(test_: NSScriptWhoseTest); message 'setTest:';
+    function startSubelementIdentifier: NSWhoseSubelementIdentifier; message 'startSubelementIdentifier';
+    procedure setStartSubelementIdentifier(subelement: NSWhoseSubelementIdentifier); message 'setStartSubelementIdentifier:';
+    function startSubelementIndex: clong; message 'startSubelementIndex';
+    procedure setStartSubelementIndex(index: clong); message 'setStartSubelementIndex:';
+    function endSubelementIdentifier: NSWhoseSubelementIdentifier; message 'endSubelementIdentifier';
+    procedure setEndSubelementIdentifier(subelement: NSWhoseSubelementIdentifier); message 'setEndSubelementIdentifier:';
+    function endSubelementIndex: clong; message 'endSubelementIndex';
+    procedure setEndSubelementIndex(index: clong); message 'setEndSubelementIndex:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSScriptStandardSuiteCommands.inc b/packages/cocoaint/src/foundation/NSScriptStandardSuiteCommands.inc
new file mode 100644
index 0000000000..135f86f986
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSScriptStandardSuiteCommands.inc
@@ -0,0 +1,179 @@
+{ Parsed from Foundation.framework NSScriptStandardSuiteCommands.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSCRIPTSTANDARDSUITECOMMANDS_PAS_H}
+{$define NSSCRIPTSTANDARDSUITECOMMANDS_PAS_H}
+type
+  NSCloneCommandPointer = Pointer;
+  NSCloseCommandPointer = Pointer;
+  NSCountCommandPointer = Pointer;
+  NSCreateCommandPointer = Pointer;
+  NSDeleteCommandPointer = Pointer;
+  NSExistsCommandPointer = Pointer;
+  NSGetCommandPointer = Pointer;
+  NSMoveCommandPointer = Pointer;
+  NSQuitCommandPointer = Pointer;
+  NSSetCommandPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSCRIPTSTANDARDSUITECOMMANDS_PAS_T}
+{$define NSSCRIPTSTANDARDSUITECOMMANDS_PAS_T}
+
+{ Constants }
+
+const
+  NSSaveOptionsYes = 0;
+  NSSaveOptionsNo = 0;
+  NSSaveOptionsAsk = 1;
+
+{ Types }
+type
+  NSSaveOptions = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSCRIPTSTANDARDSUITECOMMANDS_PAS_R}
+{$define NSSCRIPTSTANDARDSUITECOMMANDS_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSCRIPTSTANDARDSUITECOMMANDS_PAS_F}
+{$define NSSCRIPTSTANDARDSUITECOMMANDS_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSCRIPTSTANDARDSUITECOMMANDS_PAS_T}
+{$define NSSCRIPTSTANDARDSUITECOMMANDS_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSCloneCommand = objcclass;
+  NSCloseCommand = objcclass;
+  NSCountCommand = objcclass;
+  NSCreateCommand = objcclass;
+  NSDeleteCommand = objcclass;
+  NSExistsCommand = objcclass;
+  NSGetCommand = objcclass;
+  NSMoveCommand = objcclass;
+  NSQuitCommand = objcclass;
+  NSSetCommand = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSCRIPTSTANDARDSUITECOMMANDS_PAS_C}
+{$define NSSCRIPTSTANDARDSUITECOMMANDS_PAS_C}
+
+{ NSCloneCommand }
+  NSCloneCommand = objcclass(NSScriptCommand)
+  private
+    __keySpecifier: NSScriptObjectSpecifier;
+    
+  public
+    class function alloc: NSCloneCommand; message 'alloc';
+
+    procedure setReceiversSpecifier(receiversRef: NSScriptObjectSpecifier); message 'setReceiversSpecifier:';
+    function keySpecifier: NSScriptObjectSpecifier; message 'keySpecifier';
+  end; external;
+
+{ NSCloseCommand }
+  NSCloseCommand = objcclass(NSScriptCommand)
+    
+  public
+    class function alloc: NSCloseCommand; message 'alloc';
+
+    function saveOptions: NSSaveOptions; message 'saveOptions';
+  end; external;
+
+{ NSCountCommand }
+  NSCountCommand = objcclass(NSScriptCommand)
+    
+  public
+    class function alloc: NSCountCommand; message 'alloc';
+  end; external;
+
+{ NSCreateCommand }
+  NSCreateCommand = objcclass(NSScriptCommand)
+  private
+    __moreVars2: id;
+    
+  public
+    class function alloc: NSCreateCommand; message 'alloc';
+
+    function createClassDescription: NSScriptClassDescription; message 'createClassDescription';
+    function resolvedKeyDictionary: NSDictionary; message 'resolvedKeyDictionary';
+  end; external;
+
+{ NSDeleteCommand }
+  NSDeleteCommand = objcclass(NSScriptCommand)
+  private
+    __keySpecifier: NSScriptObjectSpecifier;
+    
+  public
+    class function alloc: NSDeleteCommand; message 'alloc';
+
+    procedure setReceiversSpecifier(receiversRef: NSScriptObjectSpecifier); message 'setReceiversSpecifier:';
+    function keySpecifier: NSScriptObjectSpecifier; message 'keySpecifier';
+  end; external;
+
+{ NSExistsCommand }
+  NSExistsCommand = objcclass(NSScriptCommand)
+    
+  public
+    class function alloc: NSExistsCommand; message 'alloc';
+  end; external;
+
+{ NSGetCommand }
+  NSGetCommand = objcclass(NSScriptCommand)
+    
+  public
+    class function alloc: NSGetCommand; message 'alloc';
+  end; external;
+
+{ NSMoveCommand }
+  NSMoveCommand = objcclass(NSScriptCommand)
+  private
+    __keySpecifier: NSScriptObjectSpecifier;
+    
+  public
+    class function alloc: NSMoveCommand; message 'alloc';
+
+    procedure setReceiversSpecifier(receiversRef: NSScriptObjectSpecifier); message 'setReceiversSpecifier:';
+    function keySpecifier: NSScriptObjectSpecifier; message 'keySpecifier';
+  end; external;
+
+{ NSQuitCommand }
+  NSQuitCommand = objcclass(NSScriptCommand)
+    
+  public
+    class function alloc: NSQuitCommand; message 'alloc';
+
+    function saveOptions: NSSaveOptions; message 'saveOptions';
+  end; external;
+
+{ NSSetCommand }
+  NSSetCommand = objcclass(NSScriptCommand)
+  private
+    __keySpecifier: NSScriptObjectSpecifier;
+    
+  public
+    class function alloc: NSSetCommand; message 'alloc';
+
+    procedure setReceiversSpecifier(receiversRef: NSScriptObjectSpecifier); message 'setReceiversSpecifier:';
+    function keySpecifier: NSScriptObjectSpecifier; message 'keySpecifier';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSScriptSuiteRegistry.inc b/packages/cocoaint/src/foundation/NSScriptSuiteRegistry.inc
new file mode 100644
index 0000000000..5d71a8099c
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSScriptSuiteRegistry.inc
@@ -0,0 +1,89 @@
+{ Parsed from Foundation.framework NSScriptSuiteRegistry.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSCRIPTSUITEREGISTRY_PAS_H}
+{$define NSSCRIPTSUITEREGISTRY_PAS_H}
+type
+  NSScriptSuiteRegistryPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSCRIPTSUITEREGISTRY_PAS_T}
+{$define NSSCRIPTSUITEREGISTRY_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSCRIPTSUITEREGISTRY_PAS_R}
+{$define NSSCRIPTSUITEREGISTRY_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSCRIPTSUITEREGISTRY_PAS_F}
+{$define NSSCRIPTSUITEREGISTRY_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSCRIPTSUITEREGISTRY_PAS_T}
+{$define NSSCRIPTSUITEREGISTRY_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSScriptSuiteRegistry = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSCRIPTSUITEREGISTRY_PAS_C}
+{$define NSSCRIPTSUITEREGISTRY_PAS_C}
+
+{ NSScriptSuiteRegistry }
+  NSScriptSuiteRegistry = objcclass(NSObject)
+  private
+    __isLoadingSDEFFiles: Boolean;
+    __reserved1: char;
+    __seenBundles: NSMutableSet;
+    __suiteDescriptionsBeingCollected: NSMutableArray;
+    __classDescriptionNeedingRegistration: NSScriptClassDescription;
+    __suiteDescriptions: NSMutableArray;
+    __commandDescriptionNeedingRegistration: NSScriptCommandDescription;
+    __cachedClassDescriptionsByAppleEventCode: NSMutableDictionary;
+    __cachedCommandDescriptionsByAppleEventCodes: NSMutableDictionary;
+    __cachedSuiteDescriptionsByName: NSDictionary;
+    __complexTypeDescriptionsByName: NSMutableDictionary;
+    __listTypeDescriptionsByName: NSMutableDictionary;
+    __nextComplexTypeAppleEventCode: cuint;
+    __reserved2: Pointer;
+    
+  public
+    class function alloc: NSScriptSuiteRegistry; message 'alloc';
+
+    class function sharedScriptSuiteRegistry: NSScriptSuiteRegistry; message 'sharedScriptSuiteRegistry';
+    class procedure setSharedScriptSuiteRegistry(registry: NSScriptSuiteRegistry); message 'setSharedScriptSuiteRegistry:';
+    procedure loadSuitesFromBundle(bundle: NSBundle); message 'loadSuitesFromBundle:';
+    procedure loadSuiteWithDictionary_fromBundle(suiteDeclaration: NSDictionary; bundle: NSBundle); message 'loadSuiteWithDictionary:fromBundle:';
+    procedure registerClassDescription(classDescription_: NSScriptClassDescription); message 'registerClassDescription:';
+    procedure registerCommandDescription(commandDescription: NSScriptCommandDescription); message 'registerCommandDescription:';
+    function suiteNames: NSArray; message 'suiteNames';
+    function appleEventCodeForSuite(suiteName: NSString): FourCharCode; message 'appleEventCodeForSuite:';
+    function bundleForSuite(suiteName: NSString): NSBundle; message 'bundleForSuite:';
+    function classDescriptionsInSuite(suiteName: NSString): NSDictionary; message 'classDescriptionsInSuite:';
+    function commandDescriptionsInSuite(suiteName: NSString): NSDictionary; message 'commandDescriptionsInSuite:';
+    function suiteForAppleEventCode(appleEventCode: FourCharCode): NSString; message 'suiteForAppleEventCode:';
+    function classDescriptionWithAppleEventCode(appleEventCode: FourCharCode): NSScriptClassDescription; message 'classDescriptionWithAppleEventCode:';
+    function commandDescriptionWithAppleEventClass_andAppleEventCode(appleEventClassCode: FourCharCode; appleEventIDCode: FourCharCode): NSScriptCommandDescription; message 'commandDescriptionWithAppleEventClass:andAppleEventCode:';
+    function aeteResource(languageName: NSString): NSData; message 'aeteResource:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSScriptWhoseTests.inc b/packages/cocoaint/src/foundation/NSScriptWhoseTests.inc
new file mode 100644
index 0000000000..84c56d00a6
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSScriptWhoseTests.inc
@@ -0,0 +1,107 @@
+{ Parsed from Foundation.framework NSScriptWhoseTests.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSCRIPTWHOSETESTS_PAS_H}
+{$define NSSCRIPTWHOSETESTS_PAS_H}
+type
+  NSScriptWhoseTestPointer = Pointer;
+  NSLogicalTestPointer = Pointer;
+  NSSpecifierTestPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSCRIPTWHOSETESTS_PAS_T}
+{$define NSSCRIPTWHOSETESTS_PAS_T}
+
+{ Constants }
+
+const
+  NSEqualToComparison = 0;
+  NSLessThanOrEqualToComparison = 0;
+  NSLessThanComparison = 1;
+  NSGreaterThanOrEqualToComparison = 2;
+  NSGreaterThanComparison = 3;
+  NSBeginsWithComparison = 4;
+  NSEndsWithComparison = 5;
+  NSContainsComparison = 6;
+
+{ Types }
+type
+  NSTestComparisonOperation = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSCRIPTWHOSETESTS_PAS_R}
+{$define NSSCRIPTWHOSETESTS_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSCRIPTWHOSETESTS_PAS_F}
+{$define NSSCRIPTWHOSETESTS_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSCRIPTWHOSETESTS_PAS_T}
+{$define NSSCRIPTWHOSETESTS_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSScriptWhoseTest = objcclass;
+  NSLogicalTest = objcclass;
+  NSSpecifierTest = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSCRIPTWHOSETESTS_PAS_C}
+{$define NSSCRIPTWHOSETESTS_PAS_C}
+
+{ NSScriptWhoseTest }
+  NSScriptWhoseTest = objcclass(NSObject, NSCodingProtocol)
+    
+  public
+    class function alloc: NSScriptWhoseTest; message 'alloc';
+
+    function isTrue: Boolean; message 'isTrue';
+  end; external;
+
+{ NSLogicalTest }
+  NSLogicalTest = objcclass(NSScriptWhoseTest)
+  private
+    __operator: cint;
+    __subTests: id;
+    
+  public
+    class function alloc: NSLogicalTest; message 'alloc';
+
+    function initAndTestWithTests(subTests: NSArray): id; message 'initAndTestWithTests:';
+    function initOrTestWithTests(subTests: NSArray): id; message 'initOrTestWithTests:';
+    function initNotTestWithTest(subTest: NSScriptWhoseTest): id; message 'initNotTestWithTest:';
+  end; external;
+
+{ NSSpecifierTest }
+  NSSpecifierTest = objcclass(NSScriptWhoseTest)
+  private
+    __comparisonOperator: NSTestComparisonOperation;
+    __object1: NSScriptObjectSpecifier;
+    __object2: id;
+    
+  public
+    class function alloc: NSSpecifierTest; message 'alloc';
+
+    function initWithObjectSpecifier_comparisonOperator_testObject(obj: NSScriptObjectSpecifier; compOp: NSTestComparisonOperation; obj1: id): id; message 'initWithObjectSpecifier:comparisonOperator:testObject:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSSet.inc b/packages/cocoaint/src/foundation/NSSet.inc
new file mode 100644
index 0000000000..9b9d366f08
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSSet.inc
@@ -0,0 +1,148 @@
+{ Parsed from Foundation.framework NSSet.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSET_PAS_H}
+{$define NSSET_PAS_H}
+type
+  NSSetPointer = Pointer;
+  NSMutableSetPointer = Pointer;
+  NSCountedSetPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSET_PAS_T}
+{$define NSSET_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSET_PAS_R}
+{$define NSSET_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSET_PAS_F}
+{$define NSSET_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSET_PAS_T}
+{$define NSSET_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSSet = objcclass;
+  NSMutableSet = objcclass;
+  NSCountedSet = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSET_PAS_C}
+{$define NSSET_PAS_C}
+
+{ NSSet }
+  NSSet = objcclass(NSObject, NSCopyingProtocol, NSMutableCopyingProtocol, NSCodingProtocol, NSFastEnumerationProtocol)
+    
+  public
+    class function alloc: NSSet; message 'alloc';
+
+    function count: culong; message 'count';
+    function member(object_: id): id; message 'member:';
+    function objectEnumerator: NSEnumerator; message 'objectEnumerator';
+
+    { Category: NSExtendedSet }
+    function allObjects: NSArray; message 'allObjects';
+    function anyObject: id; message 'anyObject';
+    function containsObject(anObject: id): Boolean; message 'containsObject:';
+    function description: NSString; message 'description';
+    function descriptionWithLocale(locale: id): NSString; message 'descriptionWithLocale:';
+    function intersectsSet(otherSet: NSSet): Boolean; message 'intersectsSet:';
+    function isEqualToSet(otherSet: NSSet): Boolean; message 'isEqualToSet:';
+    function isSubsetOfSet(otherSet: NSSet): Boolean; message 'isSubsetOfSet:';
+    procedure makeObjectsPerformSelector(aSelector: SEL); message 'makeObjectsPerformSelector:';
+    procedure makeObjectsPerformSelector_withObject(aSelector: SEL; argument: id); message 'makeObjectsPerformSelector:withObject:';
+    function setByAddingObject(anObject: id): NSSet; message 'setByAddingObject:';
+    function setByAddingObjectsFromSet(other: NSSet): NSSet; message 'setByAddingObjectsFromSet:';
+    function setByAddingObjectsFromArray(other: NSArray): NSSet; message 'setByAddingObjectsFromArray:';
+
+    { Category: NSSetCreation }
+    class function set_: id; message 'set';
+    class function setWithObject(object_: id): id; message 'setWithObject:';
+    class function setWithObjects_count(objects: id; cnt: culong): id; message 'setWithObjects:count:';
+    class function setWithObjects(firstObj: id; objParams: array of const): id; message 'setWithObjects:';
+    class function setWithSet(set__: NSSet): id; message 'setWithSet:';
+    class function setWithArray(array_: NSArray): id; message 'setWithArray:';
+    function initWithObjects_count(objects: id; cnt: culong): id; message 'initWithObjects:count:';
+    function initWithObjects(firstObj: id; objParams: array of const): id; message 'initWithObjects:';
+    function initWithSet(set__: NSSet): id; message 'initWithSet:';
+    function initWithSet_copyItems(set__: NSSet; flag: Boolean): id; message 'initWithSet:copyItems:';
+    function initWithArray(array_: NSArray): id; message 'initWithArray:';
+
+    { Category: NSKeyValueCoding }
+    function valueForKey(key: NSString): id; message 'valueForKey:';
+    procedure setValue_forKey(value: id; key: NSString); message 'setValue:forKey:';
+
+    { Category: NSKeyValueObserverRegistration }
+    procedure addObserver_forKeyPath_options_context(observer: NSObject; keyPath: NSString; options: NSKeyValueObservingOptions; context: Pointer); message 'addObserver:forKeyPath:options:context:';
+    procedure removeObserver_forKeyPath(observer: NSObject; keyPath: NSString); message 'removeObserver:forKeyPath:';
+
+    { Category: NSPredicateSupport }
+    function filteredSetUsingPredicate(predicate: NSPredicate): NSSet; message 'filteredSetUsingPredicate:';
+  end; external;
+
+{ NSMutableSet }
+  NSMutableSet = objcclass(NSSet)
+    
+  public
+    class function alloc: NSMutableSet; message 'alloc';
+
+    procedure addObject(object_: id); message 'addObject:';
+    procedure removeObject(object_: id); message 'removeObject:';
+
+    { Category: NSExtendedMutableSet }
+    procedure addObjectsFromArray(array_: NSArray); message 'addObjectsFromArray:';
+    procedure intersectSet(otherSet: NSSet); message 'intersectSet:';
+    procedure minusSet(otherSet: NSSet); message 'minusSet:';
+    procedure removeAllObjects; message 'removeAllObjects';
+    procedure unionSet(otherSet: NSSet); message 'unionSet:';
+    procedure setSet(otherSet: NSSet); message 'setSet:';
+
+    { Category: NSMutableSetCreation }
+    class function setWithCapacity(numItems: culong): id; message 'setWithCapacity:';
+    function initWithCapacity(numItems: culong): id; message 'initWithCapacity:';
+
+    { Category: NSPredicateSupport }
+    procedure filterUsingPredicate(predicate: NSPredicate); message 'filterUsingPredicate:';
+  end; external;
+
+{ NSCountedSet }
+  NSCountedSet = objcclass(NSMutableSet)
+  private
+    __table: id;
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSCountedSet; message 'alloc';
+
+    function initWithCapacity(numItems: culong): id; message 'initWithCapacity:';
+    function initWithArray(array_: NSArray): id; message 'initWithArray:';
+    function initWithSet(set__: NSSet): id; message 'initWithSet:';
+    function countForObject(object_: id): culong; message 'countForObject:';
+    function objectEnumerator: NSEnumerator; message 'objectEnumerator';
+    procedure addObject(object_: id); message 'addObject:';
+    procedure removeObject(object_: id); message 'removeObject:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSSortDescriptor.inc b/packages/cocoaint/src/foundation/NSSortDescriptor.inc
new file mode 100644
index 0000000000..6cf21cd550
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSSortDescriptor.inc
@@ -0,0 +1,71 @@
+{ Parsed from Foundation.framework NSSortDescriptor.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSORTDESCRIPTOR_PAS_H}
+{$define NSSORTDESCRIPTOR_PAS_H}
+type
+  NSSortDescriptorPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSORTDESCRIPTOR_PAS_T}
+{$define NSSORTDESCRIPTOR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSORTDESCRIPTOR_PAS_R}
+{$define NSSORTDESCRIPTOR_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSORTDESCRIPTOR_PAS_F}
+{$define NSSORTDESCRIPTOR_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSORTDESCRIPTOR_PAS_T}
+{$define NSSORTDESCRIPTOR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSSortDescriptor = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSORTDESCRIPTOR_PAS_C}
+{$define NSSORTDESCRIPTOR_PAS_C}
+
+{ NSSortDescriptor }
+  NSSortDescriptor = objcclass(NSObject, NSCodingProtocol, NSCopyingProtocol)
+  private
+    __sortDescriptorFlags: culong;
+    __key: NSString;
+    __selector: SEL;
+    __selectorName: NSString;
+    
+  public
+    class function alloc: NSSortDescriptor; message 'alloc';
+
+    function initWithKey_ascending(key_: NSString; ascending_: Boolean): id; message 'initWithKey:ascending:';
+    function initWithKey_ascending_selector(key_: NSString; ascending_: Boolean; selector_: SEL): id; message 'initWithKey:ascending:selector:';
+    function key: NSString; message 'key';
+    function ascending: Boolean; message 'ascending';
+    function selector: SEL; message 'selector';
+    function compareObject_toObject(object_: id; object_1: id): NSComparisonResult; message 'compareObject:toObject:';
+    function reversedSortDescriptor: id; message 'reversedSortDescriptor';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSSpellServer.inc b/packages/cocoaint/src/foundation/NSSpellServer.inc
new file mode 100644
index 0000000000..3cf5d9290b
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSSpellServer.inc
@@ -0,0 +1,84 @@
+{ Parsed from Foundation.framework NSSpellServer.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSPELLSERVER_PAS_H}
+{$define NSSPELLSERVER_PAS_H}
+type
+  NSSpellServerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSPELLSERVER_PAS_T}
+{$define NSSPELLSERVER_PAS_T}
+
+{ CFString constants }
+var
+  NSGrammarRange: CFStringRef; external name '_NSGrammarRange';
+  NSGrammarUserDescription: CFStringRef; external name '_NSGrammarUserDescription';
+  NSGrammarCorrections: CFStringRef; external name '_NSGrammarCorrections';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSPELLSERVER_PAS_R}
+{$define NSSPELLSERVER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSPELLSERVER_PAS_F}
+{$define NSSPELLSERVER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSPELLSERVER_PAS_T}
+{$define NSSPELLSERVER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSSpellServer = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSPELLSERVER_PAS_C}
+{$define NSSPELLSERVER_PAS_C}
+
+{ NSSpellServer }
+  NSSpellServer = objcclass(NSObject)
+  private
+    __delegate: id;
+    __caseSensitive: clong;
+    __spellServerConnection: id;
+    __dictionaries: id;
+    __learnedDictionaries: NSArray;
+    __ssFlags: bitpacked record
+        delegateLearnsWords: 0..1;
+        delegateForgetsWords: 0..1;
+        busy: 0..1;
+        _reserved: 0..((1 shl 29)-1);
+      end;
+    __reservedSpellServer1: Pointer;
+    __reservedSpellServer2: Pointer;
+    
+  public
+    class function alloc: NSSpellServer; message 'alloc';
+
+    procedure setDelegate(anObject: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
+    function registerLanguage_byVendor(language: NSString; vendor: NSString): Boolean; message 'registerLanguage:byVendor:';
+    function isWordInUserDictionaries_caseSensitive(word: NSString; flag: Boolean): Boolean; message 'isWordInUserDictionaries:caseSensitive:';
+    procedure run; message 'run';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSStream.inc b/packages/cocoaint/src/foundation/NSStream.inc
new file mode 100644
index 0000000000..43cc67aba5
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSStream.inc
@@ -0,0 +1,136 @@
+{ Parsed from Foundation.framework NSStream.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSTREAM_PAS_H}
+{$define NSSTREAM_PAS_H}
+type
+  NSStreamPointer = Pointer;
+  NSInputStreamPointer = Pointer;
+  NSOutputStreamPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSTREAM_PAS_T}
+{$define NSSTREAM_PAS_T}
+
+{ Constants }
+
+const
+  NSStreamStatusNotOpen = 0;
+  NSStreamStatusOpening = 1;
+  NSStreamStatusOpen = 2;
+  NSStreamStatusReading = 3;
+  NSStreamStatusWriting = 4;
+  NSStreamStatusAtEnd = 5;
+  NSStreamStatusClosed = 6;
+  NSStreamStatusError = 7;
+
+const
+  NSStreamEventNone = 0;
+  NSStreamEventOpenCompleted = 1  shl  0;
+  NSStreamEventHasBytesAvailable = 1  shl  1;
+  NSStreamEventHasSpaceAvailable = 1  shl  2;
+  NSStreamEventErrorOccurred = 1  shl  3;
+  NSStreamEventEndEncountered = 1  shl  4;
+
+{ Types }
+type
+  NSStreamStatus = culong;
+  NSStreamEvent = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSTREAM_PAS_R}
+{$define NSSTREAM_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSTREAM_PAS_F}
+{$define NSSTREAM_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSTREAM_PAS_T}
+{$define NSSTREAM_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSStream = objcclass;
+  NSInputStream = objcclass;
+  NSOutputStream = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSTREAM_PAS_C}
+{$define NSSTREAM_PAS_C}
+
+{ NSStream }
+  NSStream = objcclass(NSObject)
+    
+  public
+    class function alloc: NSStream; message 'alloc';
+
+    procedure open; message 'open';
+    procedure close; message 'close';
+    function delegate: id; message 'delegate';
+    procedure setDelegate(delegate_: id); message 'setDelegate:';
+    function propertyForKey(key: NSString): id; message 'propertyForKey:';
+    function setProperty_forKey(property_: id; key: NSString): Boolean; message 'setProperty:forKey:';
+    procedure scheduleInRunLoop_forMode(aRunLoop: NSRunLoop; mode: NSString); message 'scheduleInRunLoop:forMode:';
+    procedure removeFromRunLoop_forMode(aRunLoop: NSRunLoop; mode: NSString); message 'removeFromRunLoop:forMode:';
+    function streamStatus: NSStreamStatus; message 'streamStatus';
+    function streamError: NSError; message 'streamError';
+
+    { Category: NSSocketStreamCreationExtensions }
+    class procedure getStreamsToHost_port_inputStream_outputStream(host: NSHost; port: clong; var inputStream: NSInputStream; var outputStream: NSOutputStream); message 'getStreamsToHost:port:inputStream:outputStream:';
+  end; external;
+
+{ NSInputStream }
+  NSInputStream = objcclass(NSStream)
+    
+  public
+    class function alloc: NSInputStream; message 'alloc';
+
+    function read_maxLength(var buffer: byte; len: culong): clong; message 'read:maxLength:';
+    function getBuffer_length(var buffer: byte; var len: culong): Boolean; message 'getBuffer:length:';
+    function hasBytesAvailable: Boolean; message 'hasBytesAvailable';
+
+    { Category: NSInputStreamExtensions }
+    function initWithData(data: NSData): id; message 'initWithData:';
+    function initWithFileAtPath(path: NSString): id; message 'initWithFileAtPath:';
+    class function inputStreamWithData(data: NSData): id; message 'inputStreamWithData:';
+    class function inputStreamWithFileAtPath(path: NSString): id; message 'inputStreamWithFileAtPath:';
+  end; external;
+
+{ NSOutputStream }
+  NSOutputStream = objcclass(NSStream)
+    
+  public
+    class function alloc: NSOutputStream; message 'alloc';
+
+    function write_maxLength(var buffer: byte; len: culong): clong; message 'write:maxLength:';
+    function hasSpaceAvailable: Boolean; message 'hasSpaceAvailable';
+
+    { Category: NSOutputStreamExtensions }
+    function initToMemory: id; message 'initToMemory';
+    function initToBuffer_capacity(var buffer: byte; capacity: culong): id; message 'initToBuffer:capacity:';
+    function initToFileAtPath_append(path: NSString; shouldAppend: Boolean): id; message 'initToFileAtPath:append:';
+    class function outputStreamToMemory: id; message 'outputStreamToMemory';
+    class function outputStreamToBuffer_capacity(var buffer: byte; capacity: culong): id; message 'outputStreamToBuffer:capacity:';
+    class function outputStreamToFileAtPath_append(path: NSString; shouldAppend: Boolean): id; message 'outputStreamToFileAtPath:append:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSString.inc b/packages/cocoaint/src/foundation/NSString.inc
new file mode 100644
index 0000000000..7d1890a2d1
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSString.inc
@@ -0,0 +1,318 @@
+{ Parsed from Foundation.framework NSString.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSSTRING_PAS_H}
+{$define NSSTRING_PAS_H}
+type
+  NSStringPointer = Pointer;
+  NSMutableStringPointer = Pointer;
+  NSSimpleCStringPointer = Pointer;
+  NSConstantStringPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSSTRING_PAS_T}
+{$define NSSTRING_PAS_T}
+
+{ Types }
+type
+  unichar = cushort;
+  NSStringCompareOptions = culong;
+  NSStringEncoding = culong;
+  NSStringEncodingConversionOptions = culong;
+
+{ CFString constants }
+var
+  NSParseErrorException: CFStringRef; external name '_NSParseErrorException';
+  NSCharacterConversionException: CFStringRef; external name '_NSCharacterConversionException';
+
+{ Constants }
+
+const
+  NSCaseInsensitiveSearch = 1;
+  NSLiteralSearch = 2;
+  NSBackwardsSearch = 4;
+  NSAnchoredSearch = 8;
+  NSNumericSearch = 64;
+  NSDiacriticInsensitiveSearch = 128;
+  NSWidthInsensitiveSearch = 256;
+  NSForcedOrderingSearch = 512;
+
+const
+  NSASCIIStringEncoding = 1;
+  NSNEXTSTEPStringEncoding = 2;
+  NSJapaneseEUCStringEncoding = 3;
+  NSUTF8StringEncoding = 4;
+  NSISOLatin1StringEncoding = 5;
+  NSSymbolStringEncoding = 6;
+  NSNonLossyASCIIStringEncoding = 7;
+  NSShiftJISStringEncoding = 8;
+  NSISOLatin2StringEncoding = 9;
+  NSUnicodeStringEncoding = 10;
+  NSWindowsCP1251StringEncoding = 11;
+  NSWindowsCP1252StringEncoding = 12;
+  NSWindowsCP1253StringEncoding = 13;
+  NSWindowsCP1254StringEncoding = 14;
+  NSWindowsCP1250StringEncoding = 15;
+  NSISO2022JPStringEncoding = 21;
+  NSMacOSRomanStringEncoding = 30;
+  NSUTF16StringEncoding = NSUnicodeStringEncoding;
+  NSUTF16BigEndianStringEncoding = $90000100;
+  NSUTF16LittleEndianStringEncoding = $94000100;
+  NSUTF32StringEncoding = $8c000100;
+  NSUTF32BigEndianStringEncoding = $98000100;
+  NSUTF32LittleEndianStringEncoding = $9c000100;
+
+const
+  NSStringEncodingConversionAllowLossy = 1;
+  NSStringEncodingConversionExternalRepresentation = 2;
+
+const
+  NSProprietaryStringEncoding = 65536;
+
+{ Defines }
+const
+  NS_UNICHAR_IS_EIGHT_BIT = 0;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSSTRING_PAS_R}
+{$define NSSTRING_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSSTRING_PAS_F}
+{$define NSSTRING_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSSTRING_PAS_T}
+{$define NSSTRING_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSString = objcclass;
+  NSMutableString = objcclass;
+  NSSimpleCString = objcclass;
+  NSConstantString = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSSTRING_PAS_C}
+{$define NSSTRING_PAS_C}
+
+{ NSString }
+  NSString = objcclass(NSObject, NSCopyingProtocol, NSMutableCopyingProtocol, NSCodingProtocol)
+    
+  public
+    class function alloc: NSString; message 'alloc';
+
+    function length: culong; message 'length';
+    function characterAtIndex(index: culong): unichar; message 'characterAtIndex:';
+
+    { Category: NSStringExtensionMethods }
+    procedure getCharacters(var buffer: unichar); message 'getCharacters:';
+    procedure getCharacters_range(var buffer: unichar; aRange: NSRange); message 'getCharacters:range:';
+    function substringFromIndex(from: culong): NSString; message 'substringFromIndex:';
+    function substringToIndex(to_: culong): NSString; message 'substringToIndex:';
+    function substringWithRange(range: NSRange): NSString; message 'substringWithRange:';
+    function compare(string__: NSString): NSComparisonResult; message 'compare:';
+    function compare_options(string__: NSString; mask: NSStringCompareOptions): NSComparisonResult; message 'compare:options:';
+    function compare_options_range(string__: NSString; mask: NSStringCompareOptions; compareRange: NSRange): NSComparisonResult; message 'compare:options:range:';
+    function compare_options_range_locale(string__: NSString; mask: NSStringCompareOptions; compareRange: NSRange; locale: id): NSComparisonResult; message 'compare:options:range:locale:';
+    function caseInsensitiveCompare(string__: NSString): NSComparisonResult; message 'caseInsensitiveCompare:';
+    function localizedCompare(string__: NSString): NSComparisonResult; message 'localizedCompare:';
+    function localizedCaseInsensitiveCompare(string__: NSString): NSComparisonResult; message 'localizedCaseInsensitiveCompare:';
+    function isEqualToString(aString: NSString): Boolean; message 'isEqualToString:';
+    function hasPrefix(aString: NSString): Boolean; message 'hasPrefix:';
+    function hasSuffix(aString: NSString): Boolean; message 'hasSuffix:';
+    function rangeOfString(aString: NSString): NSRange; message 'rangeOfString:';
+    function rangeOfString_options(aString: NSString; mask: NSStringCompareOptions): NSRange; message 'rangeOfString:options:';
+    function rangeOfString_options_range(aString: NSString; mask: NSStringCompareOptions; searchRange: NSRange): NSRange; message 'rangeOfString:options:range:';
+    function rangeOfString_options_range_locale(aString: NSString; mask: NSStringCompareOptions; searchRange: NSRange; locale: NSLocale): NSRange; message 'rangeOfString:options:range:locale:';
+    function rangeOfCharacterFromSet(aSet: NSCharacterSet): NSRange; message 'rangeOfCharacterFromSet:';
+    function rangeOfCharacterFromSet_options(aSet: NSCharacterSet; mask: NSStringCompareOptions): NSRange; message 'rangeOfCharacterFromSet:options:';
+    function rangeOfCharacterFromSet_options_range(aSet: NSCharacterSet; mask: NSStringCompareOptions; searchRange: NSRange): NSRange; message 'rangeOfCharacterFromSet:options:range:';
+    function rangeOfComposedCharacterSequenceAtIndex(index: culong): NSRange; message 'rangeOfComposedCharacterSequenceAtIndex:';
+    function rangeOfComposedCharacterSequencesForRange(range: NSRange): NSRange; message 'rangeOfComposedCharacterSequencesForRange:';
+    function stringByAppendingString(aString: NSString): NSString; message 'stringByAppendingString:';
+    function stringByAppendingFormat(format: NSString): NSString; message 'stringByAppendingFormat:';
+    function doubleValue: double; message 'doubleValue';
+    function floatValue: single; message 'floatValue';
+    function intValue: cint; message 'intValue';
+    function integerValue: clong; message 'integerValue';
+    function longLongValue: clonglong; message 'longLongValue';
+    function boolValue: Boolean; message 'boolValue';
+    function componentsSeparatedByString(separator: NSString): NSArray; message 'componentsSeparatedByString:';
+    function componentsSeparatedByCharactersInSet(separator: NSCharacterSet): NSArray; message 'componentsSeparatedByCharactersInSet:';
+    function commonPrefixWithString_options(aString: NSString; mask: NSStringCompareOptions): NSString; message 'commonPrefixWithString:options:';
+    function uppercaseString: NSString; message 'uppercaseString';
+    function lowercaseString: NSString; message 'lowercaseString';
+    function capitalizedString: NSString; message 'capitalizedString';
+    function stringByTrimmingCharactersInSet(set_: NSCharacterSet): NSString; message 'stringByTrimmingCharactersInSet:';
+    function stringByPaddingToLength_withString_startingAtIndex(newLength: culong; padString: NSString; padIndex: culong): NSString; message 'stringByPaddingToLength:withString:startingAtIndex:';
+    procedure getLineStart_end_contentsEnd_forRange(startPtr: culongPointer; lineEndPtr: culongPointer; contentsEndPtr: culongPointer; range: NSRange); message 'getLineStart:end:contentsEnd:forRange:';
+    function lineRangeForRange(range: NSRange): NSRange; message 'lineRangeForRange:';
+    procedure getParagraphStart_end_contentsEnd_forRange(startPtr: culongPointer; parEndPtr: culongPointer; contentsEndPtr: culongPointer; range: NSRange); message 'getParagraphStart:end:contentsEnd:forRange:';
+    function paragraphRangeForRange(range: NSRange): NSRange; message 'paragraphRangeForRange:';
+    function description: NSString; message 'description';
+    function hash: culong; message 'hash';
+    function fastestEncoding: NSStringEncoding; message 'fastestEncoding';
+    function smallestEncoding: NSStringEncoding; message 'smallestEncoding';
+    function dataUsingEncoding_allowLossyConversion(encoding: NSStringEncoding; lossy: Boolean): NSData; message 'dataUsingEncoding:allowLossyConversion:';
+    function dataUsingEncoding(encoding: NSStringEncoding): NSData; message 'dataUsingEncoding:';
+    function canBeConvertedToEncoding(encoding: NSStringEncoding): Boolean; message 'canBeConvertedToEncoding:';
+    function cStringUsingEncoding(encoding: NSStringEncoding): char; message 'cStringUsingEncoding:';
+    function getCString_maxLength_encoding(buffer: Pointer; maxBufferCount: culong; encoding: NSStringEncoding): Boolean; message 'getCString:maxLength:encoding:';
+    function getBytes_maxLength_usedLength_encoding_options_range_remainingRange(buffer: Pointer; maxBufferCount: culong; var usedBufferCount: culong; encoding: NSStringEncoding; options: NSStringEncodingConversionOptions; range: NSRange; leftover: NSRangePointer): Boolean; message 'getBytes:maxLength:usedLength:encoding:options:range:remainingRange:';
+    function maximumLengthOfBytesUsingEncoding(enc: NSStringEncoding): culong; message 'maximumLengthOfBytesUsingEncoding:';
+    function lengthOfBytesUsingEncoding(enc: NSStringEncoding): culong; message 'lengthOfBytesUsingEncoding:';
+    function decomposedStringWithCanonicalMapping: NSString; message 'decomposedStringWithCanonicalMapping';
+    function precomposedStringWithCanonicalMapping: NSString; message 'precomposedStringWithCanonicalMapping';
+    function decomposedStringWithCompatibilityMapping: NSString; message 'decomposedStringWithCompatibilityMapping';
+    function precomposedStringWithCompatibilityMapping: NSString; message 'precomposedStringWithCompatibilityMapping';
+    function stringByFoldingWithOptions_locale(options: NSStringCompareOptions; locale: NSLocale): NSString; message 'stringByFoldingWithOptions:locale:';
+    function stringByReplacingOccurrencesOfString_withString_options_range(target: NSString; replacement: NSString; options: NSStringCompareOptions; searchRange: NSRange): NSString; message 'stringByReplacingOccurrencesOfString:withString:options:range:';
+    function stringByReplacingOccurrencesOfString_withString(target: NSString; replacement: NSString): NSString; message 'stringByReplacingOccurrencesOfString:withString:';
+    function stringByReplacingCharactersInRange_withString(range: NSRange; replacement: NSString): NSString; message 'stringByReplacingCharactersInRange:withString:';
+    function UTF8String: char; message 'UTF8String';
+    class function defaultCStringEncoding: NSStringEncoding; message 'defaultCStringEncoding';
+    class function availableStringEncodings: NSStringEncoding; message 'availableStringEncodings';
+    class function localizedNameOfStringEncoding(encoding: NSStringEncoding): NSString; message 'localizedNameOfStringEncoding:';
+    function init: id; message 'init';
+    function initWithCharactersNoCopy_length_freeWhenDone(var characters: unichar; length_: culong; freeBuffer: Boolean): id; message 'initWithCharactersNoCopy:length:freeWhenDone:';
+    function initWithCharacters_length(var characters: unichar; length_: culong): id; message 'initWithCharacters:length:';
+    function initWithUTF8String(nullTerminatedCString: PChar): id; message 'initWithUTF8String:';
+    function initWithString(aString: NSString): id; message 'initWithString:';
+    function initWithFormat(format: NSString): id; message 'initWithFormat:';
+    function initWithFormat_arguments(format: NSString; argList: va_list): id; message 'initWithFormat:arguments:';
+    function initWithFormat_locale(format: NSString; locale: id): id; message 'initWithFormat:locale:';
+    function initWithFormat_locale_arguments(format: NSString; locale: id; argList: va_list): id; message 'initWithFormat:locale:arguments:';
+    function initWithData_encoding(data: NSData; encoding: NSStringEncoding): id; message 'initWithData:encoding:';
+    function initWithBytes_length_encoding(bytes: Pointer; len: culong; encoding: NSStringEncoding): id; message 'initWithBytes:length:encoding:';
+    function initWithBytesNoCopy_length_encoding_freeWhenDone(bytes: Pointer; len: culong; encoding: NSStringEncoding; freeBuffer: Boolean): id; message 'initWithBytesNoCopy:length:encoding:freeWhenDone:';
+    class function string_: id; message 'string';
+    class function stringWithString(string__: NSString): id; message 'stringWithString:';
+    class function stringWithCharacters_length(var characters: unichar; length_: culong): id; message 'stringWithCharacters:length:';
+    class function stringWithUTF8String(nullTerminatedCString: PChar): id; message 'stringWithUTF8String:';
+    class function stringWithFormat(format: NSString): id; message 'stringWithFormat:';
+    class function localizedStringWithFormat(format: NSString): id; message 'localizedStringWithFormat:';
+    function initWithCString_encoding(nullTerminatedCString: PChar; encoding: NSStringEncoding): id; message 'initWithCString:encoding:';
+    class function stringWithCString_encoding(cString: PChar; enc: NSStringEncoding): id; message 'stringWithCString:encoding:';
+    function initWithContentsOfURL_encoding_error(url: NSURL; enc: NSStringEncoding; var error: NSError): id; message 'initWithContentsOfURL:encoding:error:';
+    function initWithContentsOfFile_encoding_error(path: NSString; enc: NSStringEncoding; var error: NSError): id; message 'initWithContentsOfFile:encoding:error:';
+    class function stringWithContentsOfURL_encoding_error(url: NSURL; enc: NSStringEncoding; var error: NSError): id; message 'stringWithContentsOfURL:encoding:error:';
+    class function stringWithContentsOfFile_encoding_error(path: NSString; enc: NSStringEncoding; var error: NSError): id; message 'stringWithContentsOfFile:encoding:error:';
+    function initWithContentsOfURL_usedEncoding_error(url: NSURL; var enc: NSStringEncoding; var error: NSError): id; message 'initWithContentsOfURL:usedEncoding:error:';
+    function initWithContentsOfFile_usedEncoding_error(path: NSString; var enc: NSStringEncoding; var error: NSError): id; message 'initWithContentsOfFile:usedEncoding:error:';
+    class function stringWithContentsOfURL_usedEncoding_error(url: NSURL; var enc: NSStringEncoding; var error: NSError): id; message 'stringWithContentsOfURL:usedEncoding:error:';
+    class function stringWithContentsOfFile_usedEncoding_error(path: NSString; var enc: NSStringEncoding; var error: NSError): id; message 'stringWithContentsOfFile:usedEncoding:error:';
+    function writeToURL_atomically_encoding_error(url: NSURL; useAuxiliaryFile: Boolean; enc: NSStringEncoding; var error: NSError): Boolean; message 'writeToURL:atomically:encoding:error:';
+    function writeToFile_atomically_encoding_error(path: NSString; useAuxiliaryFile: Boolean; enc: NSStringEncoding; var error: NSError): Boolean; message 'writeToFile:atomically:encoding:error:';
+
+    { Category: NSExtendedStringPropertyListParsing }
+    function propertyList: id; message 'propertyList';
+    function propertyListFromStringsFileFormat: NSDictionary; message 'propertyListFromStringsFileFormat';
+
+    { Category: NSStringDeprecated }
+    procedure getCString(bytes: Pointer); message 'getCString:';
+    procedure getCString_maxLength(bytes: Pointer; maxLength: culong); message 'getCString:maxLength:';
+    procedure getCString_maxLength_range_remainingRange(bytes: Pointer; maxLength: culong; aRange: NSRange; leftoverRange: NSRangePointer); message 'getCString:maxLength:range:remainingRange:';
+    function writeToFile_atomically(path: NSString; useAuxiliaryFile: Boolean): Boolean; message 'writeToFile:atomically:';
+    function writeToURL_atomically(url: NSURL; atomically: Boolean): Boolean; message 'writeToURL:atomically:';
+    function initWithContentsOfFile(path: NSString): id; message 'initWithContentsOfFile:';
+    function initWithContentsOfURL(url: NSURL): id; message 'initWithContentsOfURL:';
+    class function stringWithContentsOfFile(path: NSString): id; message 'stringWithContentsOfFile:';
+    class function stringWithContentsOfURL(url: NSURL): id; message 'stringWithContentsOfURL:';
+    function initWithCStringNoCopy_length_freeWhenDone(bytes: Pointer; length_: culong; freeBuffer: Boolean): id; message 'initWithCStringNoCopy:length:freeWhenDone:';
+    function initWithCString_length(bytes: PChar; length_: culong): id; message 'initWithCString:length:';
+    function initWithCString(bytes: PChar): id; message 'initWithCString:';
+    class function stringWithCString_length(bytes: PChar; length_: culong): id; message 'stringWithCString:length:';
+    class function stringWithCString(bytes: PChar): id; message 'stringWithCString:';
+
+    { Category: NSStringPathExtensions }
+    class function pathWithComponents(components: NSArray): NSString; message 'pathWithComponents:';
+    function pathComponents: NSArray; message 'pathComponents';
+    function isAbsolutePath: Boolean; message 'isAbsolutePath';
+    function lastPathComponent: NSString; message 'lastPathComponent';
+    function stringByDeletingLastPathComponent: NSString; message 'stringByDeletingLastPathComponent';
+    function stringByAppendingPathComponent(str: NSString): NSString; message 'stringByAppendingPathComponent:';
+    function pathExtension: NSString; message 'pathExtension';
+    function stringByDeletingPathExtension: NSString; message 'stringByDeletingPathExtension';
+    function stringByAppendingPathExtension(str: NSString): NSString; message 'stringByAppendingPathExtension:';
+    function stringByAbbreviatingWithTildeInPath: NSString; message 'stringByAbbreviatingWithTildeInPath';
+    function stringByExpandingTildeInPath: NSString; message 'stringByExpandingTildeInPath';
+    function stringByStandardizingPath: NSString; message 'stringByStandardizingPath';
+    function stringByResolvingSymlinksInPath: NSString; message 'stringByResolvingSymlinksInPath';
+    function stringsByAppendingPaths(paths: NSArray): NSArray; message 'stringsByAppendingPaths:';
+    function completePathIntoString_caseSensitive_matchesIntoArray_filterTypes(var outputName: NSString; flag: Boolean; var outputArray: NSArray; filterTypes: NSArray): culong; message 'completePathIntoString:caseSensitive:matchesIntoArray:filterTypes:';
+    function fileSystemRepresentation: char; message 'fileSystemRepresentation';
+    function getFileSystemRepresentation_maxLength(cname: Pointer; max: culong): Boolean; message 'getFileSystemRepresentation:maxLength:';
+
+    { Category: NSURLUtilities }
+    function stringByAddingPercentEscapesUsingEncoding(enc: NSStringEncoding): NSString; message 'stringByAddingPercentEscapesUsingEncoding:';
+    function stringByReplacingPercentEscapesUsingEncoding(enc: NSStringEncoding): NSString; message 'stringByReplacingPercentEscapesUsingEncoding:';
+
+    { Category: NSStringDrawing }
+    function sizeWithAttributes(attrs: NSDictionary): NSSize; message 'sizeWithAttributes:';
+    procedure drawAtPoint_withAttributes(point: NSPoint; attrs: NSDictionary); message 'drawAtPoint:withAttributes:';
+    procedure drawInRect_withAttributes(rect: NSRect; attrs: NSDictionary); message 'drawInRect:withAttributes:';
+
+    { Category: NSExtendedStringDrawing }
+    procedure drawWithRect_options_attributes(rect: NSRect; options: NSStringDrawingOptions; attributes: NSDictionary); message 'drawWithRect:options:attributes:';
+    function boundingRectWithSize_options_attributes(size: NSSize; options: NSStringDrawingOptions; attributes: NSDictionary): NSRect; message 'boundingRectWithSize:options:attributes:';
+  end; external;
+
+{ NSMutableString }
+  NSMutableString = objcclass(NSString)
+    
+  public
+    class function alloc: NSMutableString; message 'alloc';
+
+    procedure replaceCharactersInRange_withString(range: NSRange; aString: NSString); message 'replaceCharactersInRange:withString:';
+
+    { Category: NSMutableStringExtensionMethods }
+    procedure insertString_atIndex(aString: NSString; loc: culong); message 'insertString:atIndex:';
+    procedure deleteCharactersInRange(range: NSRange); message 'deleteCharactersInRange:';
+    procedure appendString(aString: NSString); message 'appendString:';
+    procedure appendFormat(format: NSString); message 'appendFormat:';
+    procedure setString(aString: NSString); message 'setString:';
+    function initWithCapacity(capacity: culong): id; message 'initWithCapacity:';
+    class function stringWithCapacity(capacity: culong): id; message 'stringWithCapacity:';
+    function replaceOccurrencesOfString_withString_options_range(target: NSString; replacement: NSString; options: NSStringCompareOptions; searchRange: NSRange): culong; message 'replaceOccurrencesOfString:withString:options:range:';
+  end; external;
+
+{ NSSimpleCString }
+  NSSimpleCString = objcclass(NSString)
+  private
+    _bytes: char;
+    _numBytes: cint;
+    {$ifdef cpu64}
+    __unused: cint;
+    {$endif}
+    
+  public
+    class function alloc: NSSimpleCString; message 'alloc';
+  end; external;
+
+{ NSConstantString }
+  NSConstantString = objcclass(NSSimpleCString)
+    
+  public
+    class function alloc: NSConstantString; message 'alloc';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSTask.inc b/packages/cocoaint/src/foundation/NSTask.inc
new file mode 100644
index 0000000000..f3b01eb8e3
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSTask.inc
@@ -0,0 +1,90 @@
+{ Parsed from Foundation.framework NSTask.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTASK_PAS_H}
+{$define NSTASK_PAS_H}
+type
+  NSTaskPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTASK_PAS_T}
+{$define NSTASK_PAS_T}
+
+{ CFString constants }
+var
+  NSTaskDidTerminateNotification: CFStringRef; external name '_NSTaskDidTerminateNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTASK_PAS_R}
+{$define NSTASK_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTASK_PAS_F}
+{$define NSTASK_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTASK_PAS_T}
+{$define NSTASK_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTask = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTASK_PAS_C}
+{$define NSTASK_PAS_C}
+
+{ NSTask }
+  NSTask = objcclass(NSObject)
+    
+  public
+    class function alloc: NSTask; message 'alloc';
+
+    function init: id; message 'init';
+    procedure setLaunchPath(path: NSString); message 'setLaunchPath:';
+    procedure setArguments(arguments_: NSArray); message 'setArguments:';
+    procedure setEnvironment(dict: NSDictionary); message 'setEnvironment:';
+    procedure setCurrentDirectoryPath(path: NSString); message 'setCurrentDirectoryPath:';
+    procedure setStandardInput(input: id); message 'setStandardInput:';
+    procedure setStandardOutput(output: id); message 'setStandardOutput:';
+    procedure setStandardError(error: id); message 'setStandardError:';
+    function launchPath: NSString; message 'launchPath';
+    function arguments: NSArray; message 'arguments';
+    function environment: NSDictionary; message 'environment';
+    function currentDirectoryPath: NSString; message 'currentDirectoryPath';
+    function standardInput: id; message 'standardInput';
+    function standardOutput: id; message 'standardOutput';
+    function standardError: id; message 'standardError';
+    procedure launch; message 'launch';
+    procedure interrupt; message 'interrupt';
+    procedure terminate; message 'terminate';
+    function suspend: Boolean; message 'suspend';
+    function resume: Boolean; message 'resume';
+    function processIdentifier: cint; message 'processIdentifier';
+    function isRunning: Boolean; message 'isRunning';
+    function terminationStatus: cint; message 'terminationStatus';
+
+    { Category: NSTaskConveniences }
+    class function launchedTaskWithLaunchPath_arguments(path: NSString; arguments_: NSArray): NSTask; message 'launchedTaskWithLaunchPath:arguments:';
+    procedure waitUntilExit; message 'waitUntilExit';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSThread.inc b/packages/cocoaint/src/foundation/NSThread.inc
new file mode 100644
index 0000000000..59321740d2
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSThread.inc
@@ -0,0 +1,92 @@
+{ Parsed from Foundation.framework NSThread.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTHREAD_PAS_H}
+{$define NSTHREAD_PAS_H}
+type
+  NSThreadPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTHREAD_PAS_T}
+{$define NSTHREAD_PAS_T}
+
+{ CFString constants }
+var
+  NSWillBecomeMultiThreadedNotification: CFStringRef; external name '_NSWillBecomeMultiThreadedNotification';
+  NSDidBecomeSingleThreadedNotification: CFStringRef; external name '_NSDidBecomeSingleThreadedNotification';
+  NSThreadWillExitNotification: CFStringRef; external name '_NSThreadWillExitNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTHREAD_PAS_R}
+{$define NSTHREAD_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTHREAD_PAS_F}
+{$define NSTHREAD_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTHREAD_PAS_T}
+{$define NSTHREAD_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSThread = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTHREAD_PAS_C}
+{$define NSTHREAD_PAS_C}
+
+{ NSThread }
+  NSThread = objcclass(NSObject)
+  private
+    __private: id;
+    __bytes: byte;
+    
+  public
+    class function alloc: NSThread; message 'alloc';
+
+    class function currentThread: NSThread; message 'currentThread';
+    class procedure detachNewThreadSelector_toTarget_withObject(selector: SEL; target: id; argument: id); message 'detachNewThreadSelector:toTarget:withObject:';
+    class function isMultiThreaded: Boolean; message 'isMultiThreaded';
+    function threadDictionary: NSMutableDictionary; message 'threadDictionary';
+    class procedure sleepUntilDate(date: NSDate); message 'sleepUntilDate:';
+    class procedure sleepForTimeInterval(ti: NSTimeInterval); message 'sleepForTimeInterval:';
+    class procedure exit; message 'exit';
+    class function threadPriority: double; message 'threadPriority';
+    class function setThreadPriority(p: double): Boolean; message 'setThreadPriority:';
+    class function callStackReturnAddresses: NSArray; message 'callStackReturnAddresses';
+    procedure setName(n: NSString); message 'setName:';
+    function name: NSString; message 'name';
+    function stackSize: culong; message 'stackSize';
+    procedure setStackSize(s: culong); message 'setStackSize:';
+    function isMainThread: Boolean; message 'isMainThread';
+    class function mainThread: NSThread; message 'mainThread';
+    function init: id; message 'init';
+    function initWithTarget_selector_object(target: id; selector: SEL; argument: id): id; message 'initWithTarget:selector:object:';
+    function isExecuting: Boolean; message 'isExecuting';
+    function isFinished: Boolean; message 'isFinished';
+    function isCancelled: Boolean; message 'isCancelled';
+    procedure cancel; message 'cancel';
+    procedure start; message 'start';
+    procedure main; message 'main';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSTimeZone.inc b/packages/cocoaint/src/foundation/NSTimeZone.inc
new file mode 100644
index 0000000000..9c802a0ce6
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSTimeZone.inc
@@ -0,0 +1,101 @@
+{ Parsed from Foundation.framework NSTimeZone.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTIMEZONE_PAS_H}
+{$define NSTIMEZONE_PAS_H}
+type
+  NSTimeZonePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTIMEZONE_PAS_T}
+{$define NSTIMEZONE_PAS_T}
+
+{ Constants }
+
+const
+  NSTimeZoneNameStyleStandard = 0;
+  NSTimeZoneNameStyleShortStandard = 1;
+  NSTimeZoneNameStyleDaylightSaving = 2;
+  NSTimeZoneNameStyleShortDaylightSaving = 3;
+
+{ Types }
+type
+  NSTimeZoneNameStyle = clong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTIMEZONE_PAS_R}
+{$define NSTIMEZONE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTIMEZONE_PAS_F}
+{$define NSTIMEZONE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTIMEZONE_PAS_T}
+{$define NSTIMEZONE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTimeZone = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTIMEZONE_PAS_C}
+{$define NSTIMEZONE_PAS_C}
+
+{ NSTimeZone }
+  NSTimeZone = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+    
+  public
+    class function alloc: NSTimeZone; message 'alloc';
+
+    function name: NSString; message 'name';
+    function data: NSData; message 'data';
+    function secondsFromGMTForDate(aDate: NSDate): clong; message 'secondsFromGMTForDate:';
+    function abbreviationForDate(aDate: NSDate): NSString; message 'abbreviationForDate:';
+    function isDaylightSavingTimeForDate(aDate: NSDate): Boolean; message 'isDaylightSavingTimeForDate:';
+    function daylightSavingTimeOffsetForDate(aDate: NSDate): NSTimeInterval; message 'daylightSavingTimeOffsetForDate:';
+    function nextDaylightSavingTimeTransitionAfterDate(aDate: NSDate): NSDate; message 'nextDaylightSavingTimeTransitionAfterDate:';
+
+    { Category: NSExtendedTimeZone }
+    class function systemTimeZone: NSTimeZone; message 'systemTimeZone';
+    class procedure resetSystemTimeZone; message 'resetSystemTimeZone';
+    class function defaultTimeZone: NSTimeZone; message 'defaultTimeZone';
+    class procedure setDefaultTimeZone(aTimeZone: NSTimeZone); message 'setDefaultTimeZone:';
+    class function localTimeZone: NSTimeZone; message 'localTimeZone';
+    class function knownTimeZoneNames: NSArray; message 'knownTimeZoneNames';
+    class function abbreviationDictionary: NSDictionary; message 'abbreviationDictionary';
+    function secondsFromGMT: clong; message 'secondsFromGMT';
+    function abbreviation: NSString; message 'abbreviation';
+    function isDaylightSavingTime: Boolean; message 'isDaylightSavingTime';
+    function description: NSString; message 'description';
+    function isEqualToTimeZone(aTimeZone: NSTimeZone): Boolean; message 'isEqualToTimeZone:';
+    function localizedName_locale(style: NSTimeZoneNameStyle; locale: NSLocale): NSString; message 'localizedName:locale:';
+
+    { Category: NSTimeZoneCreation }
+    class function timeZoneWithName(tzName: NSString): id; message 'timeZoneWithName:';
+    class function timeZoneWithName_data(tzName: NSString; aData: NSData): id; message 'timeZoneWithName:data:';
+    function initWithName(tzName: NSString): id; message 'initWithName:';
+    function initWithName_data(tzName: NSString; aData: NSData): id; message 'initWithName:data:';
+    class function timeZoneForSecondsFromGMT(seconds: clong): id; message 'timeZoneForSecondsFromGMT:';
+    class function timeZoneWithAbbreviation(abbreviation_: NSString): id; message 'timeZoneWithAbbreviation:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSTimer.inc b/packages/cocoaint/src/foundation/NSTimer.inc
new file mode 100644
index 0000000000..f19c8edd07
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSTimer.inc
@@ -0,0 +1,71 @@
+{ Parsed from Foundation.framework NSTimer.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSTIMER_PAS_H}
+{$define NSTIMER_PAS_H}
+type
+  NSTimerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSTIMER_PAS_T}
+{$define NSTIMER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSTIMER_PAS_R}
+{$define NSTIMER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSTIMER_PAS_F}
+{$define NSTIMER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSTIMER_PAS_T}
+{$define NSTIMER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSTimer = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSTIMER_PAS_C}
+{$define NSTIMER_PAS_C}
+
+{ NSTimer }
+  NSTimer = objcclass(NSObject)
+    
+  public
+    class function alloc: NSTimer; message 'alloc';
+
+    class function timerWithTimeInterval_invocation_repeats(ti: NSTimeInterval; invocation: NSInvocation; yesOrNo: Boolean): NSTimer; message 'timerWithTimeInterval:invocation:repeats:';
+    class function scheduledTimerWithTimeInterval_invocation_repeats(ti: NSTimeInterval; invocation: NSInvocation; yesOrNo: Boolean): NSTimer; message 'scheduledTimerWithTimeInterval:invocation:repeats:';
+    class function timerWithTimeInterval_target_selector_userInfo_repeats(ti: NSTimeInterval; aTarget: id; aSelector: SEL; userInfo_: id; yesOrNo: Boolean): NSTimer; message 'timerWithTimeInterval:target:selector:userInfo:repeats:';
+    class function scheduledTimerWithTimeInterval_target_selector_userInfo_repeats(ti: NSTimeInterval; aTarget: id; aSelector: SEL; userInfo_: id; yesOrNo: Boolean): NSTimer; message 'scheduledTimerWithTimeInterval:target:selector:userInfo:repeats:';
+    function initWithFireDate_interval_target_selector_userInfo_repeats(date: NSDate; ti: NSTimeInterval; t: id; s: SEL; ui: id; rep: Boolean): id; message 'initWithFireDate:interval:target:selector:userInfo:repeats:';
+    procedure fire; message 'fire';
+    function fireDate: NSDate; message 'fireDate';
+    procedure setFireDate(date: NSDate); message 'setFireDate:';
+    function timeInterval: NSTimeInterval; message 'timeInterval';
+    procedure invalidate; message 'invalidate';
+    function isValid: Boolean; message 'isValid';
+    function userInfo: id; message 'userInfo';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSURL.inc b/packages/cocoaint/src/foundation/NSURL.inc
new file mode 100644
index 0000000000..e941bdeff5
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSURL.inc
@@ -0,0 +1,101 @@
+{ Parsed from Foundation.framework NSURL.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSURL_PAS_H}
+{$define NSURL_PAS_H}
+type
+  NSURLPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSURL_PAS_T}
+{$define NSURL_PAS_T}
+
+{ CFString constants }
+var
+  NSURLFileScheme: CFStringRef; external name '_NSURLFileScheme';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSURL_PAS_R}
+{$define NSURL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSURL_PAS_F}
+{$define NSURL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSURL_PAS_T}
+{$define NSURL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSURL = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSURL_PAS_C}
+{$define NSURL_PAS_C}
+
+{ NSURL }
+  NSURL = objcclass(NSObject, NSCodingProtocol, NSCopyingProtocol, NSURLHandleClientProtocol)
+  private
+    __urlString: NSString;
+    __baseURL: NSURL;
+    __clients: Pointer;
+    __reserved: Pointer; {garbage collector: __strong }
+    
+  public
+    class function alloc: NSURL; message 'alloc';
+
+    class function fileURLWithPath_isDirectory(path_: NSString; isDir: Boolean): id; message 'fileURLWithPath:isDirectory:';
+    class function fileURLWithPath(path_: NSString): id; message 'fileURLWithPath:';
+    class function URLWithString(URLString: NSString): id; message 'URLWithString:';
+    class function URLWithString_relativeToURL(URLString: NSString; baseURL_: NSURL): id; message 'URLWithString:relativeToURL:';
+    function absoluteString: NSString; message 'absoluteString';
+    function relativeString: NSString; message 'relativeString';
+    function baseURL: NSURL; message 'baseURL';
+    function absoluteURL: NSURL; message 'absoluteURL';
+    function scheme: NSString; message 'scheme';
+    function resourceSpecifier: NSString; message 'resourceSpecifier';
+    function host: NSString; message 'host';
+    function port: NSNumber; message 'port';
+    function user: NSString; message 'user';
+    function password: NSString; message 'password';
+    function path: NSString; message 'path';
+    function fragment: NSString; message 'fragment';
+    function parameterString: NSString; message 'parameterString';
+    function query: NSString; message 'query';
+    function relativePath: NSString; message 'relativePath';
+    function isFileURL: Boolean; message 'isFileURL';
+    function standardizedURL: NSURL; message 'standardizedURL';
+
+    { Category: NSURLLoading }
+    function resourceDataUsingCache(shouldUseCache: Boolean): NSData; message 'resourceDataUsingCache:';
+    procedure loadResourceDataNotifyingClient_usingCache(client: id; shouldUseCache: Boolean); message 'loadResourceDataNotifyingClient:usingCache:';
+    function propertyForKey(propertyKey: NSString): id; message 'propertyForKey:';
+    function setResourceData(data: NSData): Boolean; message 'setResourceData:';
+    function setProperty_forKey(property_: id; propertyKey: NSString): Boolean; message 'setProperty:forKey:';
+    function URLHandleUsingCache(shouldUseCache: Boolean): NSURLHandle; message 'URLHandleUsingCache:';
+
+    { Category: NSPasteboardSupport }
+    class function URLFromPasteboard(pasteBoard: NSPasteboard): NSURL; message 'URLFromPasteboard:';
+    procedure writeToPasteboard(pasteBoard: NSPasteboard); message 'writeToPasteboard:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSURLAuthenticationChallenge.inc b/packages/cocoaint/src/foundation/NSURLAuthenticationChallenge.inc
new file mode 100644
index 0000000000..22de9d19e6
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSURLAuthenticationChallenge.inc
@@ -0,0 +1,82 @@
+{ Parsed from Foundation.framework NSURLAuthenticationChallenge.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSURLAUTHENTICATIONCHALLENGE_PAS_H}
+{$define NSURLAUTHENTICATIONCHALLENGE_PAS_H}
+type
+  NSURLAuthenticationChallengePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSURLAUTHENTICATIONCHALLENGE_PAS_T}
+{$define NSURLAUTHENTICATIONCHALLENGE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSURLAUTHENTICATIONCHALLENGE_PAS_R}
+{$define NSURLAUTHENTICATIONCHALLENGE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSURLAUTHENTICATIONCHALLENGE_PAS_F}
+{$define NSURLAUTHENTICATIONCHALLENGE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSURLAUTHENTICATIONCHALLENGE_PAS_T}
+{$define NSURLAUTHENTICATIONCHALLENGE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSURLAuthenticationChallengeSenderProtocol = objcprotocol;
+  NSURLAuthenticationChallenge = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSURLAUTHENTICATIONCHALLENGE_PAS_C}
+{$define NSURLAUTHENTICATIONCHALLENGE_PAS_C}
+
+{ NSURLAuthenticationChallenge }
+  NSURLAuthenticationChallenge = objcclass(NSObject)
+  private
+    __internal: NSURLAuthenticationChallengeInternal;
+    
+  public
+    class function alloc: NSURLAuthenticationChallenge; message 'alloc';
+
+    function initWithProtectionSpace_proposedCredential_previousFailureCount_failureResponse_error_sender(space: NSURLProtectionSpace; credential: NSURLCredential; previousFailureCount_: clong; response: NSURLResponse; error_: NSError; sender_: id): id; message 'initWithProtectionSpace:proposedCredential:previousFailureCount:failureResponse:error:sender:';
+    function initWithAuthenticationChallenge_sender(challenge: NSURLAuthenticationChallenge; sender_: id): id; message 'initWithAuthenticationChallenge:sender:';
+    function protectionSpace: NSURLProtectionSpace; message 'protectionSpace';
+    function proposedCredential: NSURLCredential; message 'proposedCredential';
+    function previousFailureCount: clong; message 'previousFailureCount';
+    function failureResponse: NSURLResponse; message 'failureResponse';
+    function error: NSError; message 'error';
+    function sender: id; message 'sender';
+  end; external;
+
+{$endif}
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSURLAUTHENTICATIONCHALLENGE_PAS_P}
+{$define NSURLAUTHENTICATIONCHALLENGE_PAS_P}
+  
+{ NSURLAuthenticationChallengeSender Protocol }
+  NSURLAuthenticationChallengeSenderProtocol = objcprotocol
+    procedure useCredential_forAuthenticationChallenge(credential: NSURLCredential; challenge: NSURLAuthenticationChallenge); message 'useCredential:forAuthenticationChallenge:';
+    procedure continueWithoutCredentialForAuthenticationChallenge(challenge: NSURLAuthenticationChallenge); message 'continueWithoutCredentialForAuthenticationChallenge:';
+    procedure cancelAuthenticationChallenge(challenge: NSURLAuthenticationChallenge); message 'cancelAuthenticationChallenge:';
+  end; external name 'NSURLAuthenticationChallengeSender';
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSURLCache.inc b/packages/cocoaint/src/foundation/NSURLCache.inc
new file mode 100644
index 0000000000..430298a7ab
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSURLCache.inc
@@ -0,0 +1,96 @@
+{ Parsed from Foundation.framework NSURLCache.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSURLCACHE_PAS_H}
+{$define NSURLCACHE_PAS_H}
+type
+  NSCachedURLResponsePointer = Pointer;
+  NSURLCachePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSURLCACHE_PAS_T}
+{$define NSURLCACHE_PAS_T}
+
+{ Types }
+type
+  NSURLCacheStoragePolicy = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSURLCACHE_PAS_R}
+{$define NSURLCACHE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSURLCACHE_PAS_F}
+{$define NSURLCACHE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSURLCACHE_PAS_T}
+{$define NSURLCACHE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSCachedURLResponse = objcclass;
+  NSURLCache = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSURLCACHE_PAS_C}
+{$define NSURLCACHE_PAS_C}
+
+{ NSCachedURLResponse }
+  NSCachedURLResponse = objcclass(NSObject, NSCodingProtocol, NSCopyingProtocol)
+  private
+    __internal: NSCachedURLResponseInternal;
+    
+  public
+    class function alloc: NSCachedURLResponse; message 'alloc';
+
+    function initWithResponse_data(response_: NSURLResponse; data_: NSData): id; message 'initWithResponse:data:';
+    function initWithResponse_data_userInfo_storagePolicy(response_: NSURLResponse; data_: NSData; userInfo_: NSDictionary; storagePolicy_: NSURLCacheStoragePolicy): id; message 'initWithResponse:data:userInfo:storagePolicy:';
+    function response: NSURLResponse; message 'response';
+    function data: NSData; message 'data';
+    function userInfo: NSDictionary; message 'userInfo';
+    function storagePolicy: NSURLCacheStoragePolicy; message 'storagePolicy';
+  end; external;
+
+{ NSURLCache }
+  NSURLCache = objcclass(NSObject)
+  private
+    __internal: NSURLCacheInternal;
+    
+  public
+    class function alloc: NSURLCache; message 'alloc';
+
+    class function sharedURLCache: NSURLCache; message 'sharedURLCache';
+    class procedure setSharedURLCache(cache: NSURLCache); message 'setSharedURLCache:';
+    function initWithMemoryCapacity_diskCapacity_diskPath(memoryCapacity_: culong; diskCapacity_: culong; path: NSString): id; message 'initWithMemoryCapacity:diskCapacity:diskPath:';
+    function cachedResponseForRequest(request: NSURLRequest): NSCachedURLResponse; message 'cachedResponseForRequest:';
+    procedure storeCachedResponse_forRequest(cachedResponse: NSCachedURLResponse; request: NSURLRequest); message 'storeCachedResponse:forRequest:';
+    procedure removeCachedResponseForRequest(request: NSURLRequest); message 'removeCachedResponseForRequest:';
+    procedure removeAllCachedResponses; message 'removeAllCachedResponses';
+    function memoryCapacity: culong; message 'memoryCapacity';
+    function diskCapacity: culong; message 'diskCapacity';
+    procedure setMemoryCapacity(memoryCapacity_: culong); message 'setMemoryCapacity:';
+    procedure setDiskCapacity(diskCapacity_: culong); message 'setDiskCapacity:';
+    function currentMemoryUsage: culong; message 'currentMemoryUsage';
+    function currentDiskUsage: culong; message 'currentDiskUsage';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSURLConnection.inc b/packages/cocoaint/src/foundation/NSURLConnection.inc
new file mode 100644
index 0000000000..4c5b09542f
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSURLConnection.inc
@@ -0,0 +1,71 @@
+{ Parsed from Foundation.framework NSURLConnection.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSURLCONNECTION_PAS_H}
+{$define NSURLCONNECTION_PAS_H}
+type
+  NSURLConnectionPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSURLCONNECTION_PAS_T}
+{$define NSURLCONNECTION_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSURLCONNECTION_PAS_R}
+{$define NSURLCONNECTION_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSURLCONNECTION_PAS_F}
+{$define NSURLCONNECTION_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSURLCONNECTION_PAS_T}
+{$define NSURLCONNECTION_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSURLConnection = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSURLCONNECTION_PAS_C}
+{$define NSURLCONNECTION_PAS_C}
+
+{ NSURLConnection }
+  NSURLConnection = objcclass(NSObject)
+  private
+    __internal: NSURLConnectionInternal;
+    
+  public
+    class function alloc: NSURLConnection; message 'alloc';
+
+    class function canHandleRequest(request: NSURLRequest): Boolean; message 'canHandleRequest:';
+    class function connectionWithRequest_delegate(request: NSURLRequest; delegate: id): NSURLConnection; message 'connectionWithRequest:delegate:';
+    function initWithRequest_delegate(request: NSURLRequest; delegate: id): id; message 'initWithRequest:delegate:';
+    function initWithRequest_delegate_startImmediately(request: NSURLRequest; delegate: id; startImmediately: Boolean): id; message 'initWithRequest:delegate:startImmediately:';
+    procedure cancel; message 'cancel';
+    procedure scheduleInRunLoop_forMode(aRunLoop: NSRunLoop; mode: NSString); message 'scheduleInRunLoop:forMode:';
+    procedure unscheduleFromRunLoop_forMode(aRunLoop: NSRunLoop; mode: NSString); message 'unscheduleFromRunLoop:forMode:';
+
+    { Category: NSURLConnectionSynchronousLoading }
+    class function sendSynchronousRequest_returningResponse_error(request: NSURLRequest; var response: NSURLResponse; var error: NSError): NSData; message 'sendSynchronousRequest:returningResponse:error:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSURLCredential.inc b/packages/cocoaint/src/foundation/NSURLCredential.inc
new file mode 100644
index 0000000000..1678069990
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSURLCredential.inc
@@ -0,0 +1,78 @@
+{ Parsed from Foundation.framework NSURLCredential.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSURLCREDENTIAL_PAS_H}
+{$define NSURLCREDENTIAL_PAS_H}
+type
+  NSURLCredentialPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSURLCREDENTIAL_PAS_T}
+{$define NSURLCREDENTIAL_PAS_T}
+
+{ Constants }
+
+const
+  NSURLCredentialPersistenceNone = 0;
+  NSURLCredentialPersistenceForSession = 1;
+  NSURLCredentialPersistencePermanent = 2;
+
+{ Types }
+type
+  NSURLCredentialPersistence = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSURLCREDENTIAL_PAS_R}
+{$define NSURLCREDENTIAL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSURLCREDENTIAL_PAS_F}
+{$define NSURLCREDENTIAL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSURLCREDENTIAL_PAS_T}
+{$define NSURLCREDENTIAL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSURLCredential = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSURLCREDENTIAL_PAS_C}
+{$define NSURLCREDENTIAL_PAS_C}
+
+{ NSURLCredential }
+  NSURLCredential = objcclass(NSObject, NSCopyingProtocol)
+  private
+    __internal: NSURLCredentialInternal;
+    
+  public
+    class function alloc: NSURLCredential; message 'alloc';
+
+    function initWithUser_password_persistence(user_: NSString; password_: NSString; persistence_: NSURLCredentialPersistence): id; message 'initWithUser:password:persistence:';
+    class function credentialWithUser_password_persistence(user_: NSString; password_: NSString; persistence_: NSURLCredentialPersistence): NSURLCredential; message 'credentialWithUser:password:persistence:';
+    function user: NSString; message 'user';
+    function password: NSString; message 'password';
+    function hasPassword: Boolean; message 'hasPassword';
+    function persistence: NSURLCredentialPersistence; message 'persistence';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSURLCredentialStorage.inc b/packages/cocoaint/src/foundation/NSURLCredentialStorage.inc
new file mode 100644
index 0000000000..f1c9535d03
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSURLCredentialStorage.inc
@@ -0,0 +1,68 @@
+{ Parsed from Foundation.framework NSURLCredentialStorage.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSURLCREDENTIALSTORAGE_PAS_H}
+{$define NSURLCREDENTIALSTORAGE_PAS_H}
+type
+  NSURLCredentialStoragePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSURLCREDENTIALSTORAGE_PAS_T}
+{$define NSURLCREDENTIALSTORAGE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSURLCREDENTIALSTORAGE_PAS_R}
+{$define NSURLCREDENTIALSTORAGE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSURLCREDENTIALSTORAGE_PAS_F}
+{$define NSURLCREDENTIALSTORAGE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSURLCREDENTIALSTORAGE_PAS_T}
+{$define NSURLCREDENTIALSTORAGE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSURLCredentialStorage = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSURLCREDENTIALSTORAGE_PAS_C}
+{$define NSURLCREDENTIALSTORAGE_PAS_C}
+
+{ NSURLCredentialStorage }
+  NSURLCredentialStorage = objcclass(NSObject)
+  private
+    __internal: NSURLCredentialStorageInternal;
+    
+  public
+    class function alloc: NSURLCredentialStorage; message 'alloc';
+
+    class function sharedCredentialStorage: NSURLCredentialStorage; message 'sharedCredentialStorage';
+    function credentialsForProtectionSpace(space: NSURLProtectionSpace): NSDictionary; message 'credentialsForProtectionSpace:';
+    function allCredentials: NSDictionary; message 'allCredentials';
+    procedure setCredential_forProtectionSpace(credential: NSURLCredential; space: NSURLProtectionSpace); message 'setCredential:forProtectionSpace:';
+    procedure removeCredential_forProtectionSpace(credential: NSURLCredential; space: NSURLProtectionSpace); message 'removeCredential:forProtectionSpace:';
+    function defaultCredentialForProtectionSpace(space: NSURLProtectionSpace): NSURLCredential; message 'defaultCredentialForProtectionSpace:';
+    procedure setDefaultCredential_forProtectionSpace(credential: NSURLCredential; space: NSURLProtectionSpace); message 'setDefaultCredential:forProtectionSpace:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSURLDownload.inc b/packages/cocoaint/src/foundation/NSURLDownload.inc
new file mode 100644
index 0000000000..e2d20236ce
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSURLDownload.inc
@@ -0,0 +1,70 @@
+{ Parsed from Foundation.framework NSURLDownload.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSURLDOWNLOAD_PAS_H}
+{$define NSURLDOWNLOAD_PAS_H}
+type
+  NSURLDownloadPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSURLDOWNLOAD_PAS_T}
+{$define NSURLDOWNLOAD_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSURLDOWNLOAD_PAS_R}
+{$define NSURLDOWNLOAD_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSURLDOWNLOAD_PAS_F}
+{$define NSURLDOWNLOAD_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSURLDOWNLOAD_PAS_T}
+{$define NSURLDOWNLOAD_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSURLDownload = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSURLDOWNLOAD_PAS_C}
+{$define NSURLDOWNLOAD_PAS_C}
+
+{ NSURLDownload }
+  NSURLDownload = objcclass(NSObject)
+  private
+    __internal: NSURLDownloadInternal;
+    
+  public
+    class function alloc: NSURLDownload; message 'alloc';
+
+    class function canResumeDownloadDecodedWithEncodingMIMEType(MIMEType: NSString): Boolean; message 'canResumeDownloadDecodedWithEncodingMIMEType:';
+    function initWithRequest_delegate(request_: NSURLRequest; delegate: id): id; message 'initWithRequest:delegate:';
+    function initWithResumeData_delegate_path(resumeData_: NSData; delegate: id; path: NSString): id; message 'initWithResumeData:delegate:path:';
+    procedure cancel; message 'cancel';
+    procedure setDestination_allowOverwrite(path: NSString; allowOverwrite: Boolean); message 'setDestination:allowOverwrite:';
+    function request: NSURLRequest; message 'request';
+    function resumeData: NSData; message 'resumeData';
+    procedure setDeletesFileUponFailure(deletesFileUponFailure_: Boolean); message 'setDeletesFileUponFailure:';
+    function deletesFileUponFailure: Boolean; message 'deletesFileUponFailure';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSURLError.inc b/packages/cocoaint/src/foundation/NSURLError.inc
new file mode 100644
index 0000000000..1edb730f6b
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSURLError.inc
@@ -0,0 +1,31 @@
+{ Parsed from Foundation.framework NSURLError.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSURLERROR_PAS_T}
+{$define NSURLERROR_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSURLERROR_PAS_R}
+{$define NSURLERROR_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSURLERROR_PAS_F}
+{$define NSURLERROR_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSURLERROR_PAS_T}
+{$define NSURLERROR_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSURLHandle.inc b/packages/cocoaint/src/foundation/NSURLHandle.inc
new file mode 100644
index 0000000000..7a4d2a6b36
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSURLHandle.inc
@@ -0,0 +1,103 @@
+{ Parsed from Foundation.framework NSURLHandle.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSURLHANDLE_PAS_H}
+{$define NSURLHANDLE_PAS_H}
+type
+  NSURLHandlePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSURLHANDLE_PAS_T}
+{$define NSURLHANDLE_PAS_T}
+
+{ Constants }
+
+const
+  NSURLHandleNotLoaded = 0;
+  NSURLHandleLoadSucceeded = 0;
+  NSURLHandleLoadInProgress = 1;
+  NSURLHandleLoadFailed = 2;
+
+{ Types }
+type
+  NSURLHandleStatus = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSURLHANDLE_PAS_R}
+{$define NSURLHANDLE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSURLHANDLE_PAS_F}
+{$define NSURLHANDLE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSURLHANDLE_PAS_T}
+{$define NSURLHANDLE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSURLHandleClientProtocol = objcprotocol;
+  NSURLHandle = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSURLHANDLE_PAS_C}
+{$define NSURLHANDLE_PAS_C}
+
+{ NSURLHandle }
+  NSURLHandle = objcclass(NSObject)
+  private
+    __clients: NSMutableArray;
+    __data: id;
+    __status: NSURLHandleStatus;
+    __reserved: clong;
+    
+  public
+    class function alloc: NSURLHandle; message 'alloc';
+
+    class procedure registerURLHandleClass(anURLHandleSubclass: Pobjc_class); message 'registerURLHandleClass:';
+    class function URLHandleClassForURL(anURL: NSURL): Pobjc_class; message 'URLHandleClassForURL:';
+    procedure addClient(client: id); message 'addClient:';
+    procedure removeClient(client: id); message 'removeClient:';
+    procedure backgroundLoadDidFailWithReason(reason: NSString); message 'backgroundLoadDidFailWithReason:';
+    procedure didLoadBytes_loadComplete(newBytes: NSData; yorn: Boolean); message 'didLoadBytes:loadComplete:';
+    class function canInitWithURL(anURL: NSURL): Boolean; message 'canInitWithURL:';
+    class function cachedHandleForURL(anURL: NSURL): NSURLHandle; message 'cachedHandleForURL:';
+    function propertyForKey(propertyKey: NSString): id; message 'propertyForKey:';
+    function propertyForKeyIfAvailable(propertyKey: NSString): id; message 'propertyForKeyIfAvailable:';
+    function writeProperty_forKey(propertyValue: id; propertyKey: NSString): Boolean; message 'writeProperty:forKey:';
+    function writeData(data: NSData): Boolean; message 'writeData:';
+  end; external;
+
+{$endif}
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSURLHANDLE_PAS_P}
+{$define NSURLHANDLE_PAS_P}
+  
+{ NSURLHandleClient Protocol }
+  NSURLHandleClientProtocol = objcprotocol
+    procedure URLHandle_resourceDataDidBecomeAvailable(sender: NSURLHandle; newBytes: NSData); message 'URLHandle:resourceDataDidBecomeAvailable:';
+    procedure URLHandleResourceDidBeginLoading(sender: NSURLHandle); message 'URLHandleResourceDidBeginLoading:';
+    procedure URLHandleResourceDidFinishLoading(sender: NSURLHandle); message 'URLHandleResourceDidFinishLoading:';
+    procedure URLHandleResourceDidCancelLoading(sender: NSURLHandle); message 'URLHandleResourceDidCancelLoading:';
+    procedure URLHandle_resourceDidFailLoadingWithReason(sender: NSURLHandle; reason: NSString); message 'URLHandle:resourceDidFailLoadingWithReason:';
+  end; external name 'NSURLHandleClient';
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSURLProtectionSpace.inc b/packages/cocoaint/src/foundation/NSURLProtectionSpace.inc
new file mode 100644
index 0000000000..d74a1c1b61
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSURLProtectionSpace.inc
@@ -0,0 +1,71 @@
+{ Parsed from Foundation.framework NSURLProtectionSpace.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSURLPROTECTIONSPACE_PAS_H}
+{$define NSURLPROTECTIONSPACE_PAS_H}
+type
+  NSURLProtectionSpacePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSURLPROTECTIONSPACE_PAS_T}
+{$define NSURLPROTECTIONSPACE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSURLPROTECTIONSPACE_PAS_R}
+{$define NSURLPROTECTIONSPACE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSURLPROTECTIONSPACE_PAS_F}
+{$define NSURLPROTECTIONSPACE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSURLPROTECTIONSPACE_PAS_T}
+{$define NSURLPROTECTIONSPACE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSURLProtectionSpace = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSURLPROTECTIONSPACE_PAS_C}
+{$define NSURLPROTECTIONSPACE_PAS_C}
+
+{ NSURLProtectionSpace }
+  NSURLProtectionSpace = objcclass(NSObject, NSCopyingProtocol)
+  private
+    __internal: NSURLProtectionSpaceInternal;
+    
+  public
+    class function alloc: NSURLProtectionSpace; message 'alloc';
+
+    function initWithHost_port_protocol_realm_authenticationMethod(host_: NSString; port_: clong; protocol_: NSString; realm_: NSString; authenticationMethod_: NSString): id; message 'initWithHost:port:protocol:realm:authenticationMethod:';
+    function initWithProxyHost_port_type_realm_authenticationMethod(host_: NSString; port_: clong; type_: NSString; realm_: NSString; authenticationMethod_: NSString): id; message 'initWithProxyHost:port:type:realm:authenticationMethod:';
+    function realm: NSString; message 'realm';
+    function receivesCredentialSecurely: Boolean; message 'receivesCredentialSecurely';
+    function isProxy: Boolean; message 'isProxy';
+    function host: NSString; message 'host';
+    function port: clong; message 'port';
+    function proxyType: NSString; message 'proxyType';
+    function protocol: NSString; message 'protocol';
+    function authenticationMethod: NSString; message 'authenticationMethod';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSURLProtocol.inc b/packages/cocoaint/src/foundation/NSURLProtocol.inc
new file mode 100644
index 0000000000..9552a722de
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSURLProtocol.inc
@@ -0,0 +1,93 @@
+{ Parsed from Foundation.framework NSURLProtocol.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSURLPROTOCOL_PAS_H}
+{$define NSURLPROTOCOL_PAS_H}
+type
+  NSURLProtocolPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSURLPROTOCOL_PAS_T}
+{$define NSURLPROTOCOL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSURLPROTOCOL_PAS_R}
+{$define NSURLPROTOCOL_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSURLPROTOCOL_PAS_F}
+{$define NSURLPROTOCOL_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSURLPROTOCOL_PAS_T}
+{$define NSURLPROTOCOL_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSURLProtocolClientProtocol = objcprotocol;
+  NSURLProtocol = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSURLPROTOCOL_PAS_C}
+{$define NSURLPROTOCOL_PAS_C}
+
+{ NSURLProtocol }
+  NSURLProtocol = objcclass(NSObject)
+  private
+    __internal: NSURLProtocolInternal;
+    
+  public
+    class function alloc: NSURLProtocol; message 'alloc';
+
+    function initWithRequest_cachedResponse_client(request_: NSURLRequest; cachedResponse_: NSCachedURLResponse; client_: id): id; message 'initWithRequest:cachedResponse:client:';
+    function client: id; message 'client';
+    function request: NSURLRequest; message 'request';
+    function cachedResponse: NSCachedURLResponse; message 'cachedResponse';
+    class function canInitWithRequest(request_: NSURLRequest): Boolean; message 'canInitWithRequest:';
+    class function canonicalRequestForRequest(request_: NSURLRequest): NSURLRequest; message 'canonicalRequestForRequest:';
+    class function requestIsCacheEquivalent_toRequest(a: NSURLRequest; b: NSURLRequest): Boolean; message 'requestIsCacheEquivalent:toRequest:';
+    procedure startLoading; message 'startLoading';
+    procedure stopLoading; message 'stopLoading';
+    class function propertyForKey_inRequest(key: NSString; request_: NSURLRequest): id; message 'propertyForKey:inRequest:';
+    class procedure setProperty_forKey_inRequest(value: id; key: NSString; request_: NSMutableURLRequest); message 'setProperty:forKey:inRequest:';
+    class procedure removePropertyForKey_inRequest(key: NSString; request_: NSMutableURLRequest); message 'removePropertyForKey:inRequest:';
+    class function registerClass(protocolClass: Pobjc_class): Boolean; message 'registerClass:';
+    class procedure unregisterClass(protocolClass: Pobjc_class); message 'unregisterClass:';
+  end; external;
+
+{$endif}
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSURLPROTOCOL_PAS_P}
+{$define NSURLPROTOCOL_PAS_P}
+  
+{ NSURLProtocolClient Protocol }
+  NSURLProtocolClientProtocol = objcprotocol
+    procedure URLProtocol_wasRedirectedToRequest_redirectResponse(protocol: NSURLProtocol; request: NSURLRequest; redirectResponse: NSURLResponse); message 'URLProtocol:wasRedirectedToRequest:redirectResponse:';
+    procedure URLProtocol_cachedResponseIsValid(protocol: NSURLProtocol; cachedResponse: NSCachedURLResponse); message 'URLProtocol:cachedResponseIsValid:';
+    procedure URLProtocol_didReceiveResponse_cacheStoragePolicy(protocol: NSURLProtocol; response: NSURLResponse; policy: NSURLCacheStoragePolicy); message 'URLProtocol:didReceiveResponse:cacheStoragePolicy:';
+    procedure URLProtocol_didLoadData(protocol: NSURLProtocol; data: NSData); message 'URLProtocol:didLoadData:';
+    procedure URLProtocolDidFinishLoading(protocol: NSURLProtocol); message 'URLProtocolDidFinishLoading:';
+    procedure URLProtocol_didFailWithError(protocol: NSURLProtocol; error: NSError); message 'URLProtocol:didFailWithError:';
+    procedure URLProtocol_didReceiveAuthenticationChallenge(protocol: NSURLProtocol; challenge: NSURLAuthenticationChallenge); message 'URLProtocol:didReceiveAuthenticationChallenge:';
+    procedure URLProtocol_didCancelAuthenticationChallenge(protocol: NSURLProtocol; challenge: NSURLAuthenticationChallenge); message 'URLProtocol:didCancelAuthenticationChallenge:';
+  end; external name 'NSURLProtocolClient';
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSURLRequest.inc b/packages/cocoaint/src/foundation/NSURLRequest.inc
new file mode 100644
index 0000000000..a48f52b965
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSURLRequest.inc
@@ -0,0 +1,104 @@
+{ Parsed from Foundation.framework NSURLRequest.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSURLREQUEST_PAS_H}
+{$define NSURLREQUEST_PAS_H}
+type
+  NSURLRequestPointer = Pointer;
+  NSMutableURLRequestPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSURLREQUEST_PAS_T}
+{$define NSURLREQUEST_PAS_T}
+
+{ Types }
+type
+  NSURLRequestCachePolicy = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSURLREQUEST_PAS_R}
+{$define NSURLREQUEST_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSURLREQUEST_PAS_F}
+{$define NSURLREQUEST_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSURLREQUEST_PAS_T}
+{$define NSURLREQUEST_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSURLRequest = objcclass;
+  NSMutableURLRequest = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSURLREQUEST_PAS_C}
+{$define NSURLREQUEST_PAS_C}
+
+{ NSURLRequest }
+  NSURLRequest = objcclass(NSObject, NSCodingProtocol, NSCopyingProtocol, NSMutableCopyingProtocol)
+  private
+    __internal: NSURLRequestInternal;
+    
+  public
+    class function alloc: NSURLRequest; message 'alloc';
+
+    class function requestWithURL(URL_: NSURL): id; message 'requestWithURL:';
+    class function requestWithURL_cachePolicy_timeoutInterval(URL_: NSURL; cachePolicy_: NSURLRequestCachePolicy; timeoutInterval_: NSTimeInterval): id; message 'requestWithURL:cachePolicy:timeoutInterval:';
+    function initWithURL(URL_: NSURL): id; message 'initWithURL:';
+    function initWithURL_cachePolicy_timeoutInterval(URL_: NSURL; cachePolicy_: NSURLRequestCachePolicy; timeoutInterval_: NSTimeInterval): id; message 'initWithURL:cachePolicy:timeoutInterval:';
+    function URL: NSURL; message 'URL';
+    function cachePolicy: NSURLRequestCachePolicy; message 'cachePolicy';
+    function timeoutInterval: NSTimeInterval; message 'timeoutInterval';
+    function mainDocumentURL: NSURL; message 'mainDocumentURL';
+
+    { Category: NSHTTPURLRequest }
+    function HTTPMethod: NSString; message 'HTTPMethod';
+    function allHTTPHeaderFields: NSDictionary; message 'allHTTPHeaderFields';
+    function valueForHTTPHeaderField(field: NSString): NSString; message 'valueForHTTPHeaderField:';
+    function HTTPBody: NSData; message 'HTTPBody';
+    function HTTPBodyStream: NSInputStream; message 'HTTPBodyStream';
+    function HTTPShouldHandleCookies: Boolean; message 'HTTPShouldHandleCookies';
+  end; external;
+
+{ NSMutableURLRequest }
+  NSMutableURLRequest = objcclass(NSURLRequest)
+    
+  public
+    class function alloc: NSMutableURLRequest; message 'alloc';
+
+    procedure setURL(URL_: NSURL); message 'setURL:';
+    procedure setCachePolicy(policy: NSURLRequestCachePolicy); message 'setCachePolicy:';
+    procedure setTimeoutInterval(seconds: NSTimeInterval); message 'setTimeoutInterval:';
+    procedure setMainDocumentURL(URL_: NSURL); message 'setMainDocumentURL:';
+
+    { Category: NSMutableHTTPURLRequest }
+    procedure setHTTPMethod(method: NSString); message 'setHTTPMethod:';
+    procedure setAllHTTPHeaderFields(headerFields: NSDictionary); message 'setAllHTTPHeaderFields:';
+    procedure setValue_forHTTPHeaderField(value: NSString; field: NSString); message 'setValue:forHTTPHeaderField:';
+    procedure addValue_forHTTPHeaderField(value: NSString; field: NSString); message 'addValue:forHTTPHeaderField:';
+    procedure setHTTPBody(data: NSData); message 'setHTTPBody:';
+    procedure setHTTPBodyStream(inputStream: NSInputStream); message 'setHTTPBodyStream:';
+    procedure setHTTPShouldHandleCookies(should: Boolean); message 'setHTTPShouldHandleCookies:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSURLResponse.inc b/packages/cocoaint/src/foundation/NSURLResponse.inc
new file mode 100644
index 0000000000..d20a433895
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSURLResponse.inc
@@ -0,0 +1,82 @@
+{ Parsed from Foundation.framework NSURLResponse.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSURLRESPONSE_PAS_H}
+{$define NSURLRESPONSE_PAS_H}
+type
+  NSURLResponsePointer = Pointer;
+  NSHTTPURLResponsePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSURLRESPONSE_PAS_T}
+{$define NSURLRESPONSE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSURLRESPONSE_PAS_R}
+{$define NSURLRESPONSE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSURLRESPONSE_PAS_F}
+{$define NSURLRESPONSE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSURLRESPONSE_PAS_T}
+{$define NSURLRESPONSE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSURLResponse = objcclass;
+  NSHTTPURLResponse = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSURLRESPONSE_PAS_C}
+{$define NSURLRESPONSE_PAS_C}
+
+{ NSURLResponse }
+  NSURLResponse = objcclass(NSObject, NSCodingProtocol, NSCopyingProtocol)
+  private
+    __internal: NSURLResponseInternal;
+    
+  public
+    class function alloc: NSURLResponse; message 'alloc';
+
+    function initWithURL_MIMEType_expectedContentLength_textEncodingName(URL_: NSURL; MIMEType_: NSString; length: clong; name: NSString): id; message 'initWithURL:MIMEType:expectedContentLength:textEncodingName:';
+    function URL: NSURL; message 'URL';
+    function MIMEType: NSString; message 'MIMEType';
+    function expectedContentLength: clonglong; message 'expectedContentLength';
+    function textEncodingName: NSString; message 'textEncodingName';
+    function suggestedFilename: NSString; message 'suggestedFilename';
+  end; external;
+
+{ NSHTTPURLResponse }
+  NSHTTPURLResponse = objcclass(NSURLResponse)
+  private
+    __httpInternal: NSHTTPURLResponseInternal;
+    
+  public
+    class function alloc: NSHTTPURLResponse; message 'alloc';
+
+    function statusCode: clong; message 'statusCode';
+    function allHeaderFields: NSDictionary; message 'allHeaderFields';
+    class function localizedStringForStatusCode(statusCode_: clong): NSString; message 'localizedStringForStatusCode:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSUndoManager.inc b/packages/cocoaint/src/foundation/NSUndoManager.inc
new file mode 100644
index 0000000000..9e0d331292
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSUndoManager.inc
@@ -0,0 +1,121 @@
+{ Parsed from Foundation.framework NSUndoManager.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSUNDOMANAGER_PAS_H}
+{$define NSUNDOMANAGER_PAS_H}
+type
+  NSUndoManagerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSUNDOMANAGER_PAS_T}
+{$define NSUNDOMANAGER_PAS_T}
+
+{ Constants }
+
+const
+  NSUndoCloseGroupingRunLoopOrdering = 350000;
+
+{ CFString constants }
+var
+  NSUndoManagerCheckpointNotification: CFStringRef; external name '_NSUndoManagerCheckpointNotification';
+  NSUndoManagerWillUndoChangeNotification: CFStringRef; external name '_NSUndoManagerWillUndoChangeNotification';
+  NSUndoManagerWillRedoChangeNotification: CFStringRef; external name '_NSUndoManagerWillRedoChangeNotification';
+  NSUndoManagerDidUndoChangeNotification: CFStringRef; external name '_NSUndoManagerDidUndoChangeNotification';
+  NSUndoManagerDidRedoChangeNotification: CFStringRef; external name '_NSUndoManagerDidRedoChangeNotification';
+  NSUndoManagerDidOpenUndoGroupNotification: CFStringRef; external name '_NSUndoManagerDidOpenUndoGroupNotification';
+  NSUndoManagerWillCloseUndoGroupNotification: CFStringRef; external name '_NSUndoManagerWillCloseUndoGroupNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSUNDOMANAGER_PAS_R}
+{$define NSUNDOMANAGER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSUNDOMANAGER_PAS_F}
+{$define NSUNDOMANAGER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSUNDOMANAGER_PAS_T}
+{$define NSUNDOMANAGER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSUndoManager = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSUNDOMANAGER_PAS_C}
+{$define NSUNDOMANAGER_PAS_C}
+
+{ NSUndoManager }
+  NSUndoManager = objcclass(NSObject)
+  private
+    __undoStack: id;
+    __redoStack: id;
+    __runLoopModes: NSArray;
+    __disabled: clong;
+    __flags: bitpacked record
+        undoing: 0..1;
+        redoing: 0..1;
+        registeredForCallback: 0..1;
+        postingCheckpointNotification: 0..1;
+        groupsByEvent: 0..1;
+        reserved: 0..((1 shl 27)-1);
+      end;
+    __target: id;
+    __NSUndoManagerReserved1: Pointer;
+    __NSUndoManagerReserved2: Pointer;
+    __NSUndoManagerReserved3: Pointer;
+    
+  public
+    class function alloc: NSUndoManager; message 'alloc';
+
+    procedure beginUndoGrouping; message 'beginUndoGrouping';
+    procedure endUndoGrouping; message 'endUndoGrouping';
+    function groupingLevel: clong; message 'groupingLevel';
+    procedure disableUndoRegistration; message 'disableUndoRegistration';
+    procedure enableUndoRegistration; message 'enableUndoRegistration';
+    function isUndoRegistrationEnabled: Boolean; message 'isUndoRegistrationEnabled';
+    function groupsByEvent: Boolean; message 'groupsByEvent';
+    procedure setGroupsByEvent(groupsByEvent_: Boolean); message 'setGroupsByEvent:';
+    procedure setLevelsOfUndo(levels: culong); message 'setLevelsOfUndo:';
+    function levelsOfUndo: culong; message 'levelsOfUndo';
+    procedure setRunLoopModes(runLoopModes_: NSArray); message 'setRunLoopModes:';
+    function runLoopModes: NSArray; message 'runLoopModes';
+    procedure undo; message 'undo';
+    procedure redo; message 'redo';
+    procedure undoNestedGroup; message 'undoNestedGroup';
+    function canUndo: Boolean; message 'canUndo';
+    function canRedo: Boolean; message 'canRedo';
+    function isUndoing: Boolean; message 'isUndoing';
+    function isRedoing: Boolean; message 'isRedoing';
+    procedure removeAllActions; message 'removeAllActions';
+    procedure removeAllActionsWithTarget(target: id); message 'removeAllActionsWithTarget:';
+    procedure registerUndoWithTarget_selector_object(target: id; selector: SEL; anObject: id); message 'registerUndoWithTarget:selector:object:';
+    function prepareWithInvocationTarget(target: id): id; message 'prepareWithInvocationTarget:';
+    function undoActionName: NSString; message 'undoActionName';
+    function redoActionName: NSString; message 'redoActionName';
+    procedure setActionName(actionName: NSString); message 'setActionName:';
+    function undoMenuItemTitle: NSString; message 'undoMenuItemTitle';
+    function redoMenuItemTitle: NSString; message 'redoMenuItemTitle';
+    function undoMenuTitleForUndoActionName(actionName: NSString): NSString; message 'undoMenuTitleForUndoActionName:';
+    function redoMenuTitleForUndoActionName(actionName: NSString): NSString; message 'redoMenuTitleForUndoActionName:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSUserDefaults.inc b/packages/cocoaint/src/foundation/NSUserDefaults.inc
new file mode 100644
index 0000000000..47099d5240
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSUserDefaults.inc
@@ -0,0 +1,104 @@
+{ Parsed from Foundation.framework NSUserDefaults.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSUSERDEFAULTS_PAS_H}
+{$define NSUSERDEFAULTS_PAS_H}
+type
+  NSUserDefaultsPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSUSERDEFAULTS_PAS_T}
+{$define NSUSERDEFAULTS_PAS_T}
+
+{ CFString constants }
+var
+  NSGlobalDomain: CFStringRef; external name '_NSGlobalDomain';
+  NSArgumentDomain: CFStringRef; external name '_NSArgumentDomain';
+  NSRegistrationDomain: CFStringRef; external name '_NSRegistrationDomain';
+  NSUserDefaultsDidChangeNotification: CFStringRef; external name '_NSUserDefaultsDidChangeNotification';
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSUSERDEFAULTS_PAS_R}
+{$define NSUSERDEFAULTS_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSUSERDEFAULTS_PAS_F}
+{$define NSUSERDEFAULTS_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSUSERDEFAULTS_PAS_T}
+{$define NSUSERDEFAULTS_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSUserDefaults = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSUSERDEFAULTS_PAS_C}
+{$define NSUSERDEFAULTS_PAS_C}
+
+{ NSUserDefaults }
+  NSUserDefaults = objcclass(NSObject)
+  private
+    __private: id;
+    __reserved: Pointer;
+    
+  public
+    class function alloc: NSUserDefaults; message 'alloc';
+
+    class function standardUserDefaults: NSUserDefaults; message 'standardUserDefaults';
+    class procedure resetStandardUserDefaults; message 'resetStandardUserDefaults';
+    function init: id; message 'init';
+    function initWithUser(username: NSString): id; message 'initWithUser:';
+    function objectForKey(defaultName: NSString): id; message 'objectForKey:';
+    procedure setObject_forKey(value: id; defaultName: NSString); message 'setObject:forKey:';
+    procedure removeObjectForKey(defaultName: NSString); message 'removeObjectForKey:';
+    function stringForKey(defaultName: NSString): NSString; message 'stringForKey:';
+    function arrayForKey(defaultName: NSString): NSArray; message 'arrayForKey:';
+    function dictionaryForKey(defaultName: NSString): NSDictionary; message 'dictionaryForKey:';
+    function dataForKey(defaultName: NSString): NSData; message 'dataForKey:';
+    function stringArrayForKey(defaultName: NSString): NSArray; message 'stringArrayForKey:';
+    function integerForKey(defaultName: NSString): clong; message 'integerForKey:';
+    function floatForKey(defaultName: NSString): single; message 'floatForKey:';
+    function doubleForKey(defaultName: NSString): double; message 'doubleForKey:';
+    function boolForKey(defaultName: NSString): Boolean; message 'boolForKey:';
+    procedure setInteger_forKey(value: clong; defaultName: NSString); message 'setInteger:forKey:';
+    procedure setFloat_forKey(value: single; defaultName: NSString); message 'setFloat:forKey:';
+    procedure setDouble_forKey(value: double; defaultName: NSString); message 'setDouble:forKey:';
+    procedure setBool_forKey(value: Boolean; defaultName: NSString); message 'setBool:forKey:';
+    procedure registerDefaults(registrationDictionary: NSDictionary); message 'registerDefaults:';
+    procedure addSuiteNamed(suiteName: NSString); message 'addSuiteNamed:';
+    procedure removeSuiteNamed(suiteName: NSString); message 'removeSuiteNamed:';
+    function dictionaryRepresentation: NSDictionary; message 'dictionaryRepresentation';
+    function volatileDomainNames: NSArray; message 'volatileDomainNames';
+    function volatileDomainForName(domainName: NSString): NSDictionary; message 'volatileDomainForName:';
+    procedure setVolatileDomain_forName(domain: NSDictionary; domainName: NSString); message 'setVolatileDomain:forName:';
+    procedure removeVolatileDomainForName(domainName: NSString); message 'removeVolatileDomainForName:';
+    function persistentDomainNames: NSArray; message 'persistentDomainNames';
+    function persistentDomainForName(domainName: NSString): NSDictionary; message 'persistentDomainForName:';
+    procedure setPersistentDomain_forName(domain: NSDictionary; domainName: NSString); message 'setPersistentDomain:forName:';
+    procedure removePersistentDomainForName(domainName: NSString); message 'removePersistentDomainForName:';
+    function synchronize: Boolean; message 'synchronize';
+    function objectIsForcedForKey(key: NSString): Boolean; message 'objectIsForcedForKey:';
+    function objectIsForcedForKey_inDomain(key: NSString; domain: NSString): Boolean; message 'objectIsForcedForKey:inDomain:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSValue.inc b/packages/cocoaint/src/foundation/NSValue.inc
new file mode 100644
index 0000000000..97a80854ac
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSValue.inc
@@ -0,0 +1,137 @@
+{ Parsed from Foundation.framework NSValue.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSVALUE_PAS_H}
+{$define NSVALUE_PAS_H}
+type
+  NSValuePointer = Pointer;
+  NSNumberPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSVALUE_PAS_T}
+{$define NSVALUE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSVALUE_PAS_R}
+{$define NSVALUE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSVALUE_PAS_F}
+{$define NSVALUE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSVALUE_PAS_T}
+{$define NSVALUE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSValue = objcclass;
+  NSNumber = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSVALUE_PAS_C}
+{$define NSVALUE_PAS_C}
+
+{ NSValue }
+  NSValue = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+    
+  public
+    class function alloc: NSValue; message 'alloc';
+
+    procedure getValue(value: Pointer); message 'getValue:';
+    function objCType: char; message 'objCType';
+
+    { Category: NSValueCreation }
+    function initWithBytes_objCType(value: Pointer; type_: PChar): id; message 'initWithBytes:objCType:';
+    class function valueWithBytes_objCType(value: Pointer; type_: PChar): NSValue; message 'valueWithBytes:objCType:';
+    class function value_withObjCType(value: Pointer; type_: PChar): NSValue; message 'value:withObjCType:';
+
+    { Category: NSValueExtensionMethods }
+    class function valueWithNonretainedObject(anObject: id): NSValue; message 'valueWithNonretainedObject:';
+    function nonretainedObjectValue: id; message 'nonretainedObjectValue';
+    class function valueWithPointer(pointer_: Pointer): NSValue; message 'valueWithPointer:';
+    function pointerValue: Pointer; message 'pointerValue';
+    function isEqualToValue(value: NSValue): Boolean; message 'isEqualToValue:';
+  end; external;
+
+{ NSNumber }
+  NSNumber = objcclass(NSValue)
+    
+  public
+    class function alloc: NSNumber; message 'alloc';
+
+    function charValue: char; message 'charValue';
+    function unsignedCharValue: char; message 'unsignedCharValue';
+    function shortValue: cshort; message 'shortValue';
+    function unsignedShortValue: cushort; message 'unsignedShortValue';
+    function intValue: cint; message 'intValue';
+    function unsignedIntValue: cuint; message 'unsignedIntValue';
+    function longValue: clong; message 'longValue';
+    function unsignedLongValue: culong; message 'unsignedLongValue';
+    function longLongValue: clonglong; message 'longLongValue';
+    function unsignedLongLongValue: culonglong; message 'unsignedLongLongValue';
+    function floatValue: single; message 'floatValue';
+    function doubleValue: double; message 'doubleValue';
+    function boolValue: Boolean; message 'boolValue';
+    function integerValue: clong; message 'integerValue';
+    function unsignedIntegerValue: culong; message 'unsignedIntegerValue';
+    function stringValue: NSString; message 'stringValue';
+    function compare(otherNumber: NSNumber): NSComparisonResult; message 'compare:';
+    function isEqualToNumber(number: NSNumber): Boolean; message 'isEqualToNumber:';
+    function descriptionWithLocale(locale: id): NSString; message 'descriptionWithLocale:';
+
+    { Category: NSNumberCreation }
+    function initWithChar(value: char_): id; message 'initWithChar:';
+    function initWithUnsignedChar(value: char_): id; message 'initWithUnsignedChar:';
+    function initWithShort(value: cshort): id; message 'initWithShort:';
+    function initWithUnsignedShort(value: cushort): id; message 'initWithUnsignedShort:';
+    function initWithInt(value: cint): id; message 'initWithInt:';
+    function initWithUnsignedInt(value: cuint): id; message 'initWithUnsignedInt:';
+    function initWithLong(value: clong): id; message 'initWithLong:';
+    function initWithUnsignedLong(value: culong): id; message 'initWithUnsignedLong:';
+    function initWithLongLong(value: clonglong): id; message 'initWithLongLong:';
+    function initWithUnsignedLongLong(value: culonglong): id; message 'initWithUnsignedLongLong:';
+    function initWithFloat(value: single): id; message 'initWithFloat:';
+    function initWithDouble(value: double): id; message 'initWithDouble:';
+    function initWithBool(value: Boolean): id; message 'initWithBool:';
+    function initWithInteger(value: clong): id; message 'initWithInteger:';
+    function initWithUnsignedInteger(value: culong): id; message 'initWithUnsignedInteger:';
+    class function numberWithChar(value: char_): NSNumber; message 'numberWithChar:';
+    class function numberWithUnsignedChar(value: char_): NSNumber; message 'numberWithUnsignedChar:';
+    class function numberWithShort(value: cshort): NSNumber; message 'numberWithShort:';
+    class function numberWithUnsignedShort(value: cushort): NSNumber; message 'numberWithUnsignedShort:';
+    class function numberWithInt(value: cint): NSNumber; message 'numberWithInt:';
+    class function numberWithUnsignedInt(value: cuint): NSNumber; message 'numberWithUnsignedInt:';
+    class function numberWithLong(value: clong): NSNumber; message 'numberWithLong:';
+    class function numberWithUnsignedLong(value: culong): NSNumber; message 'numberWithUnsignedLong:';
+    class function numberWithLongLong(value: clonglong): NSNumber; message 'numberWithLongLong:';
+    class function numberWithUnsignedLongLong(value: culonglong): NSNumber; message 'numberWithUnsignedLongLong:';
+    class function numberWithFloat(value: single): NSNumber; message 'numberWithFloat:';
+    class function numberWithDouble(value: double): NSNumber; message 'numberWithDouble:';
+    class function numberWithBool(value: Boolean): NSNumber; message 'numberWithBool:';
+    class function numberWithInteger(value: clong): NSNumber; message 'numberWithInteger:';
+    class function numberWithUnsignedInteger(value: culong): NSNumber; message 'numberWithUnsignedInteger:';
+
+    { Category: NSDecimalNumberExtensions }
+    function decimalValue: NSDecimal; message 'decimalValue';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSValueTransformer.inc b/packages/cocoaint/src/foundation/NSValueTransformer.inc
new file mode 100644
index 0000000000..1b244f7818
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSValueTransformer.inc
@@ -0,0 +1,66 @@
+{ Parsed from Foundation.framework NSValueTransformer.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSVALUETRANSFORMER_PAS_H}
+{$define NSVALUETRANSFORMER_PAS_H}
+type
+  NSValueTransformerPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSVALUETRANSFORMER_PAS_T}
+{$define NSVALUETRANSFORMER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSVALUETRANSFORMER_PAS_R}
+{$define NSVALUETRANSFORMER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSVALUETRANSFORMER_PAS_F}
+{$define NSVALUETRANSFORMER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSVALUETRANSFORMER_PAS_T}
+{$define NSVALUETRANSFORMER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSValueTransformer = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSVALUETRANSFORMER_PAS_C}
+{$define NSVALUETRANSFORMER_PAS_C}
+
+{ NSValueTransformer }
+  NSValueTransformer = objcclass(NSObject)
+    
+  public
+    class function alloc: NSValueTransformer; message 'alloc';
+
+    class procedure setValueTransformer_forName(transformer: NSValueTransformer; name: NSString); message 'setValueTransformer:forName:';
+    class function valueTransformerForName(name: NSString): NSValueTransformer; message 'valueTransformerForName:';
+    class function valueTransformerNames: NSArray; message 'valueTransformerNames';
+    class function transformedValueClass: Pobjc_class; message 'transformedValueClass';
+    class function allowsReverseTransformation: Boolean; message 'allowsReverseTransformation';
+    function transformedValue(value: id): id; message 'transformedValue:';
+    function reverseTransformedValue(value: id): id; message 'reverseTransformedValue:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSXMLDTD.inc b/packages/cocoaint/src/foundation/NSXMLDTD.inc
new file mode 100644
index 0000000000..16832bac2a
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSXMLDTD.inc
@@ -0,0 +1,90 @@
+{ Parsed from Foundation.framework NSXMLDTD.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSXMLDTD_PAS_H}
+{$define NSXMLDTD_PAS_H}
+type
+  NSXMLDTDPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSXMLDTD_PAS_T}
+{$define NSXMLDTD_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSXMLDTD_PAS_R}
+{$define NSXMLDTD_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSXMLDTD_PAS_F}
+{$define NSXMLDTD_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSXMLDTD_PAS_T}
+{$define NSXMLDTD_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSXMLDTD = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSXMLDTD_PAS_C}
+{$define NSXMLDTD_PAS_C}
+
+{ NSXMLDTD }
+  NSXMLDTD = objcclass(NSXMLNode)
+  private
+    __name: NSString;
+    __publicID: NSString;
+    __systemID: NSString;
+    __children: NSArray;
+    __childrenHaveMutated: Boolean;
+    __padding3: byte;
+    __entities: NSMutableDictionary;
+    __elements: NSMutableDictionary;
+    __notations: NSMutableDictionary;
+    __attributes: NSMutableDictionary;
+    __original: NSString;
+    __modified: Boolean;
+    __padding2: byte;
+    
+  public
+    class function alloc: NSXMLDTD; message 'alloc';
+
+    function initWithContentsOfURL_options_error(url: NSURL; mask: culong; var error: NSError): id; message 'initWithContentsOfURL:options:error:';
+    function initWithData_options_error(data: NSData; mask: culong; var error: NSError): id; message 'initWithData:options:error:';
+    procedure setPublicID(publicID_: NSString); message 'setPublicID:';
+    function publicID: NSString; message 'publicID';
+    procedure setSystemID(systemID_: NSString); message 'setSystemID:';
+    function systemID: NSString; message 'systemID';
+    procedure insertChild_atIndex(child: NSXMLNode; index_: culong); message 'insertChild:atIndex:';
+    procedure insertChildren_atIndex(children_: NSArray; index_: culong); message 'insertChildren:atIndex:';
+    procedure removeChildAtIndex(index_: culong); message 'removeChildAtIndex:';
+    procedure setChildren(children_: NSArray); message 'setChildren:';
+    procedure addChild(child: NSXMLNode); message 'addChild:';
+    procedure replaceChildAtIndex_withNode(index_: culong; node: NSXMLNode); message 'replaceChildAtIndex:withNode:';
+    function entityDeclarationForName(name_: NSString): NSXMLDTDNode; message 'entityDeclarationForName:';
+    function notationDeclarationForName(name_: NSString): NSXMLDTDNode; message 'notationDeclarationForName:';
+    function elementDeclarationForName(name_: NSString): NSXMLDTDNode; message 'elementDeclarationForName:';
+    function attributeDeclarationForName_elementName(name_: NSString; elementName: NSString): NSXMLDTDNode; message 'attributeDeclarationForName:elementName:';
+    class function predefinedEntityDeclarationForName(name_: NSString): NSXMLDTDNode; message 'predefinedEntityDeclarationForName:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSXMLDTDNode.inc b/packages/cocoaint/src/foundation/NSXMLDTDNode.inc
new file mode 100644
index 0000000000..6d59fcfa24
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSXMLDTDNode.inc
@@ -0,0 +1,103 @@
+{ Parsed from Foundation.framework NSXMLDTDNode.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSXMLDTDNODE_PAS_H}
+{$define NSXMLDTDNODE_PAS_H}
+type
+  NSXMLDTDNodePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSXMLDTDNODE_PAS_T}
+{$define NSXMLDTDNODE_PAS_T}
+
+{ Constants }
+
+const
+  NSXMLEntityGeneralKind = 1;
+  NSXMLEntityParsedKind = 0;
+  NSXMLEntityUnparsedKind = 1;
+  NSXMLEntityParameterKind = 2;
+  NSXMLEntityPredefined = 3;
+  NSXMLAttributeCDATAKind = 4;
+  NSXMLAttributeIDKind = 5;
+  NSXMLAttributeIDRefKind = 6;
+  NSXMLAttributeIDRefsKind = 7;
+  NSXMLAttributeEntityKind = 8;
+  NSXMLAttributeEntitiesKind = 9;
+  NSXMLAttributeNMTokenKind = 10;
+  NSXMLAttributeNMTokensKind = 11;
+  NSXMLAttributeEnumerationKind = 12;
+  NSXMLAttributeNotationKind = 13;
+  NSXMLElementDeclarationUndefinedKind = 14;
+  NSXMLElementDeclarationEmptyKind = 15;
+  NSXMLElementDeclarationAnyKind = 16;
+  NSXMLElementDeclarationMixedKind = 17;
+  NSXMLElementDeclarationElementKind = 18;
+
+{ Types }
+type
+  NSXMLDTDNodeKind = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSXMLDTDNODE_PAS_R}
+{$define NSXMLDTDNODE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSXMLDTDNODE_PAS_F}
+{$define NSXMLDTDNODE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSXMLDTDNODE_PAS_T}
+{$define NSXMLDTDNODE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSXMLDTDNode = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSXMLDTDNODE_PAS_C}
+{$define NSXMLDTDNODE_PAS_C}
+
+{ NSXMLDTDNode }
+  NSXMLDTDNode = objcclass(NSXMLNode)
+  private
+    __DTDKind: NSXMLDTDNodeKind;
+    __name: NSString;
+    __notationName: NSString;
+    __publicID: NSString;
+    __systemID: NSString;
+    
+  public
+    class function alloc: NSXMLDTDNode; message 'alloc';
+
+    function initWithXMLString(string_: NSString): id; message 'initWithXMLString:';
+    procedure setDTDKind(kind_: NSXMLDTDNodeKind); message 'setDTDKind:';
+    function DTDKind: NSXMLDTDNodeKind; message 'DTDKind';
+    function isExternal: Boolean; message 'isExternal';
+    procedure setPublicID(publicID_: NSString); message 'setPublicID:';
+    function publicID: NSString; message 'publicID';
+    procedure setSystemID(systemID_: NSString); message 'setSystemID:';
+    function systemID: NSString; message 'systemID';
+    procedure setNotationName(notationName_: NSString); message 'setNotationName:';
+    function notationName: NSString; message 'notationName';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSXMLDocument.inc b/packages/cocoaint/src/foundation/NSXMLDocument.inc
new file mode 100644
index 0000000000..afb4763ce9
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSXMLDocument.inc
@@ -0,0 +1,115 @@
+{ Parsed from Foundation.framework NSXMLDocument.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSXMLDOCUMENT_PAS_H}
+{$define NSXMLDOCUMENT_PAS_H}
+type
+  NSXMLDocumentPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSXMLDOCUMENT_PAS_T}
+{$define NSXMLDOCUMENT_PAS_T}
+
+{ Constants }
+
+const
+  NSXMLDocumentXMLKind = 0;
+  NSXMLDocumentXHTMLKind = 0;
+  NSXMLDocumentHTMLKind = 1;
+  NSXMLDocumentTextKind = 2;
+
+{ Types }
+type
+  NSXMLDocumentContentKind = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSXMLDOCUMENT_PAS_R}
+{$define NSXMLDOCUMENT_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSXMLDOCUMENT_PAS_F}
+{$define NSXMLDOCUMENT_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSXMLDOCUMENT_PAS_T}
+{$define NSXMLDOCUMENT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSXMLDocument = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSXMLDOCUMENT_PAS_C}
+{$define NSXMLDOCUMENT_PAS_C}
+
+{ NSXMLDocument }
+  NSXMLDocument = objcclass(NSXMLNode)
+  private
+    __encoding: NSString;
+    __version: NSString;
+    __docType: NSXMLDTD;
+    __children: NSArray;
+    __childrenHaveMutated: Boolean;
+    __standalone: Boolean;
+    __padding3: byte;
+    __rootElement: NSXMLElement;
+    __URI: NSString;
+    __MIMEType: NSString;
+    __fidelityMask: culong;
+    __contentKind: NSXMLDocumentContentKind;
+    
+  public
+    class function alloc: NSXMLDocument; message 'alloc';
+
+    function initWithXMLString_options_error(string_: NSString; mask: culong; var error: NSError): id; message 'initWithXMLString:options:error:';
+    function initWithContentsOfURL_options_error(url: NSURL; mask: culong; var error: NSError): id; message 'initWithContentsOfURL:options:error:';
+    function initWithData_options_error(data: NSData; mask: culong; var error: NSError): id; message 'initWithData:options:error:';
+    function initWithRootElement(element: NSXMLElement): id; message 'initWithRootElement:';
+    class function replacementClassForClass(cls: Pobjc_class): Pobjc_class; message 'replacementClassForClass:';
+    procedure setCharacterEncoding(encoding: NSString); message 'setCharacterEncoding:';
+    function characterEncoding: NSString; message 'characterEncoding';
+    procedure setVersion(version_: NSString); message 'setVersion:';
+    function version: NSString; message 'version';
+    procedure setStandalone(standalone: Boolean); message 'setStandalone:';
+    function isStandalone: Boolean; message 'isStandalone';
+    procedure setDocumentContentKind(kind_: NSXMLDocumentContentKind); message 'setDocumentContentKind:';
+    function documentContentKind: NSXMLDocumentContentKind; message 'documentContentKind';
+    procedure setMIMEType(MIMEType_: NSString); message 'setMIMEType:';
+    function MIMEType: NSString; message 'MIMEType';
+    procedure setDTD(documentTypeDeclaration: NSXMLDTD); message 'setDTD:';
+    function DTD: NSXMLDTD; message 'DTD';
+    procedure setRootElement(root: NSXMLNode); message 'setRootElement:';
+    function rootElement: NSXMLElement; message 'rootElement';
+    procedure insertChild_atIndex(child: NSXMLNode; index_: culong); message 'insertChild:atIndex:';
+    procedure insertChildren_atIndex(children_: NSArray; index_: culong); message 'insertChildren:atIndex:';
+    procedure removeChildAtIndex(index_: culong); message 'removeChildAtIndex:';
+    procedure setChildren(children_: NSArray); message 'setChildren:';
+    procedure addChild(child: NSXMLNode); message 'addChild:';
+    procedure replaceChildAtIndex_withNode(index_: culong; node: NSXMLNode); message 'replaceChildAtIndex:withNode:';
+    function XMLData: NSData; message 'XMLData';
+    function XMLDataWithOptions(options: culong): NSData; message 'XMLDataWithOptions:';
+    function objectByApplyingXSLT_arguments_error(xslt: NSData; arguments: NSDictionary; var error: NSError): id; message 'objectByApplyingXSLT:arguments:error:';
+    function objectByApplyingXSLTString_arguments_error(xslt: NSString; arguments: NSDictionary; var error: NSError): id; message 'objectByApplyingXSLTString:arguments:error:';
+    function objectByApplyingXSLTAtURL_arguments_error(xsltURL: NSURL; argument: NSDictionary; var error: NSError): id; message 'objectByApplyingXSLTAtURL:arguments:error:';
+    function validateAndReturnError(var error: NSError): Boolean; message 'validateAndReturnError:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSXMLElement.inc b/packages/cocoaint/src/foundation/NSXMLElement.inc
new file mode 100644
index 0000000000..2a74633b04
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSXMLElement.inc
@@ -0,0 +1,95 @@
+{ Parsed from Foundation.framework NSXMLElement.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSXMLELEMENT_PAS_H}
+{$define NSXMLELEMENT_PAS_H}
+type
+  NSXMLElementPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSXMLELEMENT_PAS_T}
+{$define NSXMLELEMENT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSXMLELEMENT_PAS_R}
+{$define NSXMLELEMENT_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSXMLELEMENT_PAS_F}
+{$define NSXMLELEMENT_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSXMLELEMENT_PAS_T}
+{$define NSXMLELEMENT_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSXMLElement = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSXMLELEMENT_PAS_C}
+{$define NSXMLELEMENT_PAS_C}
+
+{ NSXMLElement }
+  NSXMLElement = objcclass(NSXMLNode)
+  private
+    __name: NSString;
+    __attributes: NSMutableArray;
+    __namespaces: NSMutableArray;
+    __children: NSArray;
+    __childrenHaveMutated: Boolean;
+    __padding3: byte;
+    __URI: NSString;
+    __prefixIndex: clong;
+    
+  public
+    class function alloc: NSXMLElement; message 'alloc';
+
+    function initWithName(name_: NSString): id; message 'initWithName:';
+    function initWithName_URI(name_: NSString; URI_: NSString): id; message 'initWithName:URI:';
+    function initWithName_stringValue(name_: NSString; string_: NSString): id; message 'initWithName:stringValue:';
+    function initWithXMLString_error(string_: NSString; var error: NSError): id; message 'initWithXMLString:error:';
+    function elementsForName(name_: NSString): NSArray; message 'elementsForName:';
+    function elementsForLocalName_URI(localName_: NSString; URI_: NSString): NSArray; message 'elementsForLocalName:URI:';
+    procedure addAttribute(attribute: NSXMLNode); message 'addAttribute:';
+    procedure removeAttributeForName(name_: NSString); message 'removeAttributeForName:';
+    procedure setAttributes(attributes_: NSArray); message 'setAttributes:';
+    procedure setAttributesAsDictionary(attributes_: NSDictionary); message 'setAttributesAsDictionary:';
+    function attributes: NSArray; message 'attributes';
+    function attributeForName(name_: NSString): NSXMLNode; message 'attributeForName:';
+    function attributeForLocalName_URI(localName_: NSString; URI_: NSString): NSXMLNode; message 'attributeForLocalName:URI:';
+    procedure addNamespace(aNamespace: NSXMLNode); message 'addNamespace:';
+    procedure removeNamespaceForPrefix(name_: NSString); message 'removeNamespaceForPrefix:';
+    procedure setNamespaces(namespaces_: NSArray); message 'setNamespaces:';
+    function namespaces: NSArray; message 'namespaces';
+    function namespaceForPrefix(name_: NSString): NSXMLNode; message 'namespaceForPrefix:';
+    function resolveNamespaceForName(name_: NSString): NSXMLNode; message 'resolveNamespaceForName:';
+    function resolvePrefixForNamespaceURI(namespaceURI: NSString): NSString; message 'resolvePrefixForNamespaceURI:';
+    procedure insertChild_atIndex(child: NSXMLNode; index_: culong); message 'insertChild:atIndex:';
+    procedure insertChildren_atIndex(children_: NSArray; index_: culong); message 'insertChildren:atIndex:';
+    procedure removeChildAtIndex(index_: culong); message 'removeChildAtIndex:';
+    procedure setChildren(children_: NSArray); message 'setChildren:';
+    procedure addChild(child: NSXMLNode); message 'addChild:';
+    procedure replaceChildAtIndex_withNode(index_: culong; node: NSXMLNode); message 'replaceChildAtIndex:withNode:';
+    procedure normalizeAdjacentTextNodesPreservingCDATA(preserve: Boolean); message 'normalizeAdjacentTextNodesPreservingCDATA:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSXMLNode.inc b/packages/cocoaint/src/foundation/NSXMLNode.inc
new file mode 100644
index 0000000000..5a5cc5873d
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSXMLNode.inc
@@ -0,0 +1,135 @@
+{ Parsed from Foundation.framework NSXMLNode.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSXMLNODE_PAS_H}
+{$define NSXMLNODE_PAS_H}
+type
+  NSXMLNodePointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSXMLNODE_PAS_T}
+{$define NSXMLNODE_PAS_T}
+
+{ Constants }
+
+const
+  NSXMLInvalidKind = 0;
+  NSXMLDocumentKind = 0;
+  NSXMLElementKind = 1;
+  NSXMLAttributeKind = 2;
+  NSXMLNamespaceKind = 3;
+  NSXMLProcessingInstructionKind = 4;
+  NSXMLCommentKind = 5;
+  NSXMLTextKind = 6;
+  NSXMLDTDKind = 7;
+  NSXMLEntityDeclarationKind = 8;
+  NSXMLAttributeDeclarationKind = 9;
+  NSXMLElementDeclarationKind = 10;
+  NSXMLNotationDeclarationKind = 11;
+
+{ Types }
+type
+  NSXMLNodeKind = culong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSXMLNODE_PAS_R}
+{$define NSXMLNODE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSXMLNODE_PAS_F}
+{$define NSXMLNODE_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSXMLNODE_PAS_T}
+{$define NSXMLNODE_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSXMLNode = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSXMLNODE_PAS_C}
+{$define NSXMLNODE_PAS_C}
+
+{ NSXMLNode }
+  NSXMLNode = objcclass(NSObject, NSCopyingProtocol)
+  private
+    __kind: NSXMLNodeKind;
+    __parent: NSXMLNode;
+    __index: culong;
+    __objectValue: id;
+    
+  public
+    class function alloc: NSXMLNode; message 'alloc';
+
+    function initWithKind(kind_: NSXMLNodeKind): id; message 'initWithKind:';
+    function initWithKind_options(kind_: NSXMLNodeKind; options: culong): id; message 'initWithKind:options:';
+    class function document: id; message 'document';
+    class function documentWithRootElement(element: NSXMLElement): id; message 'documentWithRootElement:';
+    class function elementWithName(name_: NSString): id; message 'elementWithName:';
+    class function elementWithName_URI(name_: NSString; URI_: NSString): id; message 'elementWithName:URI:';
+    class function elementWithName_stringValue(name_: NSString; string_: NSString): id; message 'elementWithName:stringValue:';
+    class function elementWithName_children_attributes(name_: NSString; children_: NSArray; attributes: NSArray): id; message 'elementWithName:children:attributes:';
+    class function attributeWithName_stringValue(name_: NSString; stringValue_: NSString): id; message 'attributeWithName:stringValue:';
+    class function attributeWithName_URI_stringValue(name_: NSString; URI_: NSString; stringValue_: NSString): id; message 'attributeWithName:URI:stringValue:';
+    class function namespaceWithName_stringValue(name_: NSString; stringValue_: NSString): id; message 'namespaceWithName:stringValue:';
+    class function processingInstructionWithName_stringValue(name_: NSString; stringValue_: NSString): id; message 'processingInstructionWithName:stringValue:';
+    class function commentWithStringValue(stringValue_: NSString): id; message 'commentWithStringValue:';
+    class function textWithStringValue(stringValue_: NSString): id; message 'textWithStringValue:';
+    class function DTDNodeWithXMLString(string_: NSString): id; message 'DTDNodeWithXMLString:';
+    function kind: NSXMLNodeKind; message 'kind';
+    procedure setName(name_: NSString); message 'setName:';
+    function name: NSString; message 'name';
+    procedure setObjectValue(value: id); message 'setObjectValue:';
+    function objectValue: id; message 'objectValue';
+    procedure setStringValue(string_: NSString); message 'setStringValue:';
+    procedure setStringValue_resolvingEntities(string_: NSString; resolve: Boolean); message 'setStringValue:resolvingEntities:';
+    function stringValue: NSString; message 'stringValue';
+    function index: culong; message 'index';
+    function level: culong; message 'level';
+    function rootDocument: NSXMLDocument; message 'rootDocument';
+    function parent: NSXMLNode; message 'parent';
+    function childCount: culong; message 'childCount';
+    function children: NSArray; message 'children';
+    function childAtIndex(index_: culong): NSXMLNode; message 'childAtIndex:';
+    function previousSibling: NSXMLNode; message 'previousSibling';
+    function nextSibling: NSXMLNode; message 'nextSibling';
+    function previousNode: NSXMLNode; message 'previousNode';
+    function nextNode: NSXMLNode; message 'nextNode';
+    procedure detach; message 'detach';
+    function XPath: NSString; message 'XPath';
+    function localName: NSString; message 'localName';
+    function prefix: NSString; message 'prefix';
+    procedure setURI(URI_: NSString); message 'setURI:';
+    function URI: NSString; message 'URI';
+    class function localNameForName(name_: NSString): NSString; message 'localNameForName:';
+    class function prefixForName(name_: NSString): NSString; message 'prefixForName:';
+    class function predefinedNamespaceForPrefix(name_: NSString): NSXMLNode; message 'predefinedNamespaceForPrefix:';
+    function description: NSString; message 'description';
+    function XMLString: NSString; message 'XMLString';
+    function XMLStringWithOptions(options: culong): NSString; message 'XMLStringWithOptions:';
+    function canonicalXMLStringPreservingComments(comments: Boolean): NSString; message 'canonicalXMLStringPreservingComments:';
+    function nodesForXPath_error(XPath_: NSString; var error: NSError): NSArray; message 'nodesForXPath:error:';
+    function objectsForXQuery_constants_error(xquery: NSString; constants: NSDictionary; var error: NSError): NSArray; message 'objectsForXQuery:constants:error:';
+    function objectsForXQuery_error(xquery: NSString; var error: NSError): NSArray; message 'objectsForXQuery:error:';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSXMLNodeOptions.inc b/packages/cocoaint/src/foundation/NSXMLNodeOptions.inc
new file mode 100644
index 0000000000..5cf7f42ca9
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSXMLNodeOptions.inc
@@ -0,0 +1,55 @@
+{ Parsed from Foundation.framework NSXMLNodeOptions.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSXMLNODEOPTIONS_PAS_T}
+{$define NSXMLNODEOPTIONS_PAS_T}
+
+{ Constants }
+
+const
+  NSXMLNodeOptionsNone = 0;
+  NSXMLNodeIsCDATA = 1  shl  0;
+  NSXMLNodeExpandEmptyElement = 1  shl  1;
+  NSXMLNodeCompactEmptyElement = 1  shl  2;
+  NSXMLNodeUseSingleQuotes = 1  shl  3;
+  NSXMLNodeUseDoubleQuotes = 1  shl  4;
+  NSXMLDocumentTidyHTML = 1  shl  9;
+  NSXMLDocumentTidyXML = 1  shl  10;
+  NSXMLDocumentValidate = 1  shl  13;
+  NSXMLDocumentXInclude = 1  shl  16;
+  NSXMLNodePrettyPrint = 1  shl  17;
+  NSXMLDocumentIncludeContentTypeDeclaration = 1  shl  18;
+  NSXMLNodePreserveNamespaceOrder = 1  shl  20;
+  NSXMLNodePreserveAttributeOrder = 1  shl  21;
+  NSXMLNodePreserveEntities = 1  shl  22;
+  NSXMLNodePreservePrefixes = 1  shl  23;
+  NSXMLNodePreserveCDATA = 1  shl  24;
+  NSXMLNodePreserveWhitespace = 1  shl  25;
+  NSXMLNodePreserveDTD = 1  shl  26;
+  NSXMLNodePreserveCharacterReferences = 1  shl  27;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSXMLNODEOPTIONS_PAS_R}
+{$define NSXMLNODEOPTIONS_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSXMLNODEOPTIONS_PAS_F}
+{$define NSXMLNODEOPTIONS_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSXMLNODEOPTIONS_PAS_T}
+{$define NSXMLNODEOPTIONS_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSXMLParser.inc b/packages/cocoaint/src/foundation/NSXMLParser.inc
new file mode 100644
index 0000000000..8efdf28f7c
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSXMLParser.inc
@@ -0,0 +1,185 @@
+{ Parsed from Foundation.framework NSXMLParser.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+{$ifdef HEADER}
+{$ifndef NSXMLPARSER_PAS_H}
+{$define NSXMLPARSER_PAS_H}
+type
+  NSXMLParserPointer = Pointer;
+
+{$endif}
+{$endif}
+
+{$ifdef TYPES}
+{$ifndef NSXMLPARSER_PAS_T}
+{$define NSXMLPARSER_PAS_T}
+
+{ Constants }
+
+const
+  NSXMLParserInternalError = 1;
+  NSXMLParserOutOfMemoryError = 2;
+  NSXMLParserDocumentStartError = 3;
+  NSXMLParserEmptyDocumentError = 4;
+  NSXMLParserPrematureDocumentEndError = 5;
+  NSXMLParserInvalidHexCharacterRefError = 6;
+  NSXMLParserInvalidDecimalCharacterRefError = 7;
+  NSXMLParserInvalidCharacterRefError = 8;
+  NSXMLParserInvalidCharacterError = 9;
+  NSXMLParserCharacterRefAtEOFError = 10;
+  NSXMLParserCharacterRefInPrologError = 11;
+  NSXMLParserCharacterRefInEpilogError = 12;
+  NSXMLParserCharacterRefInDTDError = 13;
+  NSXMLParserEntityRefAtEOFError = 14;
+  NSXMLParserEntityRefInPrologError = 15;
+  NSXMLParserEntityRefInEpilogError = 16;
+  NSXMLParserEntityRefInDTDError = 17;
+  NSXMLParserParsedEntityRefAtEOFError = 18;
+  NSXMLParserParsedEntityRefInPrologError = 19;
+  NSXMLParserParsedEntityRefInEpilogError = 20;
+  NSXMLParserParsedEntityRefInInternalSubsetError = 21;
+  NSXMLParserEntityReferenceWithoutNameError = 22;
+  NSXMLParserEntityReferenceMissingSemiError = 23;
+  NSXMLParserParsedEntityRefNoNameError = 24;
+  NSXMLParserParsedEntityRefMissingSemiError = 25;
+  NSXMLParserUndeclaredEntityError = 26;
+  NSXMLParserUnparsedEntityError = 28;
+  NSXMLParserEntityIsExternalError = 29;
+  NSXMLParserEntityIsParameterError = 30;
+  NSXMLParserUnknownEncodingError = 31;
+  NSXMLParserEncodingNotSupportedError = 32;
+  NSXMLParserStringNotStartedError = 33;
+  NSXMLParserStringNotClosedError = 34;
+  NSXMLParserNamespaceDeclarationError = 35;
+  NSXMLParserEntityNotStartedError = 36;
+  NSXMLParserEntityNotFinishedError = 37;
+  NSXMLParserLessThanSymbolInAttributeError = 38;
+  NSXMLParserAttributeNotStartedError = 39;
+  NSXMLParserAttributeNotFinishedError = 40;
+  NSXMLParserAttributeHasNoValueError = 41;
+  NSXMLParserAttributeRedefinedError = 42;
+  NSXMLParserLiteralNotStartedError = 43;
+  NSXMLParserLiteralNotFinishedError = 44;
+  NSXMLParserCommentNotFinishedError = 45;
+  NSXMLParserProcessingInstructionNotStartedError = 46;
+  NSXMLParserProcessingInstructionNotFinishedError = 47;
+  NSXMLParserNotationNotStartedError = 48;
+  NSXMLParserNotationNotFinishedError = 49;
+  NSXMLParserAttributeListNotStartedError = 50;
+  NSXMLParserAttributeListNotFinishedError = 51;
+  NSXMLParserMixedContentDeclNotStartedError = 52;
+  NSXMLParserMixedContentDeclNotFinishedError = 53;
+  NSXMLParserElementContentDeclNotStartedError = 54;
+  NSXMLParserElementContentDeclNotFinishedError = 55;
+  NSXMLParserXMLDeclNotStartedError = 56;
+  NSXMLParserXMLDeclNotFinishedError = 57;
+  NSXMLParserConditionalSectionNotStartedError = 58;
+  NSXMLParserConditionalSectionNotFinishedError = 59;
+  NSXMLParserExternalSubsetNotFinishedError = 60;
+  NSXMLParserDOCTYPEDeclNotFinishedError = 61;
+  NSXMLParserMisplacedCDATAEndStringError = 62;
+  NSXMLParserCDATANotFinishedError = 63;
+  NSXMLParserMisplacedXMLDeclarationError = 64;
+  NSXMLParserSpaceRequiredError = 65;
+  NSXMLParserSeparatorRequiredError = 66;
+  NSXMLParserNMTOKENRequiredError = 67;
+  NSXMLParserNAMERequiredError = 68;
+  NSXMLParserPCDATARequiredError = 69;
+  NSXMLParserURIRequiredError = 70;
+  NSXMLParserPublicIdentifierRequiredError = 71;
+  NSXMLParserLTRequiredError = 72;
+  NSXMLParserGTRequiredError = 73;
+  NSXMLParserLTSlashRequiredError = 74;
+  NSXMLParserEqualExpectedError = 75;
+  NSXMLParserTagNameMismatchError = 76;
+  NSXMLParserUnfinishedTagError = 77;
+  NSXMLParserStandaloneValueError = 78;
+  NSXMLParserInvalidEncodingNameError = 79;
+  NSXMLParserCommentContainsDoubleHyphenError = 80;
+  NSXMLParserInvalidEncodingError = 81;
+  NSXMLParserExternalStandaloneEntityError = 82;
+  NSXMLParserInvalidConditionalSectionError = 83;
+  NSXMLParserEntityValueRequiredError = 84;
+  NSXMLParserNotWellBalancedError = 85;
+  NSXMLParserExtraContentError = 86;
+  NSXMLParserInvalidCharacterInEntityError = 87;
+  NSXMLParserParsedEntityRefInInternalError = 88;
+  NSXMLParserEntityRefLoopError = 89;
+  NSXMLParserEntityBoundaryError = 90;
+  NSXMLParserInvalidURIError = 91;
+  NSXMLParserURIFragmentError = 92;
+  NSXMLParserNoDTDError = 94;
+  NSXMLParserDelegateAbortedParseError = 512;
+
+{ Types }
+type
+  NSXMLParserError = clong;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSXMLPARSER_PAS_R}
+{$define NSXMLPARSER_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSXMLPARSER_PAS_F}
+{$define NSXMLPARSER_PAS_F}
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSXMLPARSER_PAS_T}
+{$define NSXMLPARSER_PAS_T}
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+  NSXMLParser = objcclass;
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSXMLPARSER_PAS_C}
+{$define NSXMLPARSER_PAS_C}
+
+{ NSXMLParser }
+  NSXMLParser = objcclass(NSObject)
+  private
+    __parser: Pointer;
+    __delegate: id;
+    __reserved1: id;
+    __reserved2: id;
+    __reserved3: id;
+    
+  public
+    class function alloc: NSXMLParser; message 'alloc';
+
+    function initWithContentsOfURL(url: NSURL): id; message 'initWithContentsOfURL:';
+    function initWithData(data: NSData): id; message 'initWithData:';
+    function delegate: id; message 'delegate';
+    procedure setDelegate(delegate_: id); message 'setDelegate:';
+    procedure setShouldProcessNamespaces(shouldProcessNamespaces_: Boolean); message 'setShouldProcessNamespaces:';
+    procedure setShouldReportNamespacePrefixes(shouldReportNamespacePrefixes_: Boolean); message 'setShouldReportNamespacePrefixes:';
+    procedure setShouldResolveExternalEntities(shouldResolveExternalEntities_: Boolean); message 'setShouldResolveExternalEntities:';
+    function shouldProcessNamespaces: Boolean; message 'shouldProcessNamespaces';
+    function shouldReportNamespacePrefixes: Boolean; message 'shouldReportNamespacePrefixes';
+    function shouldResolveExternalEntities: Boolean; message 'shouldResolveExternalEntities';
+    function parse: Boolean; message 'parse';
+    procedure abortParsing; message 'abortParsing';
+    function parserError: NSError; message 'parserError';
+
+    { Category: NSXMLParserLocatorAdditions }
+    function publicID: NSString; message 'publicID';
+    function systemID: NSString; message 'systemID';
+    function lineNumber: clong; message 'lineNumber';
+    function columnNumber: clong; message 'columnNumber';
+  end; external;
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/src/foundation/NSZone.inc b/packages/cocoaint/src/foundation/NSZone.inc
new file mode 100644
index 0000000000..06cd209067
--- /dev/null
+++ b/packages/cocoaint/src/foundation/NSZone.inc
@@ -0,0 +1,62 @@
+{ Parsed from Foundation.framework NSZone.h }
+{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 15:31:00 ICT 2009 }
+
+
+{$ifdef TYPES}
+{$ifndef NSZONE_PAS_T}
+{$define NSZONE_PAS_T}
+
+{ Types }
+type
+  _NSZone = Pointer;
+  NSZone = _NSZone;
+
+{ Constants }
+
+const
+  NSScannedOption = 1 shl 0;
+  NSCollectorDisabledOption = 1 shl 1;
+
+{$endif}
+{$endif}
+
+{$ifdef RECORDS}
+{$ifndef NSZONE_PAS_R}
+{$define NSZONE_PAS_R}
+
+{$endif}
+{$endif}
+
+{$ifdef FUNCTIONS}
+{$ifndef NSZONE_PAS_F}
+{$define NSZONE_PAS_F}
+
+{ Functions }
+function NSDefaultMallocZone: NSZone; cdecl; external name 'NSDefaultMallocZone';
+function NSCreateZone(startSize: culong; granularity: culong; canFree: Boolean): NSZone; cdecl; external name 'NSCreateZone';
+procedure NSRecycleZone(var zone: NSZone); cdecl; external name 'NSRecycleZone';
+procedure NSSetZoneName(var zone: NSZone; var name: NSString); cdecl; external name 'NSSetZoneName';
+function NSZoneName(var zone: NSZone): NSString; cdecl; external name 'NSZoneName';
+function NSZoneFromPointer(var ptr: Pointer): NSZone; cdecl; external name 'NSZoneFromPointer';
+procedure NSZoneMalloc(var zone: NSZone; size: culong); cdecl; external name 'NSZoneMalloc';
+procedure NSZoneCalloc(var zone: NSZone; numElems: culong; byteSize: culong); cdecl; external name 'NSZoneCalloc';
+procedure NSZoneRealloc(var zone: NSZone; var ptr: Pointer; size: culong); cdecl; external name 'NSZoneRealloc';
+procedure NSZoneFree(var zone: NSZone; var ptr: Pointer); cdecl; external name 'NSZoneFree';
+function NSPageSize: culong; cdecl; external name 'NSPageSize';
+function NSLogPageSize: culong; cdecl; external name 'NSLogPageSize';
+function NSRoundUpToMultipleOfPageSize(bytes: culong): culong; cdecl; external name 'NSRoundUpToMultipleOfPageSize';
+function NSRoundDownToMultipleOfPageSize(bytes: culong): culong; cdecl; external name 'NSRoundDownToMultipleOfPageSize';
+procedure NSAllocateMemoryPages(bytes: culong); cdecl; external name 'NSAllocateMemoryPages';
+procedure NSDeallocateMemoryPages(var ptr: Pointer; bytes: culong); cdecl; external name 'NSDeallocateMemoryPages';
+procedure NSCopyMemoryPages(var source: Pointer; var dest: Pointer; bytes: culong); cdecl; external name 'NSCopyMemoryPages';
+function NSRealMemoryAvailable: culong; cdecl; external name 'NSRealMemoryAvailable';
+
+{$endif}
+{$endif}
+
+{$ifdef EXTERNAL_SYMBOLS}
+{$ifndef NSZONE_PAS_T}
+{$define NSZONE_PAS_T}
+
+{$endif}
+{$endif}
diff --git a/packages/cocoaint/utils/Instructions.txt b/packages/cocoaint/utils/Instructions.txt
new file mode 100644
index 0000000000..5d360966f9
--- /dev/null
+++ b/packages/cocoaint/utils/Instructions.txt
@@ -0,0 +1,33 @@
+Version 0.1: 9/4/2009
+
+1) "cd" to the directory which contains parser.php
+
+2) To see the scripts usage use the command:
+
+	php parser.php
+
+3) To parse the entire AppKit and Foundation frameworks use this command:
+
+	php parser.php -objp -all -out=/objp -ignore="NSGeometry.h,NSRange.h" -root="/path/to/objp"
+	
+	NOTE: -root is the path to the objp directory as was included in the distribution. This directory should contain the master unit objp.pas amongst other files. The files ignored are pre-parsed and corrected by hand but do contain parser errors.
+
+4) To parse a single header use the "-header" option:
+	
+	php parser.php -objp -header="foundation/NSDate.h" -out=/objp -root="/path/to/objp"
+
+5) The parser is still not perfect and where parsing the all frameworks you must correct these details by hand.
+	
+	- Errors:
+	1) NSWorkspace.h has a duplicate NSWorkspaceLaunchAllowingClassicStartup constant
+	2) NSObjcRuntime.h contains a bad external function:
+		function __attribute__(: (format(__NSString__; : 1; : 2))): void NSLog(NSStringRef *format, ...); cdecl; external name '__attribute__';
+	3) NSZone.h contains 2 function parser errors:
+		function NSAllocateCollectable(size: culong; options: culong): void *__strong; cdecl; external name 'NSAllocateCollectable';
+		function NSReallocateCollectable(var ptr: Pointer; size: culong; options: culong): void *__strong; cdecl; external name 'NSReallocateCollectable';
+	4) NSATSTypesetter.h needs to use NSObject for the super class until the internal error can be fixed or the class NSTypesetter parsed
+
+	- General notes:
+	1) NSObject.h is parsed for the merged category methods that should be inserted manually into the real root class
+	2) NSRange.h was ignored because it contains custom code and can be maintained by hand very easily
+	3) NSGeometry.h was ignored because it contains many parsing errors and custom code, do this by hand for now.
diff --git a/packages/cocoaint/utils/objp_parser.php b/packages/cocoaint/utils/objp_parser.php
new file mode 100644
index 0000000000..c5b28a661f
--- /dev/null
+++ b/packages/cocoaint/utils/objp_parser.php
@@ -0,0 +1,382 @@
+<?php
+
+class TObjPParser extends TPasCocoaParser {
+	
+	var $objc_id = "id";							// Default type for generic objects
+	var $objc_id_real = "id";						// The real type of generic objects (id)
+	var $sel_string = "SEL";						
+	var $pointer_type_suffx = "";
+	var $trailing_underscore = true;
+	
+	var $reserved_keywords = array(	"const", "object", "string", "array", "var", "set", "interface", "classname", "unit",
+									"self", "type", "raise", "property", "to", "for", "with", "function", "procedure", "result",
+									"pointer", "create", "new", "dispose", "label", "packed", "record", "char", "class",
+									
+									// identifiers from NSObject
+									"zone", 
+									);
+	
+	var $replace_types = array(	"void"=>"Pointer", "BOOL"=>"Boolean", "long"=>"clong", "int"=>"cint",
+								"unsigned long"=>"culong", "unsigned short"=>"cushort", "void *"=>"Pointer", "unsigned int"=>"cuint",
+								"NSUInteger"=>"culong", "NSInteger"=>"clong", "Class"=>"Pobjc_class", "uint"=>"cuint",
+								"uint8_t"=>"byte", "signed int"=>"cint", "const char"=>"char", "const void"=>"Pointer",
+								"const uint8_t"=>"byte", "unsigned"=>"cuint", "int32_t"=>"longint", "float"=>"single",
+								"unsigned long long"=>"culonglong", "int64_t"=>"clonglong", "uint32_t"=>"cardinal", "uint16_t"=>"word",
+								"unsigned char"=>"char", "short"=>"cshort", "double"=>"double", "long long"=>"clonglong",
+								
+								// macros
+								"IBAction"=>"void", 
+								
+								// special pointers
+								"const id *"=>"NSObjectArrayOfObjectsPtr", "Protocol *"=>"objc_protocol", "NSObject *"=>"NSObject",
+								"const char *"=>"PChar", "const void *"=>"Pointer", "unsigned char *"=>"Pointer", "char *"=>"Pointer",
+								"unsigned *"=>"Pointer", 
+								);
+	
+	// These methods require that the last parameter append a trailing underscore (if $trailing_underscore is on)
+	var $trailing_underscore_methods = array("- (void)copy:(id)sender;", "- (void)setNeedsDisplay:(BOOL)flag;");
+
+	// We use direct Cocoa classes now always
+	var $toll_free_bridge = array();
+	
+	var $ignore_methods = array("observationInfo");	
+
+	// Converts an Objective-c method name to Pascal
+	function ConvertObjcMethodName ($method) {
+		$params = explode(":", $method);
+		$name = "";
+		
+		if (count($params) > 1) {
+			foreach ($params as $value) {
+				if (eregi("([a-zA-Z0-9]+)$", $value, $captures)) $name .= $captures[1]."_";
+			}
+		} else {
+			if (eregi("([a-zA-Z0-9]+)(;)*$", $params[0], $captures)) $name .= $captures[1]."_";
+		}
+		
+		// clean it up
+		if ($this->trailing_underscore) {
+		 if (!in_array($method, $this->trailing_underscore_methods)) $name = trim($name, "_");	
+		}
+		
+		$name = $this->ReplaceObjcType($name);
+		
+		return $name;
+	}	
+
+	// We use direct objc classes now so we don't need to replace them with references like in PasCocoa
+	function ReplaceNSTypesWithRef ($string) {
+		return $string;
+	}
+
+	// Converts an Objective-C method to Pascal format 
+	function ConvertObjcMethodToPascal ($class, $source, $parts, $protected_keywords, $has_params) {
+
+	// replace "hinted" params comment with hinted type
+	if ($this->replace_hinted_params) {
+
+		// param string
+		if (eregi("(/\*[[:space:]]*(.*)[[:space:]]*\*/)", $parts[4], $captures)) {
+			// ??? change the parameter to the hinted type
+			//$parts[4] = eregi_replace("(/\*.*\*/)", $captures[2], $parts[4]);
+			//$parts[4] = trim($parts[4], " ");
+		}
+
+		// return type
+		if (eregi("(/\*[[:space:]]*(.*)[[:space:]]*\*/)", $parts[2], $captures)) $parts[2] = $captures[2];
+
+		//print_r($parts);
+
+	} else { // remmove comments from params and return type
+		$parts[4] = eregi_replace("(/\*.*\*/)", "", $parts[4]);
+		$parts[4] = trim($parts[4], " ");
+
+		$parts[2] = eregi_replace("(/\*.*\*/)", "", $parts[2]);
+		$parts[2] = trim($parts[2], " ");
+	}
+
+	$return_type_clean = $parts[2];
+
+	// perform preformatting before attempting to protect keywords
+	$parts[2] = $this->FormatObjcType($parts[2], $modifiers);
+	$parts[4] = $this->FormatObjcParams($parts[4]);
+
+	// protect keywords in the parameter and return type
+	if (count($protected_keywords) > 0) {
+		foreach ($protected_keywords as $keyword) {
+			$parts[4] = istr_replace_word($keyword, $keyword."_", $parts[4]);
+			$parts[2] = istr_replace_word($keyword, $keyword."_", $parts[2]);
+		}
+	}
+
+	if ($has_params) {
+		$name = $this->ConvertObjcMethodName($source);
+
+		// merge default protected keywords for the class/category
+		if ($this->default_protected[$class]) $protected_keywords = array_merge($this->default_protected[$class], $protected_keywords);
+
+		$param_array = $this->ConvertObjcParamsToPascal($parts[4], $protected_keywords);
+		$params = "(".$param_array["string"].")";
+		$params_with_modifiers = "(".$param_array["string_with_modifiers"].")";
+	} else {
+		$params = "";
+		$params_with_modifiers = "";
+		$name = $parts[3];
+		$param_array = null;
+	}
+
+	//print("$params_with_modifiers\n");
+
+	// protect method name from keywords
+	if ($this->IsKeywordReserved($name)) $name .= "_";
+
+	// clean return type
+	$return_type = trim($parts[2], "* ");
+	$return_type = $this->ReplaceObjcType($return_type);
+	$return_type = $this->ReplaceTollFreeBridgeType($return_type);
+
+	$virtual = "";
+	$class_prefix = "";
+
+	// determine the type based on return value
+	if (ereg($this->regex_procedure_type, $return_type_clean)) {
+		$kind = "procedure";
+	} else {
+		$kind = "function";
+	}
+
+	// determine if this is a class method
+	if ($parts[1] == "+") {
+		$class_prefix = "class ";
+		
+		// These methods probably return the an allocated instance of the class, a typical convenience method.
+		// ??? Ack! $class may be the category or protocol name
+		//if ($return_type == $this->objc_id) $return_type = $class; 
+	}
+
+	// Determine if the method needs a particular modifier
+	// ??? THIS IS NOT COMPILING???
+	//if (ereg($this->objc_object_array, $params)) $modifier = " cdecl;";
+
+	// Replace SEL with the string equivalent
+	if ($this->register_selectors) {
+		$params_with_modifiers = str_replace_word("SEL", $this->sel_string, $params_with_modifiers);
+	}
+
+	// make method templates
+	if ($kind != "function") {
+		$method = "$class_prefix$kind $name$params_with_modifiers;$modifier$virtual";
+		$method_template = "[KIND] [PREFIX]$name"."[PARAMS];$modifier";
+	} else {
+		$method = $class_prefix."function $name$params_with_modifiers: $return_type;$modifier$virtual";
+		$method_template = "[KIND] [PREFIX]$name"."[PARAMS]: [RETURN];$modifier";
+		$method_template_function = "function [PREFIX]$name"."[PARAMS]: [RETURN];$modifier";
+	}
+
+	$method_template_procedure = "procedure [PREFIX]$name"."[PARAMS];$modifier";
+	$method_template_function = "function [PREFIX]$name"."[PARAMS]: [RETURN];$modifier";
+
+	// ??? DEBUGGING
+	//print("$method\n");
+
+	// build structure
+	$struct["def"] = $method;
+	$struct["template"] = $method_template;
+	$struct["template_function"] = $method_template_function;
+	$struct["template_procedure"] = $method_template_procedure;
+	$struct["objc_method"] = $this->CopyObjcMethodName($source);
+	$struct["class_prefix"] = $class_prefix;
+	//$struct["def_objc"] = eregi("(.*);", $source, $captures[1]);
+	if ($return_type == "void") $return_type = "";
+	$struct["return"] = $return_type;
+	if (in_array($return_type, $this->cocoa_classes)) $struct["returns_wrapper"] = true;
+	$struct["param_string_clean"] = trim($params, "()");
+	$struct["param_string_clean_with_modifiers"] = trim($params_with_modifiers, "()");
+	$struct["param_string"] = $params;
+	$struct["param_string_with_modifiers"] = $params_with_modifiers;
+	$struct["param_array"] = $param_array["pairs"];
+	$struct["param_list"] = $param_array["list"];
+	$struct["class"] = $class;
+	$struct["name"] = $name;
+	$struct["kind"] = $kind;
+
+	if ($struct["param_array"] != null) $struct["has_params"] = true;
+
+	// FPC bug work around
+	if (strlen($name) > $this->maximum_method_length) {
+		$struct["can_override"] = false;
+		print("	# WARNING: method $name can't override because the name is too long\n");
+		$this->warning_count ++;
+	}
+
+	return $struct;
+	}
+								
+	// Prints all classes from the header in Objective-P FPC format
+	function PrintHeader ($header) {
+		global $version;
+
+		$this->output = fopen($header["path"], "w+");
+
+		$this->PrintOutput(0, "{ Parsed from ".ucfirst($header["framework"]).".framework ".$header["name"]." }");
+
+		$date = date("D M j G:i:s T Y");
+		$this->PrintOutput(0, "{ Version $version - $date }");
+		$this->PrintOutput(0, "");
+
+		$macro = strtoupper(substr($header["name"], 0, (strripos($header["name"], "."))));
+		
+		if ($header["classes"]) {
+			$this->PrintOutput(0, "{\$ifdef HEADER}");
+			$this->PrintOutput(0, "{\$ifndef $macro"."_PAS_H}");
+			$this->PrintOutput(0, "{\$define $macro"."_PAS_H}");
+			$this->PrintOutput(0, "type");
+			
+			foreach ($header["classes"] as $class) {
+				
+				// Make a pointer to each class
+				$this->PrintOutput(1, $class["name"]."Pointer = Pointer;");
+			}
+		
+			$this->PrintOutput(0, "");
+			$this->PrintOutput(0, "{\$endif}");
+			$this->PrintOutput(0, "{\$endif}");
+		}
+		
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{\$ifdef TYPES}");
+		$this->PrintOutput(0, "{\$ifndef $macro"."_PAS_T}");
+		$this->PrintOutput(0, "{\$define $macro"."_PAS_T}");
+		$this->PrintTypes($header);
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{\$endif}");
+		$this->PrintOutput(0, "{\$endif}");
+
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{\$ifdef RECORDS}");
+		$this->PrintOutput(0, "{\$ifndef $macro"."_PAS_R}");
+		$this->PrintOutput(0, "{\$define $macro"."_PAS_R}");
+		$this->PrintRecords($header);
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{\$endif}");
+		$this->PrintOutput(0, "{\$endif}");
+
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{\$ifdef FUNCTIONS}");
+		$this->PrintOutput(0, "{\$ifndef $macro"."_PAS_F}");
+		$this->PrintOutput(0, "{\$define $macro"."_PAS_F}");
+		$this->PrintFunctions($header);
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{\$endif}");
+		$this->PrintOutput(0, "{\$endif}");
+
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{\$ifdef EXTERNAL_SYMBOLS}");
+		$this->PrintOutput(0, "{\$ifndef $macro"."_PAS_T}");
+		$this->PrintOutput(0, "{\$define $macro"."_PAS_T}");
+		$this->PrintExternalSymbols($header);
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{\$endif}");
+		$this->PrintOutput(0, "{\$endif}");
+
+		if (($header["classes"]) || ($header["protocols"])) {
+			$this->PrintOutput(0, "");
+			$this->PrintOutput(0, "{\$ifdef FORWARD}");
+
+			if ($header["protocols"]) {
+				foreach ($header["protocols"] as $protocol) $this->PrintOutput(1, $protocol["name"]."$this->protocol_suffix = objcprotocol;");
+			}
+			
+			if ($header["classes"]) {
+				foreach ($header["classes"] as $class) $this->PrintOutput(1, $class["name"]." = objcclass;");
+			}
+			
+			$this->PrintOutput(0, "");
+			$this->PrintOutput(0, "{\$endif}");
+		}
+
+		if ($header["classes"]) {
+			$this->PrintOutput(0, "");
+			$this->PrintOutput(0, "{\$ifdef CLASSES}");
+			$this->PrintOutput(0, "{\$ifndef $macro"."_PAS_C}");
+			$this->PrintOutput(0, "{\$define $macro"."_PAS_C}");
+
+			foreach ($header["classes"] as $class) {
+				if (in_array($class["name"], $this->cocoa_classes)) $this->PrintClass($class);
+			}
+
+			$this->PrintOutput(0, "");
+			$this->PrintOutput(0, "{\$endif}");
+			$this->PrintOutput(0, "{\$endif}");
+		}
+
+
+		if ($header["protocols"]) {
+			$this->PrintOutput(0, "{\$ifdef PROTOCOLS}");
+			$this->PrintOutput(0, "{\$ifndef $macro"."_PAS_P}");
+			$this->PrintOutput(0, "{\$define $macro"."_PAS_P}");
+
+			
+			foreach ($header["protocols"] as $protocol) {
+				$this->PrintOutput(1, "");
+				$this->PrintOutput(0, "{ ".$protocol["name"]." Protocol }");
+				$this->PrintOutput(1, $protocol["name"]."$this->protocol_suffix = objcprotocol");
+
+				// print methods
+				if ($protocol["methods"]) {
+					foreach ($protocol["methods"] as $name => $method) {
+						$this->PrintOutput(2, $method["def"]." message '".$method["objc_method"]."';");
+					}
+				}
+				
+				$this->PrintOutput(1, "end; external name '".$protocol["name"]."';");		
+			}
+			
+			$this->PrintOutput(0, "{\$endif}");
+			$this->PrintOutput(0, "{\$endif}");
+		}
+	}
+	
+	
+	function PrintClass ($class) {
+
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{ ".$class["name"]." }");
+		
+		// print super class or protocol which the class conforms to
+		if ($class["conforms"]) {
+			$this->PrintOutput(1, $class["name"]." = objcclass(".$class["super"].", ".$class["conforms"].")");
+		} elseif ($class["super"]) {
+			$this->PrintOutput(1, $class["name"]." = objcclass(".$class["super"].")");
+		}
+
+		// print alloc method for the class
+		$this->PrintOutput(2, "class function alloc: ".$class["name"]."; message 'alloc';");
+
+		// print class-level methods
+		if ($class["methods"]) {
+			$this->PrintOutput(0, "");
+			foreach ($class["methods"] as $method) {
+				$this->PrintOutput(2, $method["def"]." message '".$method["objc_method"]."';");
+			}
+		}
+
+		// print category-level methods
+		if (count($class["categories"]) > 0) {
+			foreach ($class["categories"] as $name => $category) {
+				$this->PrintOutput(0, "");
+				$this->PrintOutput(2, "{ Category: $name }");
+
+				if ($category["methods"]) {
+					foreach ($category["methods"] as $method) {
+						$this->PrintOutput(2, $method["def"]." message '".$method["objc_method"]."';");
+					}
+				}	
+			}
+		}
+
+		$this->PrintOutput(1, "end; external;");
+	}
+
+}
+?>
\ No newline at end of file
diff --git a/packages/cocoaint/utils/parser.php b/packages/cocoaint/utils/parser.php
new file mode 100755
index 0000000000..774a02e5ce
--- /dev/null
+++ b/packages/cocoaint/utils/parser.php
@@ -0,0 +1,268 @@
+<?php
+
+$version = "FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.1";
+
+require("pascocoa_parser.php");
+require("objp_parser.php");
+
+/**
+ * Cocoa framework parser for PasCocoa
+ * 
+ * @author Ryan Joseph
+ **/
+
+/* VERSION HISTORY
+
+1.3		- The parser is broken into subclasses in order to support the new FPC syntax.
+		
+1.2		- struct_register_types makes a new wrapper that sends structs based on CPU architecture
+		- var parameters are parsed correctly 
+		- getters and setters can now be overriden (still not constructors however)
+		- enums without defined values are parsed
+		- params named "somethingPtr" are parsed as pointers instead of "var"
+		- #defines (integer values only)
+		- fixed a bug missing CFString constants
+		- added static accessor withObject
+		- fixed bug with constructors not using NSObject "Handles" from parameter list
+		- custom implementations for NSSet, NSString, NSDictionary constructors
+		- IBActions now replace with void, like the C macro
+		- Methods with (void *) as the return type are no longer parsed as procedures.
+		
+1.1:	- NSDelegatesAll now creates a .pas reference file
+		- Methods in NSDelegatesAll are no longer declared abstract virtual to avoid compiler performance issues
+		- super methods were deprecated in favor of "implemented super" methods
+		- all non-delegate categories (which appear in NSDelegatesAll.inc) are merged into NSObject.inc
+*/
+
+/* TO-DO
+	- NSAfflineTransform and NSAttributedString are making duplicates because they exist in AppKit And Foundation
+		- the fix now is to delete the parts that are conflicting but leave them in the master file
+	- NSGeometry, NSRange, NSHashTable, NSMapTable have conflicts with record/type order use, AddTypeDef instead
+	- NSObjCRuntime, NSZone has errors parsing external functions
+		- these are removed from the parse all command for now
+	- NSExceptions didn't parse: typedef void NSUncaughtExceptionHandler(NSException *exception);
+	- 	did not get captured by the regex:
+		FOUNDATION_EXPORT NSString *NSStringFromRange(NSRange range); 
+		√ FOUNDATION_EXPORT NSString * const NSParseErrorException; 
+		√ FOUNDATION_EXPORT NSString * const NSCharacterConversionException;
+	- 	compound enums on a single line
+		enum {NSNotFound = NSIntegerMax};
+		enum _NSComparisonResult {NSOrderedAscending = -1, NSOrderedSame, NSOrderedDescending};
+		typedef struct {NSUInteger _pi; NSUInteger _si; void *_bs;} NSHashEnumerator;
+	
+	• SERIOUS
+	
+	* - Make functions in NS*** collection classes to return a CFType equivalent
+				function CFType: CFTypeRef; at the top of each class
+	
+	* Var params are not initialized to nil inside the methods!
+	
+	* Some methods are broken up into different lines and not parsed! I'm sure we losts hundreds of methods
+	  look in NSBezierPath.h for examples
+	
+		- (void)appendBezierPathWithArcWithCenter:(NSPoint)center radius:(CGFloat)radius
+					       startAngle:(CGFloat)startAngle
+						 endAngle:(CGFloat)endAngle;
+		
+				
+	- erroneous var params in plain C functions
+		function NSSelectorFromString(var aSelectorName: CFStringRef): SEL; cdecl; external name 'NSSelectorFromString';
+		FOUNDATION_EXPORT SEL NSSelectorFromString(NSString *aSelectorName);
+		
+	- nested enums
+		NSXMLNodePreserveQuotes = (NSXMLNodeUseSingleQuotes | NSXMLNodeUseDoubleQuotes),	
+		NSWorkspaceLaunchDefault = NSWorkspaceLaunchAsync | NSWorkspaceLaunchAllowingClassicStartup
+	
+	- comma was at the START of the line so it didn't get parsed
+		    NSRegularControlSize,
+		    NSSmallControlSize
+		#if MAC_OS_X_VERSION_MAX_ALLOWED >= MAC_OS_X_VERSION_10_3
+		    , NSMiniControlSize
+	
+	- constant strings with AVAILABLE_MAC_OS_X_VERSION_10_3_AND_LATER are not parsed 
+	APPKIT_EXTERN NSString *NSDocFormatTextDocumentType	AVAILABLE_MAC_OS_X_VERSION_10_3_AND_LATER;
+	APPKIT_EXTERN NSString *NSWordMLTextDocumentType	AVAILABLE_MAC_OS_X_VERSION_10_3_AND_LATER;
+	APPKIT_EXTERN NSString *NSWebArchiveTextDocumentType	AVAILABLE_MAC_OS_X_VERSION_10_4_AND_LATER;
+	
+	- How should we handle inout and out? Are these passed by referenced?
+	- Should we include const in the params?
+	- How should be handle inline array types? NSRect[4] -> type theMethodType1 = array[1..4] of NSRect
+	
+	
+*/
+
+/**
+ * PRIMARY INPUT PARAMETERS
+ */
+
+// These files have duplicates in AppKit and Foundation so we ignore the foundation versions and everything is merged into AppKit
+$duplicate_headers = array("foundation/NSAttributedString.inc", "foundation/NSAffineTransform.inc");
+
+// Print only these files
+$only_files = null;
+
+$options = array();
+
+function HandleCommandLineOptions ($argv) {
+	global $options;
+	global $output_directory;
+	global $root_path;
+	global $ignore_headers;
+	global $only_files;
+	
+	foreach ($argv as $option) {
+		$pair = explode("=", $option);
+		$key = trim($pair[0], "-");
+		$value = $pair[1];
+		
+		switch ($key) {
+			
+			case 'all':
+				$options[$key] = true;
+				break;
+				
+			case 'objp':
+				$options[$key] = true;
+				break;
+					
+			case 'encodings':
+				$options[$key] = true;
+				break;
+				
+			case 'delegates':
+				$options[$key] = true;
+				break;
+				
+			case 'noprint':
+				$options[$key] = true;
+				break;
+			
+			case 'show':
+				$options[$key] = true;
+				break;
+			
+			case 'ignore':
+				$ignore_headers = explode(",", trim($value, "\""));
+				break;
+				
+			case 'only':
+				$only_files = explode(",", trim($value, "\""));
+				break;
+			
+			case 'out':
+				$output_directory = $value;
+				$options[$key] = true;
+				break;
+			
+			case 'root':
+				$root_path = trim($value, "\"");
+				break;
+				
+			case 'header':
+				$where = explode("/", trim($value, "\""));
+				$options[$key]["framework"] = ucfirst($where[0]);
+				$options[$key]["name"] = $where[1];
+				break;
+			
+			default:
+				//print("unknown switch $key\n");
+				break;
+		}
+	}
+}
+
+// ??? TESTING
+$testing = false;
+
+if ($testing) {
+	$GLOBALS["root"][] = "/Developer/pascocoa";
+	//$GLOBALS["argv"][] = "-all";
+	//$GLOBALS["argv"][] = "-noprint";
+	//$GLOBALS["argv"][] = "-only=\"NSHashTable.h\"";
+
+	$GLOBALS["argv"][] = "-header=\"foundation/NSDate.h\"";
+	//$GLOBALS["argv"][] = "-header=\"appkit/NSView.h\"";
+
+	// PasCocoaKit
+	//$GLOBALS["argv"][] = "-out=/dev";
+	//$GLOBALS["argv"][] = "-ignore=\"NSObject.h,NSHashTable.h,NSGeometry\"";
+	//$GLOBALS["argv"][] = "-delegates";
+
+	// Objective-P
+	/* Notes for master compile (-all):
+
+	- Errors:
+	1) NSWorkspace.h has a duplicate NSWorkspaceLaunchAllowingClassicStartup constant
+	2) NSObjcRuntime.h contains a bad external function:
+		function __attribute__(: (format(__NSString__; : 1; : 2))): void NSLog(NSStringRef *format, ...); cdecl; external name '__attribute__';
+	3) NSZone.h contains 2 function parser errors:
+		function NSAllocateCollectable(size: culong; options: culong): void *__strong; cdecl; external name 'NSAllocateCollectable';
+		function NSReallocateCollectable(var ptr: Pointer; size: culong; options: culong): void *__strong; cdecl; external name 'NSReallocateCollectable';
+	4) NSATSTypesetter.h needs to use NSObject for the super class until the internal error can be fixed or the class NSTypesetter parsed
+
+	- General notes:
+	1) NSObject.h is parsed for the merged category methods that should be inserted manually into the real root class
+	2) NSRange.h was ignored because it contains custom code and can be maintained by hand very easily
+	3) NSGeometry.h was ignored because it contains many parsing errors and custom code, do this by hand for now.
+	*/
+	$GLOBALS["argv"][] = "-out=/objp";
+	$GLOBALS["argv"][] = "-ignore=\"NSGeometry.h,NSRange.h\""; //NSMapTable.h,NSHashTable.h
+	$GLOBALS["argv"][] = "-objp";
+
+	//$GLOBALS["argv"][] = "-show";
+}
+
+if (count($GLOBALS["argv"]) == 1) {
+	print("Cocoa Framework Parser ($version) usage:\n");
+	print("php framework_parser.php [switches]\n\n");
+	print("switches:\n\n");
+	print("  -all           print all headers (.h) from AppKit/Foundation frameworks\n");
+	print("  -header=\"foundation/NSObject.h\"    prints a single header from system frameworks\n");
+	print("  -root          sets the root path of the pascocoa directory\n");
+	print("  -out           defines an output directory in the root directory for printing, use for testing\n");
+	print("  -show     	    prints output to screen instead of file\n");
+	print("  -ignore=\"NSObject.h,NSArray.h\"     ignores the list of headers during parsing (-all only, no spaces)\n");
+	print("  -only=\"NSObject.h,NSArray.h\"       only prints these files (-all only, no spaces)\n");
+	print("  -noprint       parses but does not print (-all only)\n");
+	print("  -encodings     prints Pascal type encoding glue for GenerateTypeEncodings.p (-all only)\n");
+	print("  -delegates     prints NSDelegateController.inc to foundation (-all only)\n");
+	print("  -objp     		prints classes in FPC Objective-P dialect\n");
+	print("\n\n");
+}
+
+// get the command line options
+if (count($GLOBALS["argv"]) > 1) {
+	HandleCommandLineOptions($GLOBALS["argv"]);
+	//print_r($options);
+}
+
+// Make the output directory
+if ($options["out"]) {
+	@mkdir($root_path.$output_directory, 0777);
+	@mkdir($root_path.$output_directory."/foundation", 0777);
+	@mkdir($root_path.$output_directory."/appkit", 0777);
+	@mkdir($root_path.$output_directory."/webkit", 0777);
+	@mkdir($root_path.$output_directory."/reference", 0777);
+}
+
+// create the parser instance
+if ($options["objp"]) {
+	$parser = new TObjPParser ($root_path, $output_directory, $options["show"]);
+} else {
+	$parser = new TPasCocoaParser ($root_path, $output_directory, $options["show"]);
+}
+
+// Process single headers
+if ($options["header"]) {
+	$parser->ProcessFile("/System/Library/Frameworks/".$options["header"]["framework"].".framework/Headers/".$options["header"]["name"], true);
+}
+
+// Process all headers
+if ($options["all"]) {
+	$parser->ParseCocoaFrameworks($ignore_headers, null);
+	if (!$options["noprint"]) $parser->PrintAllHeaders("", $duplicate_headers, $only_files);
+	if ($options["delegates"]) $parser->ParseDelegateClasses();
+	if ($options["encodings"]) $parser->PrintTypeEncodingGlue();
+}
+
+?>
\ No newline at end of file
diff --git a/packages/cocoaint/utils/pascocoa_parser.php b/packages/cocoaint/utils/pascocoa_parser.php
new file mode 100644
index 0000000000..e52fa00905
--- /dev/null
+++ b/packages/cocoaint/utils/pascocoa_parser.php
@@ -0,0 +1,3673 @@
+<?php
+function ReadTextFile ($path) {
+	if ($handle = fopen($path, "r")) {
+		return fread($handle, 400 * 1024);
+		fclose($handle);
+	}
+}
+	
+function str_replace_word ($needle, $replacement, $haystack) {
+    $pattern = "/\b$needle\b/";
+    $haystack = preg_replace($pattern, $replacement, $haystack);
+    return $haystack;
+}
+
+function istr_replace_word ($needle, $replacement, $haystack) {
+    $pattern = "/\b$needle\b/i";
+    $haystack = preg_replace($pattern, $replacement, $haystack);
+    return $haystack;
+}
+
+define("CAST_HANDLE", true);
+define("DONT_CAST_HANDLE", false);
+
+define("ACCESS_HANDLE_DIRECT", 1);
+define("ACCESS_HANDLE_FUNCTION", 2);
+
+define("REGISTER_SEL", true);
+define("DONT_REGISTER_SEL", false);
+
+define("USE_HANDLE", true);
+define("DONT_USE_HANDLE", false);
+	
+class TPasCocoaParser {
+
+	// Frameworks to parse
+	var $frameworks = array(	"foundation" => array(	"root" => "/foundation/Foundation.inc", 
+															"bridge" => "/bridgesupport/foundation.xml",
+															"headers" => "/System/Library/Frameworks/Foundation.framework/Headers",
+															"include_pattern" => "{[$]+include (NS.*).inc}",
+															"header_pattern" => "^NS(.*)\.h",
+														),
+	
+								"appkit" => array(		"root" => "/appkit/AppKit.inc", 
+														"bridge" => "/bridgesupport/appkit.xml",
+														"headers" => "/System/Library/Frameworks/AppKit.framework/Headers",
+														"include_pattern" => "{[$]+include (NS.*).inc}",
+														"header_pattern" => "^NS(.*)\.h",
+														),
+								
+								/*						
+								"webkit" => array(		"root" => "/webkit/WebKit.inc", 
+														"bridge" => "/bridgesupport/webkit.xml",
+														"headers" => "/System/Library/Frameworks/WebKit.framework/Headers",
+														"include_pattern" => "{[$]+include (.*).inc}",
+														"header_pattern" => "^(.*)\.h",
+														),
+														*/	
+								);
+	
+	var $maximum_method_length = 111; 	// WE GET THIS ERROR: NSDelegatesAll.pas(6109,296) Error: Identifier not found "NSDelegateController_NSLayoutManagerDelegate_layoutManager_shouldUseTemporaryAttributes_forDrawingToScreen_atCharacterIndex_effectiveRange"
+	
+	var $output;									// current output file handle                        
+	var $root;										// root for printing/locating resources              
+	var $out;										// directory to print                                
+	var $show;										// print output to screen instead of file            
+	var $framework;									// current framework being parsed                    
+	var $current_class;								// reference to current class structure being parsed 
+	var $current_header;							// reference to current header structure being parsed
+	var $method_count;								// count of all methods parsed                       
+	var $class_count;								// count of all classes parsed                       
+	var $warning_count;								// count of parser warnings                          
+	var $parser_skipping;							// the parser is skipping lines in the current file  
+	var $cocoa_classes = array(); 					// array of all NS*** classes                        
+	var $cocoa_categories = array(); 				// array of all NS*** categories	                 
+	var $dump = array();							// Convert Pascal classes
+	var $delegate_methods = array();				// Delegate methods and types from GEN_BRIDGE_METADATA XML data
+	var $delegate_method_names = array();			// Delegate method name array
+	var $type_encodings = array();					// Master listing of type encodings for each method in the frameworks
+	
+	/**
+	 * PARSER OPTIONS
+	 */
+	var $objc_id = "NSObjectRef";							// Default type for generic objects
+	var $objc_id_real = "NSObjectRef";						// The real type of generic objects (id)
+	var $objc_id_base = "Pointer";							// The base type for all "Ref" types
+	var $sel_string = "SELString";							// The selector string type which registers selectors internally
+	var $protocol_suffix = "Protocol";						// All protocols append this suffix 
+	var $pointer_type_suffx = "Ref";						// NS*** pointers in parameter lists are suffixed with this
+	var $class_pointer_suffix = "Pointer";					// Pointers to NS*** classes are suffxed with this
+	var $register_selectors = true;							// Register selectors automatically inside the wrappers
+	var $show_added_messages = false;						// show messages when methods are added to a class
+	var $objects_are_wrappers = false;						// Treat all objects (id) like wrappers. i.e aObject.Handle;
+	var $replace_hinted_params = false;						// replace comment hints with hinted type - (void * /* CMProfileRef */)colorSyncProfile;
+	var $master_delegate_class = "NSDelegateController";	// Name of the master delegate class
+	var $master_delegate_file = "NSDelegatesAll";			// Name of the master delegate file (no extension)
+	var $trailing_underscore = false;						// Append the trailing underscore for last parameter
+	var $record_keyword = "record";							// The keyword used for printing records
+	
+	// Pascal keywords to protect
+	var $reserved_keywords = array(	"const", "object", "string", "array", "var", "set", "interface", "classname", "unit",
+									"self", "type", "raise", "property", "to", "for", "with", "function", "procedure", "result",
+									"pointer", "create", "new", "dispose", "label", "packed", "record", "char", "class",
+									);
+									
+	// FPC methods that can't be overloaded
+	var $reserved_methods = array("className");
+	
+	// Types which can not be altered by reserved keywords
+	var $reserved_types = array("Pointer");
+	
+	// Objective-c types to convert
+	var $replace_types = array(	"id"=>"NSObjectRef", "void"=>"Pointer", "BOOL"=>"LongBool", "long"=>"LongInt", "int"=>"Integer",
+								"unsigned long"=>"UInt32", "unsigned short"=>"UInt8", "void *"=>"Pointer", "unsigned int"=>"UInt16",
+								"NSUInteger"=>"UInt32", "NSInteger"=>"SInt32", "Class"=>"Pobjc_class", "uint"=>"UInt16", 
+								"uint8_t"=>"UInt8", "signed int"=>"Integer", "const char"=>"PChar", "const void"=>"Pointer",
+								"const uint8_t"=>"Pointer", "unsigned"=>"UInt8", "int32_t"=>"SInt32", "float"=>"Float32",
+								"unsigned long long"=>"UInt64", "int64_t"=>"SInt64", "uint32_t"=>"UInt32", "uint16_t"=>"UInt16",
+								"unsigned char"=>"char", "short"=>"SInt8", "double"=>"Float64", "long long"=>"SInt64",
+								
+								// macros
+								"IBAction"=>"void", 
+								
+								// special pointers
+								"const id *"=>"NSObjectArrayOfObjectsPtr", "Protocol *"=>"ObjcProtocol", "NSObject *"=>"NSObjectRef",
+								"const char *"=>"PChar", "const void *"=>"Pointer", "unsigned char *"=>"Pointer", "char *"=>"Pointer",
+								"unsigned *"=>"Pointer", 
+								
+								// pointers to common types
+								// "int *"=>"SInt16Ptr"
+								);
+
+	// Types which have known pointers declared in the headers
+	var $pointer_types = array("CGFloat"=>"CGFloatPtr", "UInt32"=>"UInt32Ptr", "SInt32"=>"SInt32Ptr");
+
+	var $objc_object_array = "id; objParams: array of const"; // Type which represents a dynamic array of Objective-c objects (id)
+	
+	// Symbols to ignore
+	var $ignore_symbol = array("NSApp");
+	
+	// Categories to ignore
+	var $ignore_categories = array("NSCoderMethods", "NSDeprecatedKeyValueCoding", "NSDeprecated");
+	
+	// Methods to ignore
+	var $ignore_methods = array(	"retain", "release", "retainCount", "copyWithZone", "mutableCopyWithZone",
+									"allocWithZone", "alloc", "copy", "mutableCopy", "self_", "autorelease", "awakeFromNib",
+									"observationInfo",
+								);	
+	
+	// default protected keywords by class/category
+	var $default_protected = array(	"NSDeprecated"=>array("accessoryView"),
+									"NSToolbarSupport"=>array("toolbar"),
+									);
+	
+	// Send methods that have a custom design
+	var $custom_send_methods = array(	"NSArray.arrayWithObjects", "NSArray.initWithObjects", 
+										"NSDictionary.dictionaryWithObjectsAndKeys", "NSDictionary.initWithObjectsAndKeys", 
+										"NSSet.setWithObjects", "NSSet.initWithObjects", 
+										);
+	
+	var $toll_free_bridge = array(	
+									"NSString"=>"CFStringRef", "NSArray"=>"CFArrayRef", "NSMutableString"=>"CFMutableStringRef",
+									"NSData"=>"CFDataRef", "NSDictionary"=>"CFDictionaryRef", "NSSet"=>"CFSetRef", 
+									"NSMutableArray"=>"CFMutableArrayRef", "NSMutableCharacterSetRef"=>"CFMutableCharacterSetRef",
+									"NSMutableData"=>"CFMutableDataRef", "NSMutableDictionary"=>"CFMutableDictionaryRef",
+									"NSMutableSet"=>"CFMutableSetRef",  "NSNumber"=>"CFNumberRef", "NSURL"=>"CFURLRef", 
+									"NSError"=>"CFErrorRef", 
+									
+									/* The Cocoa versions of these API's are much better and not very common, should we replace them?
+									"NSOutputStream"=>"CFWriteStreamRef", "NSPasteboard"=>"PasteboardRef"
+									"NSInputStream"=>"CFReadStreamRef", "NSTimer"=>"CFRunLoopTimerRef",
+									"NSTimeZone"=>"CFTimeZoneRef", "NSCharacterSet"=>"CFCharacterSetRef",
+									"NSDate"=>"CFDateRef",
+									*/
+									);	
+	
+	// types that use objc_msgSend_stret on all architectures
+	var $struct_types = array(	"NSRect", "NSDecimal", "NSFastEnumerationState", "NSMapTableValueCallBacks",
+								"NSHashTableCallBacks", "NSMapTableKeyCallBacks", 
+								
+								// TEMPORARY PARSER HACKS
+								"aeDesc_",
+								);
+						
+	// structs that use objc_msgSend or objc_msgSend_stret depending on architecture
+	// "On Mac OS X Intel/i386, records whose size is 1, 2, 4 or 8 bytes are returned using registers"
+	var $struct_register_types = array(	"NSRange", "NSPoint", "NSSize", "NSAffineTransformStruct" );
+														
+	// Functions that return types will invoke objc_msgSend_fpret
+	// NOTE: we must also know the exact type so we can make the proper function pointer
+	var $float_types = array(	// C-types
+								"float", "long double", "double", 
+								
+								// Cocoa types
+								"NSTimeInterval",
+								
+								// Pascal types
+								"Float64", "Float32",
+								
+								// CarbonTypes
+								"CGFloat",
+								);
+	
+	var $skip_blocks = array(	"^#if __LP64__ \|\| NS_BUILD_32_LIKE_64"=>"^#(else|endif)+",
+								"^#ifdef __BIG_ENDIAN__"=>"^#(else|endif)+"
+								);
+	
+	// these categories should be placed into NSObject
+	var $base_categories = array(		"NSArchiverCallback", "NSClassDescriptionPrimitives", "NSCoderMethods", "NSComparisonMethods", 
+										"NSDelayedPerforming", "NSDeprecatedKeyValueCoding", "NSDeprecatedKeyValueObservingCustomization",
+										"NSDistributedObjects", "NSErrorRecoveryAttempting", "NSKeyValueCoding", "NSPlaceholders",
+										"NSKeyValueObserverRegistration", "NSKeyValueObserving", "NSKeyValueObservingCustomization", 
+										"NSKeyedArchiverObjectSubstitution", "NSKeyedUnarchiverObjectSubstitution", "NSDeprecatedMethods", 
+										"NSScriptKeyValueCoding", "NSThreadPerformAdditions", "NSServicesRequests", "NSKeyValueBindingCreation",
+										"NSAccessibility", "NSAccessibilityAdditions",
+										);
+										
+										// These really don't feel like they should be in NSObject, removing until we know where to put them.
+										// Maybe a new class? NSCategories...
+										
+										// "NSURLClient", "NSScripting", "NSScriptClassDescription", "NSScriptObjectSpecifiers", 
+										// "NSScriptingComparisonMethods", "NSFontManagerResponderMethod", "NSMenuValidation",
+										// "NSColorPanelResponderMethod", "NSFontPanelValidationAdditions", "NSToolbarItemValidation",
+										// "NSDictionaryControllerKeyValuePair", "NSEditor", 
+	/**
+	 * COMMON REGULAR EXPRESIONS
+	 */
+	var $regex_objc_method_params = "^(-|\+)[[:space:]]*\((.*)\)[[:space:]]*([a-zA-Z0-9]+):(.*);";
+	var $regex_objc_method_no_params = "^(-|\+)[[:space:]]*\((.*)\)[[:space:]]*([a-zA-Z0-9]+);";
+	var $regex_objc_category = "^@interface ([a-zA-Z]+)[[:space:]]*\(([a-zA-Z]+)\)";
+	var $regex_objc_class = "^@interface ([a-zA-Z]+)[[:space:]]*:[[:space:]]*([a-zA-Z]+)[[:space:]]*(<(.*)>)*";
+	var $regex_objc_class_no_super = "^@interface ([a-zA-Z]+)[[:space:]]*<(.*)>[[:space:]]*";
+	var $regex_objc_protocol = "^@protocol ([a-zA-Z]+)";
+	var $regex_procedure_type = "^[[:space:]]*(void|IBAction)+[[:space:]]*$";
+	
+	/**
+	 * TEMPLATES
+	 */
+	
+	// Template for implemented function
+	var $template_implemented_function = "function [CLASS].implemented_[NAME][PARAMS_HEADER]: [RETURN];
+begin
+  {\$ifdef NSOBJECT_AUTO_WRAPPER}
+    Result :=  [RETURN](super_[NAME][PARAMS_BODY_WRAPPER]);
+  {\$else}
+    Result :=  [RETURN](super_[NAME][PARAMS_BODY]);
+  {\$endif}
+end;";
+
+	// Template for implemented procedure
+	var $template_implemented_procedure = "procedure [CLASS].implemented_[NAME][PARAMS_HEADER];
+begin
+  {\$ifdef NSOBJECT_AUTO_WRAPPER}
+    super_[NAME][PARAMS_BODY_WRAPPER];
+  {\$else}
+    super_[NAME][PARAMS_BODY];
+  {\$endif}
+end;";
+	
+	// Template for constructor
+	var $template_constructor = "constructor [CLASS][NAME][PARAMS_HEADER];
+type
+  TmsgSendWrapper = function (param1: id; param2: SEL[PARAMS_PROC]): id; cdecl;
+var
+  vmethod: TmsgSendWrapper;
+begin
+  if SEL_[SELNAME] = nil then
+    SEL_[SELNAME] := sel_registerName(PChar('[OBJC_METHOD]'));
+
+  RegisterSubClass;
+  allocbuf := objc_msgSend(ClassID, SEL_alloc, []);
+  vmethod := TmsgSendWrapper(@objc_msgSend);
+  Handle := vmethod(allocbuf, SEL_[SELNAME][PARAMS_LIST_WRAPPER]);
+  retainCount := 1;
+  AssignSelf(Handle);
+  AddMethods;
+  BindMethods;
+end;";	
+
+	// Template for constructor that does not allocate memory
+	var $template_constructor_no_alloc = "constructor [CLASS][NAME][PARAMS_HEADER];
+type
+  TmsgSendWrapper = function (param1: id; param2: SEL[PARAMS_PROC]): id; cdecl;
+var
+  vmethod: TmsgSendWrapper;
+begin
+  if SEL_[SELNAME] = nil then
+    SEL_[SELNAME] := sel_registerName(PChar('[OBJC_METHOD]'));
+
+  RegisterSubClass;
+  vmethod := TmsgSendWrapper(@objc_msgSend);
+  Handle := vmethod(ClassID, SEL_[SELNAME][PARAMS_LIST_WRAPPER]);
+  AutoReleaseObject;
+  AssignSelf(Handle);
+  AddMethods; 
+  BindMethods;
+end;";	
+
+	// Template for function to send Objective-c message that returns an auto-generated/memory managed wrapper object.
+	var $template_function_make_wrapper = "function [CLASS][NAME][PARAMS_HEADER]: [RETURN];
+type
+  TmsgSendWrapper = function (param1: id; param2: SEL[PARAMS_PROC]): [RETURN]; cdecl;
+var
+  vmethod: TmsgSendWrapper;
+  wrapper: [RETURN];
+begin
+  vmethod := TmsgSendWrapper(@[MSG_SEND]);
+  if SEL_[SELNAME] = nil then
+    SEL_[SELNAME] := sel_registerName(PChar('[OBJC_METHOD]'));
+
+  {\$ifdef NSOBJECT_AUTO_WRAPPER}
+    Result := [RETURN](vmethod([OBJC_OBJECT], SEL_[SELNAME][PARAMS_LIST_WRAPPER]));
+  {\$else}
+    Result := [RETURN](vmethod([OBJC_OBJECT], SEL_[SELNAME][PARAMS_LIST]));
+  {\$endif}
+
+  {\$ifdef NSOBJECT_AUTO_WRAPPER}
+   wrapper := [RETURN](GetWrapper(Result));
+   if wrapper = nil then
+     Result := [RETURN]([RETURN].CreateWithHandle(Pobjc_object(Result)).deferObject)
+   else
+     Result := wrapper;
+  {\$endif}
+end;";
+
+	var $template_function_make_wrapper_no_params = "function [CLASS][NAME]: [RETURN];
+var
+  wrapper: [RETURN];
+begin
+  if SEL_[SELNAME] = nil then
+	SEL_[SELNAME] := sel_registerName(PChar('[OBJC_METHOD]'));
+	
+  Result := [RETURN]([MSG_SEND]([OBJC_OBJECT], SEL_[SELNAME], []));
+ 
+ {\$ifdef NSOBJECT_AUTO_WRAPPER}
+  wrapper := [RETURN](GetWrapper(Result));
+  if wrapper = nil then
+    Result := [RETURN]([RETURN].CreateWithHandle(Pobjc_object(Result)).deferObject)
+  else
+    Result := wrapper;
+ {\$endif}
+end;";
+
+	// Template for protocol function to send Objective-c message that returns an auto-generated/memory managed wrapper object.
+	var $template_protocol_make_wrapper = "function [CLASS][NAME][PARAMS_HEADER]: [RETURN];
+type
+  TmsgSendWrapper = function (param1: id; param2: SEL[PARAMS_PROC]): [RETURN]; cdecl;
+var
+  vmethod: TmsgSendWrapper;
+begin
+  vmethod := TmsgSendWrapper(@[MSG_SEND]);
+  if SEL_[SELNAME] = nil then
+	SEL_[SELNAME] := sel_registerName(PChar('[OBJC_METHOD]'));
+	
+  {\$ifdef NSOBJECT_AUTO_WRAPPER}
+    Result := [RETURN](vmethod([OBJC_OBJECT], SEL_[SELNAME][PARAMS_LIST_WRAPPER]));
+  {\$else}
+    Result := [RETURN](vmethod([OBJC_OBJECT], SEL_[SELNAME][PARAMS_LIST]));
+  {\$endif}
+
+  {\$ifdef NSOBJECT_AUTO_WRAPPER}
+   Result := [RETURN]([RETURN].CreateWithHandle(Pobjc_object(Result)).deferObject);
+  {\$endif}
+end;";
+
+	var $template_protocol_make_wrapper_no_params = "function [CLASS][NAME]: [RETURN];
+begin
+  if SEL_[SELNAME] = nil then
+    SEL_[SELNAME] := sel_registerName(PChar('[OBJC_METHOD]'));
+  Result := [RETURN]([MSG_SEND]([OBJC_OBJECT], SEL_[SELNAME], []));
+
+ {\$ifdef NSOBJECT_AUTO_WRAPPER}
+   Result := [RETURN]([RETURN].CreateWithHandle(Pobjc_object(Result)).deferObject);
+ {\$endif}
+end;";
+
+	// Template for function to send Objective-c message
+	var $template_function_objc_send = "function [CLASS][NAME][PARAMS_HEADER]: [RETURN];
+type
+  TmsgSendWrapper = function (param1: [TARGET_TYPE]; param2: SEL[PARAMS_PROC]): [RETURN]; cdecl;
+var
+  vmethod: TmsgSendWrapper;
+  super: objc_super;
+begin
+  vmethod := TmsgSendWrapper(@[MSG_SEND]);
+  if SEL_[SELNAME] = nil then
+    SEL_[SELNAME] := sel_registerName(PChar('[OBJC_METHOD]'));
+	
+  [GET_SUPER_CLASS]
+  {\$ifdef NSOBJECT_AUTO_WRAPPER}
+    Result := [RETURN](vmethod([OBJC_OBJECT], SEL_[SELNAME][PARAMS_LIST_WRAPPER]));
+  {\$else}
+    Result := [RETURN](vmethod([OBJC_OBJECT], SEL_[SELNAME][PARAMS_LIST]));
+  {\$endif}
+end;";
+
+	// Template for function to send Objective-c message (no params)
+	var $template_function_objc_send_no_params = "function [CLASS][NAME]: [RETURN];
+var
+  super: objc_super;
+begin
+  if SEL_[SELNAME] = nil then
+    SEL_[SELNAME] := sel_registerName(PChar('[OBJC_METHOD]'));
+  [GET_SUPER_CLASS]
+  Result := [RETURN]([MSG_SEND]([OBJC_OBJECT], SEL_[SELNAME], []));
+end;";
+	
+	// Template for function to send Objective-c message which returns a struct
+	var $template_function_objc_send_struct = "function [CLASS][NAME][PARAMS_HEADER]: [RETURN];
+type
+  TmsgSendWrapper = function (param1: [TARGET_TYPE]; param2: SEL[PARAMS_PROC]): [RETURN]; cdecl;
+var
+  vmethod: TmsgSendWrapper;
+  super: objc_super;
+begin
+  if SEL_[SELNAME] = nil then
+    SEL_[SELNAME] := sel_registerName(PChar('[OBJC_METHOD]'));
+  vmethod := TmsgSendWrapper(@[MSG_SEND]);
+  [GET_SUPER_CLASS]
+  {\$ifdef NSOBJECT_AUTO_WRAPPER}
+    Result := [RETURN](vmethod([OBJC_OBJECT], SEL_[SELNAME][PARAMS_LIST_WRAPPER]));
+  {\$else}
+    Result := [RETURN](vmethod([OBJC_OBJECT], SEL_[SELNAME][PARAMS_LIST]));
+  {\$endif}
+end;";
+
+	// Template for function to send Objective-c message which returns a struct
+	var $template_function_objc_send_struct_cpu = "function [CLASS][NAME][PARAMS_HEADER]: [RETURN];
+type
+  TmsgSendWrapper_reg = function (param1: [TARGET_TYPE]; param2: SEL[PARAMS_PROC]): [RETURN]; cdecl;
+  TmsgSendWrapper_stret = function (param1: [TARGET_TYPE]; param2: SEL[PARAMS_PROC]): [RETURN]; cdecl;
+var
+  vmethod_reg: TmsgSendWrapper_reg;
+  vmethod_stret: TmsgSendWrapper_stret;
+  super: objc_super;
+begin
+  if SEL_[SELNAME] = nil then
+    SEL_[SELNAME] := sel_registerName(PChar('[OBJC_METHOD]'));
+  [GET_SUPER_CLASS]
+  {\$ifdef CPUi386}
+    vmethod_reg := TmsgSendWrapper_reg(@[MSG_SEND_REGISTER]);
+	{\$ifdef NSOBJECT_AUTO_WRAPPER}
+      Result := vmethod_reg([OBJC_OBJECT], SEL_[SELNAME][PARAMS_LIST_WRAPPER]);
+    {\$else}
+      Result := vmethod_reg([OBJC_OBJECT], SEL_[SELNAME][PARAMS_LIST]);
+    {\$endif}
+  {\$else}
+    vmethod_stret := TmsgSendWrapper_stret(@[MSG_SEND_STRET]);
+    {\$ifdef NSOBJECT_AUTO_WRAPPER}
+      Result := [RETURN](vmethod_stret([OBJC_OBJECT], SEL_[SELNAME][PARAMS_LIST_WRAPPER]));
+    {\$else}
+      Result := [RETURN](vmethod_stret([OBJC_OBJECT], SEL_[SELNAME][PARAMS_LIST]));
+    {\$endif}
+  {\$endif}
+end;";
+
+	// Template for function to send Objective-c message (no params) which returns a struct
+	var $template_function_objc_send_no_params_struct = "function [CLASS][NAME]: [RETURN];
+var
+  super: objc_super;
+begin
+  if SEL_[SELNAME] = nil then
+    SEL_[SELNAME] := sel_registerName(PChar('[OBJC_METHOD]'));
+  [GET_SUPER_CLASS]
+  [MSG_SEND](@Result, [OBJC_OBJECT], SEL_[SELNAME], []);
+end;";
+
+	// Template for function to send Objective-c message (no params) which returns CPU dependent struct
+	var $template_function_objc_send_no_params_struct_cpu = "function [CLASS][NAME]: [RETURN];
+type
+  TmsgSendWrapper = function (param1: [TARGET_TYPE]; param2: SEL): [RETURN]; cdecl;
+var
+  vmethod: TmsgSendWrapper;
+  super: objc_super;
+begin
+  if SEL_[SELNAME] = nil then
+    SEL_[SELNAME] := sel_registerName(PChar('[OBJC_METHOD]'));
+  [GET_SUPER_CLASS]
+  {\$ifdef CPUi386}
+    vmethod := TmsgSendWrapper(@[MSG_SEND_REGISTER]);
+    Result := vmethod([OBJC_OBJECT], SEL_[SELNAME]                       );
+  {\$else}
+    [MSG_SEND_STRET](@Result, [OBJC_OBJECT], SEL_[SELNAME], []);
+  {\$endif}
+end;";
+
+	// Template for procedure to send Objective-c message
+	var $template_procedure_objc_send = "procedure [CLASS][NAME][PARAMS_HEADER];
+type
+  TmsgSendWrapper = procedure (param1: [TARGET_TYPE]; param2: SEL[PARAMS_PROC]); cdecl;
+var
+  vmethod: TmsgSendWrapper;
+  super: objc_super;
+begin
+  if SEL_[SELNAME] = nil then
+    SEL_[SELNAME] := sel_registerName(PChar('[OBJC_METHOD]'));
+  vmethod := TmsgSendWrapper(@[MSG_SEND]);
+  [GET_SUPER_CLASS]
+  {\$ifdef NSOBJECT_AUTO_WRAPPER}
+    vmethod([OBJC_OBJECT], SEL_[SELNAME][PARAMS_LIST_WRAPPER]);
+  {\$else}
+    vmethod([OBJC_OBJECT], SEL_[SELNAME][PARAMS_LIST]);
+  {\$endif}
+end;";
+
+	// Template for procedure to send Objective-c message
+	var $template_procedure_objc_send_no_params = "procedure [CLASS][NAME];
+var
+  super: objc_super;
+begin
+  if SEL_[SELNAME] = nil then
+    SEL_[SELNAME] := sel_registerName(PChar('[OBJC_METHOD]'));
+  [GET_SUPER_CLASS]
+  [MSG_SEND]([OBJC_OBJECT], SEL_[SELNAME], []);
+end;";
+
+	// Template for procedure to call implemented class method. This is the procedure which the Objectice-c methods are sent to
+	var $template_procedure_objc_wrapper = "procedure [CLASS]_[NAME](_self: id; _cmd: SEL[PARAMS_HEADER]); cdecl;
+var
+  this: [CLASS];
+  [VARIABLES]
+begin
+  this := [CLASS]([CLASS].GetSelf(_self));
+  if this <> nil then
+  {\$ifdef NSOBJECT_AUTO_WRAPPER}
+    begin
+      [WRAPPERS_CREATE]
+      this.implemented_[NAME][PARAMS_LIST_WRAPPER];
+      [WRAPPERS_RELEASE]
+    end;
+  {\$else}
+    this.implemented_[NAME][PARAMS_LIST];
+  {\$endif}
+end;";
+
+	// Template for procedure to call implemented class method. This is the procedure which the Objectice-c methods are sent to
+	var $template_function_objc_wrapper = "function [CLASS]_[NAME](_self: id; _cmd: SEL[PARAMS_HEADER]): [RETURN]; cdecl;
+var
+  this: [CLASS];
+  [VARIABLES]
+begin
+  this := [CLASS]([CLASS].GetSelf(_self));
+  if this <> nil then
+  {\$ifdef NSOBJECT_AUTO_WRAPPER}
+    begin
+      [WRAPPERS_CREATE]
+      Result := [RETURN](this.implemented_[NAME][PARAMS_LIST_WRAPPER]);
+      [WRAPPERS_RELEASE]
+    end;
+  {\$else}
+    Result := [RETURN](this.implemented_[NAME][PARAMS_LIST]);
+  {\$endif}
+end;";
+
+
+	// Template for method to override Objective-c method
+	var $template_method_override = "procedure [CLASS].override_[NAME];
+begin
+  AddMethod('[OBJC_METHOD]', '[TYPE_ENCODING]', Pointer(@[CLASS]_[NAME]));
+end;";
+
+	// Template for method to override Objective-c method
+	var $template_method_override_DEPRECATED = "procedure [CLASS].override_[NAME];
+begin
+  OverrideMethod('[OBJC_METHOD]', Pointer(@[CLASS]_[NAME]));
+end;";
+
+	// Template for method to add method to Objective-c runtime
+	var $template_method_add_runtime = "procedure [CLASS].add_[NAME];
+begin
+  AddMethod('[OBJC_METHOD]', '[TYPES]', Pointer(@[CLASS]_[NAME]));
+end;";
+
+	// Template for implemented delegate procedure
+	var $template_procedure_delegate = "procedure [CLASS].[NAME][PARAMS];
+begin
+end;";
+
+	// Template for implemented delegate procedure
+	var $template_function_delegate = "function [CLASS].[NAME][PARAMS]: [RETURN];
+begin
+end;";
+	
+	
+	// Template for implemented delegate procedure
+	var $template_procedure_delegate_objc = "procedure [CLASS]_[NAME][PARAMS_HEADER]; cdecl;
+var 
+  this: [CLASS];
+  [VARIABLES]
+begin
+  this := [CLASS]([CLASS].GetSelf(_self));
+  if this <> nil then
+  {\$ifdef NSOBJECT_AUTO_WRAPPER}
+    begin
+      [WRAPPERS_CREATE]
+      this.[NAME][PARAMS_LIST_WRAPPER];
+      [WRAPPERS_RELEASE]
+    end;
+  {\$else}
+    this.[NAME][PARAMS_LIST];
+  {\$endif}
+end;";
+
+	// Template for implemented delegate procedure
+	var $template_function_delegate_objc = "function [CLASS]_[NAME][PARAMS_HEADER]: [RETURN]; cdecl;
+var
+  this: [CLASS];
+  [VARIABLES]
+begin
+  this := [CLASS]([CLASS].GetSelf(_self));
+  if this <> nil then
+  {\$ifdef NSOBJECT_AUTO_WRAPPER}
+    begin
+      [WRAPPERS_CREATE]
+      Result := [RETURN](this.[NAME][PARAMS_LIST_WRAPPER]);
+      [WRAPPERS_RELEASE]
+    end;
+  {\$else}
+    Result := [RETURN](this.[NAME][PARAMS_LIST]);
+  {\$endif}
+end;";
+
+	// Template for create override in delegate class
+	var $template_delegate_create = "constructor [CLASS].Create;
+begin
+  CreateClassDefinition(ClassName, 'NSObject');
+
+  ClassID := objc_getClass('[CLASS]');
+  allocbuf := objc_msgSend(ClassId, SEL_alloc, []);
+  Handle := objc_msgSend(allocbuf, SEL_init, []);
+  retainCount := 1;
+
+  { Adds custom methods, if any }
+  AddMethods;
+  BindMethods;
+
+  { Assign our wrapper instance }
+  if Handle <> nil then
+    AssignSelf(Handle);
+end;";
+
+	// Template for constructor
+	var $template_constructor_constarray = "constructor [CLASS][NAME][PARAMS_HEADER];
+type
+  TmsgSendWrapper = function (param1: id; param2: SEL; param3: [CFTYPE]): id; cdecl;
+var
+  vmethod: TmsgSendWrapper;
+  paramList: [CFTYPE];
+  i: integer;
+begin
+  if SEL_[SELNAME] = nil then
+    SEL_[SELNAME] := sel_registerName(PChar('[OBJC_METHOD]'));
+  RegisterSubClass;
+  [ALLOC_PARAM_LIST]
+  allocbuf := objc_msgSend(ClassID, SEL_alloc, []);
+  vmethod := TmsgSendWrapper(@objc_msgSend);
+  Handle := vmethod(allocbuf, SEL_[SELNAME], paramList);
+  retainCount := 1;
+  AssignSelf(Handle);
+  AddMethods;
+  BindMethods;
+  CFRelease(paramList);
+end;";	
+
+	// Template for constructor that does not allocate memory
+	var $template_constructor_constarray_no_alloc = "constructor [CLASS][NAME][PARAMS_HEADER];
+type
+  TmsgSendWrapper = function (param1: id; param2: SEL; param3: [CFTYPE]): id; cdecl;
+var
+  vmethod: TmsgSendWrapper;
+  paramList: [CFTYPE];
+  i: integer;
+begin
+  if SEL_[SELNAME] = nil then
+    SEL_[SELNAME] := sel_registerName(PChar('[OBJC_METHOD]'));
+  RegisterSubClass;
+  [ALLOC_PARAM_LIST]
+  vmethod := TmsgSendWrapper(@objc_msgSend);
+  Handle := vmethod(ClassID, SEL_[SELNAME], paramList);
+  AutoReleaseObject;
+  AssignSelf(Handle);
+  AddMethods; 
+  BindMethods;
+  CFRelease(paramList);
+end;";	
+
+	// template to create param list for NSDictionary methods
+	var $template_dictionary_param_list = "paramList := CFDictionaryCreateMutable(nil, 0, @kCFTypeDictionaryKeyCallBacks, @kCFTypeDictionaryValueCallBacks);
+  i := High(firstObject);
+  while i > 0 do
+    begin
+      CFDictionaryAddValue(paramList, firstObject[i].VPointer, firstObject[i - 1].VPointer);
+      i := i - 2;
+    end;";
+
+	// template to create param list for NSArray methods
+	var $template_array_param_list = "paramList := CFArrayCreateMutable(nil, 0, @kCFTypeArrayCallBacks);
+  for i := 0 to High(firstObj) do
+    CFArrayAppendValue(paramList, firstObj[i].VPointer);";
+	
+	// template to create param list for NSSet methods
+	var $template_set_param_list = "paramList := CFSetCreateMutable(nil, 0, @kCFTypeSetCallBacks);
+  for i := 0 to High(firstObj) do
+    CFSetAddValue(paramList, firstObj[i].VPointer);";
+	
+	/**
+	 * UTILITIES
+	 */
+	
+	// Skips blocks in the current file being parsed
+	function SkipBlock ($line) {
+		
+		if ($line != "") {
+			foreach ($this->skip_blocks as $key => $value) {
+				if (@ereg($key, $line)) $this->parser_skipping = true;
+				if (@ereg($value, $line)) $this->parser_skipping = false;
+			}
+		}
+		
+		return $this->parser_skipping;
+	}
+	
+	function IsKeywordReserved($keyword) {
+		$keyword = strtolower($keyword);
+		if (in_array($keyword, $this->reserved_keywords)) return true;
+	}
+	
+	// Replace type with pointer equivalent
+	function ReplacePointerType ($type) {
+		
+		$type = "Pointer {".$type."}";
+		/*
+		foreach ($this->pointer_types as $objc_type => $replace_type) {
+			if ($objc_type == $type) {
+				$type = $replace_type;
+				break;
+			}
+		}
+		*/
+		return $type;
+	}
+	
+	
+	// Replace objc type with preferred type
+	function ReplaceObjcType ($type) {
+		
+		foreach ($this->replace_types as $objc_type => $replace_type) {
+			if ($objc_type == $type) {
+				$type = $replace_type;
+				break;
+			}
+		}
+		
+		return $type;
+	}
+	
+	// Exchanges the preferred objc type with the real type
+	function SwapObjcTypeWithReal ($type) {
+		if ($type == $this->objc_id) $type = $this->objc_id_real;
+		
+		return $type;
+	}
+	
+	
+	// Replace NS*** "toll free bridge" types with CoreFoundation type
+	function ReplaceTollFreeBridgeType ($type) {
+		foreach ($this->toll_free_bridge as $objc_type => $replace_type) {
+			if ($objc_type == $type) {
+				$type = istr_replace_word($type, $replace_type, $type);
+				break;
+			}
+		}
+		
+		return $type;
+	}
+	
+	// Replace all NS*** classes in a string with the preffered generic type $this->objc_id
+	function ReplaceNSTypes ($string) {
+		foreach ($this->cocoa_classes as $class) {
+			$string = istr_replace_word($class, $this->objc_id, $string);
+		}
+		return $string;
+	}
+	
+	// Replace all NS*** classes in a string with id
+	function ReplaceNSTypesWithReal ($string) {
+		foreach ($this->cocoa_classes as $class) {
+			$string = istr_replace_word($class, $this->objc_id_real, $string);
+		}
+		return $string;
+	}
+	
+	// Replace all NS*** classes in a string with their reference equivalent (i.e NSStringRef = id)
+	function ReplaceNSTypesWithRef ($string) {
+		foreach ($this->cocoa_classes as $class) {
+			$string = istr_replace_word($class, $class."Ref", $string);
+		}
+		return $string;
+	}
+	
+	// Copies the name from an Objective-C method definition
+	function CopyObjcMethodName ($method) {
+		
+		// cut out comments first
+		$method = eregi_replace("(/\*.*\*/)", "", $method);
+		$method = eregi_replace("//.*$", "", $method);
+		$method = trim($method, " 	");
+		
+		$params = explode(":", $method);
+		$name = "";
+
+		if (count($params) > 1) {
+			foreach ($params as $value) {
+				if (eregi("([a-zA-Z0-9_]+)$", $value, $captures)) $name .= $captures[1].":";
+			}
+		} else {
+			if (eregi("([a-zA-Z0-9_]+)(;)*$", $method, $captures)) $name = $captures[1];
+		}
+
+		return $name;
+	}
+	
+	// Converts a function pointer to Pascal function
+	function ConvertFunctionPointerToPascal ($result, $param_string) {
+		
+		if ($result != "") {
+			$params = explode(",", $param_string);
+			$function = "function (";
+			$count = 0;
+			
+			foreach ($params as $param) {
+				$count ++;
+				$param = trim($param, " ");
+				$param = $this->ReplaceObjcType($param);
+				$param = $this->SwapObjcTypeWithReal($param);
+				$param = trim($param, "*");
+				
+				$function .= "param$count: $param; ";
+			}
+			
+			$function = rtrim($function, "; ");
+			$function .= "): $result; cdecl;";
+		}
+		
+		//print("$function\n");
+		return $function;
+	}	
+	
+	// Converts a C parameter string to Pascal
+	function ConvertCParamsPascal ($string) {
+		
+		$params = explode(",", $string);
+		$param_string = "";
+		
+		foreach ($params as $param) {
+			
+			$param = istr_replace_word("const", "", $param);
+			$param = trim($param, " ");
+			
+			$pair = explode(" ", $param);
+			$name = $pair[1];
+			$type = $pair[0];
+				
+			$type = $this->ReplaceObjcType($type);
+			$type = $this->SwapObjcTypeWithReal($type);
+			$type = $this->ReplaceTollFreeBridgeType($type);
+			$type = $this->ReplaceNSTypesWithRef($type);
+			
+			if (($name[0] == "*") && ($name[1] == "*")) {
+				$name = trim($name, "*");
+				$type = $this->ReplacePointerType($type);
+			} elseif ($name[0] == "*") {
+				$name = trim($name, "*");
+				$name = "var $name";
+				$name = trim($name, " ");
+			} else {
+				$name = trim($name, "*");
+			}
+			
+			// Remove array brackets (NSUInteger[])p
+			if (eregi("\[[0-9]*\]", $name)) {
+				$name = "$name";
+				$type = "Pointer {array of $type}";
+				$name = eregi_replace("\[[0-9]*\]", "", $name);
+			}
+  			
+			if ($this->IsKeywordReserved($name)) $name .= "_";
+			
+			// multiple parameters
+			if ($type == "...") {
+				$param_string .= "multipleParams: array of Pointer";
+				break;
+			}
+			
+			$param_string .= "$name: $type; ";
+		}
+		
+		$param_string = trim($param_string, "; ");
+		return $param_string;
+	}
+	
+	// Performs additional formatting on Objective-c type i.e. (out NSObject **)
+	function FormatObjcType ($type, &$modifiers) {
+		$modifiers = "";
+		
+		// toss out all const identifiers
+		$type = istr_replace_word("const", "", $type);
+		
+		// replace inout paramaters
+		$type = istr_replace_word("inout", "", $type);
+		$type = istr_replace_word("out", "", $type);
+		$type_clean = trim($type, "* ");
+		
+		// Replace types before cleaning
+		$type = $this->ReplaceObjcType($type);
+		
+		// Remove protocol which type conforms to (id <NSURLHandleClient>)
+		$type = eregi_replace("<.*>", "", $type);
+		
+		// Remove array brackets (NSUInteger[])p
+		$type = eregi_replace("\[[0-9]*\]", "", $type);
+		
+		// var params to non-object types (NSRange *)
+		if (ereg("([a-zA-Z0-9_]+)[[:space:]]*[*]+$", $type, $captures)) { 
+			if ((!in_array($captures[1], $this->cocoa_classes)) && ($captures[1] != "id")) $modifiers = "var ";
+		} 
+		
+		// Handle NS*** pointers (NSError **)
+		if (ereg("(NS[a-zA-Z0-9_]+)[[:space:]]*\*\*$", $type, $captures)) { 
+			if (in_array($captures[1], $this->cocoa_classes)) {
+				$type = "$type_clean$this->pointer_type_suffx";
+				$modifiers = "var ";
+			}
+		}
+		
+		// clean the type
+		$type = trim($type, "* ");
+		
+		//print("$type\n");
+		return $type;
+	}
+	
+	// Performs additional formatting on Objective-c parameter types		
+	function FormatObjcParams ($string) {
+		$params = explode(":", $string);
+		$string = "";
+		
+		if (count($params) > 0) {
+			foreach ($params as $value) {
+				if (ereg("\((.*)\)", $value, $captures)) {
+					$new_value = $this->ReplaceObjcType($captures[1]);
+					
+					if ($new_value != $captures[1]) $value = ereg_replace("\((.*)\)", "($new_value)", $value);
+					
+					$string .= ":$value";
+				}
+			}
+		}
+		
+		$string = ltrim($string, ":");
+		//print("$string\n");
+		return $string;
+	}
+	
+	// Converts an Objective-c parameter string to Pascal		
+	function ConvertObjcParamsToPascal ($string, $protected_keywords) {
+		$params = explode(":", $string);
+		$list = array();
+		$list["pairs"] = array();
+		$param_list = array();
+		//print_r($params);
+		
+		if (count($params) > 0) {
+			foreach ($params as $value) {
+				$value = trim($value);
+				$valid = false;
+				$modifiers = "";
+				
+				// function pointer (callback)
+				if (eregi("\(([a-zA-Z0-9_]+)[[:space:]]\((.*)\)\((.*)\)\)([a-zA-Z0-9_]+)", $value, $captures)) {
+					$name = $captures[4];
+					
+					$type = $this->current_header["name_clean"].ucwords($name);
+					
+					// attempt to build a function pointer from the parameter and append the class type
+					if ($this->current_header) {
+						$function_pointer = $this->ConvertFunctionPointerToPascal($captures[1], $captures[3]);
+						
+						if (!@in_array($function_pointer, $this->current_header["types"]["callbacks"])) {
+							$count = 0;
+							while (@array_key_exists($type, $this->current_header["types"]["callbacks"])) {
+								$count ++;
+								$type = "$type$count";
+							}
+							
+							// append the new type to the the current class
+							$this->current_header["types"]["callbacks"][$type] = $function_pointer;  
+						} else {
+							// Use the name of the existing callback of matching type
+							$type = array_search($function_pointer, $this->current_header["types"]["callbacks"]);
+						}
+					}
+					
+					$valid = true;
+				} elseif (eregi("\(([a-zA-Z_]+).*\)([a-zA-Z_]+).*NS_REQUIRES_NIL_TERMINATION", $value, $captures)) { // array of objects
+					$name = $captures[2];
+					
+					$type = $this->objc_object_array;
+					
+					$valid = true;
+				} elseif (eregi("\((.*)\)([a-zA-Z_]+)", $value, $captures)) { // standard parameter
+					
+					// pointers params to non-object types (NSRange *)
+					if (ereg("[a-zA-Z0-9_]+Ptr$", $captures[2])) { 
+						$captures[1] = trim($captures[1], "* ");
+						$captures[1] = $this->ReplaceObjcType($captures[1]);
+
+						$type = $captures[1].$this->class_pointer_suffix;//$this->ReplacePointerType($captures[1]);
+						$name = $captures[2];
+					} else {
+						$type = $this->FormatObjcType($captures[1], $modifiers);
+						$name = $captures[2];
+					}
+					
+					
+					$valid = true;
+				}
+				
+				if ($valid) {
+					
+					// protect reserved keywords
+					if ($this->IsKeywordReserved($name)) $name .= "_";
+					
+					if (!in_array($type, $this->reserved_types)) {
+						if ($this->IsKeywordReserved($type)) $type .= "_";
+					}
+
+					if (@in_array($name, $protected_keywords)) $name .= "_";
+					if (@in_array($type, $protected_keywords)) $type .= "_";
+					
+					// replace objc types
+					$type = $this->ReplaceObjcType($type);
+					$type = $this->ReplaceTollFreeBridgeType($type);
+					
+					// make sure we label duplicate params, which are allowed in Objective-C
+					while (in_array($name, $param_list)) {
+						$count ++;
+						$name = "$name$count";
+					}
+					
+					// id is always a wrapper
+					if (($this->objects_are_wrappers) && ($type == $this->objc_id)) {
+						$name_list = "$type(GetHandle($name))";
+					} else {
+						$name_list = $name;
+					}
+					
+					// add modifiers to the name if there are any
+					$name_with_modifiers = $modifiers.$name;
+
+					// create pair array
+					$pair["name"] = $name;
+					$pair["type"] = $type;
+					
+					// append list
+					$list["pairs"][] = $pair;
+					$list["string_with_modifiers"] .= "$name_with_modifiers: $type; ";
+					$list["string"] .= "$name: $type; ";
+					$list["list"] .= "$name_list, ";
+					$param_list[] = $name;
+				}
+			}
+		}
+		
+		// clean up the strings
+		$list["string"] = trim($list["string"], "; ");
+		$list["string_with_modifiers"] = trim($list["string_with_modifiers"], "; ");
+		$list["list"] = trim($list["list"], ", ");
+		
+		return $list;
+	}
+
+	// Converts an Objective-c method name to Pascal
+	function ConvertObjcMethodName ($method) {
+		$params = explode(":", $method);
+		$name = "";
+		
+		if (count($params) > 1) {
+			foreach ($params as $value) {
+				if (eregi("([a-zA-Z0-9]+)$", $value, $captures)) $name .= $captures[1]."_";
+			}
+		} else {
+			if (eregi("([a-zA-Z0-9]+)(;)*$", $params[0], $captures)) $name .= $captures[1]."_";
+		}
+		
+		// clean it up
+		if (!$this->trailing_underscore) $name = trim($name, "_");
+		
+		$name = $this->ReplaceObjcType($name);
+		
+		return $name;
+	}	
+	
+	function ChangeConstructorKind () {
+	}
+	
+	// Converts an Objective-C method to Pascal format 
+	function ConvertObjcMethodToPascal ($class, $source, $parts, $protected_keywords, $has_params) {
+		
+		// replace "hinted" params comment with hinted type
+		if ($this->replace_hinted_params) {
+			
+			// param string
+			if (eregi("(/\*[[:space:]]*(.*)[[:space:]]*\*/)", $parts[4], $captures)) {
+				// ??? change the parameter to the hinted type
+				//$parts[4] = eregi_replace("(/\*.*\*/)", $captures[2], $parts[4]);
+				//$parts[4] = trim($parts[4], " ");
+			}
+
+			// return type
+			if (eregi("(/\*[[:space:]]*(.*)[[:space:]]*\*/)", $parts[2], $captures)) $parts[2] = $captures[2];
+
+			//print_r($parts);
+
+		} else { // remmove comments from params and return type
+			$parts[4] = eregi_replace("(/\*.*\*/)", "", $parts[4]);
+			$parts[4] = trim($parts[4], " ");
+
+			$parts[2] = eregi_replace("(/\*.*\*/)", "", $parts[2]);
+			$parts[2] = trim($parts[2], " ");
+		}
+		
+		$return_type_clean = $parts[2];
+		
+		// perform preformatting before attempting to protect keywords
+		$parts[2] = $this->FormatObjcType($parts[2], $modifiers);
+		$parts[4] = $this->FormatObjcParams($parts[4]);
+		
+		// protect keywords in the parameter and return type
+		if (count($protected_keywords) > 0) {
+			foreach ($protected_keywords as $keyword) {
+				$parts[4] = istr_replace_word($keyword, $keyword."_", $parts[4]);
+				$parts[2] = istr_replace_word($keyword, $keyword."_", $parts[2]);
+			}
+		}
+		
+		if ($has_params) {
+			$name = $this->ConvertObjcMethodName($source);
+			
+			// merge default protected keywords for the class/category
+			if ($this->default_protected[$class]) $protected_keywords = array_merge($this->default_protected[$class], $protected_keywords);
+			
+			$param_array = $this->ConvertObjcParamsToPascal($parts[4], $protected_keywords);
+			$params = "(".$param_array["string"].")";
+			$params_with_modifiers = "(".$param_array["string_with_modifiers"].")";
+		} else {
+			$params = "";
+			$params_with_modifiers = "";
+			$name = $parts[3];
+			$param_array = null;
+		}
+		
+		//print("$params_with_modifiers\n");
+		
+		// protect method name from keywords
+		if ($this->IsKeywordReserved($name)) $name .= "_";
+		
+		// clean return type
+		$return_type = trim($parts[2], "* ");
+		$return_type = $this->ReplaceObjcType($return_type);
+		$return_type = $this->ReplaceTollFreeBridgeType($return_type);
+		
+		$virtual = "";
+		$class_prefix = "";
+		
+		// determine the type based on return value
+		if (ereg($this->regex_procedure_type, $return_type_clean)) {
+			$kind = "procedure";
+		} else {
+			$kind = "function";
+			
+			// make sure Objective-c objects that are returned from fuctions are not NSObject (and thus auto-wrapped)
+			if ($return_type == $this->objc_id) $return_type = $this->objc_id_real;
+			
+			// method name starts with "init or alloc"
+			if ((ereg("^(init|alloc)+[^ialization]", $name)) && ($parts[1] == "-")) {
+				$struct["alloc"] = true;
+				$kind = "constructor";
+				$virtual = " virtual;";
+			}
+
+			// Class methods with the words: With, By or From in the name
+			if ((ereg("^([a-zA-Z]+)(With|By|From)+", $name, $captures)) && ($parts[1] == "+")) $kind = "constructor";
+			
+			// Class methods which return "id" are constructors
+			if (($parts[1] == "+") && ($return_type == $this->objc_id_real)) $kind = "constructor";
+			
+			// method result is the class name
+			if ($return_type == $class) $kind = "constructor";
+		}
+		
+		// determine if this is a class method
+		if (($kind != "constructor") && ($parts[1] == "+")) $class_prefix = "class ";
+		
+		// Determine if the method needs a particular modifier
+		// ??? THIS IS NOT COMPILING???
+		//if (ereg($this->objc_object_array, $params)) $modifier = " cdecl;";
+		
+		// Replace SEL with the string equivalent
+		if ($this->register_selectors) {
+			$params_with_modifiers = str_replace_word("SEL", $this->sel_string, $params_with_modifiers);
+		}
+		
+		// make method templates
+		if ($kind != "function") {
+			$method = "$class_prefix$kind $name$params_with_modifiers;$modifier$virtual";
+			$method_template = "[KIND] [PREFIX]$name"."[PARAMS];$modifier";
+		} else {
+			$method = $class_prefix."function $name$params_with_modifiers: $return_type;$modifier$virtual";
+			$method_template = "[KIND] [PREFIX]$name"."[PARAMS]: [RETURN];$modifier";
+			$method_template_function = "function [PREFIX]$name"."[PARAMS]: [RETURN];$modifier";
+		}
+		
+		$method_template_procedure = "procedure [PREFIX]$name"."[PARAMS];$modifier";
+		$method_template_function = "function [PREFIX]$name"."[PARAMS]: [RETURN];$modifier";
+		
+		// ??? DEBUGGING
+		//print("$method\n");
+				
+		// build structure
+		$struct["def"] = $method;
+		$struct["template"] = $method_template;
+		$struct["template_function"] = $method_template_function;
+		$struct["template_procedure"] = $method_template_procedure;
+		$struct["objc_method"] = $this->CopyObjcMethodName($source);
+		$struct["class_prefix"] = $class_prefix;
+		//$struct["def_objc"] = eregi("(.*);", $source, $captures[1]);
+		if ($return_type == "void") $return_type = "";
+		$struct["return"] = $return_type;
+		if (in_array($return_type, $this->cocoa_classes)) $struct["returns_wrapper"] = true;
+		$struct["param_string_clean"] = trim($params, "()");
+		$struct["param_string_clean_with_modifiers"] = trim($params_with_modifiers, "()");
+		$struct["param_string"] = $params;
+		$struct["param_string_with_modifiers"] = $params_with_modifiers;
+		$struct["param_array"] = $param_array["pairs"];
+		$struct["param_list"] = $param_array["list"];
+		$struct["class"] = $class;
+		$struct["name"] = $name;
+		$struct["kind"] = $kind;
+		
+		if ($struct["param_array"] != null) $struct["has_params"] = true;
+		
+		// determine if the method can be overriden
+		// (!eregi("^(set|get|is)+", $name))
+		if ($kind != "constructor") $struct["can_override"] = true;
+		
+		/*
+			TEMPORARY! we don't know how to handle super methods that have have floating point values
+		*/	
+		if (in_array($struct["return"], $this->float_types)) {
+			$struct["can_override"] = false;
+			print("	# WARNING: method $name can't override because the return type is float\n");
+			$this->warning_count ++;
+		}
+		
+		// FPC bug work around
+		if (strlen($name) > $this->maximum_method_length) {
+			$struct["can_override"] = false;
+			print("	# WARNING: method $name can't override because the name is too long\n");
+			$this->warning_count ++;
+		}
+			
+		return $struct;
+	}
+	
+	// Print string to output file
+	function PrintOutput ($indent, $string) {
+		for ($i=0; $i < $indent; $i++) { 
+			$indent_string .= "  ";
+		}
+		
+		if (($this->output) && (!$this->show)) fwrite($this->output, "$indent_string$string\n");
+		
+		if ($this->show) print("$indent_string$string\n");
+	}
+	
+	// Returns the message sending template for a method structure
+	function GetMsgSendTemplate ($method, $super) {
+		if ($method["kind"] == "function") {
+			if ($method["has_params"]) {
+				$template = $this->template_function_objc_send;
+			} else {
+				$template = $this->template_function_objc_send_no_params;
+			}
+		} else {
+			if ($method["has_params"]) {
+				$template = $this->template_procedure_objc_send;
+			} else {
+				$template = $this->template_procedure_objc_send_no_params;
+			}
+		}
+		
+		// method returns a NS*** class wrapper. Now, super methods can't return wrappers
+		if (!$super) {
+			if (($method["kind"] == "function") && (in_array($method["return"], $this->cocoa_classes))) {
+				if ($method["has_params"]) {
+					$template = $this->template_function_make_wrapper;
+				} else {
+					$template = $this->template_function_make_wrapper_no_params;
+				}
+			}
+		}
+		
+		// method returns a struct
+		if (($method["kind"] == "function") && (in_array($method["return"], $this->struct_types))) {
+			if ($method["has_params"]) {
+				$template = $this->template_function_objc_send_struct;
+			} else {
+				$template = $this->template_function_objc_send_no_params_struct;
+			}
+		}
+		
+		// method returns an architecture dependent struct
+		if (($method["kind"] == "function") && (in_array($method["return"], $this->struct_register_types))) {
+			if ($method["has_params"]) {
+				$template = $this->template_function_objc_send_struct_cpu;
+			} else {
+				$template = $this->template_function_objc_send_no_params_struct_cpu;
+			}
+		}
+		
+		// method is a constructor
+		if ($method["kind"] == "constructor") {
+			$template = $this->template_constructor_no_alloc;
+			if ($method["alloc"]) $template = $this->template_constructor;
+		}
+		
+		return $template;
+	}
+	
+	// Returns a class hierarchy array 
+	function GetClassHierarchy ($class, &$hierarchy) {
+		if (!$hierarchy) $hierarchy = array();
+		$hierarchy[] = $class["name"];
+		
+		if ($class["super_class"]) {
+			$hierarchy[] = $this->GetClassHierarchy($class["super_class"], $hierarchy);
+		} else {
+			$hierarchy[] = "NSObject";
+		}
+		
+		return $class["name"];
+	}
+	
+	// returns if a keyword is protected in a class hierarchy
+	function IsKeywordProtected ($keyword, $in_class) {
+		$this->GetClassHierarchy($in_class, $hierarchy);
+		
+		foreach ($hierarchy as $key) {
+			if (@in_array($keyword, $this->dump["master"][$key]["protected_keywords"])) {
+				return true;
+			}
+		}
+	}
+	
+	// Returns all protected keywords in a class hierarchy
+	function GetProtectedKeywords ($in_class) {
+		$this->GetClassHierarchy($in_class, $hierarchy);
+		$keywords = array();
+		
+		foreach ($hierarchy as $class) {
+			if ($this->dump["master"][$class]["protected_keywords"]) {
+				foreach ($this->dump["master"][$class]["protected_keywords"] as $keyword) $keywords[] = $keyword;
+			}
+		}
+		
+		return $keywords;
+	}
+	
+	
+	// Returns header a category should be moved to
+	function FindCategoryHeader ($category) {
+		
+		foreach ($this->dump as $name => $header) {
+			if ((@array_key_exists($category, $header["classes"])) && ($category != "NSObject")) {
+				return $name;
+			}
+		}
+	}
+	
+	// Adds a method structure to a class and performs checks for overloaded methods
+	function AddMethodToClass (&$method, &$class) {
+		
+		// ignore methods
+		if (in_array($method["name"], $this->ignore_methods)) return false;
+		
+		if (@!in_array($method["name"], $class["declared_methods"])) {
+			
+			$class["all"][$method["name"]] = $method;
+			$class["protected_keywords"][] = $method["name"];
+			$class["declared_methods"][] = $method["name"];
+			$this->dump["all_methods"][$class["name"]][] = $method["objc_method"];
+			
+			if ($this->show_added_messages) print("	@ Added ".$method["name"]." to ".$class["name"]."\n");
+			
+			$this->method_count ++;
+			return true;
+		} else {
+			
+			/*
+			NOTE: check if the method is overloaded and change the name if so:
+			
+				function minimum: CFNumberRef;
+				function NSNumberFormatterCompatibility_minimum: NSDecimalNumber;
+			
+			*/
+			
+			print("	! ".$method["def"]." already exists in ".$class["name"]." defined as ".$class["all"][$method["name"]]["def"]."\n");
+		}
+	}
+	
+	// Adds a typedef to the header and handles organization to prevent order conflicts
+	function AddTypeDef (&$header, $typedef) {
+		$header["types"]["typedef"][] = $typedef;
+	}
+		
+	// Returns a paramater list string with options to modify
+	function MakeParamList ($param_array, $use_handle, $cast_handle, $direct, $register_selector) {
+		$params = "";
+		foreach ($param_array as $pair) {
+			
+			// register selector parameters
+			if (($register_selector) && ($pair["type"] == "SEL")) {
+				$params .= "sel_registerName(".$pair["name"]."), ";
+				continue;
+			}
+			
+			// use the object handle for NSObject descendants
+			if ($use_handle) {
+				if (in_array($pair["type"], $this->cocoa_classes)) {
+
+					// cast the param to the original class type
+					if ($cast_handle) {
+						if ($direct == ACCESS_HANDLE_DIRECT) {
+							$params .= $pair["type"]."(".$pair["name"].".Handle), ";
+						} else {
+							$params .= $pair["type"]."(GetHandle(".$pair["name"].")), ";
+						}
+					} else {
+						if ($direct == ACCESS_HANDLE_DIRECT) {
+							$params .= $pair["name"].".Handle, ";
+						} else {
+							$params .= "GetHandle(".$pair["name"]."), ";
+						}
+					}
+
+				} else {
+					if (($this->objects_are_wrappers) && ($pair["type"] == $this->objc_id)) {	// id is always a wrapper
+						if ($direct == ACCESS_HANDLE_DIRECT) {
+							$params .= $pair["type"]."(".$pair["name"].".Handle), ";
+						} else {
+							$params .= $pair["type"]."(GetHandle(".$pair["name"].")), ";
+						}
+					} else {
+						$params .= $pair["name"].", ";
+					}
+				}
+			} else { // append without modification
+				$params .= $pair["name"].", ";
+			}
+		}
+		
+		return trim($params, ", ");
+	}
+	
+	// Returns a list of paramameter variables with NS*** class types cast to "id" or the original class
+	function MakeObjcTypeParamList ($param_array, $objc_type) {
+		$params = "";
+		foreach ($param_array as $pair) {
+			if (in_array($pair["type"], $this->cocoa_classes)) {
+				if ($objc_type) {
+					$params .= "$this->objc_id(".$pair["name"]."), ";
+				} else {
+					$params .= $pair["type"]."(".$pair["name"]."), ";
+				}
+			} else {
+				$params .= $pair["name"].", ";
+			}
+		}
+		return trim($params, ", ");
+	}
+	
+	/**
+	 * PRINTING METHODS
+	 */
+			
+	// Prints implemented methods
+	function PrintImplementedMethods ($class) {
+		
+		// print implemented methods
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{ Implemented methods }");
+		foreach ($class["all"] as $method) {
+			if ($method["can_override"]) {
+			
+				if ($method["kind"] == "function") {
+					$template = $this->template_implemented_function;
+				} else {
+					$template = $this->template_implemented_procedure;
+				}
+				
+				$template = str_replace("[CLASS]", $class["name"], $template);
+				$template = str_replace("[NAME]", $method["name"], $template);
+				
+				$method["return"] = $this->ReplaceNSTypesWithRef($method["return"]);
+				$template = str_replace("[RETURN]", $method["return"], $template);
+				$template = str_replace("[PARAMS_HEADER]", $method["param_string_with_modifiers"], $template);
+				
+				// build parameter list
+				if ($method["has_params"]) {
+					
+					// auto-generate wrappers
+					$params = "(";
+					$params .= $this->MakeParamList($method["param_array"], USE_HANDLE, CAST_HANDLE, ACCESS_HANDLE_FUNCTION, DONT_REGISTER_SEL);
+					$params .= ")";
+					$template = str_replace("[PARAMS_BODY_WRAPPER]", $params, $template);
+					
+					// standard params
+					$params = "(";
+					$params .= $this->MakeObjcTypeParamList($method["param_array"], true);
+					$params .= ")";
+					$template = str_replace("[PARAMS_BODY]", $params, $template);
+					
+					
+				} else {
+					$template = str_replace("[PARAMS_BODY]", "", $template);
+					$template = str_replace("[PARAMS_BODY_WRAPPER]", "", $template);
+				}
+
+				$this->PrintOutput(0, "");
+				$this->PrintOutput(0, $template);
+			}
+		}
+		
+	}
+				
+	// Prints Objective-C wrapper procedures
+	function PrintObjcWrapperProcedures ($class) {
+		
+		// print implemented methods
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{ Objective-c wrapper procedures }");
+		foreach ($class["all"] as $method) {
+			if ($method["can_override"]) {
+			
+				if ($method["kind"] == "function") {
+					$template = $this->template_function_objc_wrapper;
+				} else {
+					$template = $this->template_procedure_objc_wrapper;
+				}
+				
+				$template = str_replace("[CLASS]", $class["name"], $template);
+				$template = str_replace("[NAME]", $method["name"], $template);
+				$template = str_replace("[SELNAME]", str_replace(":", "_", $method["objc_method"]), $template);
+				
+				$method["return"] = $this->ReplaceNSTypesWithRef($method["return"]);
+				$template = str_replace("[RETURN]", $method["return"], $template);
+				
+				if ($method["has_params"]) {
+					$method["param_string_clean"] = $this->ReplaceNSTypes($method["param_string_clean"]);
+					
+					// Make sure we always the id type in objc wrappers
+					$params_header = $this->ReplaceNSTypesWithRef($method["param_string_clean_with_modifiers"]);
+					$template = str_replace("[PARAMS_HEADER]", "; $params_header", $template);
+					
+					// auto-generate wrappers
+					$wrappers_variables = "";
+					$wrappers_create = "";
+					$wrappers_release = "";
+					$variable_list = "";
+					
+					foreach ($method["param_array"] as $pair) {
+						if (in_array($pair["type"], $this->cocoa_classes)) {
+							
+							$wrappers_variables .= "object_".$pair["name"].": ".$pair["type"]."\n;";
+							$wrappers_create .= "object_".$pair["name"]." := ".$pair["type"].".CreateWithHandle(".$pair["name"].");\n";
+							$wrappers_release .= "object_".$pair["name"].".release;\n";
+							$variable_list .= "object_".$pair["name"].", ";
+						} else {
+							$variable_list .= $pair["name"].", ";
+						}
+					}
+					$variable_list = trim($variable_list, ", ");
+					
+					$template = str_replace("[VARIABLES]", $wrappers_variables, $template);
+					$template = str_replace("[WRAPPERS_CREATE]", $wrappers_create, $template);
+					$template = str_replace("[WRAPPERS_RELEASE]", $wrappers_release, $template);
+					
+					$template = str_replace("[PARAMS_LIST_WRAPPER]", "($variable_list)", $template);
+					
+					$params = $this->MakeObjcTypeParamList($method["param_array"], false);
+					$template = str_replace("[PARAMS_LIST]", "($params)", $template);
+					
+				} else {
+					$template = str_replace("[PARAMS_HEADER]", "", $template);
+					$template = str_replace("[PARAMS_LIST]", "", $template);
+					$template = str_replace("[PARAMS_LIST_WRAPPER]", "", $template);
+					$template = str_replace("[VARIABLES]", "", $template);
+					$template = str_replace("[WRAPPERS_CREATE]", "", $template);
+					$template = str_replace("[WRAPPERS_RELEASE]", "", $template);
+				}
+				
+				$this->PrintOutput(0, "");
+				$this->PrintOutput(0, $template);
+			}
+		}
+	}
+	
+	// Prints send message objects with a custom implementation
+	function PrintCustomSendMessageMethods ($class, $method) {
+		
+		// NSArray
+		if ($class["name"] == "NSArray") {
+			if ($method["name"] == "arrayWithObjects") $template = $this->template_constructor_constarray_no_alloc; 
+			if ($method["name"] == "initWithObjects") $template = $this->template_constructor_constarray; 
+			
+			$template = str_replace("[CFTYPE]", "CFArrayRef", $template);
+			$template = str_replace("[ALLOC_PARAM_LIST]", $this->template_array_param_list, $template);
+			
+			if ($method["name"] == "arrayWithObjects") $template = str_replace("[OBJC_METHOD]", "arrayWithArray:", $template);
+			if ($method["name"] == "initWithObjects") $template = str_replace("[OBJC_METHOD]", "initWithArray:", $template);
+		}
+		
+		// NSDictionary
+		if ($class["name"] == "NSDictionary") {
+			if ($method["name"] == "dictionaryWithObjectsAndKeys") $template = $this->template_constructor_constarray_no_alloc; 
+			if ($method["name"] == "initWithObjectsAndKeys") $template = $this->template_constructor_constarray; 
+			
+			$template = str_replace("[CFTYPE]", "CFDictionaryRef", $template);
+			$template = str_replace("[ALLOC_PARAM_LIST]", $this->template_dictionary_param_list, $template);
+			
+			if ($method["name"] == "dictionaryWithObjectsAndKeys") $template = str_replace("[OBJC_METHOD]", "dictionaryWithDictionary:", $template);
+			if ($method["name"] == "initWithObjectsAndKeys") $template = str_replace("[OBJC_METHOD]", "initWithDictionary:", $template);
+		}
+		
+		// NSSet
+		if ($class["name"] == "NSSet") {
+			if ($method["name"] == "setWithObjects") $template = $this->template_constructor_constarray_no_alloc; 
+			if ($method["name"] == "initWithObjects") $template = $this->template_constructor_constarray; 
+			
+			$template = str_replace("[CFTYPE]", "CFSetRef", $template);
+			$template = str_replace("[ALLOC_PARAM_LIST]", $this->template_set_param_list, $template);
+			
+			if ($method["name"] == "setWithObjects") $template = str_replace("[OBJC_METHOD]", "setWithSet:", $template);
+			if ($method["name"] == "initWithObjects") $template = str_replace("[OBJC_METHOD]", "initWithSet:", $template);
+		}
+		
+		$template = str_replace("[PARAMS_HEADER]", $method["param_string_with_modifiers"], $template);			
+		$template = str_replace("[CLASS]", $class["name"].".", $template);
+		$template = str_replace("[NAME]", $method["name"], $template);
+		$template = str_replace("[SELNAME]", str_replace(":", "_", $method["objc_method"]), $template);
+		
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, $template);
+	}
+				
+	// Prints send message objects
+	function PrintSendMessageMethods ($class) {
+
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{ Objective-c send message methods }");
+		foreach ($class["all"] as $method) {
+			
+			// handle custom methods
+			if (in_array($class["name"].".".$method["name"], $this->custom_send_methods)) {
+				$this->PrintCustomSendMessageMethods($class, $method);
+				continue;
+			}
+			
+			$template = $this->GetMsgSendTemplate($method, false);
+			
+			$template = $method["class_prefix"].$template;
+			
+			$template = str_replace("[CLASS]", $class["name"].".", $template);
+			$template = str_replace("[NAME]", $method["name"], $template);
+			$template = str_replace("[SELNAME]", str_replace(":", "_", $method["objc_method"]), $template);
+			$template = str_replace("[RETURN]", $method["return"], $template);
+			
+			// Replace SEL with the string equivalent so it can be registered inside the wrapper
+			if ($this->register_selectors) {
+				$params_header = str_replace_word("SEL", $this->sel_string, $method["param_string_with_modifiers"]);
+				$register = REGISTER_SEL;
+			} else {
+				$params_header = $method["param_string_with_modifiers"];
+				$register = DONT_REGISTER_SEL;
+			}
+			
+			$template = str_replace("[PARAMS_HEADER]", $params_header, $template);			
+			
+			if ($method["has_params"]) {
+				$template = str_replace("[PARAMS_PROC]", "; ".$method["param_string_clean_with_modifiers"], $template);
+				
+				$params_wrapper = $this->MakeParamList($method["param_array"], USE_HANDLE, CAST_HANDLE, ACCESS_HANDLE_FUNCTION, $register);			
+				$params_list = $this->MakeParamList($method["param_array"], DONT_USE_HANDLE, DONT_CAST_HANDLE, ACCESS_HANDLE_FUNCTION, $register);	
+				
+				$template = str_replace("[PARAMS_LIST_WRAPPER]", ", ".$params_wrapper, $template);
+				$template = str_replace("[PARAMS_LIST]", ", ".$params_list, $template);
+			} else {
+				$template = str_replace("[PARAMS_PROC]", "", $template);
+				$template = str_replace("[PARAMS_LIST]", "", $template);
+				$template = str_replace("[PARAMS_LIST_WRAPPER]", "", $template);
+			}
+			
+			$template = str_replace("[TARGET_TYPE]", $this->objc_id_real, $template);
+			$template = str_replace("[OBJC_METHOD]", $method["objc_method"], $template);
+			$template = str_replace("[GET_SUPER_CLASS]", "", $template);
+			
+			// decide reference to objc object by method type
+			if ($method["class_prefix"] == "") {
+				$template = str_replace("[OBJC_OBJECT]", "Handle", $template);
+			} else {
+				$template = str_replace("[OBJC_OBJECT]", "getClass", $template);
+			}
+			
+			$template = str_replace("[MSG_SEND_STRET]", "objc_msgSend_stret", $template);
+			$template = str_replace("[MSG_SEND_REGISTER]", "objc_msgSend", $template);
+			
+			if (in_array($method["return"], $this->struct_types)) {		// structure
+				$template = str_replace("[MSG_SEND]", "objc_msgSend_stret", $template);
+			} elseif (in_array($method["return"], $this->float_types)) {		// floating point
+				$template = str_replace("[MSG_SEND]", "objc_msgSend_fpret", $template);
+			} else { // simple type
+				$template = str_replace("[MSG_SEND]", "objc_msgSend", $template);
+			}
+			
+			$this->PrintOutput(0, "");
+			$this->PrintOutput(0, $template);
+		}
+	}
+	
+	// Prints override methods
+	function PrintOverrideMethods ($class) {
+
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{ Override methods }");
+		foreach ($class["all"] as $method) {
+			if ($method["can_override"]) {
+			
+				$template = $this->template_method_override;
+				
+				$template = str_replace("[CLASS]", $class["name"], $template);
+				$template = str_replace("[NAME]", $method["name"], $template);
+				$template = str_replace("[SELNAME]", str_replace(":", "_", $method["objc_method"]), $template);
+				$template = str_replace("[OBJC_METHOD]", $method["objc_method"], $template);
+				$template = str_replace("[TYPE_ENCODING]", $this->type_encodings[$class["name"]][$method["objc_method"]], $template);
+				
+				$this->PrintOutput(0, "");
+				$this->PrintOutput(0, $template);
+			}
+		}
+	}
+	
+	// Prints implemented methods that contain sending code
+	function PrintImplementedSuperMethods ($class) {
+		
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{ Implemented methods }");
+		foreach ($class["all"] as $method) {
+			if ($method["can_override"]) {
+			
+				$template = $this->GetMsgSendTemplate($method, true);
+				
+				$template = str_replace("[CLASS]", $class["name"].".", $template);
+				$template = str_replace("[NAME]", "implemented_".$method["name"], $template);
+				$template = str_replace("[SELNAME]", str_replace(":", "_", $method["objc_method"]), $template);
+				$method["return"] = $this->ReplaceNSTypesWithRef($method["return"]);
+				$template = str_replace("[RETURN]", $method["return"], $template);
+
+				// Replace SEL with the string equivalent so it can be registered inside the wrapper
+				if ($this->register_selectors) {
+					$params_header = str_replace_word("SEL", $this->sel_string, $method["param_string_with_modifiers"]);
+					$register = REGISTER_SEL;
+				} else {
+					$params_header = $method["param_string_with_modifiers"];
+					$register = DONT_REGISTER_SEL;
+				}
+				$template = str_replace("[PARAMS_HEADER]", $params_header, $template);			
+
+				if ($method["has_params"]) {
+					$template = str_replace("[PARAMS_PROC]", "; ".$method["param_string_clean_with_modifiers"], $template);
+
+					$params_wrapper = $this->MakeParamList($method["param_array"], USE_HANDLE, CAST_HANDLE, ACCESS_HANDLE_FUNCTION, $register);			
+					$params_list = $this->MakeParamList($method["param_array"], DONT_USE_HANDLE, DONT_CAST_HANDLE, ACCESS_HANDLE_FUNCTION, $register);	
+
+					$template = str_replace("[PARAMS_LIST_WRAPPER]", ", ".$params_wrapper, $template);
+					$template = str_replace("[PARAMS_LIST]", ", ".$params_list, $template);
+				} else {
+					$template = str_replace("[PARAMS_PROC]", "", $template);
+					$template = str_replace("[PARAMS_LIST]", "", $template);
+				}
+				
+				$template = str_replace("[TARGET_TYPE]", "Pobjc_super", $template);
+				$template = str_replace("[OBJC_METHOD]", $method["objc_method"], $template);
+				$template = str_replace("[OBJC_OBJECT]", "@super", $template);
+				$template = str_replace("[GET_SUPER_CLASS]", "super := getSuperClass;", $template);
+				
+				$template = str_replace("[MSG_SEND_STRET]", "objc_msgSendSuper_stret", $template);
+				$template = str_replace("[MSG_SEND_REGISTER]", "objc_msgSendSuper", $template);
+				
+				if (in_array($method["return"], $this->struct_types)) {
+					$template = str_replace("[MSG_SEND]", "objc_msgSendSuper_stret", $template);
+				} else {
+					$template = str_replace("[MSG_SEND]", "objc_msgSendSuper", $template);
+				}
+				
+				$this->PrintOutput(0, "");
+				$this->PrintOutput(0, $template);
+			}
+		}
+	}
+		
+	// Prints super methods
+	function PrintSuperMethods ($class) {
+		
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{ Super methods }");
+		foreach ($class["all"] as $method) {
+			if ($method["can_override"]) {
+			
+				$template = $this->GetMsgSendTemplate($method, true);
+				
+				$template = str_replace("[CLASS]", $class["name"].".", $template);
+				$template = str_replace("[NAME]", "super_".$method["name"], $template);
+				$template = str_replace("[SELNAME]", str_replace(":", "_", $method["objc_method"]), $template);
+				
+				$method["return"] = $this->ReplaceNSTypesWithRef($method["return"]);
+				$template = str_replace("[RETURN]", $method["return"], $template);
+				
+				//$method["param_string"] = $this->ReplaceNSTypesWithReal($method["param_string"]);
+				//$method["param_string_clean"] = $this->ReplaceNSTypesWithReal($method["param_string_clean"]);
+				
+				$template = str_replace("[PARAMS_HEADER]", $method["param_string_with_modifiers"], $template);
+				$template = str_replace("[PARAMS_PROC]", "; ".$method["param_string_clean"], $template);
+				$template = str_replace("[PARAMS_LIST_WRAPPER]", ", ".$method["param_list"], $template);
+				$template = str_replace("[PARAMS_LIST]", ", ".$method["param_list"], $template);
+				$template = str_replace("[TARGET_TYPE]", "Pobjc_super", $template);
+				$template = str_replace("[OBJC_METHOD]", $method["objc_method"], $template);
+				$template = str_replace("[OBJC_OBJECT]", "@super", $template);
+				$template = str_replace("[GET_SUPER_CLASS]", "", $template);
+				
+				if (in_array($method["return"], $this->struct_types)) {
+					$template = str_replace("[MSG_SEND]", "objc_msgSendSuper_stret", $template);
+				} else {
+					$template = str_replace("[MSG_SEND]", "objc_msgSendSuper", $template);
+				}
+				
+				
+				$this->PrintOutput(0, "");
+				$this->PrintOutput(0, $template);
+			}
+		}
+	}
+	
+	function PrintProtocolDeclaration ($protocol, $method) {
+		$template = $method["template"];
+		$template = str_replace("[PREFIX]", $protocol["name"]."_", $template);
+		
+		if ($method["param_array"] == 0) {
+			$param = "sourceObject: NSObjectRef";
+		} else {
+			$param = "sourceObject: NSObjectRef; ";
+		}
+		
+		$template = str_replace("[PARAMS]", "($param".$method["param_string_clean_with_modifiers"].")", $template);
+		$template = str_replace("[KIND]", $method["kind"], $template);
+		$template = str_replace("[RETURN]", $method["return"], $template);
+
+		$this->PrintOutput(0, $template);
+	}
+	
+	// Prints all the protocols in the header
+	function PrintHeaderProtocols ($header, $implemented) {
+		
+		if (!$header["protocols"]) return;
+		
+		foreach ($header["protocols"] as $protocol) {
+			
+			if ($implemented) {
+				
+				if (!$protocol["methods"]) continue;
+				
+				foreach ($protocol["methods"] as $name => $method) {
+					if ($method["kind"] != "constructor") {
+						//$this->PrintProtocolDeclaration($protocol, $method);
+						
+						$template = $this->GetMsgSendTemplate($method, false);
+						
+						// choose the protocol version
+						if ($template == $this->template_function_make_wrapper) $template = $this->template_protocol_make_wrapper;
+						if ($template == $this->template_function_make_wrapper_no_params) $template = $this->template_protocol_make_wrapper_no_params;
+						
+						$template = str_replace("[CLASS]", $protocol["name"]."_", $template);
+						if ($method["param_array"] == 0) {
+							// add header params token to accommodate our extra parameter
+							$template = str_replace("[NAME]", $method["name"]."[PARAMS_HEADER]", $template);
+						} else {
+							$template = str_replace("[NAME]", $method["name"], $template);
+						}
+						$template = str_replace("[SELNAME]", str_replace(":", "_", $method["objc_method"]), $template);
+						$template = str_replace("[RETURN]", $method["return"], $template);
+
+						if ($method["param_array"] == 0) {
+							$source_param = "sourceObject: NSObjectRef";
+						} else {
+							$source_param = "sourceObject: NSObjectRef; ";
+						}
+
+						// Replace SEL with the string equivalent so it can be registered inside the wrapper
+						if ($this->register_selectors) {
+							$params_header = str_replace_word("SEL", $this->sel_string, $method["param_string_clean_with_modifiers"]);
+							$register = REGISTER_SEL;
+						} else {
+							$params_header = $method["param_string_clean_with_modifiers"];
+							$register = DONT_REGISTER_SEL;
+						}
+
+						$template = str_replace("[PARAMS_HEADER]", "($source_param$params_header)", $template);			
+
+						if ($method["has_params"]) {
+							$template = str_replace("[PARAMS_PROC]", "; ".$method["param_string_clean"], $template);
+
+							$params_wrapper = $this->MakeParamList($method["param_array"], USE_HANDLE, CAST_HANDLE, ACCESS_HANDLE_DIRECT, $register);			
+							$params_list = $this->MakeParamList($method["param_array"], DONT_USE_HANDLE, DONT_CAST_HANDLE, ACCESS_HANDLE_DIRECT, $register);	
+
+							$template = str_replace("[PARAMS_LIST_WRAPPER]", ", ".$params_wrapper, $template);
+							$template = str_replace("[PARAMS_LIST]", ", ".$params_list, $template);
+						} else {
+							$template = str_replace("[PARAMS_PROC]", "", $template);
+							$template = str_replace("[PARAMS_LIST]", "", $template);
+						}
+
+						$template = str_replace("[TARGET_TYPE]", $this->objc_id_real, $template);
+						$template = str_replace("[OBJC_METHOD]", $method["objc_method"], $template);
+						$template = str_replace("[GET_SUPER_CLASS]", "", $template);
+						
+						$template = str_replace("[MSG_SEND_STRET]", "objc_msgSend_stret", $template);
+						$template = str_replace("[MSG_SEND_REGISTER]", "objc_msgSend", $template);
+
+						// use the source object as the the target
+						$template = str_replace("[OBJC_OBJECT]", "sourceObject", $template);
+
+						if (in_array($method["return"], $this->struct_types)) {		// structure
+							$template = str_replace("[MSG_SEND]", "objc_msgSend_stret", $template);
+						} elseif (in_array($method["return"], $this->float_types)) {		// floating point
+							$template = str_replace("[MSG_SEND]", "objc_msgSend_fpret", $template);
+						} else { // simple type
+							$template = str_replace("[MSG_SEND]", "objc_msgSend", $template);
+						}
+
+						$this->PrintOutput(0, "");
+						$this->PrintOutput(0, $template);
+						
+						
+					}
+				}
+				
+			} else {
+				if ($protocol["methods"]) {
+					$this->PrintOutput(0, "");
+					$this->PrintOutput(0, "{ Protocol: ".$protocol["name"]." }");
+
+					foreach ($protocol["methods"] as $name => $method) {
+						if ($method["kind"] != "constructor") {
+							$this->PrintProtocolDeclaration($protocol, $method);
+						}
+					}
+				}
+			}
+		}
+	}
+	
+	function PrintSelectorVariables ($class) {
+		
+		// class has no methods, bail!
+		if (!$class["methods"]) return;
+		
+		$this->PrintOutput(0,"var");
+		
+		foreach ($class["all"] as $method) {
+			$sel_name = str_replace(":", "_", $method["objc_method"]);
+			$this->PrintOutput(1, "SEL_$sel_name: SEL;");
+		}
+		
+	}
+	
+	// Prints a classes implementation in Pascal format to a file handle
+	function PrintClassImplementation ($class) {
+		
+		// class has no methods, bail!
+		if (!$class["methods"]) return;
+		
+		$name = $class["name"];
+		
+		$this->PrintOutput(0,"");
+		$this->PrintOutput(0, "{ Selectors for $name }");
+		$this->PrintSelectorVariables($class);
+		
+		$this->PrintOutput(0,"");
+		$this->PrintOutput(0, "{ Implementation for $name }");
+		
+		// Global accessor object
+		$this->PrintOutput(0,"");
+		$this->PrintOutput(0,"var");
+		$this->PrintOutput(1, "__".$class["name"].": ".$class["name"].";");
+		
+		// getClass method
+		$this->PrintOutput(0,"");
+		$this->PrintOutput(0,"class function $name.getClass: $this->objc_id_real;");
+		$this->PrintOutput(0,"begin");
+		$this->PrintOutput(1,"Result := objc_getClass('$name');");
+		$this->PrintOutput(0,"end;");
+		
+		// withObject static accessor
+		$this->PrintOutput(0,"");
+		$this->PrintOutput(0, "class function $name.withObject (inObject: Pointer): $name;");
+		$this->PrintOutput(0,"begin");
+		$this->PrintOutput(1,"if __$name = nil then");
+		$this->PrintOutput(2,"__$name := $name.Create;");
+		$this->PrintOutput(1,"__$name.Handle := inObject;");
+		$this->PrintOutput(1,"result := __$name;");
+		$this->PrintOutput(0,"end;");
+		
+		$this->PrintImplementedSuperMethods($class);
+		// DEPRECTAED IN FAVOR OF IMPLEMENTED SUPER METHODS
+		//$this->PrintImplementedMethods($class);
+		//$this->PrintSuperMethods($class);
+		$this->PrintObjcWrapperProcedures($class);
+		$this->PrintOverrideMethods($class);
+		$this->PrintSendMessageMethods($class);
+	}
+	
+	// Prints a calls in Pascal format to a file handle
+	public function PrintClass ($class) {
+		
+		// class has no methods, bail!
+		if (!$class["methods"]) return;
+		
+		// the delegate class is the super class of NSObject
+		if ($class["name"] == "NSObject") $class["super"] = $this->master_delegate_class;
+		
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{ ".$class["name"]." }");
+		$this->PrintOutput(1, $class["name"]." = class(".$class["super"].")");
+		$this->PrintOutput(1, "public");
+	   
+		// getClass override
+		$this->PrintOutput(2, "class function getClass: $this->objc_id_real; override;");
+		
+		// static wrapper accessor
+		$class_name = $class["name"];
+		$this->PrintOutput(2, "class function withObject (inObject: Pointer): $class_name;");
+		
+		// print class-level methods
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(2, "{ Class Methods }");
+		foreach ($class["methods"] as $method) {
+			$this->PrintOutput(2, $method["def"]);
+		}
+	
+		// print category-level methods
+		if (count($class["categories"]) > 0) {
+			foreach ($class["categories"] as $name => $category) {
+				$this->PrintOutput(0, "");
+				$this->PrintOutput(2, "{ Category: $name }");
+				
+				if ($category["methods"]) {
+					foreach ($category["methods"] as $method) {
+						$this->PrintOutput(2, $method["def"]);
+					}
+				}	
+			}
+		}
+		
+		// print implemented methods
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(1, "protected");
+		$this->PrintOutput(2, "{ Implemented Methods }");
+		foreach ($class["all"] as $method) {
+			if ($method["can_override"]) {
+			
+				$template = $method["template"];
+				$template = str_replace("[PREFIX]", "implemented_", $template);
+				$template = str_replace("[PARAMS]", $method["param_string_with_modifiers"], $template);
+				$template = str_replace("[KIND]", $method["kind"], $template);
+				
+				// implemented methods always return id instead of wrappers
+				$method["return"] = $this->ReplaceNSTypesWithRef($method["return"]);
+				
+				$template = str_replace("[RETURN]", $method["return"], $template);
+				
+				$this->PrintOutput(2, $template." virtual;");
+			}
+		}
+		
+		// print override methods
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(2, "{ Override Methods }");
+		foreach ($class["all"] as $method) {
+			if ($method["can_override"]) {
+			
+				$template = $method["template_procedure"];
+				$template = str_replace("[PREFIX]", "override_", $template);
+				$template = str_replace("[PARAMS]", "", $template);
+				$template = str_replace("[RETURN]", "", $template);
+				
+				$this->PrintOutput(2, $template);
+			}
+		}
+		
+		// print super methods
+		/* DEPRECTAED IN FAVOR OF IMPLEMENTED SUPER METHODS
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(2, "{ Super Methods }");
+		foreach ($class["all"] as $method) {
+			if ($method["can_override"]) {
+			
+				$template = $method["template"];
+				$template = str_replace("[PREFIX]", "super_", $template);
+				$template = str_replace("[PARAMS]", $method["param_string_with_modifiers"], $template);
+				$template = str_replace("[KIND]", $method["kind"], $template);
+				$template = str_replace("[RETURN]", $this->ReplaceNSTypesWithRef($method["return"]), $template);	
+				
+				$this->PrintOutput(2, $template);
+			}
+		}
+		*/
+		$this->PrintOutput(1, "end;");
+	}
+		
+	function PrintDelegateReference ($valid_categories) {
+		
+		ksort($this->delegate_methods);
+		
+		$this->PrintOutput(0, "unit $this->master_delegate_file;");
+		$this->PrintOutput(0, "interface");
+		$this->PrintOutput(0, "uses");
+		$this->PrintOutput(1, "ctypes, objc, MacOSAll");
+
+		$this->PrintOutput(0, "type");
+		$this->PrintOutput(1, "$this->master_delegate_class = class");
+		$this->PrintOutput(1, "public");
+		
+		// implemented methods
+		foreach ($this->delegate_methods as $category => $selectors) {
+			if (in_array($category, $this->ignore_categories)) continue;
+			
+			// make sure the category is valid
+			$valid = false;
+			foreach ($valid_categories as $pattern) {
+				if (eregi($pattern, $category)) {
+					$valid = true;
+					break;
+				}
+			}
+			if (!$valid) continue;
+			
+			$this->PrintOutput(2, "");
+			$this->PrintOutput(2, "{ $category }");
+			
+			foreach ($selectors as $selector) {
+				
+				// FPC long name bug work-around
+				if (strlen($selector["name_pascal"]) > $this->maximum_method_length) continue;
+				
+				if ($selector["kind"] == "procedure") {
+					$this->PrintOutput(2, $selector["kind"]." ".$selector["name_pascal"].$selector["param_string"].";");
+				} else {
+					$this->PrintOutput(2, $selector["kind"]." ".$selector["name_pascal"].$selector["param_string"].": ".$selector["method"]["return"].";");
+				}
+				
+			}
+		}
+		
+		$this->PrintOutput(1, "end;");
+	}
+		
+		
+	function PrintDelegateClass ($valid_categories) {
+		
+		ksort($this->delegate_methods);
+		
+		$this->PrintOutput(0, "{\$ifdef FORWARD}");
+		$this->PrintOutput(1, "$this->master_delegate_class = class;");
+		$this->PrintOutput(0, "{\$endif}");
+	
+		$this->PrintOutput(0, "{\$ifdef CLASSES}");
+		$macro = strtoupper($this->master_delegate_class);
+		$this->PrintOutput(0, "{\$ifndef $macro"."_PAS_C}");
+		$this->PrintOutput(0, "{\$define $macro"."_PAS_C}");
+		
+		$this->PrintOutput(1, "$this->master_delegate_class = class(NSObjectCore)");
+		$this->PrintOutput(1, "public");
+		
+		//$this->PrintOutput(2, "constructor Create; override;");
+		
+		// implemented methods
+		foreach ($this->delegate_methods as $category => $selectors) {
+			if (in_array($category, $this->ignore_categories)) continue;
+			
+			// make sure the category is valid
+			$valid = false;
+			foreach ($valid_categories as $pattern) {
+				if (eregi($pattern, $category)) {
+					$valid = true;
+					break;
+				}
+			}
+			if (!$valid) continue;
+			
+			$this->PrintOutput(2, "");
+			$this->PrintOutput(2, "{ $category }");
+			
+			foreach ($selectors as $selector) {
+				
+				// FPC long name bug work-around
+				if (strlen($selector["name_pascal"]) > $this->maximum_method_length) continue;
+				
+				if ($selector["kind"] == "procedure") {
+					$this->PrintOutput(2, $selector["kind"]." ".$selector["name_pascal"].$selector["param_string"]."; virtual;");
+				} else {
+					$this->PrintOutput(2, $selector["kind"]." ".$selector["name_pascal"].$selector["param_string"].": ".$selector["method"]["return"]."; virtual;");
+				}
+				
+			}
+		}
+		
+		// add methods
+		$this->PrintOutput(2, "");
+		$this->PrintOutput(2, "{ Adding methods }");
+		foreach ($this->delegate_methods as $category => $selectors) {
+			if (in_array($category, $this->ignore_categories)) continue;
+			
+			// make sure the category is valid
+			$valid = false;
+			foreach ($valid_categories as $pattern) {
+				if (eregi($pattern, $category)) {
+					$valid = true;
+					break;
+				}
+			}
+			if (!$valid) continue;
+			
+			foreach ($selectors as $selector) {
+				// FPC long name bug work-around
+				if (strlen("add_".$selector["name_pascal"]) > $this->maximum_method_length) continue;
+				
+				$this->PrintOutput(2, "procedure add_".$selector["name_pascal"].";");
+			}
+		}
+		
+		$this->PrintOutput(1, "end;");
+		$this->PrintOutput(0, "{\$endif}");
+		$this->PrintOutput(0, "{\$endif}");
+		$this->PrintOutput(0, "{\$ifdef IMPLEMENTATION}");		
+		
+		// create constructor method
+		/*
+		$this->PrintOutput(0, "");
+		$template = str_replace("[CLASS]", $this->master_delegate_class, $this->template_delegate_create);
+		$this->PrintOutput(0, $template);
+		*/
+				
+		// print implemented methods
+		foreach ($this->delegate_methods as $category => $selectors) {
+			if (in_array($category, $this->ignore_categories)) continue;
+			
+			// make sure the category is valid
+			$valid = false;
+			foreach ($valid_categories as $pattern) {
+				if (eregi($pattern, $category)) {
+					$valid = true;
+					break;
+				}
+			}
+			if (!$valid) continue;
+			
+			// place-holder methods
+			foreach ($selectors as $selector) {
+
+				// FPC long name bug work-around
+				if (strlen($selector["name_pascal"]) > $this->maximum_method_length) continue;
+
+				if ($selector["kind"] == "procedure") {
+					$this->PrintOutput(0, $selector["kind"]." ".$this->master_delegate_class.".".$selector["name_pascal"].$selector["param_string"].";");
+				} else {
+					$this->PrintOutput(0, $selector["kind"]." ".$this->master_delegate_class.".".$selector["name_pascal"].$selector["param_string"].": ".$selector["method"]["return"].";");
+				}
+
+				$this->PrintOutput(0, "begin");
+				$this->PrintOutput(0, "end;");
+				$this->PrintOutput(0, "");
+			}			
+			
+			// objc wrappers
+			foreach ($selectors as $selector) {
+				
+				// FPC long name bug work-around
+				if (strlen($selector["name_pascal"]) > $this->maximum_method_length) continue;
+
+				if ($selector["kind"] == "function") {
+					$template = $this->template_function_delegate_objc;
+				} else {
+					$template = $this->template_procedure_delegate_objc;
+				}
+				
+				$template = str_replace("[CLASS]", $this->master_delegate_class, $template);
+				$template = str_replace("[NAME]", $selector["name_pascal"], $template);
+				
+				$selector["method"]["return"] = $this->ReplaceNSTypes($selector["method"]["return"]);
+				$template = str_replace("[RETURN]", $selector["method"]["return"], $template);
+				
+				if ($selector["method"]["has_params"]) {
+					$selector["method"]["param_string_clean"] = $this->ReplaceNSTypesWithRef($selector["method"]["param_string_clean"]);
+					$template = str_replace("[PARAMS_HEADER]", " (_self: $this->objc_id_real; _cmd: SEL; ".$selector["method"]["param_string_clean"].")", $template);
+					
+					// auto-generate wrappers
+					$wrappers_variables = "";
+					$wrappers_create = "";
+					$wrappers_release = "";
+					$variable_list = "";
+					
+					foreach ($selector["method"]["param_array"] as $pair) {
+						if (in_array($pair["type"], $this->cocoa_classes)) {
+							
+							$wrappers_variables .= "object_".$pair["name"].": ".$pair["type"].";\n";
+							$wrappers_create .= "object_".$pair["name"]." := ".$pair["type"].".CreateWithHandle(".$pair["name"].");\n";
+							$wrappers_release .= "object_".$pair["name"].".release;\n";
+							$variable_list .= "object_".$pair["name"].", ";
+						} else {
+							$variable_list .= $pair["name"].", ";
+						}
+					}
+					$variable_list = trim($variable_list, ", ");
+					
+					$template = str_replace("[VARIABLES]", $wrappers_variables, $template);
+					$template = str_replace("[WRAPPERS_CREATE]", $wrappers_create, $template);
+					$template = str_replace("[WRAPPERS_RELEASE]", $wrappers_release, $template);
+					
+					$template = str_replace("[PARAMS_LIST_WRAPPER]", "($variable_list)", $template);
+					
+					$params = $this->MakeObjcTypeParamList($selector["method"]["param_array"], false);
+					$template = str_replace("[PARAMS_LIST]", "($params)", $template);
+					
+				} else {
+					$template = str_replace("[PARAMS_HEADER]", "(_self: $this->objc_id_real; _cmd: SEL)", $template);
+					$template = str_replace("[PARAMS_LIST]", "", $template);
+					$template = str_replace("[PARAMS_LIST_WRAPPER]", "", $template);
+					$template = str_replace("[VARIABLES]", "", $template);
+					$template = str_replace("[WRAPPERS_CREATE]", "", $template);
+					$template = str_replace("[WRAPPERS_RELEASE]", "", $template);
+				}
+				
+				$this->PrintOutput(0, "");
+				$this->PrintOutput(0, $template);
+			}
+			
+			// add methods
+			foreach ($selectors as $selector) {
+				
+				// FPC long name bug work-around
+				if (strlen($selector["name_pascal"]) > $this->maximum_method_length) continue;
+				
+				$template = $this->template_method_add_runtime;
+				
+				$template = str_replace("[CLASS]", $this->master_delegate_class, $template);
+				$template = str_replace("[NAME]", $selector["name_pascal"], $template);
+				$template = str_replace("[TYPES]", $selector["types"], $template);
+				$template = str_replace("[OBJC_METHOD]", $selector["name"], $template);
+				
+				$this->PrintOutput(0, "");
+				$this->PrintOutput(0, $template);
+			}			
+		}
+		
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{\$endif}");
+		
+		print("* Printed delegate class to "."$this->root$this->out/foundation/$this->master_delegate_file.inc\n");
+	}
+	
+	// Prints all externally defined symbols
+	function PrintExternalSymbols ($header) {
+		if (!$this->dump[$header["name"]]["types"]) return;
+		foreach ($this->dump[$header["name"]]["types"] as $key => $type_array) {	
+			if ($key == "external_symbol") {
+				$this->PrintOutput(0, "");
+				$this->PrintOutput(0, "{ External symbols }");
+				$this->PrintOutput(0, "var");
+				
+				foreach ($type_array as $type) $this->PrintOutput(1, $type);
+			}
+		}
+	}
+	
+	// Prints all types in the header
+	function PrintTypes ($header) {
+		if (!$this->dump[$header["name"]]["types"]) return;
+		
+		foreach ($this->dump[$header["name"]]["types"] as $key => $type_array) {	
+			
+			// External defines
+			if ($key == "defines") {
+				$this->PrintOutput(0, "");
+				$this->PrintOutput(0, "{ Defines }");
+				$this->PrintOutput(0, "const");
+				
+				foreach ($type_array as $type) $this->PrintOutput(1, $type);
+			}
+				
+			// External CFString constants
+			if ($key == "string_constant") {
+				$this->PrintOutput(0, "");
+				$this->PrintOutput(0, "{ CFString constants }");
+				$this->PrintOutput(0, "var");
+				
+				foreach ($type_array as $type) $this->PrintOutput(1, $type);
+			}
+									
+			// Named Enumerations
+			if ($key == "named_enums") {
+				$this->PrintOutput(0, "");
+				$this->PrintOutput(0, "{ Sets }");
+				foreach ($type_array as $type) {
+					$this->PrintOutput(0, "");
+					$this->PrintOutput(0, "type");
+					$this->PrintOutput(1, $type);
+				}
+			}
+			
+			// Enumerations
+			if ($key == "enums") {
+				$this->PrintOutput(0, "");
+				$this->PrintOutput(0, "{ Constants }");
+				foreach ($type_array as $block) {
+					$this->PrintOutput(0, "");
+					$this->PrintOutput(0, "const");
+					foreach ($block as $type) $this->PrintOutput(1, $type);
+				}
+			}
+			
+			// Typedefs		
+			if ($key == "typedef") {
+				$this->PrintOutput(0, "");
+				$this->PrintOutput(0, "{ Types }");
+				$this->PrintOutput(0, "type");
+
+				foreach ($type_array as $type) $this->PrintOutput(1, $type);
+			}
+			
+			// CallBacks
+			if ($key == "callbacks") {
+				$this->PrintOutput(0, "");
+				$this->PrintOutput(0, "{ Callbacks }");
+				$this->PrintOutput(0, "type");
+
+				foreach ($type_array as $name => $type) $this->PrintOutput(1, "$name = $type");
+			}
+			
+		}
+	}
+	
+	// Prints all records in the header
+	function PrintRecords ($header) {
+		if (!$this->dump[$header["name"]]["types"]) return;
+		
+		foreach ($this->dump[$header["name"]]["types"] as $key => $type_array) {			
+			// Structures
+			if ($key == "structs") {
+				$this->PrintOutput(0, "");
+				$this->PrintOutput(0, "{ Records }");
+
+				foreach ($type_array as $type) {
+					$this->PrintOutput(0, "type");
+					$this->PrintOutput(1, $type);
+				}
+			}			
+		}
+	}
+	
+	// Prints all callbacks in the header
+	function PrintCallBacks ($header) {
+		if (!$this->dump[$header["name"]]["types"]) return;
+		
+		foreach ($this->dump[$header["name"]]["types"] as $key => $type_array) {	
+			if ($key == "callbacks") {
+				$this->PrintOutput(0, "");
+				$this->PrintOutput(0, "{ Callbacks }");
+				$this->PrintOutput(0, "type");
+
+				foreach ($type_array as $name => $type) $this->PrintOutput(1, "$name = $type");
+			}
+		}
+	}
+	
+	// Prints all external functions in the header
+	function PrintFunctions ($header) {
+		if (!$this->dump[$header["name"]]["types"]) return;
+		
+		foreach ($this->dump[$header["name"]]["types"] as $key => $type_array) {	
+			if ($key == "functions") {
+				$this->PrintOutput(0, "");
+				$this->PrintOutput(0, "{ Functions }");
+				
+				foreach ($type_array as $type) $this->PrintOutput(0, $type);
+			}
+		}
+	}
+		
+	// Prints all classes from the header in reference format (not for compiling)
+	function PrintHeaderReference ($header, $path) {
+		
+		$this->output = fopen($path, "w+");
+		
+		//$this->PrintOutput(0, "{ ".ucfirst($header["framework"]).".framework ".$header["name"]." }");
+		$this->PrintOutput(0, "unit ".$header["name_clean"].";");
+		$this->PrintOutput(0, "interface");
+		$this->PrintOutput(0, "uses");
+		$this->PrintOutput(1, "ctypes, objc, MacOSAll;");
+		
+		if ($header["classes"]) {
+			foreach ($header["classes"] as $class) {
+				$this->PrintOutput(0, "");
+				$this->PrintOutput(0, "type");
+				$this->PrintOutput(1, $class["name"]."Ref = ".$this->objc_id_real.";");
+				$this->PrintOutput(1, $class["name"]."Pointer = Pointer;");
+			}
+		}
+		
+		// types
+		$this->PrintTypes($header);
+		$this->PrintRecords($header);
+		$this->PrintFunctions($header);
+		$this->PrintExternalSymbols($header);
+		
+		if ($header["classes"]) {
+			
+			foreach ($header["classes"] as $class) {
+				if (in_array($class["name"], $this->cocoa_classes)) {
+					$this->PrintOutput(0, "");
+					$this->PrintOutput(0, "type");
+					
+					$this->PrintOutput(1, $class["name"]." = object(".$class["super"].")");
+
+					// print class-level methods
+					if (count($class["methods"]) > 0) {
+						$this->PrintOutput(0, "");
+						foreach ($class["methods"] as $method) {
+							$this->PrintOutput(2, $method["def"]);
+						}
+					}
+
+					// print category-level methods
+					if (count($class["categories"]) > 0) {
+						foreach ($class["categories"] as $name => $category) {
+							$this->PrintOutput(0, "");
+							$this->PrintOutput(2, "{ Category: $name }");
+
+							if ($category["methods"]) {
+								foreach ($category["methods"] as $method) {
+									$this->PrintOutput(2, $method["def"]);
+								}
+							}	
+						}
+					}
+					
+					$this->PrintOutput(1, "end;");
+				}
+			}
+		}
+		
+		// print procedural protocols
+		if ($header["protocols"]) {
+			foreach ($header["protocols"] as $protocol) {
+				if ($protocol["methods"]) {
+					$this->PrintOutput(0, "");
+					$this->PrintOutput(0, "{ Protocol: ".$protocol["name"]." }");
+
+					foreach ($protocol["methods"] as $name => $method) {
+						if ($method["kind"] != "constructor") {
+							$this->PrintProtocolDeclaration($protocol, $method);
+						}
+					}
+				}
+			}
+		}
+		
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "implementation");
+		$this->PrintOutput(0, "end.");
+	}
+		
+	// Prints all classes from the header
+	public function PrintHeader ($header) {
+		global $version;
+		
+		$this->output = fopen($header["path"], "w+");
+		
+		$this->PrintOutput(0, "{ Parsed from ".ucfirst($header["framework"]).".framework ".$header["name"]." }");
+		
+		$date = date("D M j G:i:s T Y");
+		$this->PrintOutput(0, "{ Version $version - $date }");
+		$this->PrintOutput(0, "");
+		
+		$macro = strtoupper(substr($header["name"], 0, (strripos($header["name"], "."))));
+		
+		if ($header["classes"]) {
+			$this->PrintOutput(0, "{\$ifdef HEADER}");
+			$this->PrintOutput(0, "{\$ifndef $macro"."_PAS_H}");
+			$this->PrintOutput(0, "{\$define $macro"."_PAS_H}");
+		
+		
+				foreach ($header["classes"] as $class) {
+					$this->PrintOutput(0, "type");
+
+					// Make a id "reference" to each class which is an object but reveals the name of the class
+					if ($class["name"]."Ref" == $this->objc_id_real) {
+						$ref = $this->objc_id_base;	// replace duplicates with the "base id"
+					} else {
+						$ref = $this->objc_id_real;
+					}
+					
+					$this->PrintOutput(1, $class["name"]."Ref = ".$ref.";");
+
+					// Make a pointer to each class
+					$this->PrintOutput(1, $class["name"]."Pointer = Pointer;");
+				}
+		
+			$this->PrintOutput(0, "");
+			$this->PrintOutput(0, "{\$endif}");
+			$this->PrintOutput(0, "{\$endif}");
+		}
+		
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{\$ifdef TYPES}");
+		$this->PrintOutput(0, "{\$ifndef $macro"."_PAS_T}");
+		$this->PrintOutput(0, "{\$define $macro"."_PAS_T}");
+		$this->PrintTypes($header);
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{\$endif}");
+		$this->PrintOutput(0, "{\$endif}");
+		
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{\$ifdef RECORDS}");
+		$this->PrintOutput(0, "{\$ifndef $macro"."_PAS_R}");
+		$this->PrintOutput(0, "{\$define $macro"."_PAS_R}");
+		$this->PrintRecords($header);
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{\$endif}");
+		$this->PrintOutput(0, "{\$endif}");
+		
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{\$ifdef FUNCTIONS}");
+		$this->PrintOutput(0, "{\$ifndef $macro"."_PAS_F}");
+		$this->PrintOutput(0, "{\$define $macro"."_PAS_F}");
+		$this->PrintFunctions($header);
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{\$endif}");
+		$this->PrintOutput(0, "{\$endif}");
+		
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{\$ifdef CALLBACKS}");
+		$this->PrintOutput(0, "{\$ifndef $macro"."_PAS_F}");
+		$this->PrintOutput(0, "{\$define $macro"."_PAS_F}");
+		$this->PrintCallBacks($header);
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{\$endif}");
+		$this->PrintOutput(0, "{\$endif}");
+		
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{\$ifdef EXTERNAL_SYMBOLS}");
+		$this->PrintOutput(0, "{\$ifndef $macro"."_PAS_T}");
+		$this->PrintOutput(0, "{\$define $macro"."_PAS_T}");
+		$this->PrintExternalSymbols($header);
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{\$endif}");
+		$this->PrintOutput(0, "{\$endif}");
+		
+		if ($header["classes"]) {
+			$this->PrintOutput(0, "");
+			$this->PrintOutput(0, "{\$ifdef FORWARD}");
+		
+			foreach ($header["classes"] as $class) {
+				// if the class contains methods make a forward declaration, otherwise a dummy class to NSObject
+				if (count($class["all"]) > 0) {
+					$this->PrintOutput(1, $class["name"]." = class;");
+				} else {
+					$this->PrintOutput(1, $class["name"]." = NSObject;");
+				}
+			}
+
+			$this->PrintOutput(0, "");
+			$this->PrintOutput(0, "{\$endif}");
+		}
+	
+		if ($header["classes"]) {
+			$this->PrintOutput(0, "");
+			$this->PrintOutput(0, "{\$ifdef CLASSES}");
+			$this->PrintOutput(0, "{\$ifndef $macro"."_PAS_C}");
+			$this->PrintOutput(0, "{\$define $macro"."_PAS_C}");
+		
+			foreach ($header["classes"] as $class) {
+				if (in_array($class["name"], $this->cocoa_classes)) {
+					$this->PrintClass($class);
+					//print("	- Printed class ".$class["name"]."\n");
+				}
+			}
+	
+			$this->PrintOutput(0, "");
+			$this->PrintOutput(0, "{\$endif}");
+			$this->PrintOutput(0, "{\$endif}");
+		}
+		
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{\$ifdef PROTOCOLS}");
+		$this->PrintOutput(0, "{\$ifndef $macro"."_PAS_P}");
+		$this->PrintOutput(0, "{\$define $macro"."_PAS_P}");
+		$this->PrintHeaderProtocols($header, false);
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{\$endif}");
+		$this->PrintOutput(0, "{\$endif}");
+		
+		$this->PrintOutput(0, "");
+		$this->PrintOutput(0, "{\$ifdef IMPLEMENTATION}");
+	
+		$this->PrintHeaderProtocols($header, true);
+		
+		if ($header["classes"]) {
+			foreach ($header["classes"] as $class) {
+				if (in_array($class["name"], $this->cocoa_classes)) {
+					$this->PrintClassImplementation($class);
+				}
+			}
+		}
+		
+		$this->PrintOutput(0, "{\$endif}");
+	}
+
+	// Prints all headers parsed
+	function PrintAllHeaders ($output_path, $ignore_output, $only_files) {
+			
+			foreach ($this->dump as $file => $header) {
+				if (eregi("^[a-zA-Z]+\.h", $file)) {
+
+					// ignore these files
+					if (@in_array($header["path_partial"], $ignore_output)) continue;
+					
+					// only parse these files
+					if ((@count($only_files) > 0) && (@!in_array($header["name"], $only_files))) continue;
+					
+					$name_clean = substr($file, 0, (strripos($file, ".")));	
+					
+					// assign output path
+					if ($output_path != "") $header["path"] = $output_path."/".$name_clean.".inc";
+					
+					$this->PrintHeader($header);
+					$this->PrintHeaderReference($header, $this->root.$this->out."/reference/".$name_clean.".pas");
+					
+					print("* Printed $name_clean.h to ".$header["path"]."\n");
+				}
+			}
+	}	
+	
+	/**
+	 * PARSING METHODS
+	 */
+	
+	// Parse external symbols, enums and typedef's from the header
+	function ParseHeaderTypes ($file) {
+			$contents = ReadTextFile($file);
+			$file_name = substr($file, (strripos($file, "/")) + 1, strlen($file));	
+			
+			$lines = explode("\n", $contents);
+			foreach ($lines as $line) {
+				
+				// skip blocks
+				if ($this->SkipBlock($line)) continue;
+					
+				// strip comments from the line	
+				$line = eregi_replace("(/\*.*\*/)", "", $line);
+				$line = trim($line, " ");
+									
+				if ($got_struct) {
+					
+					// collect fields
+					if (eregi("^[[:space:]]*([a-zA-Z0-9_*]+)[[:space:]]*[*]*\((.*)\)\((.*)\);", $line, $captures)) { // function pointer (callback)
+						//continue;
+						$name = trim($captures[2], "*");
+						$result = $this->ReplaceNSTypesWithReal($captures[1]);
+						$result = $this->ReplaceObjcType($result);
+						$result = ": ".$this->SwapObjcTypeWithReal($result);
+						if ($this->IsKeywordReserved($name)) $name .= "_";
+						
+						if ($captures[1] == "void") {
+							$kind = "procedure";
+							$result = "";
+						} else {
+							$kind = "function";
+						}
+						
+						// ??? convert params to Pascal
+						//$method = $this->ConvertFunctionPointerToPascal($result, $captures[3]);
+						//$params = $method["param_string_clean"];
+						$params = "context: Pointer {bad params!!}";
+						
+						$struct_fields .= "    $name: $kind ($params)$result; cdecl;\n";
+						//print("$name: $kind ($params)$result; cdecl;\n");
+					} elseif (ereg("^[[:space:]]*([a-zA-Z0-9_]+)[[:space:]]+([a-zA-Z0-9_]+)[[:space:]]+([a-zA-Z0-9_*]+).*;", $line, $captures)) { // double-word single
+						$name = trim($captures[3], "* ");
+						$type = $captures[1]." ".$captures[2];
+						$type = $this->ReplaceObjcType($type);
+						$type = $this->SwapObjcTypeWithReal($type);
+						if ($this->IsKeywordReserved($name)) $name .= "_";
+						
+						if ($captures[3][0] == "*") $this->ReplacePointerType($type);
+						
+						$struct_fields .= "    $name: $type;\n";
+					} elseif (ereg("^[[:space:]]*([a-zA-Z0-9_]+)[[:space:]]+([a-zA-Z0-9_*]+)(.*);", $line, $captures)) { // double-word type list
+						$name = trim($captures[2], "* ");
+						$type = $this->ReplaceObjcType($captures[1]);
+						$type = $this->SwapObjcTypeWithReal($type);
+						if ($this->IsKeywordReserved($name)) $name .= "_";
+						
+						if ($captures[2][0] == "*") $this->ReplacePointerType($type);
+						
+						$struct_fields .= "    $name: $type;\n";
+					} elseif (ereg("^[[:space:]]*([a-zA-Z0-9_*]+)(.*);", $line, $captures)) { // single word type list
+						$name = trim($captures[2], "* ");
+						$type = $this->ReplaceObjcType($captures[1]);
+						$type = $this->SwapObjcTypeWithReal($type);
+						if ($this->IsKeywordReserved($name)) $name .= "_";
+						
+						if ($captures[2][0] == "*") $this->ReplacePointerType($type);
+						
+						$struct_fields .= "    $name: $type;\n";
+					}
+
+					
+					// got end of struct
+					if (ereg("^}[[:space:]]*([a-zA-Z_]+);", $line, $captures)) {
+						
+						if ($struct_name == "") {
+							$struct_name = $captures[1];
+							$make_pointer = true;
+						} else {
+							$struct_type = $captures[1];
+						}
+						
+						$struct = "$struct_name = $this->record_keyword\n";
+						$struct .= $struct_fields;
+						$struct .= "  end;\n";
+						if ($struct_type) {
+							$struct .= "$struct_type = $struct_name;\n";
+							// SEE NOTE BELOW
+							//$struct .= $struct_type."Pointer = ^$struct_type;\n";
+							$make_pointer = false;
+						}
+						
+						// make an extra pointer for us since Pascal may need it
+						// NOTE: remove this until we can protect against duplicate types
+						//if ($make_pointer) $struct .= $struct_name."Pointer = ^$struct_name;\n";
+						
+						$this->dump[$file_name]["types"]["structs"][] = $struct;
+						$this->dump["global_structs"][] = $struct_name;
+						$got_struct = false;
+					}
+				}
+				
+				
+				// got struct
+				if (ereg("^typedef struct(.*){", $line, $captures)) {
+					
+					$struct_name = trim($captures[1], " ");
+					$struct_type = null;
+					$struct_fields = "";
+					
+					$make_pointer = false;
+					$got_struct = true;
+				}
+				
+				// integer #define
+				if (ereg("#define[[:space:]]+([a-zA-Z0-9_]+)[[:space:]]+([0-9.]+)", $line, $captures)) {
+					$this->dump[$file_name]["types"]["defines"][] = $captures[1]." = ".$captures[2].";";
+				}
+				
+				// parse enum fields
+				if ($got_enum) {
+					
+					if (ereg("^[[:space:]]*([a-zA-Z0-9_]+)[[:space:]]*=[[:space:]]*([a-zA-Z_]+)[,]*[[:space:]]*$", $line, $captures)) { // string value
+						$captures[2] = trim($captures[2], ", ");
+						$this->dump[$file_name]["types"]["enums"][$block_count][] = $captures[1]." = ".$captures[2].";";
+					} elseif (ereg("^[[:space:]]*([a-zA-Z0-9_]+)[[:space:]]*=[[:space:]]*([0-9-]+)[,]*[[:space:]]*$", $line, $captures)) { // integer value
+						$captures[2] = trim($captures[2], ", ");
+						$this->dump[$file_name]["types"]["enums"][$block_count][] = $captures[1]." = ".$captures[2].";";
+					} elseif (ereg("^[[:space:]]*([a-zA-Z0-9_]+)[[:space:]]*=[[:space:]]*([0-9]+[xX]+[a-fA-F0-9]+)", $line, $captures)) { // hexadecimal value
+						$captures[2] = trim($captures[2], ", ");
+						$captures[2] = eregi_replace("^0x", "$", $captures[2]);
+						$this->dump[$file_name]["types"]["enums"][$block_count][] = $captures[1]." = ".$captures[2].";";
+					} elseif (ereg("^[[:space:]]*([a-zA-Z0-9_]+)[[:space:]]*=[[:space:]]*([0-9]+[[:space:]]*<<[[:space:]]*[0-9]+)", $line, $captures)) { // << shl value, no ()
+						$captures[2] = str_replace("<<", " shl ", $captures[2]);
+						$this->dump[$file_name]["types"]["enums"][$block_count][] = $captures[1]." = ".$captures[2].";";
+					} elseif (ereg("^[[:space:]]*([a-zA-Z0-9_]+)[[:space:]]*=[[:space:]]*\(([0-9]+[[:space:]]*<<[[:space:]]*[0-9]+)\)", $line, $captures)) { // << shl value
+						$captures[2] = trim($captures[2], ", ");
+						$captures[2] = str_replace("<<", " shl ", $captures[2]);
+						$this->dump[$file_name]["types"]["enums"][$block_count][] = $captures[1]." = ".$captures[2].";";
+					} elseif (ereg("^[[:space:]]*([a-zA-Z0-9_]+)[[:space:]]*(,)*$", $line, $captures)) { // non-value
+						$captures[1] = trim($captures[1], ", ");
+						$this->dump[$file_name]["types"]["enums"][$block_count][] = $captures[1]." = ".$auto_increment.";";
+						$auto_increment ++;
+					}
+									
+					// found the end
+					if (ereg("^};", $line)) $got_enum = false;
+				}
+				
+				// ==== got enum ===
+				if (ereg("^enum {", $line)) {
+					$got_enum = true;
+					$block_count ++;
+					$auto_increment = 0;
+				}
+				
+				if ($got_named_enum) {
+					
+					if (ereg("^[[:space:]]*([a-zA-Z0-9_]+)[[:space:]]+=[[:space:]]+([0-9]+)", $line, $captures)) {
+						$named_enum .= $captures[1]." = ".$captures[2].", ";
+					}
+				
+					// found the end
+					if (ereg("^}[[:space:]]*([a-zA-Z0-9_]+);", $line, $captures)) {
+						$got_named_enum = false;
+						
+						$named_enum = trim($named_enum, ", ");
+						
+						$this->dump[$file_name]["types"]["named_enums"][] = $captures[1]." = (".$named_enum.");";
+						$this->dump["global_types"][$captures[1]] = "{NAMED ENUM}";
+					}
+				}
+				
+				// ==== got named enum ===
+				if (ereg("^typedef enum {", $line)) {
+					$got_named_enum = true;
+					$named_enum = "";
+				}
+				
+				// ==== external string constant ===
+				if (ereg("^[APPKIT_EXTERN|FOUNDATION_EXPORT]+ NSString \*[[:space:]]*(const)*[[:space:]]*([a-zA-Z_]+);", $line, $captures)) {
+					$name = $captures[2];
+					
+					if (in_array($name, $this->ignore_symbol)) continue;
+					
+					$this->dump[$file_name]["types"]["string_constant"][] = "$name: CFStringRef; external name '_$name';";
+				}
+				
+				// ==== external symbol ===
+				if (ereg("^[APPKIT_EXTERN|FOUNDATION_EXPORT]+ ([a-zA-Z_ ]+) ([a-zA-Z_]+);", $line, $captures)) {
+					$name = $captures[2];
+					$type = $captures[1];
+					
+					// ignore symbols
+					if (in_array($name, $this->ignore_symbol)) continue;
+					
+					$type = istr_replace_word("const", "", $type);
+					$type = trim($type, " ");
+					
+					$this->dump[$file_name]["types"]["external_symbol"][] = "$name: $type; external name '_$name';";
+				}
+				
+				
+				// ==== external procedures ===
+				if (ereg("^[APPKIT_EXTERN|FOUNDATION_EXPORT]+ (.*) (\*)*([a-zA-Z0-9_]+)\((.*)\)", $line, $captures)) {
+					
+					$result = $this->ReplaceObjcType($captures[1]);
+					$result = $this->SwapObjcTypeWithReal($result);
+					$result = $this->ReplaceTollFreeBridgeType($result);
+					$result = $this->ReplaceNSTypesWithRef($result);
+					
+					$name = $captures[3];
+					$params = "";
+					
+					// ignore symbols
+					if (in_array($name, $this->ignore_symbol)) continue;
+					
+					if ($captures[4] != "void") $params = "(".$this->ConvertCParamsPascal($captures[4]).")";
+					
+					if ($captures[1] == "void") {
+						$this->dump[$file_name]["types"]["functions"][] = "procedure $name$params; cdecl; external name '$name';";
+					} else {
+						$this->dump[$file_name]["types"]["functions"][] = "function $name$params: $result; cdecl; external name '$name';";
+					}
+				}
+				
+				// ==== got typedef ===
+				if (ereg("^typedef[[:space:]]+struct[[:space:]]+([a-zA-Z0-9_]+)[[:space:]]+([a-zA-Z0-9_]+);", $line, $captures)) { // defined struct type
+					$real_type = $captures[1];
+					$struct_type = $captures[1];
+					$new_type = $captures[2];
+					
+					$this->AddTypeDef($this->dump[$file_name], "$struct_type = Pointer;");
+					
+					$struct_type = $this->ReplaceObjcType($struct_type);
+					$struct_type = $this->SwapObjcTypeWithReal($struct_type);
+					$this->AddTypeDef($this->dump[$file_name], "$new_type = $struct_type;");
+					
+					$this->dump["global_types"][$struct_type] = "Pointer";
+					$this->dump["global_types"][$new_type] = $real_type;
+				} elseif (ereg("^typedef[[:space:]]+struct[[:space:]]+([a-zA-Z0-9_]+)[[:space:]]+([a-zA-Z0-9_*]+);", $line, $captures)) { // pointer to struct
+					$real_type = $captures[1];
+					$clean_name = trim($captures[2], "*");
+					$pointer_type = $captures[1];
+					
+					// ??? maybe check to see if this type exists like NSRect *NSRect is NSRectPointer which exists
+					$pointer_type = "Pointer";
+						
+					//$captures[2] = $this->FormatObjcType($captures[2], $modifiers);
+					//$this->dump[$file_name]["types"]["typedef"][] = "$pointer_type = Pointer;";
+					$this->AddTypeDef($this->dump[$file_name], "$clean_name = $pointer_type;");
+					
+					
+					//$this->dump["global_types"][$pointer_type] = "Pointer";
+					$this->dump["global_types"][$clean_name] = $real_type;
+				} elseif (ereg("^typedef[[:space:]]+(const)*[[:space:]]*struct[[:space:]]+([a-zA-Z0-9_*]+)[[:space:]]+([a-zA-Z0-9_]+);", $line, $captures)) { // struct type (complex)
+					$real_type = $captures[1];
+					
+					$captures[2] = $this->FormatObjcType($captures[2], $modifiers);
+					$this->AddTypeDef($this->dump[$file_name], $captures[3]." = ".$captures[2].";");
+					
+					$this->dump["global_types"][$captures[3]] = $real_type;
+				} elseif (ereg("^typedef[[:space:]]+([a-zA-Z0-9_]+)[[:space:]]+([a-zA-Z0-9_*]+);", $line, $captures)) { // single-word type
+					$real_type = $captures[1];
+					
+					// type is a pointer
+					if ($captures[2][0] == "*") {
+						$captures[2] = trim($captures[2], "*");
+						$captures[1] = $this->ReplaceObjcType($captures[1]);
+						$captures[1] = $this->SwapObjcTypeWithReal($captures[1]);
+						$this->AddTypeDef($this->dump[$file_name], $captures[2]." = ^".$captures[1].";");
+						
+						$this->dump["global_types"][$captures[2]] = $real_type;
+					} else {
+						$captures[2] = trim($captures[2], "*");
+						$captures[1] = $this->ReplaceObjcType($captures[1]);
+						$captures[1] = $this->SwapObjcTypeWithReal($captures[1]);
+						$this->AddTypeDef($this->dump[$file_name],$captures[2]." = ".$captures[1].";");
+
+						$this->dump["global_types"][$captures[2]] = $real_type;
+					}
+				} elseif (ereg("^typedef[[:space:]]+([a-zA-Z0-9_]+)[[:space:]]+([a-zA-Z0-9_]+)[[:space:]]+([a-zA-Z0-9_*]+);", $line, $captures)) { // double-word type
+					$real_type = $captures[1];
+					
+					$captures[3] = trim($captures[3], "*");
+					$long_type = $captures[1]." ".$captures[2];
+					$long_type = $this->ReplaceObjcType($long_type);
+					$long_type = $this->SwapObjcTypeWithReal($long_type);
+					$this->AddTypeDef($this->dump[$file_name], $captures[3]." = $long_type;");
+					
+					$this->dump["global_types"][$captures[3]] = $real_type;
+				}
+			}
+			
+		//print_r($this->dump[$file_name]["types"]);
+	}	
+	
+	// Parse all protocols in a header
+	function ParseHeaderProtocols ($file) {
+			$contents = ReadTextFile($file);
+			$file_name = substr($file, (strripos($file, "/")) + 1, strlen($file));
+			
+			$lines = explode("\n", $contents);
+			foreach ($lines as $line) {
+							
+				// parse protocol
+				if ($got_protocol) {
+					
+					// remove single-line comments
+					$line = eregi_replace("[[:space:]]+//(.*)", "", $line);
+					
+					// found method
+					$method = null;
+					if (eregi($this->regex_objc_method_params, $line, $captures)) {
+						$method = $this->ConvertObjcMethodToPascal($current_protocol, $line, $captures, array(), true);	
+					} elseif (eregi($this->regex_objc_method_no_params, $line, $captures)) {
+						$method = $this->ConvertObjcMethodToPascal($current_protocol, $line, $captures, array(), false);
+					}
+
+					// append to classes
+					if (($method) && (!in_array($current_protocol, $this->ignore_categories)) && (!in_array($method["name"], $this->ignore_methods)) ) {
+						$this->current_header["protocols"][$current_protocol]["methods"][$method["objc_method"]] = $method;
+					}
+					
+					// found the end
+					if (ereg("^@end", $line)) $got_protocol = false;
+				}
+				
+				// got protocol
+				if ((eregi($this->regex_objc_protocol, $line, $captures)) && (!eregi(".*;$", $line))) {
+						$got_protocol = true;
+						$current_protocol = $captures[1];
+						print("+ Protocol $current_protocol\n");
+						$this->current_header["protocols"][$current_protocol]["name"] = $captures[1];
+				}
+			}
+			
+		//print_r($this->current_class);
+	}
+	
+	
+	// Parse all categories in a header
+	function ParseHeaderCategories ($file) {
+			$contents = ReadTextFile($file);
+			$file_name = substr($file, (strripos($file, "/")) + 1, strlen($file));
+			
+			$lines = explode("\n", $contents);
+			foreach ($lines as $line) {
+							
+				// parse category
+				if ($got_category) {
+					
+					// remove single-line comments
+					$line = eregi_replace("[[:space:]]+//(.*)", "", $line);
+					
+					// found method
+					$method = null;
+					if (eregi($this->regex_objc_method_params, $line, $captures)) {
+						$method = $this->ConvertObjcMethodToPascal($current_category, $line, $captures, $this->GetProtectedKeywords($this->current_class), true);						
+					} elseif (eregi($this->regex_objc_method_no_params, $line, $captures)) {
+						$method = $this->ConvertObjcMethodToPascal($current_category, $line, $captures, $this->GetProtectedKeywords($this->current_class), false);	
+					}
+					
+					// append to classes
+					if (($method) && (!in_array($method["name"], $this->ignore_categories))) {
+						if ($current_class) {
+							if ($this->AddMethodToClass($method, $this->current_class)) {
+								$this->dump[$category_owner]["classes"][$current_class]["categories"][$current_category]["methods"][] = $method;
+							}
+						} else {
+							
+							// add base categories to NSObject
+							if (in_array($current_category, $this->base_categories)) {
+								if ($this->AddMethodToClass($method, $this->dump["NSObject.h"]["classes"]["NSObject"])) {
+									//print($method["name"]."\n");
+									$this->dump["NSObject.h"]["classes"]["NSObject"]["categories"][$current_category]["methods"][] = $method;
+								}
+							}
+							
+							$this->dump["categories"][$current_category]["methods"][$method["objc_method"]] = $method;
+						}
+					}
+					
+					// found the end
+					if (ereg("^@end", $line)) $got_category = false;
+				}
+				
+				// got category
+				if (eregi($this->regex_objc_category, $line, $captures)) {
+					
+					// ??? if the current header is NSObject, then we DO want to accept these categories, they are NOT delegates this time...
+					
+					// append category to it's super class
+					$category_owner = $this->FindCategoryHeader($captures[1]);
+					if (($category_owner) && ($captures[1] != "NSObject")) {
+						$got_category = true;
+						$current_category = $captures[2];
+						$current_class = $captures[1];
+						$this->current_class = &$this->dump[$category_owner]["classes"][$current_class];
+						
+						$this->dump[$category_owner]["classes"][$current_class]["categories"][$current_category]["name"] = $captures[2];
+						$this->dump[$category_owner]["classes"][$current_class]["categories"][$current_category]["super"] = $captures[1];
+						
+						print("	-> Category $current_category belongs to $current_class in $category_owner\n");
+					} else {
+						
+						if ($captures[1] == "NSObject") {
+							print("	+ Category ".$captures[2]."->".$captures[1]." belongs to NSObject\n");
+							$got_category = true;
+						} else {
+							$this->warning_count ++;
+							print("# WARNING: Category ".$captures[2]." (".$captures[1].") has no header\n");
+							$got_category = false;
+						}
+						
+						$current_category = $captures[2];
+						$current_class = null;
+
+						$this->dump["categories"][$current_category]["name"] = $captures[2];
+						$this->dump["categories"][$current_category]["super"] = $captures[1];
+					}
+					
+				}
+			}
+			
+		//print_r($this->current_class);
+	}
+	
+	// Parse all "pre-defined" category methods in a header
+	function PreparseCategoryMethods ($file) {
+			$contents = ReadTextFile($file);
+			$file_name = substr($file, (strripos($file, "/")) + 1, strlen($file));
+			
+			$lines = explode("\n", $contents);
+			foreach ($lines as $line) {
+							
+				// parse category
+				if ($got_category) {
+					
+					// found method
+					$method = null;
+					if (eregi($this->regex_objc_method_params, $line, $captures)) {
+						$method = $this->ConvertObjcMethodToPascal($current_category, $line, $captures, array(), true);						
+					} elseif (eregi($this->regex_objc_method_no_params, $line, $captures)) {
+						$method = $this->ConvertObjcMethodToPascal($current_category, $line, $captures, array(), false);	
+					}
+					
+					// append to classes
+					if (($method) && ($current_class)) {
+						$this->dump[$category_owner]["category_methods"][] = $method["name"];
+						//print($method["name"]."\n");
+					}
+					
+					// found the end
+					if (ereg("^@end", $line)) $got_category = false;
+				}
+				
+				// got category
+				if (eregi($this->regex_objc_category, $line, $captures)) {
+					$category_owner = $this->FindCategoryHeader($captures[1]);
+					if ($category_owner) {
+						$got_category = true;
+						$current_category = $captures[2];
+						$current_class = $captures[1];
+					} else {
+						$current_class = null;
+					}
+				}
+			}
+			
+		return $this->dump[$category_owner]["category_methods"];
+	}
+	
+	// Preparses a class for protected keywords
+	function PreparseClass ($lines, $line_count) {
+		$protected_keywords = array();
+		
+		for ($i=$line_count; $i < count($lines); $i++) { 
+			$line = $lines[$i - 1];
+			
+			// found method
+			if (eregi($this->regex_objc_method_params, $line, $captures)) {
+				$method = $this->ConvertObjcMethodToPascal($current, $line, $captures, $protected_keywords, true);						
+				$this->current_class["protected_keywords"][] = $method["name"];
+			} elseif (eregi($this->regex_objc_method_no_params, $line, $captures)) {
+				$method = $this->ConvertObjcMethodToPascal($current, $line, $captures, $protected_keywords, false);
+				$this->current_class["protected_keywords"][] = $method["name"];
+			}
+			
+			// class ended
+			if (ereg("^@end", $line)) return $protected_keywords;
+		}
+	}
+				
+	// Main entry to parse a header
+	function ParseHeaderClasses ($file) {
+			$contents = ReadTextFile($file);
+			
+			$file_name = substr($file, (strripos($file, "/")) + 1, strlen($file));
+			$line_count = 0;
+			
+			$lines = explode("\n", $contents);
+			foreach ($lines as $line) {
+				$line_count++;
+				
+				// parse class
+				if ($got_class) {
+					
+					// remove single-line comments
+					$line = eregi_replace("[[:space:]]+//(.*)", "", $line);
+					
+					// found method
+					if (eregi($this->regex_objc_method_params, $line, $captures)) {
+						$method = $this->ConvertObjcMethodToPascal($current, $line, $captures, $this->GetProtectedKeywords($this->current_class), true);						
+						if ($this->AddMethodToClass($method, $this->dump[$file_name]["classes"][$current])) {
+							$this->dump[$file_name]["classes"][$current]["methods"][] = $method;
+						}
+						
+					} elseif (eregi($this->regex_objc_method_no_params, $line, $captures)) {
+						$method = $this->ConvertObjcMethodToPascal($current, $line, $captures, $this->GetProtectedKeywords($this->current_class), false);
+						if ($this->AddMethodToClass($method, $this->dump[$file_name]["classes"][$current])) {
+							$this->dump[$file_name]["classes"][$current]["methods"][] = $method;
+						}
+					}
+					
+					// found the end
+					if (ereg("^@end", $line)) $got_class = false;
+				}
+				
+				// ==== got class ====
+				if ((eregi($this->regex_objc_class, $line, $captures)) || (eregi($this->regex_objc_class_no_super, $line, $captures))) {
+					$current = $captures[1];
+					$got_class = true;
+					
+					// get the protocol which the class conforms to
+					if (eregi($this->regex_objc_class, $line, $captures)) {
+						if ($captures[3]) $this->dump[$file_name]["classes"][$current]["conforms"] = $captures[3];
+					} else {
+						if ($captures[2]) $this->dump[$file_name]["classes"][$current]["conforms"] = $captures[2];
+					}
+					
+					// clean up the conforms string
+					if ($this->dump[$file_name]["classes"][$current]["conforms"]) {
+						$conform_protocols = explode(",", $this->dump[$file_name]["classes"][$current]["conforms"]);
+						
+						foreach ($conform_protocols as $protocol) {
+							$protocol = trim($protocol, "<> ");
+							$protocol_clean .= $protocol."$this->protocol_suffix, ";
+						}
+						
+						$protocol_clean = trim($protocol_clean, ", ");
+						$this->dump[$file_name]["classes"][$current]["conforms"] = $protocol_clean;
+						
+						$protocol_clean = "";
+					}
+					
+					$this->dump[$file_name]["classes"][$current]["name"] = $captures[1];
+					$this->dump[$file_name]["classes"][$current]["super"] = $captures[2];
+					$this->dump[$file_name]["classes"][$current]["super_class"] = &$this->dump["master"][$captures[2]];
+					$this->dump[$file_name]["classes"][$current]["file_name"] = $file_name;
+					$this->dump[$file_name]["classes"][$current]["file_clean"] = substr($file_name, 0, (strripos($file_name, ".")));
+					$this->dump[$file_name]["classes"][$current]["protected_keywords"] = array();
+					$this->dump[$file_name]["classes"][$current]["declared_methods"] = array();
+					$this->dump[$file_name]["category_methods"] = array();
+					
+					$this->current_class = &$this->dump[$file_name]["classes"][$current];
+					
+					// append master class listing
+					$this->dump["master"][$current] = &$this->dump[$file_name]["classes"][$current];
+					
+					// preparse for protected keywords
+					$this->PreparseClass($lines, $line_count);
+					
+					// preparse for category methods that may present naming conflicts
+					$category_methods = $this->PreparseCategoryMethods($file);
+					
+					// add category methods to protected keywords
+					if ($category_methods) $this->current_class["protected_keywords"] = array_merge($this->current_class["protected_keywords"], $category_methods);
+					
+					$this->class_count ++;
+				}
+				
+			}
+		
+		//print_r($this->dump[$file_name]["classes"][$current]);
+	}		
+	
+	// Parse categories which depend on another header
+	function ParseHeaderDependents ($file) {
+		$file_name = substr($file, (strripos($file, "/")) + 1, strlen($file));
+
+		$this->ParseHeaderCategories($file);
+			
+		print("+ Parsed $file_name for dependents\n");
+	}
+	
+	
+	// Main entry to parse a header
+	function ParseHeader ($file) {
+			$file_name = substr($file, (strripos($file, "/")) + 1, strlen($file));
+			$name_clean = substr($file_name, 0, (strripos($file_name, ".")));	
+			
+			// get framework we're parsing from
+			if (eregi("/([a-zA-Z]+)\.framework/", $file, $captures)) $this->framework = strtolower($captures[1]);
+			
+			// get the output path
+			$this->dump[$file_name]["path"] = "$this->root$this->out/$this->framework/$name_clean.inc";
+			$this->dump[$file_name]["path_partial"] = "$this->framework/$name_clean.inc";
+			$this->dump[$file_name]["framework"] = $this->framework;
+			$this->dump[$file_name]["name"] = $file_name;
+			$this->dump[$file_name]["name_clean"] = $name_clean;
+			$this->current_header = &$this->dump[$file_name];
+			
+			$this->ParseHeaderProtocols($file);
+			$this->ParseHeaderClasses($file);
+			$this->ParseHeaderTypes($file);
+			
+			print("+ Parsed $file_name\n");
+	}
+			
+	// Parse all AppKit and Foundation framework headers
+	function ParseCocoaFrameworks ($ignore_files, $parse_only) {
+		
+		foreach ($this->frameworks as $framework_name => $framework_info) {
+			
+			$contents = ReadTextFile($this->root.$framework_info["root"]);
+			$lines = explode("\n", $contents);
+			
+			foreach ($lines as $line) {
+				if (eregi($framework_info["include_pattern"], $line, $captures)) {
+					$header = $captures[1].".h";
+					
+					// main header
+					if ($parse_only) {
+						if (@in_array($header, $parse_only)) $this->ParseHeader($framework_info["headers"]."/$header");
+					} elseif (@!in_array($header, $ignore_files)) {
+						 $this->ParseHeader($framework_info["headers"]."/$header");
+					}
+
+					// header dependents
+					if ($parse_only) {
+						if (@in_array($header, $parse_only)) $this->ParseHeaderDependents($framework_info["headers"]."/$header");
+					} elseif (@!in_array($header, $ignore_files)) {
+						 $this->ParseHeaderDependents($framework_info["headers"]."/$header");
+					}
+				}
+			}
+			
+		}
+		/*
+		// Foundation.framework
+		$contents = ReadTextFile($this->root.$this->foundation_root);
+		$lines = explode("\n", $contents);
+		foreach ($lines as $line) {
+			if (eregi("{[$]+include (NS.*).inc}", $line, $captures)) {
+				$header = $captures[1].".h";
+				
+				// main header
+				if ($parse_only) {
+					if (@in_array($header, $parse_only)) $this->ParseHeader("/System/Library/Frameworks/Foundation.framework/Headers/$header");
+				} elseif (@!in_array($header, $ignore_files)) {
+					 $this->ParseHeader("/System/Library/Frameworks/Foundation.framework/Headers/$header");
+				}
+				
+				// header dependents
+				if ($parse_only) {
+					if (@in_array($header, $parse_only)) $this->ParseHeaderDependents("/System/Library/Frameworks/Foundation.framework/Headers/$header");
+				} elseif (@!in_array($header, $ignore_files)) {
+					 $this->ParseHeaderDependents("/System/Library/Frameworks/Foundation.framework/Headers/$header");
+				}
+			}
+		}
+
+		// AppKit.framework
+		$contents = ReadTextFile($this->root.$this->appkit_root);
+		$lines = explode("\n", $contents);
+		foreach ($lines as $line) {
+			if (eregi("{[$]+include (NS.*).inc}", $line, $captures)) {
+				$header = $captures[1].".h";
+				
+				// main header
+				if ($parse_only) {
+					if (@in_array($header, $parse_only)) $this->ParseHeader("/System/Library/Frameworks/AppKit.framework/Headers/$header");
+				} elseif (@!in_array($header, $ignore_files)) {
+					 $this->ParseHeader("/System/Library/Frameworks/AppKit.framework/Headers/$header");
+				}
+				
+				// header dependents
+				if ($parse_only) {
+					if (@in_array($header, $parse_only)) $this->ParseHeaderDependents("/System/Library/Frameworks/AppKit.framework/Headers/$header");
+				} elseif (@!in_array($header, $ignore_files)) {
+					 $this->ParseHeaderDependents("/System/Library/Frameworks/AppKit.framework/Headers/$header");
+				}
+			}
+		}
+		*/
+		// diagnostics
+		print("\n• Parsed $this->method_count methods in $this->class_count classes.\n\n");
+		
+		if ($this->warning_count > 0) print("• $this->warning_count warnings were encountered.\n\n");
+	}
+		
+	// Parse headers in a system framework
+	function ParseFramework ($ignore_files, $parse_only) {
+	}
+		
+	// Parses XML file generated by GEN_BRIDGE_METADATA -f /System/Library/Frameworks/AppKit.framework/
+	function ParseBridgeSupportXML ($file, $categories) {
+		$contents = ReadTextFile($file);
+			
+		$lines = explode("\n", $contents);
+		foreach ($lines as $line) {
+			
+			if ($got_informal_protocol) {
+				
+				if (eregi("<method type='(.*)' selector='(.*)'/>", $line, $captures)) {
+					
+					$set["name"] = $captures[2];
+					$set["name_pascal"] = str_replace(":", "_", $set["name"]);
+					$set["name_pascal"] = rtrim($set["name_pascal"], "_");
+					$set["types"] = $captures[1];
+					$set["param_string"] = $categories[$informal_protocol]["methods"][$captures[2]]["param_string"];
+					$set["method"] = &$categories[$informal_protocol]["methods"][$captures[2]];
+					
+					if ($captures[1][0] == "v") {
+						$set["kind"] = "procedure";
+					} else {
+						$set["kind"] = "function";
+					}
+					
+					// add the selector if the name isn't reserved for Pascal
+					if ((!in_array($set["name_pascal"], $this->reserved_keywords)) && (!in_array($set["name_pascal"], $this->reserved_methods))) {
+						$this->delegate_methods[$informal_protocol][] = $set;
+						$this->delegate_method_names[] = $set["name_pascal"];
+					}
+				}
+				
+				// end tag
+				if ($line == "</informal_protocol>") $got_informal_protocol = false;
+			}
+			
+			// got informal_protocol
+			if (eregi("<informal_protocol name='(.*)'>", $line, $captures)) {
+				$informal_protocol = $captures[1];
+				//print("\"$informal_protocol\", ");
+				$got_informal_protocol = true;
+			}
+		}
+		
+		print("+ Parsed bridge support XMl file at $file\n");
+		//print_r($this->delegate_methods);
+	}		
+		
+	// Parse all classes/categories (non-delegate) from the header
+	function ParseAllHeaderClasses ($file) {
+		$contents = ReadTextFile($file);
+			
+		$lines = explode("\n", $contents);
+		foreach ($lines as $line) {
+			
+			if (eregi($this->regex_objc_class, $line, $captures)) $this->cocoa_classes[] = $captures[1];
+			if (eregi($this->regex_objc_class_no_super, $line, $captures)) $this->cocoa_classes[] = $captures[1];
+			
+			if (eregi($this->regex_objc_category, $line, $captures)) {
+				$this->cocoa_categories[] = $captures[1];
+			}
+		}
+	}
+		
+	// Build array of all known Cocoa classes in frameworks	
+	function BuildCocoaClasses () {
+	
+		foreach ($this->frameworks as $framework_name => $framework_info) {
+			$handle = opendir($framework_info["headers"]);
+			while (($file = readdir($handle)) !== false) {
+				if (eregi($framework_info["header_pattern"], $file)) {
+					$this->ParseAllHeaderClasses($framework_info["headers"]."/$file");
+				}
+			}
+			closedir($handle);
+		}
+		
+		/*
+		$handle = opendir("/System/Library/Frameworks/AppKit.framework/Headers");
+		while (($file = readdir($handle)) !== false) {
+			if (eregi("^NS(.*)\.h", $file)) {
+				$this->ParseAllHeaderClasses("/System/Library/Frameworks/AppKit.framework/Headers/$file");
+			}
+		}
+		closedir($handle);
+		
+		$handle = opendir("/System/Library/Frameworks/Foundation.framework/Headers");
+		while (($file = readdir($handle)) !== false) {
+			if (eregi("^NS(.*)\.h", $file)) {
+				$this->ParseAllHeaderClasses("/System/Library/Frameworks/Foundation.framework/Headers/$file");
+			}
+		}
+		closedir($handle);
+		*/
+	}		
+
+	function ProcessFile ($file, $print) {
+		$this->ParseHeader($file);
+		$this->ParseHeaderDependents($file);
+
+		if ($print) $this->PrintAllHeaders("", null, null);
+	}
+
+	function ParseDelegateClasses () {
+		
+		foreach ($this->frameworks as $framework_name => $framework_info) {
+			$this->ParseBridgeSupportXML("$this->root".$framework_info["bridgesupport"], $this->dump["categories"]);
+		}
+		/*
+		$this->ParseBridgeSupportXML("$this->root/bridgesupport/foundation.xml", $this->dump["categories"]);
+		$this->ParseBridgeSupportXML("$this->root/bridgesupport/appkit.xml", $this->dump["categories"]);
+		$this->ParseBridgeSupportXML("$this->root/bridgesupport/webkit.xml", $this->dump["categories"]);
+		*/
+		// These are expressions which match valid class names or the names themself
+		$delegate_categories = array(	"(Delegation|Delegate|Notification|DataSource|Handler)+", 
+										"NSDraggingDestination", "NSDistantObjectRequestMethods", "NSDraggingSource",
+										"NSEditorRegistration", "NSFileManagerFileOperationAdditions", "NSPasteboardOwner",
+										);
+
+		$this->output = fopen("$this->root$this->out/foundation/$this->master_delegate_file.inc", "w+");
+		$this->PrintDelegateClass($delegate_categories);
+		fclose($this->output);
+		
+		$this->output = fopen("$this->root$this->out/reference/$this->master_delegate_file.pas", "w+");
+		$this->PrintDelegateReference($delegate_categories);
+		fclose($this->output);
+	}
+	
+	function LoadTypeEncodings ($name) {
+		$contents = ReadTextFile("$this->root/$name");
+		
+		$lines = explode("\n", $contents);
+		foreach ($lines as $line) {
+			$row = explode("|", $line);
+			
+			$this->type_encodings[$row[0]][$row[1]] = $row[2];
+		}
+		
+		//print_r($this->type_encodings);
+	}
+	
+	// Prints out code to generate type encodings with GenerateTypeEncodings.p
+	// Paste the output of the function into GenerateTypeEncodings.p, run the program and save the output into a text file
+	// which is loaded into this script.
+	function PrintTypeEncodingGlue () {
+		$count = 0;
+		$block = true;
+		$block_count = 1;
+		$limit = 2000;
+		
+		foreach ($this->dump["all_methods"] as $class => $method) {
+			foreach ($method as $name) {
+				
+				if ($count == 0) {
+					print("\n");
+					print("procedure PrintGlue$block_count;\n");
+					print("begin\n");
+					
+					$block_count ++;
+				}
+				
+				$count ++;
+				
+				print("aMethod := class_getInstanceMethod(objc_getClass('$class'), sel_registerName(PChar('$name')));\n");
+				print("if aMethod <> nil then\n");
+				print("writeln('$class|$name|', method_getTypeEncoding(aMethod));\n");
+				
+				if ($count == $limit) {
+					print("end;\n");
+					$count = 0;
+				}
+			}
+		}
+		
+		if ($count < $limit) {
+			print("end;\n");
+			$block_count --;
+		}
+		
+		print("\n========= IMPLEMENTATION =========\n");
+		for ($i=1; $i < $block_count + 1; $i++) { 
+			print("PrintGlue$i;\n");
+		}
+	}
+		
+	function __construct ($directory, $out_directory, $show)  {
+		$this->root = $directory;
+		$this->out = $out_directory;
+		$this->show = $show;
+		$this->BuildCocoaClasses();
+		$this->LoadTypeEncodings("TypeEncodingsAll.txt");
+	}
+}
+?>
\ No newline at end of file