Health Organizer Code

* hor_components: rename rsHorLargeObjectNotOpen into rsHorLargeObjectNotOpened
+ hor_components: added rsHorLargeObjectNotDeleted
+ hor_components: added InvalidOid constant
- hor_components: fixed THorPQConnection.HorWriteStreamToLargeObject: -1 is returned in case of error by the lo_open and lo_write functions (not 0)
- hor_components: fixed THorPQConnection.HorWriteLargeObjectToStream: -1 is returned in case of error by the lo_open and lo_write functions (not 0)
+ hor_components: added function THorPQConnection.HorDeleteLargeObject(const _Oid: Oid): boolean;
* Needs hor_components version >= 1.0.0.0
- TDocuments: removed qAttachmentDataPart: no more necessary
- TfrmEditDocuments.btnAddClick: fixed unused variable
- Fixed the DbVersion and the already existing Updating field of tSettings inside the ver0006.sql
+ ver0006.sql: Drops "Content" column from "tDocumentsFiles" after the convertion from bytea to large objects
+ hor_main: latested know database version is 6
+ hor_components: Added the THorPQC_OnWriteProgress type
+ hor_components: THorPQConnection: added the FHorOnProgress member and the OnHorWriteProgress property
+ hor_components: Added constructor THorPQConnection.Create(AOwner: TComponent) to call InitialisePostgres3
+ hor_components: Added destructor THorPQConnection.Destroy to call ReleasePostgres3
* hor_components: THorPQConnection.HorCreateLargeObject: no more calls InitialisePostgres3 and ReleasePostgres3
* hor_components: THorPQConnection.HorWriteStreamToLargeObject: no more calls InitialisePostgres3 and ReleasePostgres3
* hor_components: THorPQConnection.HorWriteLargeObjectToStream: no more calls InitialisePostgres3 and ReleasePostgres3
+ hor_components: THorPQConnection.HorWriteStreamToLargeObject: calls FHorOnProgress providing the reached read size
+ hor_components: THorPQConnection.HorWriteLargeObjectToStream: calls FHorOnProgress providing the reached read size
+ TDocuments: FDatabase is now a THorPQConnection
+ TDocuments.Create: Database is now a THorPQConnection
+ Added procedure TDocuments.HorWriteProgress(Sender: THorPQConnection; const _Oid: Oid; _Stream: TStream; _Position: Int64) to call Application.ProcessMessage if called by the main program
+ TDocuments.SaveAttachmentFile: uses HorWriteLargeObjectToStream to save the attachment content that now is a large object
+ Added the rsMsgErrorExpectingTHorPQConnection message
I have compared the extraction of the medical data with the old bytea type and with the new large object --> they are the same --> works! :)