Health Organizer Code

+ hor_components: THorDataModule.qDoctors: added the %WHERE% to the SQL
+ hor_components: THorDataModule.qPatients: added the %WHERE% to the SQL
- hor_components: THorDataModule.qDoctors: fixed the "order by"
- hor_components: THorDataModule.qPatients: fixed the "order by"
- hor_components: THorDataModule.qPersons: fixed the "order by"
+ hor_components: added function THorDBLookupComboBoxPerson.HorGetInitialSql(): string;
+ hor_components: THorDBLookupComboBoxPerson.HorBuildSql: uses HorGetInitialSql
+ hor_components: added function THorDBLookupComboBoxDoctor.HorGetInitialSql(): string;
+ hor_components: THorDBLookupComboBox.PrepareQueryData: sorts the results
+ hor_components: THorDBLookupComboBox.PrepareQueryDataDefault: sorts the results
* hor_components: THorDBLookupComboBox: the default max entries are 50
+ hor_components: IHorEditForm: added function CreateToShow( const _ID: integer ): boolean;
+ hor_components: added procedure THorDBLookupComboBoxPerson.onHorDbLookupComboBoxDblClick(Sender: TObject);
+ hor_components: THorDBLookupComboBoxPerson.Create: let you double click the text to get the person open in edit
+ hor_components: added function THorDBLookupComboBoxPatient.HorGetInitialSql(): string;
+ hor_components: added constructor THorDBLookupComboBoxPatient.Create(AOwner: TComponent);
- hor_components: THorDBLookupComboBoxPersonFemale: removed because you can have it setting HorFilterMale=false
- hor_components: THorDBLookupComboBoxPersonMale: removed because you can have it setting HorFilterFemale=false
+ hor_components: THorDBLookupComboBox.Create: do not create the FHorFormSearchResults otherwise appears inside the IDE...
+ hor_components: THorDBLookupComboBox.Destroy: destroies FHorFormSearchResults only if necessary
+ hor_components: THorDBLookupComboBox.onHorTimerSeach: creates FHorFormSearchResults if necessary
- TfrmEditExaminations: removed qDoctors, dsDoctors
+ TfrmEditExaminations.dblcDoctor: it is the first to use the new THorDBLookupComboBoxDoctor component! :)
- TfrmEditExaminations.btnAddClick: no more handles the doctors
- TfrmEditExaminations.qDataAfterOpen: no more opens qdoctors
+ TfrmEditExaminations.qDataDateChange: sets the filter by age for a worked day of the doctor
+ added function TFrmEditPersonsInterface.CreateToShow(const _ID: integer): boolean;