Source code

redirect( "/user/login" );

But sometimes you simply want to stop the Controller and output the fact that they are not authorised or that a certain error has occurred. I was just doing this with a REST API on a site, and simply wanted to fail if the wrong API Key was passed. I’ve found it’s easiest to do via a “show_error” call:

Source code

show_error('Not authorized', 401 );

• ADO
• Mysql 4.1 to 6.0,
• Interbase 5 / 6
• Firebird 1.0 to 2.1
• Postgres 7 to 8
• SQLite 2.8 to 3

You can read more about the Zeoslib here: http://zeos.firmos.at/

The basic steps:

• Get the latest version from SVN (rev 935 when I got it) from here:  https://zeoslib.svn.sourceforge.net/svnroot/zeoslib/branches/testing
• I created new packages for XE2, copied from the delphi15 packages, converted them and made any changes needed to get it to compile. Patch file for rev 935: zeosdbo_rev935_delphixe2
• My patches were committed to the SVN, so the latest SVN should have the changes for XE2
• Open up the $(COMPONENTBASE)\zeos\packages\delphi16\ZeosDbo.groupproj
• Compile All
• Add the $(COMPONENTBASE)\zeos\packages\delphi16\build to the path
• Install the ZComponentDesign package

• Download JVCL for XE2: http://cc.embarcadero.com/Item/28421
• Extracted to $(COMPONENTBASE)\jvcl
• Updated to the latest SVN version from: https://jvcl.svn.sourceforge.net:443/svnroot/jvcl/trunk/jvcl
• Opened up $(COMPONENTBASE)\jvcl\packages\D16 Packages.groupproj
• At this point I got lots of errors and warnings about not being able to find classes
• Clicked on Cancel until all the packages were loaded
• I tried to ‘Compile All’ but there were some problems with some of the packages so I went through them all and Compiled, and Installed the design-time packages.
• JvPascalInterpreter package did not want to compile so I skipped it.
• Under Tools -> Options -> Environment Options -> Delphi Options -> Library add the following directories to the Browsing path:
• $(COMPONENTBASE)\jvcl\run
• $(COMPONENTBASE)\jvcl\common
• Under Tools -> Options -> Environment Options -> Delphi Options -> Library add the following directories to the Library path:
• $(COMPONENTBASE)\jvcl\run
• $(COMPONENTBASE)\jvcl\common
• $(COMPONENTBASE)\jvcl\resources

• Downloaded JCL for XE2: http://cc.embarcadero.com/Item/28416
• Extracted to $(COMPONENTBASE)\jcl
• I updated to the latest SVN version from:  https://jcl.svn.sourceforge.net:443/svnroot/jcl/trunk/jcl
• Open up $(COMPONENTBASE)\jcl\packages\JclPackagesD160.groupproj in the Delphi IDE
• In Project Manager, compile all packages
• For each Design Time package, right click and “Install”
• Under Tools -> Options -> Environment Options -> Delphi Options -> Library add the following directories to the Browsing path:
•  $(COMPONENTBASE)\jcl\source\common
•  $(COMPONENTBASE)\jcl\source\windows
•  $(COMPONENTBASE)\jcl\source\vcl
• Under Tools -> Options -> Environment Options -> Delphi Options -> Library add the following directories to the Library path:
• $(COMPONENTBASE)\jcl\source\common
• $(COMPONENTBASE)\jcl\source\windows
• $(COMPONENTBASE)\jcl\source\include
• Under Tools -> Options -> Environment Options -> Delphi Options -> Library add the following directories to the Debug DCUs path:
• $(COMPONENTBASE)\jcl\lib\d16\win32\debug