Firebird 3.0 Database encryption in Delphi

I am looking for somebody to create a working example of database encryption that is now available in Firebird 3.0. There are 2 parts to this project 1) Creating Firebird plugins cryptDB and keyholder. The code MUST be in Pascal, either Delphi or Lazarus. Note: the trivial example included with Firebird is adequate (I already got that working) but I need a Pascal example for the keyholder plugin with the callback function to retrieve the encryption key from the client. 2) A Delphi client app that connects to the Firebird database and interfaces with the Firebird Callback function to provide the encryption key. This MUST be written in Delphi.