Health Organizer Code

53 lines (42 with data), 2.0 kB

{

    Health Organizer (http://sourceforge.net/projects/hor/,
                      http://hor.sourceforge.net/)
    Copyright (C) 2014-2015  Andrea Urbani ( matfanjol@users.sf.net,
	                                     matfanjol@mail.com )

    This program is free software: you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation, either version 3 of the License, or
    (at your option) any later version.

    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with this program.  If not, see <http://www.gnu.org/licenses/>.

}
program healthor;

{$mode objfpc}{$H+}

uses
  {$IFDEF UNIX}{$IFDEF UseCThreads}
  cthreads,
  {$ENDIF}{$ENDIF}
  Interfaces, // this includes the LCL widgetset
  Forms, lazcontrols, runtimetypeinfocontrols, memdslaz, datetimectrls,
  hor_main, hor_dbopen, hor_about, hor_messages, hor_navigation_standard,
  hor_navigation_countries, hor_edit_standard, hor_edit_countries,
  hor_edit_persons, hor_navigation_persons, hor_database,
  hor_navigation_measurements, hor_edit_base, hor_edit_mdl_standard,
  hor_edit_mdl_measurements, hor_combobox, hor_edit_pathologies,
  hor_navigation_pathologies, hor_functions, hor_combobox_patient,
  hor_combobox_pathology, hor_edit_problems, hor_navigation_problems,
  hor_edit_hospitals, hor_navigation_hospitals, hor_edit_examinations_names,
  hor_navigation_examinations_names, hor_edit_examinations,
  hor_navigation_examinations;

{$R *.res}

begin
  Application.Title:='Health Organizer (HOR)';
  RequireDerivedFormResource := True;
  Application.Initialize;
  Application.CreateForm(TfrmMain, frmMain);
  Application.Run;
end.