Health Organizer Code

* TExportMedicalData.Execute.WriteFooterForPage: https link instead of http
+ Added procedure TExportMedicalData.ProgressBar_StepIt;
+ Added procedure TExportMedicalData.ProgressBar_SetMaxSize;
+ Added the following messages:
rsColumnContacts
rsColumnFamilyDoctor
rsUS_CC_Home
rsUS_CC_Office
rsUS_CC_ContactCenter
rsUS_CC_Private
rsUS_CC_Familiar
rsUS_CC_HusbandWifePartner
rsUS_CC_Friend
rsUS_CC_Emergencies
rsUS_CC_Acquaintance
rsColumnContactsCategory
rsColumnContactsContact
rsColumnContactsNote
rsColumnContactsType
+ hor_database: Array_ContactsTypes: adds also the skype
- hor_database: fixed the constants
+ added TDE_ContactData: The user's type, the value and the ready to use link of a contact
+ added TDE_ContactDatas: An array of contact's data
+ added the tContactsCategories table
+ Added the possibility to define the contact type to the tHospitalsContacts, tHospitalsWardsContacts and tPersonsContacts tables
+ Added the following constants:
constDB_ContactCategory_Home
constDB_ContactCategory_Office
constDB_ContactCategory_ContactCenter
constDB_ContactCategory_Private
constDB_ContactCategory_Familiar
constDB_ContactCategory_HusbandWifePartner
constDB_ContactCategory_Neighbor
constDB_ContactCategory_Friend
constDB_ContactCategory_Emergencies
constDB_ContactCategory_Acquaintance
+ hor_database: added aContactsCategories
+ hor_database: added function Array_ContactsCategories: TArray;
+ hor_database: DB_ClearDynamicCodeDescriptionArrays: clears also Array_ContactsCategories
+ hor_database: Added function CheckContactCategories(): boolean: It checkes that the system's contact categories exist
+ hor_database: DB_CheckSystemData: calls also CheckContactCategories()
+ Added the TfrmNavigationContactsCategories form
+ Added the TfrmEditContacts_Categories form
+ TfrmMain: added the menu items and actions to list and add/edit the categories of the contacts
+ hor_database: TCodeToDescr: added ctdContactsTypes, ctdContactsCategories
+ hor_database: DecodeCodeOrDescription: handles also ctdContactsTypes, ctdContactsCategories
+ hor_database: DecodeCodeOrDescription: added the _Found output parameter
+ hor_database: function DB_CodeToDescription(const _Type: TCodeToDescr; const _Code: string; out _Description: string): boolean: Checks and loads the description of a code
+ hor_database: function DB_DescriptionToCode(const _Type: TCodeToDescr; const _Description: string; out _Code: string): boolean: Checks and loads the code of a description
- hor_database: DB_Update: updates the TheDatabaseWasUpdated parameter variable