mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-12-29 13:00:34 +01:00
+ added fpgui widgetset
git-svn-id: trunk@10085 -
This commit is contained in:
marc
parent
1c383c308c
commit
372e2b6ea2
26
.gitattributes
vendored
26
.gitattributes
vendored
@ -2257,6 +2257,32 @@ lcl/interfaces/carbon/carbonwsstdctrls.pp svneol=native#text/pascal
|
||||
lcl/interfaces/carbon/carbonwstoolwin.pp svneol=native#text/pascal
|
||||
lcl/interfaces/carbon/fpcmacosall.pas svneol=native#text/plain
|
||||
lcl/interfaces/carbon/interfaces.pas svneol=native#text/pascal
|
||||
lcl/interfaces/fpgui/Makefile.fpc svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwsactnlist.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwsarrow.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwsbuttons.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwscalendar.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwschecklst.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwsclistbox.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwscomctrls.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwscontrols.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwsdbctrls.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwsdbgrids.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwsdialogs.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwsdirsel.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwseditbtn.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwsextctrls.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwsextdlgs.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwsfilectrl.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwsforms.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwsgrids.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwsimglist.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwsmaskedit.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwsmenus.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwspairsplitter.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwsspin.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwsstdctrls.pp svneol=native#text/plain
|
||||
lcl/interfaces/fpgui/fpguiwstoolwin.pp svneol=native#text/plain
|
||||
lcl/interfaces/gnome/gnomeint.pp svneol=native#text/pascal
|
||||
lcl/interfaces/gnome/gnomelclintf.inc svneol=native#text/pascal
|
||||
lcl/interfaces/gnome/gnomelclintfh.inc svneol=native#text/pascal
|
||||
|
||||
@ -1,8 +1,8 @@
|
||||
#
|
||||
# Don't edit, this file is generated by FPCMake Version 2.0.0 [2006/04/28]
|
||||
# Don't edit, this file is generated by FPCMake Version 2.0.0 [2006/08/20]
|
||||
#
|
||||
default: all
|
||||
MAKEFILETARGETS=i386-linux i386-go32v2 i386-win32 i386-os2 i386-freebsd i386-beos i386-netbsd i386-solaris i386-qnx i386-netware i386-openbsd i386-wdosx i386-darwin i386-emx i386-watcom i386-netwlibc i386-wince m68k-linux m68k-freebsd m68k-netbsd m68k-amiga m68k-atari m68k-openbsd m68k-palmos powerpc-linux powerpc-netbsd powerpc-macos powerpc-darwin powerpc-morphos sparc-linux sparc-netbsd sparc-solaris x86_64-linux x86_64-freebsd x86_64-win64 arm-linux arm-palmos arm-wince powerpc64-linux
|
||||
MAKEFILETARGETS=i386-linux i386-go32v2 i386-win32 i386-os2 i386-freebsd i386-beos i386-netbsd i386-solaris i386-qnx i386-netware i386-openbsd i386-wdosx i386-darwin i386-emx i386-watcom i386-netwlibc i386-wince m68k-linux m68k-freebsd m68k-netbsd m68k-amiga m68k-atari m68k-openbsd m68k-palmos powerpc-linux powerpc-netbsd powerpc-amiga powerpc-macos powerpc-darwin powerpc-morphos sparc-linux sparc-netbsd sparc-solaris x86_64-linux x86_64-freebsd x86_64-win64 arm-linux arm-palmos arm-wince arm-gba powerpc64-linux
|
||||
BSDs = freebsd netbsd openbsd darwin
|
||||
UNIXs = linux $(BSDs) solaris qnx
|
||||
LIMIT83fs = go32v2 os2 emx watcom
|
||||
@ -241,121 +241,127 @@ endif
|
||||
export LCL_PLATFORM
|
||||
override DEFAULT_DIR=$(LCL_PLATFORM)
|
||||
ifeq ($(FULL_TARGET),i386-linux)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-go32v2)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-win32)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-os2)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-freebsd)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-beos)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-netbsd)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-solaris)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-qnx)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-netware)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-openbsd)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-wdosx)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-darwin)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-emx)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-watcom)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-netwlibc)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-wince)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-linux)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-freebsd)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-netbsd)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-amiga)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-atari)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-openbsd)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-palmos)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-linux)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-netbsd)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-amiga)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-macos)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-darwin)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-morphos)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),sparc-linux)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),sparc-netbsd)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),sparc-solaris)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),x86_64-linux)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),x86_64-freebsd)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),x86_64-win64)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),arm-linux)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),arm-palmos)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),arm-wince)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),arm-gba)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc64-linux)
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon
|
||||
override TARGET_DIRS+=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
endif
|
||||
ifdef REQUIRE_UNITSDIR
|
||||
override UNITSDIR+=$(REQUIRE_UNITSDIR)
|
||||
@ -709,6 +715,11 @@ EXEEXT=
|
||||
HASSHAREDLIB=1
|
||||
SHORTSUFFIX=dwn
|
||||
endif
|
||||
ifeq ($(OS_TARGET),gba)
|
||||
EXEEXT=.gba
|
||||
SHAREDLIBEXT=.so
|
||||
SHORTSUFFIX=gba
|
||||
endif
|
||||
else
|
||||
ifeq ($(OS_TARGET),go32v1)
|
||||
PPUEXT=.pp1
|
||||
@ -777,7 +788,7 @@ endif
|
||||
ifeq ($(OS_TARGET),amiga)
|
||||
EXEEXT=
|
||||
PPUEXT=.ppu
|
||||
ASMEXT=.asm
|
||||
ASMEXT=.s
|
||||
OEXT=.o
|
||||
SMARTEXT=.sl
|
||||
STATICLIBEXT=.a
|
||||
@ -1491,6 +1502,16 @@ REQUIRE_PACKAGES_RTL=1
|
||||
REQUIRE_PACKAGES_FCL=1
|
||||
REQUIRE_PACKAGES_GTK=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-amiga)
|
||||
REQUIRE_PACKAGES_HASH=1
|
||||
REQUIRE_PACKAGES_PASZLIB=1
|
||||
REQUIRE_PACKAGES_PASJPEG=1
|
||||
REQUIRE_PACKAGES_NETDB=1
|
||||
REQUIRE_PACKAGES_OPENGL=1
|
||||
REQUIRE_PACKAGES_RTL=1
|
||||
REQUIRE_PACKAGES_FCL=1
|
||||
REQUIRE_PACKAGES_GTK=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-macos)
|
||||
REQUIRE_PACKAGES_HASH=1
|
||||
REQUIRE_PACKAGES_PASZLIB=1
|
||||
@ -1669,6 +1690,16 @@ REQUIRE_PACKAGES_RTL=1
|
||||
REQUIRE_PACKAGES_FCL=1
|
||||
REQUIRE_PACKAGES_GTK=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),arm-gba)
|
||||
REQUIRE_PACKAGES_HASH=1
|
||||
REQUIRE_PACKAGES_PASZLIB=1
|
||||
REQUIRE_PACKAGES_PASJPEG=1
|
||||
REQUIRE_PACKAGES_NETDB=1
|
||||
REQUIRE_PACKAGES_OPENGL=1
|
||||
REQUIRE_PACKAGES_RTL=1
|
||||
REQUIRE_PACKAGES_FCL=1
|
||||
REQUIRE_PACKAGES_GTK=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc64-linux)
|
||||
REQUIRE_PACKAGES_HASH=1
|
||||
REQUIRE_PACKAGES_PASZLIB=1
|
||||
@ -2181,7 +2212,7 @@ ifeq ($(CPU_TARGET),powerpc)
|
||||
FPCCPUOPT:=-O1r
|
||||
endif
|
||||
else
|
||||
FPCCPUOPT:=-O2
|
||||
FPCCPUOPT:=-O1r
|
||||
endif
|
||||
override FPCOPT+=-Ur -Xs $(FPCCPUOPT) -n
|
||||
override FPCOPTDEF+=RELEASE
|
||||
@ -2533,6 +2564,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-go32v2)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2542,6 +2574,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-win32)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2551,6 +2584,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-os2)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2560,6 +2594,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-freebsd)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2569,6 +2604,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-beos)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2578,6 +2614,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-netbsd)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2587,6 +2624,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-solaris)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2596,6 +2634,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-qnx)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2605,6 +2644,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-netware)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2614,6 +2654,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-openbsd)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2623,6 +2664,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-wdosx)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2632,6 +2674,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-darwin)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2641,6 +2684,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-emx)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2650,6 +2694,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-watcom)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2659,6 +2704,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-netwlibc)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2668,6 +2714,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-wince)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2677,6 +2724,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-linux)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2686,6 +2734,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-freebsd)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2695,6 +2744,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-netbsd)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2704,6 +2754,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-amiga)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2713,6 +2764,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-atari)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2722,6 +2774,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-openbsd)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2731,6 +2784,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-palmos)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2740,6 +2794,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-linux)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2749,6 +2804,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-netbsd)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2758,6 +2814,17 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-amiga)
|
||||
TARGET_DIRS_GTK=1
|
||||
TARGET_DIRS_GTK2=1
|
||||
TARGET_DIRS_WIN32=1
|
||||
TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-macos)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2767,6 +2834,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-darwin)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2776,6 +2844,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-morphos)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2785,6 +2854,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),sparc-linux)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2794,6 +2864,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),sparc-netbsd)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2803,6 +2874,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),sparc-solaris)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2812,6 +2884,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),x86_64-linux)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2821,6 +2894,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),x86_64-freebsd)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2830,6 +2904,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),x86_64-win64)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2839,6 +2914,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),arm-linux)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2848,6 +2924,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),arm-palmos)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2857,6 +2934,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),arm-wince)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2866,6 +2944,17 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),arm-gba)
|
||||
TARGET_DIRS_GTK=1
|
||||
TARGET_DIRS_GTK2=1
|
||||
TARGET_DIRS_WIN32=1
|
||||
TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc64-linux)
|
||||
TARGET_DIRS_GTK=1
|
||||
@ -2875,6 +2964,7 @@ TARGET_DIRS_WINCE=1
|
||||
TARGET_DIRS_GNOME=1
|
||||
TARGET_DIRS_QT=1
|
||||
TARGET_DIRS_CARBON=1
|
||||
TARGET_DIRS_FPGUI=1
|
||||
endif
|
||||
ifdef TARGET_DIRS_GTK
|
||||
gtk_all:
|
||||
@ -3191,6 +3281,51 @@ carbon:
|
||||
$(MAKE) -C carbon all
|
||||
.PHONY: carbon_all carbon_debug carbon_smart carbon_release carbon_units carbon_examples carbon_shared carbon_install carbon_sourceinstall carbon_exampleinstall carbon_distinstall carbon_zipinstall carbon_zipsourceinstall carbon_zipexampleinstall carbon_zipdistinstall carbon_clean carbon_distclean carbon_cleanall carbon_info carbon_makefiles carbon
|
||||
endif
|
||||
ifdef TARGET_DIRS_FPGUI
|
||||
fpgui_all:
|
||||
$(MAKE) -C fpgui all
|
||||
fpgui_debug:
|
||||
$(MAKE) -C fpgui debug
|
||||
fpgui_smart:
|
||||
$(MAKE) -C fpgui smart
|
||||
fpgui_release:
|
||||
$(MAKE) -C fpgui release
|
||||
fpgui_units:
|
||||
$(MAKE) -C fpgui units
|
||||
fpgui_examples:
|
||||
$(MAKE) -C fpgui examples
|
||||
fpgui_shared:
|
||||
$(MAKE) -C fpgui shared
|
||||
fpgui_install:
|
||||
$(MAKE) -C fpgui install
|
||||
fpgui_sourceinstall:
|
||||
$(MAKE) -C fpgui sourceinstall
|
||||
fpgui_exampleinstall:
|
||||
$(MAKE) -C fpgui exampleinstall
|
||||
fpgui_distinstall:
|
||||
$(MAKE) -C fpgui distinstall
|
||||
fpgui_zipinstall:
|
||||
$(MAKE) -C fpgui zipinstall
|
||||
fpgui_zipsourceinstall:
|
||||
$(MAKE) -C fpgui zipsourceinstall
|
||||
fpgui_zipexampleinstall:
|
||||
$(MAKE) -C fpgui zipexampleinstall
|
||||
fpgui_zipdistinstall:
|
||||
$(MAKE) -C fpgui zipdistinstall
|
||||
fpgui_clean:
|
||||
$(MAKE) -C fpgui clean
|
||||
fpgui_distclean:
|
||||
$(MAKE) -C fpgui distclean
|
||||
fpgui_cleanall:
|
||||
$(MAKE) -C fpgui cleanall
|
||||
fpgui_info:
|
||||
$(MAKE) -C fpgui info
|
||||
fpgui_makefiles:
|
||||
$(MAKE) -C fpgui makefiles
|
||||
fpgui:
|
||||
$(MAKE) -C fpgui all
|
||||
.PHONY: fpgui_all fpgui_debug fpgui_smart fpgui_release fpgui_units fpgui_examples fpgui_shared fpgui_install fpgui_sourceinstall fpgui_exampleinstall fpgui_distinstall fpgui_zipinstall fpgui_zipsourceinstall fpgui_zipexampleinstall fpgui_zipdistinstall fpgui_clean fpgui_distclean fpgui_cleanall fpgui_info fpgui_makefiles fpgui
|
||||
endif
|
||||
all: $(addsuffix _all,$(DEFAULT_DIR))
|
||||
debug: $(addsuffix _debug,$(DEFAULT_DIR))
|
||||
smart: $(addsuffix _smart,$(DEFAULT_DIR))
|
||||
|
||||
@ -8,7 +8,7 @@
|
||||
main=lcl
|
||||
|
||||
[target]
|
||||
dirs=gtk gtk2 win32 wince gnome qt carbon
|
||||
dirs=gtk gtk2 win32 wince gnome qt carbon fpgui
|
||||
|
||||
[default]
|
||||
dir=$(LCL_PLATFORM)
|
||||
|
||||
34
lcl/interfaces/fpgui/Makefile.fpc
Normal file
34
lcl/interfaces/fpgui/Makefile.fpc
Normal file
@ -0,0 +1,34 @@
|
||||
# $Id: Makefile.fpc 7398 2005-07-22 13:47:35Z mattias $
|
||||
#
|
||||
# Makefile.fpc for Lazarus for Free Pascal
|
||||
#
|
||||
|
||||
[package]
|
||||
main=lcl
|
||||
|
||||
[require]
|
||||
packages=rtl fcl
|
||||
|
||||
[target]
|
||||
units=interfaces
|
||||
|
||||
[compiler]
|
||||
options=-gl -dfpgui
|
||||
unitdir=../../units/$(CPU_TARGET)-$(OS_TARGET) .
|
||||
unittargetdir=../../units/$(CPU_TARGET)-$(OS_TARGET)/fpgui
|
||||
|
||||
[clean]
|
||||
files=$(wildcard $(COMPILER_UNITTARGETDIR)/*$(OEXT)) \
|
||||
$(wildcard $(COMPILER_UNITTARGETDIR)/*$(PPUEXT)) \
|
||||
$(wildcard $(COMPILER_UNITTARGETDIR)/*$(RSTEXT)) \
|
||||
$(wildcard *$(OEXT)) $(wildcard *$(PPUEXT)) $(wildcard *$(RSTEXT))
|
||||
|
||||
[rules]
|
||||
.PHONY: cleartarget all
|
||||
|
||||
cleartarget:
|
||||
-$(DEL) $(COMPILER_UNITTARGETDIR)/interfaces$(PPUEXT) \
|
||||
$(COMPILER_UNITTARGETDIR)/interfaces$(OEXT)
|
||||
|
||||
all: cleartarget $(COMPILER_UNITTARGETDIR) interfaces$(PPUEXT)
|
||||
|
||||
72
lcl/interfaces/fpgui/fpguiwsactnlist.pp
Normal file
72
lcl/interfaces/fpgui/fpguiwsactnlist.pp
Normal file
@ -0,0 +1,72 @@
|
||||
{ $Id: FpGuiwsactnlist.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSActnList.pp *
|
||||
* --------------- *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSActnList;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// ActnList,
|
||||
////////////////////////////////////////////////////
|
||||
WSActnList, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSCustomActionList }
|
||||
|
||||
TFpGuiWSCustomActionList = class(TWSCustomActionList)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSActionList }
|
||||
|
||||
TFpGuiWSActionList = class(TWSActionList)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TCustomActionList, TFpGuiWSCustomActionList);
|
||||
// RegisterWSComponent(TActionList, TFpGuiWSActionList);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
63
lcl/interfaces/fpgui/fpguiwsarrow.pp
Normal file
63
lcl/interfaces/fpgui/fpguiwsarrow.pp
Normal file
@ -0,0 +1,63 @@
|
||||
{ $Id: FpGuiwsarrow.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSArrow.pp *
|
||||
* ------------ *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSArrow;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// Arrow,
|
||||
////////////////////////////////////////////////////
|
||||
WSArrow, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSArrow }
|
||||
|
||||
TFpGuiWSArrow = class(TWSArrow)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TArrow, TFpGuiWSArrow);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
81
lcl/interfaces/fpgui/fpguiwsbuttons.pp
Normal file
81
lcl/interfaces/fpgui/fpguiwsbuttons.pp
Normal file
@ -0,0 +1,81 @@
|
||||
{ $Id: FpGuiwsbuttons.pp 5682 2004-07-15 10:43:39Z mattias $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSButtons.pp *
|
||||
* -------------- *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSButtons;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// Buttons,
|
||||
////////////////////////////////////////////////////
|
||||
WSButtons, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSButton }
|
||||
|
||||
TFpGuiWSButton = class(TWSButton)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSBitBtn }
|
||||
|
||||
TFpGuiWSBitBtn = class(TWSBitBtn)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSSpeedButton }
|
||||
|
||||
TFpGuiWSSpeedButton = class(TWSSpeedButton)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TCustomButton, TFpGuiWSButton);
|
||||
// RegisterWSComponent(TCustomBitBtn, TFpGuiWSBitBtn);
|
||||
// RegisterWSComponent(TCustomSpeedButton, TFpGuiWSSpeedButton);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
63
lcl/interfaces/fpgui/fpguiwscalendar.pp
Normal file
63
lcl/interfaces/fpgui/fpguiwscalendar.pp
Normal file
@ -0,0 +1,63 @@
|
||||
{ $Id: FpGuiwscalendar.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSCalendar.pp *
|
||||
* --------------- *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSCalendar;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// Calendar,
|
||||
////////////////////////////////////////////////////
|
||||
WSCalendar, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSCalendar }
|
||||
|
||||
TFpGuiWSCalendar = class(TWSCalendar)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TCalendar, TFpGuiWSCalendar);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
63
lcl/interfaces/fpgui/fpguiwschecklst.pp
Normal file
63
lcl/interfaces/fpgui/fpguiwschecklst.pp
Normal file
@ -0,0 +1,63 @@
|
||||
{ $Id: FpGuiwschecklst.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSCheckLst.pp *
|
||||
* --------------- *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSCheckLst;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// CheckLst,
|
||||
////////////////////////////////////////////////////
|
||||
WSCheckLst, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSCheckListBox }
|
||||
|
||||
TFpGuiWSCheckListBox = class(TWSCheckListBox)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TCheckListBox, TFpGuiWSCheckListBox);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
63
lcl/interfaces/fpgui/fpguiwsclistbox.pp
Normal file
63
lcl/interfaces/fpgui/fpguiwsclistbox.pp
Normal file
@ -0,0 +1,63 @@
|
||||
{ $Id: FpGuiwsclistbox.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSCListBox.pp *
|
||||
* --------------- *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSCListBox;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// CListBox,
|
||||
////////////////////////////////////////////////////
|
||||
WSCListBox, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSCListBox }
|
||||
|
||||
TFpGuiWSCListBox = class(TWSCListBox)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TCListBox, TFpGuiWSCListBox);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
189
lcl/interfaces/fpgui/fpguiwscomctrls.pp
Normal file
189
lcl/interfaces/fpgui/fpguiwscomctrls.pp
Normal file
@ -0,0 +1,189 @@
|
||||
{ $Id: FpGuiwscomctrls.pp 5687 2004-07-16 21:49:00Z mattias $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSComCtrls.pp *
|
||||
* --------------- *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSComCtrls;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// ComCtrls,
|
||||
////////////////////////////////////////////////////
|
||||
WSComCtrls, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSStatusBar }
|
||||
|
||||
TFpGuiWSStatusBar = class(TWSStatusBar)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSTabSheet }
|
||||
|
||||
TFpGuiWSTabSheet = class(TWSTabSheet)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSPageControl }
|
||||
|
||||
TFpGuiWSPageControl = class(TWSPageControl)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomListView }
|
||||
|
||||
TFpGuiWSCustomListView = class(TWSCustomListView)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSListView }
|
||||
|
||||
TFpGuiWSListView = class(TWSListView)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSProgressBar }
|
||||
|
||||
TFpGuiWSProgressBar = class(TWSProgressBar)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomUpDown }
|
||||
|
||||
TFpGuiWSCustomUpDown = class(TWSCustomUpDown)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSUpDown }
|
||||
|
||||
TFpGuiWSUpDown = class(TWSUpDown)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSToolButton }
|
||||
|
||||
TFpGuiWSToolButton = class(TWSToolButton)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSToolBar }
|
||||
|
||||
TFpGuiWSToolBar = class(TWSToolBar)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSToolButton }
|
||||
|
||||
TFpGuiWSToolButton = class(TWSToolButton)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSToolBar }
|
||||
|
||||
TFpGuiWSToolBar = class(TWSToolBar)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSTrackBar }
|
||||
|
||||
TFpGuiWSTrackBar = class(TWSTrackBar)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomTreeView }
|
||||
|
||||
TFpGuiWSCustomTreeView = class(TWSCustomTreeView)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSTreeView }
|
||||
|
||||
TFpGuiWSTreeView = class(TWSTreeView)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TCustomStatusBar, TFpGuiWSStatusBar);
|
||||
// RegisterWSComponent(TCustomTabSheet, TFpGuiWSTabSheet);
|
||||
// RegisterWSComponent(TCustomPageControl, TFpGuiWSPageControl);
|
||||
// RegisterWSComponent(TCustomListView, TFpGuiWSCustomListView);
|
||||
// RegisterWSComponent(TCustomListView, TFpGuiWSListView);
|
||||
// RegisterWSComponent(TCustomProgressBar, TFpGuiWSProgressBar);
|
||||
// RegisterWSComponent(TCustomUpDown, TFpGuiWSCustomUpDown);
|
||||
// RegisterWSComponent(TCustomUpDown, TFpGuiWSUpDown);
|
||||
// RegisterWSComponent(TCustomToolButton, TFpGuiWSToolButton);
|
||||
// RegisterWSComponent(TCustomToolBar, TFpGuiWSToolBar);
|
||||
// RegisterWSComponent(TCustomToolButton, TFpGuiWSToolButton);
|
||||
// RegisterWSComponent(TCustomToolBar, TFpGuiWSToolBar);
|
||||
// RegisterWSComponent(TCustomTrackBar, TFpGuiWSTrackBar);
|
||||
// RegisterWSComponent(TCustomTreeView, TFpGuiWSCustomTreeView);
|
||||
// RegisterWSComponent(TCustomTreeView, TFpGuiWSTreeView);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
108
lcl/interfaces/fpgui/fpguiwscontrols.pp
Normal file
108
lcl/interfaces/fpgui/fpguiwscontrols.pp
Normal file
@ -0,0 +1,108 @@
|
||||
{ $Id: FpGuiwscontrols.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSControls.pp *
|
||||
* --------------- *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSControls;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// Controls,
|
||||
////////////////////////////////////////////////////
|
||||
WSControls, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSDragImageList }
|
||||
|
||||
TFpGuiWSDragImageList = class(TWSDragImageList)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSControl }
|
||||
|
||||
TFpGuiWSControl = class(TWSControl)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSWinControl }
|
||||
|
||||
TFpGuiWSWinControl = class(TWSWinControl)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSGraphicControl }
|
||||
|
||||
TFpGuiWSGraphicControl = class(TWSGraphicControl)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomControl }
|
||||
|
||||
TFpGuiWSCustomControl = class(TWSCustomControl)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSImageList }
|
||||
|
||||
TFpGuiWSImageList = class(TWSImageList)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TDragImageList, TFpGuiWSDragImageList);
|
||||
// RegisterWSComponent(TControl, TFpGuiWSControl);
|
||||
// RegisterWSComponent(TWinControl, TFpGuiWSWinControl);
|
||||
// RegisterWSComponent(TGraphicControl, TFpGuiWSGraphicControl);
|
||||
// RegisterWSComponent(TCustomControl, TFpGuiWSCustomControl);
|
||||
// RegisterWSComponent(TImageList, TFpGuiWSImageList);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
171
lcl/interfaces/fpgui/fpguiwsdbctrls.pp
Normal file
171
lcl/interfaces/fpgui/fpguiwsdbctrls.pp
Normal file
@ -0,0 +1,171 @@
|
||||
{ $Id: FpGuiwsdbctrls.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSDbCtrls.pp *
|
||||
* -------------- *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSDbCtrls;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// DbCtrls,
|
||||
////////////////////////////////////////////////////
|
||||
WSDbCtrls, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSDBEdit }
|
||||
|
||||
TFpGuiWSDBEdit = class(TWSDBEdit)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSDBText }
|
||||
|
||||
TFpGuiWSDBText = class(TWSDBText)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSDBListBox }
|
||||
|
||||
TFpGuiWSDBListBox = class(TWSDBListBox)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSDBRadioGroup }
|
||||
|
||||
TFpGuiWSDBRadioGroup = class(TWSDBRadioGroup)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSDBCheckBox }
|
||||
|
||||
TFpGuiWSDBCheckBox = class(TWSDBCheckBox)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSDBComboBox }
|
||||
|
||||
TFpGuiWSDBComboBox = class(TWSDBComboBox)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSDBMemo }
|
||||
|
||||
TFpGuiWSDBMemo = class(TWSDBMemo)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSDBGroupBox }
|
||||
|
||||
TFpGuiWSDBGroupBox = class(TWSDBGroupBox)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSDBImage }
|
||||
|
||||
TFpGuiWSDBImage = class(TWSDBImage)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSDBCalendar }
|
||||
|
||||
TFpGuiWSDBCalendar = class(TWSDBCalendar)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSDBCustomNavigator }
|
||||
|
||||
TFpGuiWSDBCustomNavigator = class(TWSDBCustomNavigator)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSDBNavButton }
|
||||
|
||||
TFpGuiWSDBNavButton = class(TWSDBNavButton)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSDBNavigator }
|
||||
|
||||
TFpGuiWSDBNavigator = class(TWSDBNavigator)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TDBEdit, TFpGuiWSDBEdit);
|
||||
// RegisterWSComponent(TDBText, TFpGuiWSDBText);
|
||||
// RegisterWSComponent(TDBListBox, TFpGuiWSDBListBox);
|
||||
// RegisterWSComponent(TDBRadioGroup, TFpGuiWSDBRadioGroup);
|
||||
// RegisterWSComponent(TDBCheckBox, TFpGuiWSDBCheckBox);
|
||||
// RegisterWSComponent(TDBComboBox, TFpGuiWSDBComboBox);
|
||||
// RegisterWSComponent(TDBMemo, TFpGuiWSDBMemo);
|
||||
// RegisterWSComponent(TDBGroupBox, TFpGuiWSDBGroupBox);
|
||||
// RegisterWSComponent(TDBImage, TFpGuiWSDBImage);
|
||||
// RegisterWSComponent(TDBCalendar, TFpGuiWSDBCalendar);
|
||||
// RegisterWSComponent(TDBCustomNavigator, TFpGuiWSDBCustomNavigator);
|
||||
// RegisterWSComponent(TDBNavButton, TFpGuiWSDBNavButton);
|
||||
// RegisterWSComponent(TDBNavigator, TFpGuiWSDBNavigator);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
72
lcl/interfaces/fpgui/fpguiwsdbgrids.pp
Normal file
72
lcl/interfaces/fpgui/fpguiwsdbgrids.pp
Normal file
@ -0,0 +1,72 @@
|
||||
{ $Id: FpGuiwsdbgrids.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSDBGrids.pp *
|
||||
* -------------- *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSDBGrids;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// DBGrids,
|
||||
////////////////////////////////////////////////////
|
||||
WSDBGrids, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSCustomDbGrid }
|
||||
|
||||
TFpGuiWSCustomDbGrid = class(TWSCustomDbGrid)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSdbGrid }
|
||||
|
||||
TFpGuiWSdbGrid = class(TWSdbGrid)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TCustomDbGrid, TFpGuiWSCustomDbGrid);
|
||||
// RegisterWSComponent(TdbGrid, TFpGuiWSdbGrid);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
126
lcl/interfaces/fpgui/fpguiwsdialogs.pp
Normal file
126
lcl/interfaces/fpgui/fpguiwsdialogs.pp
Normal file
@ -0,0 +1,126 @@
|
||||
{ $Id: FpGuiwsdialogs.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSDialogs.pp *
|
||||
* -------------- *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSDialogs;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// Dialogs,
|
||||
////////////////////////////////////////////////////
|
||||
WSDialogs, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSCommonDialog }
|
||||
|
||||
TFpGuiWSCommonDialog = class(TWSCommonDialog)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSFileDialog }
|
||||
|
||||
TFpGuiWSFileDialog = class(TWSFileDialog)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSOpenDialog }
|
||||
|
||||
TFpGuiWSOpenDialog = class(TWSOpenDialog)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSSaveDialog }
|
||||
|
||||
TFpGuiWSSaveDialog = class(TWSSaveDialog)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSSelectDirectoryDialog }
|
||||
|
||||
TFpGuiWSSelectDirectoryDialog = class(TWSSelectDirectoryDialog)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSColorDialog }
|
||||
|
||||
TFpGuiWSColorDialog = class(TWSColorDialog)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSColorButton }
|
||||
|
||||
TFpGuiWSColorButton = class(TWSColorButton)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSFontDialog }
|
||||
|
||||
TFpGuiWSFontDialog = class(TWSFontDialog)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TCommonDialog, TFpGuiWSCommonDialog);
|
||||
// RegisterWSComponent(TFileDialog, TFpGuiWSFileDialog);
|
||||
// RegisterWSComponent(TOpenDialog, TFpGuiWSOpenDialog);
|
||||
// RegisterWSComponent(TSaveDialog, TFpGuiWSSaveDialog);
|
||||
// RegisterWSComponent(TSelectDirectoryDialog, TFpGuiWSSelectDirectoryDialog);
|
||||
// RegisterWSComponent(TColorDialog, TFpGuiWSColorDialog);
|
||||
// RegisterWSComponent(TColorButton, TFpGuiWSColorButton);
|
||||
// RegisterWSComponent(TFontDialog, TFpGuiWSFontDialog);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
63
lcl/interfaces/fpgui/fpguiwsdirsel.pp
Normal file
63
lcl/interfaces/fpgui/fpguiwsdirsel.pp
Normal file
@ -0,0 +1,63 @@
|
||||
{ $Id: FpGuiwsdirsel.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSDirSel.pp *
|
||||
* ------------- *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSDirSel;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// DirSel,
|
||||
////////////////////////////////////////////////////
|
||||
WSDirSel, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSDirSelDlg }
|
||||
|
||||
TFpGuiWSDirSelDlg = class(TWSDirSelDlg)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TDirSelDlg, TFpGuiWSDirSelDlg);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
108
lcl/interfaces/fpgui/fpguiwseditbtn.pp
Normal file
108
lcl/interfaces/fpgui/fpguiwseditbtn.pp
Normal file
@ -0,0 +1,108 @@
|
||||
{ $Id: FpGuiwseditbtn.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSEditBtn.pp *
|
||||
* -------------- *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSEditBtn;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// EditBtn,
|
||||
////////////////////////////////////////////////////
|
||||
WSEditBtn, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSCustomEditButton }
|
||||
|
||||
TFpGuiWSCustomEditButton = class(TWSCustomEditButton)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSEditButton }
|
||||
|
||||
TFpGuiWSEditButton = class(TWSEditButton)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSFileNameEdit }
|
||||
|
||||
TFpGuiWSFileNameEdit = class(TWSFileNameEdit)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSDirectoryEdit }
|
||||
|
||||
TFpGuiWSDirectoryEdit = class(TWSDirectoryEdit)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSDateEdit }
|
||||
|
||||
TFpGuiWSDateEdit = class(TWSDateEdit)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCalcEdit }
|
||||
|
||||
TFpGuiWSCalcEdit = class(TWSCalcEdit)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TCustomEditButton, TFpGuiWSCustomEditButton);
|
||||
// RegisterWSComponent(TEditButton, TFpGuiWSEditButton);
|
||||
// RegisterWSComponent(TFileNameEdit, TFpGuiWSFileNameEdit);
|
||||
// RegisterWSComponent(TDirectoryEdit, TFpGuiWSDirectoryEdit);
|
||||
// RegisterWSComponent(TDateEdit, TFpGuiWSDateEdit);
|
||||
// RegisterWSComponent(TCalcEdit, TFpGuiWSCalcEdit);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
234
lcl/interfaces/fpgui/fpguiwsextctrls.pp
Normal file
234
lcl/interfaces/fpgui/fpguiwsextctrls.pp
Normal file
@ -0,0 +1,234 @@
|
||||
{ $Id: FpGuiwsextctrls.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSExtCtrls.pp *
|
||||
* --------------- *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSExtCtrls;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// ExtCtrls,
|
||||
////////////////////////////////////////////////////
|
||||
WSExtCtrls, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSCustomPage }
|
||||
|
||||
TFpGuiWSCustomPage = class(TWSCustomPage)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomNotebook }
|
||||
|
||||
TFpGuiWSCustomNotebook = class(TWSCustomNotebook)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSPage }
|
||||
|
||||
TFpGuiWSPage = class(TWSPage)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSNotebook }
|
||||
|
||||
TFpGuiWSNotebook = class(TWSNotebook)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSShape }
|
||||
|
||||
TFpGuiWSShape = class(TWSShape)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomSplitter }
|
||||
|
||||
TFpGuiWSCustomSplitter = class(TWSCustomSplitter)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSSplitter }
|
||||
|
||||
TFpGuiWSSplitter = class(TWSSplitter)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSPaintBox }
|
||||
|
||||
TFpGuiWSPaintBox = class(TWSPaintBox)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomImage }
|
||||
|
||||
TFpGuiWSCustomImage = class(TWSCustomImage)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSImage }
|
||||
|
||||
TFpGuiWSImage = class(TWSImage)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSBevel }
|
||||
|
||||
TFpGuiWSBevel = class(TWSBevel)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomRadioGroup }
|
||||
|
||||
TFpGuiWSCustomRadioGroup = class(TWSCustomRadioGroup)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSRadioGroup }
|
||||
|
||||
TFpGuiWSRadioGroup = class(TWSRadioGroup)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomCheckGroup }
|
||||
|
||||
TFpGuiWSCustomCheckGroup = class(TWSCustomCheckGroup)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCheckGroup }
|
||||
|
||||
TFpGuiWSCheckGroup = class(TWSCheckGroup)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSBoundLabel }
|
||||
|
||||
TFpGuiWSBoundLabel = class(TWSBoundLabel)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomLabeledEdit }
|
||||
|
||||
TFpGuiWSCustomLabeledEdit = class(TWSCustomLabeledEdit)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSLabeledEdit }
|
||||
|
||||
TFpGuiWSLabeledEdit = class(TWSLabeledEdit)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomPanel }
|
||||
|
||||
TFpGuiWSCustomPanel = class(TWSCustomPanel)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSPanel }
|
||||
|
||||
TFpGuiWSPanel = class(TWSPanel)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TCustomPage, TFpGuiWSCustomPage);
|
||||
// RegisterWSComponent(TCustomNotebook, TFpGuiWSCustomNotebook);
|
||||
// RegisterWSComponent(TPage, TFpGuiWSPage);
|
||||
// RegisterWSComponent(TNotebook, TFpGuiWSNotebook);
|
||||
// RegisterWSComponent(TShape, TFpGuiWSShape);
|
||||
// RegisterWSComponent(TCustomSplitter, TFpGuiWSCustomSplitter);
|
||||
// RegisterWSComponent(TSplitter, TFpGuiWSSplitter);
|
||||
// RegisterWSComponent(TPaintBox, TFpGuiWSPaintBox);
|
||||
// RegisterWSComponent(TCustomImage, TFpGuiWSCustomImage);
|
||||
// RegisterWSComponent(TImage, TFpGuiWSImage);
|
||||
// RegisterWSComponent(TBevel, TFpGuiWSBevel);
|
||||
// RegisterWSComponent(TCustomRadioGroup, TFpGuiWSCustomRadioGroup);
|
||||
// RegisterWSComponent(TRadioGroup, TFpGuiWSRadioGroup);
|
||||
// RegisterWSComponent(TCustomCheckGroup, TFpGuiWSCustomCheckGroup);
|
||||
// RegisterWSComponent(TCheckGroup, TFpGuiWSCheckGroup);
|
||||
// RegisterWSComponent(TBoundLabel, TFpGuiWSBoundLabel);
|
||||
// RegisterWSComponent(TCustomLabeledEdit, TFpGuiWSCustomLabeledEdit);
|
||||
// RegisterWSComponent(TLabeledEdit, TFpGuiWSLabeledEdit);
|
||||
// RegisterWSComponent(TCustomPanel, TFpGuiWSCustomPanel);
|
||||
// RegisterWSComponent(TPanel, TFpGuiWSPanel);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
126
lcl/interfaces/fpgui/fpguiwsextdlgs.pp
Normal file
126
lcl/interfaces/fpgui/fpguiwsextdlgs.pp
Normal file
@ -0,0 +1,126 @@
|
||||
{ $Id: FpGuiwsextdlgs.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSExtDlgs.pp *
|
||||
* -------------- *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSExtDlgs;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// ExtDlgs,
|
||||
////////////////////////////////////////////////////
|
||||
WSExtDlgs, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSPreviewFileControl }
|
||||
|
||||
TFpGuiWSPreviewFileControl = class(TWSPreviewFileControl)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSPreviewFileDialog }
|
||||
|
||||
TFpGuiWSPreviewFileDialog = class(TWSPreviewFileDialog)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSOpenPictureDialog }
|
||||
|
||||
TFpGuiWSOpenPictureDialog = class(TWSOpenPictureDialog)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSSavePictureDialog }
|
||||
|
||||
TFpGuiWSSavePictureDialog = class(TWSSavePictureDialog)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCalculatorDialog }
|
||||
|
||||
TFpGuiWSCalculatorDialog = class(TWSCalculatorDialog)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCalculatorForm }
|
||||
|
||||
TFpGuiWSCalculatorForm = class(TWSCalculatorForm)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCalendarDialogForm }
|
||||
|
||||
TFpGuiWSCalendarDialogForm = class(TWSCalendarDialogForm)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCalendarDialog }
|
||||
|
||||
TFpGuiWSCalendarDialog = class(TWSCalendarDialog)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TPreviewFileControl, TFpGuiWSPreviewFileControl);
|
||||
// RegisterWSComponent(TPreviewFileDialog, TFpGuiWSPreviewFileDialog);
|
||||
// RegisterWSComponent(TOpenPictureDialog, TFpGuiWSOpenPictureDialog);
|
||||
// RegisterWSComponent(TSavePictureDialog, TFpGuiWSSavePictureDialog);
|
||||
// RegisterWSComponent(TCalculatorDialog, TFpGuiWSCalculatorDialog);
|
||||
// RegisterWSComponent(TCalculatorForm, TFpGuiWSCalculatorForm);
|
||||
// RegisterWSComponent(TCalendarDialogForm, TFpGuiWSCalendarDialogForm);
|
||||
// RegisterWSComponent(TCalendarDialog, TFpGuiWSCalendarDialog);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
72
lcl/interfaces/fpgui/fpguiwsfilectrl.pp
Normal file
72
lcl/interfaces/fpgui/fpguiwsfilectrl.pp
Normal file
@ -0,0 +1,72 @@
|
||||
{ $Id: FpGuiwsfilectrl.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSFileCtrl.pp *
|
||||
* --------------- *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSFileCtrl;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// FileCtrl,
|
||||
////////////////////////////////////////////////////
|
||||
WSFileCtrl, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSCustomFileListBox }
|
||||
|
||||
TFpGuiWSCustomFileListBox = class(TWSCustomFileListBox)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSFileListBox }
|
||||
|
||||
TFpGuiWSFileListBox = class(TWSFileListBox)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TCustomFileListBox, TFpGuiWSCustomFileListBox);
|
||||
// RegisterWSComponent(TFileListBox, TFpGuiWSFileListBox);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
135
lcl/interfaces/fpgui/fpguiwsforms.pp
Normal file
135
lcl/interfaces/fpgui/fpguiwsforms.pp
Normal file
@ -0,0 +1,135 @@
|
||||
{ $Id: FpGuiwsforms.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSForms.pp *
|
||||
* ------------ *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSForms;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// Forms,
|
||||
////////////////////////////////////////////////////
|
||||
WSForms, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSScrollingWinControl }
|
||||
|
||||
TFpGuiWSScrollingWinControl = class(TWSScrollingWinControl)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSScrollBox }
|
||||
|
||||
TFpGuiWSScrollBox = class(TWSScrollBox)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomFrame }
|
||||
|
||||
TFpGuiWSCustomFrame = class(TWSCustomFrame)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSFrame }
|
||||
|
||||
TFpGuiWSFrame = class(TWSFrame)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomForm }
|
||||
|
||||
TFpGuiWSCustomForm = class(TWSCustomForm)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSForm }
|
||||
|
||||
TFpGuiWSForm = class(TWSForm)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSHintWindow }
|
||||
|
||||
TFpGuiWSHintWindow = class(TWSHintWindow)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSScreen }
|
||||
|
||||
TFpGuiWSScreen = class(TWSScreen)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSApplicationProperties }
|
||||
|
||||
TFpGuiWSApplicationProperties = class(TWSApplicationProperties)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TScrollingWinControl, TFpGuiWSScrollingWinControl);
|
||||
// RegisterWSComponent(TScrollBox, TFpGuiWSScrollBox);
|
||||
// RegisterWSComponent(TCustomFrame, TFpGuiWSCustomFrame);
|
||||
// RegisterWSComponent(TFrame, TFpGuiWSFrame);
|
||||
// RegisterWSComponent(TCustomForm, TFpGuiWSCustomForm);
|
||||
// RegisterWSComponent(TForm, TFpGuiWSForm);
|
||||
// RegisterWSComponent(THintWindow, TFpGuiWSHintWindow);
|
||||
// RegisterWSComponent(TScreen, TFpGuiWSScreen);
|
||||
// RegisterWSComponent(TApplicationProperties, TFpGuiWSApplicationProperties);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
90
lcl/interfaces/fpgui/fpguiwsgrids.pp
Normal file
90
lcl/interfaces/fpgui/fpguiwsgrids.pp
Normal file
@ -0,0 +1,90 @@
|
||||
{ $Id: FpGuiwsgrids.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSGrids.pp *
|
||||
* ------------ *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSGrids;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// Grids,
|
||||
////////////////////////////////////////////////////
|
||||
WSGrids, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSStringCellEditor }
|
||||
|
||||
TFpGuiWSStringCellEditor = class(TWSStringCellEditor)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomGrid }
|
||||
|
||||
TFpGuiWSCustomGrid = class(TWSCustomGrid)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSDrawGrid }
|
||||
|
||||
TFpGuiWSDrawGrid = class(TWSDrawGrid)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSStringGrid }
|
||||
|
||||
TFpGuiWSStringGrid = class(TWSStringGrid)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TStringCellEditor, TFpGuiWSStringCellEditor);
|
||||
// RegisterWSComponent(TCustomGrid, TFpGuiWSCustomGrid);
|
||||
// RegisterWSComponent(TDrawGrid, TFpGuiWSDrawGrid);
|
||||
// RegisterWSComponent(TStringGrid, TFpGuiWSStringGrid);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
63
lcl/interfaces/fpgui/fpguiwsimglist.pp
Normal file
63
lcl/interfaces/fpgui/fpguiwsimglist.pp
Normal file
@ -0,0 +1,63 @@
|
||||
{ $Id: FpGuiwsimglist.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSImgList.pp *
|
||||
* -------------- *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSImgList;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// ImgList,
|
||||
////////////////////////////////////////////////////
|
||||
WSImgList, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSCustomImageList }
|
||||
|
||||
TFpGuiWSCustomImageList = class(TWSCustomImageList)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TCustomImageList, TFpGuiWSCustomImageList);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
72
lcl/interfaces/fpgui/fpguiwsmaskedit.pp
Normal file
72
lcl/interfaces/fpgui/fpguiwsmaskedit.pp
Normal file
@ -0,0 +1,72 @@
|
||||
{ $Id: FpGuiwsmaskedit.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSMaskEdit.pp *
|
||||
* --------------- *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSMaskEdit;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// MaskEdit,
|
||||
////////////////////////////////////////////////////
|
||||
WSMaskEdit, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSCustomMaskEdit }
|
||||
|
||||
TFpGuiWSCustomMaskEdit = class(TWSCustomMaskEdit)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSMaskEdit }
|
||||
|
||||
TFpGuiWSMaskEdit = class(TWSMaskEdit)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TCustomMaskEdit, TFpGuiWSCustomMaskEdit);
|
||||
// RegisterWSComponent(TMaskEdit, TFpGuiWSMaskEdit);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
90
lcl/interfaces/fpgui/fpguiwsmenus.pp
Normal file
90
lcl/interfaces/fpgui/fpguiwsmenus.pp
Normal file
@ -0,0 +1,90 @@
|
||||
{ $Id: FpGuiwsmenus.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSMenus.pp *
|
||||
* ------------ *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSMenus;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// Menus,
|
||||
////////////////////////////////////////////////////
|
||||
WSMenus, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSMenuItem }
|
||||
|
||||
TFpGuiWSMenuItem = class(TWSMenuItem)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSMenu }
|
||||
|
||||
TFpGuiWSMenu = class(TWSMenu)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSMainMenu }
|
||||
|
||||
TFpGuiWSMainMenu = class(TWSMainMenu)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSPopupMenu }
|
||||
|
||||
TFpGuiWSPopupMenu = class(TWSPopupMenu)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TMenuItem, TFpGuiWSMenuItem);
|
||||
// RegisterWSComponent(TMenu, TFpGuiWSMenu);
|
||||
// RegisterWSComponent(TMainMenu, TFpGuiWSMainMenu);
|
||||
// RegisterWSComponent(TPopupMenu, TFpGuiWSPopupMenu);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
81
lcl/interfaces/fpgui/fpguiwspairsplitter.pp
Normal file
81
lcl/interfaces/fpgui/fpguiwspairsplitter.pp
Normal file
@ -0,0 +1,81 @@
|
||||
{ $Id: FpGuiwspairsplitter.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSPairSplitter.pp *
|
||||
* ------------------- *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSPairSplitter;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// PairSplitter,
|
||||
////////////////////////////////////////////////////
|
||||
WSPairSplitter, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSPairSplitterSide }
|
||||
|
||||
TFpGuiWSPairSplitterSide = class(TWSPairSplitterSide)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomPairSplitter }
|
||||
|
||||
TFpGuiWSCustomPairSplitter = class(TWSCustomPairSplitter)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSPairSplitter }
|
||||
|
||||
TFpGuiWSPairSplitter = class(TWSPairSplitter)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TPairSplitterSide, TFpGuiWSPairSplitterSide);
|
||||
// RegisterWSComponent(TCustomPairSplitter, TFpGuiWSCustomPairSplitter);
|
||||
// RegisterWSComponent(TPairSplitter, TFpGuiWSPairSplitter);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
72
lcl/interfaces/fpgui/fpguiwsspin.pp
Normal file
72
lcl/interfaces/fpgui/fpguiwsspin.pp
Normal file
@ -0,0 +1,72 @@
|
||||
{ $Id: FpGuiwsspin.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSSpin.pp *
|
||||
* ----------- *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSSpin;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// Spin,
|
||||
////////////////////////////////////////////////////
|
||||
WSSpin, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSCustomSpinEdit }
|
||||
|
||||
TFpGuiWSCustomSpinEdit = class(TWSCustomSpinEdit)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSSpinEdit }
|
||||
|
||||
TFpGuiWSSpinEdit = class(TWSSpinEdit)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TCustomSpinEdit, TFpGuiWSCustomSpinEdit);
|
||||
// RegisterWSComponent(TSpinEdit, TFpGuiWSSpinEdit);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
243
lcl/interfaces/fpgui/fpguiwsstdctrls.pp
Normal file
243
lcl/interfaces/fpgui/fpguiwsstdctrls.pp
Normal file
@ -0,0 +1,243 @@
|
||||
{ $Id: FpGuiwsstdctrls.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSStdCtrls.pp *
|
||||
* --------------- *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSStdCtrls;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// StdCtrls,
|
||||
////////////////////////////////////////////////////
|
||||
WSStdCtrls, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSScrollBar }
|
||||
|
||||
TFpGuiWSScrollBar = class(TWSScrollBar)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomGroupBox }
|
||||
|
||||
TFpGuiWSCustomGroupBox = class(TWSCustomGroupBox)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSGroupBox }
|
||||
|
||||
TFpGuiWSGroupBox = class(TWSGroupBox)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomComboBox }
|
||||
|
||||
TFpGuiWSCustomComboBox = class(TWSCustomComboBox)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSComboBox }
|
||||
|
||||
TFpGuiWSComboBox = class(TWSComboBox)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomListBox }
|
||||
|
||||
TFpGuiWSCustomListBox = class(TWSCustomListBox)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSListBox }
|
||||
|
||||
TFpGuiWSListBox = class(TWSListBox)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomEdit }
|
||||
|
||||
TFpGuiWSCustomEdit = class(TWSCustomEdit)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomMemo }
|
||||
|
||||
TFpGuiWSCustomMemo = class(TWSCustomMemo)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSEdit }
|
||||
|
||||
TFpGuiWSEdit = class(TWSEdit)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSMemo }
|
||||
|
||||
TFpGuiWSMemo = class(TWSMemo)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomLabel }
|
||||
|
||||
TFpGuiWSCustomLabel = class(TWSCustomLabel)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSLabel }
|
||||
|
||||
TFpGuiWSLabel = class(TWSLabel)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSButtonControl }
|
||||
|
||||
TFpGuiWSButtonControl = class(TWSButtonControl)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomCheckBox }
|
||||
|
||||
TFpGuiWSCustomCheckBox = class(TWSCustomCheckBox)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCheckBox }
|
||||
|
||||
TFpGuiWSCheckBox = class(TWSCheckBox)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCheckBox }
|
||||
|
||||
TFpGuiWSCheckBox = class(TWSCheckBox)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSToggleBox }
|
||||
|
||||
TFpGuiWSToggleBox = class(TWSToggleBox)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSRadioButton }
|
||||
|
||||
TFpGuiWSRadioButton = class(TWSRadioButton)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSCustomStaticText }
|
||||
|
||||
TFpGuiWSCustomStaticText = class(TWSCustomStaticText)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
{ TFpGuiWSStaticText }
|
||||
|
||||
TFpGuiWSStaticText = class(TWSStaticText)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TScrollBar, TFpGuiWSScrollBar);
|
||||
// RegisterWSComponent(TCustomGroupBox, TFpGuiWSCustomGroupBox);
|
||||
// RegisterWSComponent(TGroupBox, TFpGuiWSGroupBox);
|
||||
// RegisterWSComponent(TCustomComboBox, TFpGuiWSCustomComboBox);
|
||||
// RegisterWSComponent(TComboBox, TFpGuiWSComboBox);
|
||||
// RegisterWSComponent(TCustomListBox, TFpGuiWSCustomListBox);
|
||||
// RegisterWSComponent(TListBox, TFpGuiWSListBox);
|
||||
// RegisterWSComponent(TCustomEdit, TFpGuiWSCustomEdit);
|
||||
// RegisterWSComponent(TCustomMemo, TFpGuiWSCustomMemo);
|
||||
// RegisterWSComponent(TEdit, TFpGuiWSEdit);
|
||||
// RegisterWSComponent(TMemo, TFpGuiWSMemo);
|
||||
// RegisterWSComponent(TCustomLabel, TFpGuiWSCustomLabel);
|
||||
// RegisterWSComponent(TLabel, TFpGuiWSLabel);
|
||||
// RegisterWSComponent(TButtonControl, TFpGuiWSButtonControl);
|
||||
// RegisterWSComponent(TCustomCheckBox, TFpGuiWSCustomCheckBox);
|
||||
// RegisterWSComponent(TCheckBox, TFpGuiWSCheckBox);
|
||||
// RegisterWSComponent(TCheckBox, TFpGuiWSCheckBox);
|
||||
// RegisterWSComponent(TToggleBox, TFpGuiWSToggleBox);
|
||||
// RegisterWSComponent(TRadioButton, TFpGuiWSRadioButton);
|
||||
// RegisterWSComponent(TCustomStaticText, TFpGuiWSCustomStaticText);
|
||||
// RegisterWSComponent(TStaticText, TFpGuiWSStaticText);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
63
lcl/interfaces/fpgui/fpguiwstoolwin.pp
Normal file
63
lcl/interfaces/fpgui/fpguiwstoolwin.pp
Normal file
@ -0,0 +1,63 @@
|
||||
{ $Id: FpGuiwstoolwin.pp 5319 2004-03-17 20:11:29Z marc $}
|
||||
{
|
||||
*****************************************************************************
|
||||
* FpGuiWSToolwin.pp *
|
||||
* -------------- *
|
||||
* *
|
||||
* *
|
||||
*****************************************************************************
|
||||
|
||||
*****************************************************************************
|
||||
* *
|
||||
* This file is part of the Lazarus Component Library (LCL) *
|
||||
* *
|
||||
* See the file COPYING.LCL, included in this distribution, *
|
||||
* for details about the copyright. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit FpGuiWSToolwin;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To get as little as posible circles,
|
||||
// uncomment only when needed for registration
|
||||
////////////////////////////////////////////////////
|
||||
// Toolwin,
|
||||
////////////////////////////////////////////////////
|
||||
WSToolwin, WSLCLClasses;
|
||||
|
||||
type
|
||||
|
||||
{ TFpGuiWSToolWindow }
|
||||
|
||||
TFpGuiWSToolWindow = class(TWSToolWindow)
|
||||
private
|
||||
protected
|
||||
public
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
initialization
|
||||
|
||||
////////////////////////////////////////////////////
|
||||
// I M P O R T A N T
|
||||
////////////////////////////////////////////////////
|
||||
// To improve speed, register only classes
|
||||
// which actually implement something
|
||||
////////////////////////////////////////////////////
|
||||
// RegisterWSComponent(TToolWindow, TFpGuiWSToolWindow);
|
||||
////////////////////////////////////////////////////
|
||||
end.
|
||||
Loading…
Reference in New Issue
Block a user