program foobot; { Foobot Interrogator Copyright (C)2016 Gordon Bamber minsadorada@charcodelvalle.com This source 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 2 of the License, or (at your option) any later version. This code 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. A copy of the GNU General Public License is available on the World Wide Web at . You can also obtain it by writing to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. } {$ifdef Linux} {$ifdef FPC_CROSSCOMPILING} {$ifdef CPUARM} //if GUI, then uncomment //{$linklib GLESv2} {$endif} {$linklib libc_nonshared.a} {$endif} {$endif} {$mode objfpc}{$H+} uses {$IFDEF UNIX}{$IFDEF UseCThreads} cthreads, {$ENDIF}{$ENDIF} Interfaces, // this includes the LCL widgetset Forms, umainform, foobot_objects, foobot_httpclient, ulogin, udataform, foobot_utility { you can add units after this }; {$R *.res} begin Application.Title:='Foobot Interrogator'; RequireDerivedFormResource:=True; Application.Initialize; Application.CreateForm(Tmainform, mainform); Application.CreateForm(Tloginform, loginform); Application.CreateForm(Tdataform, dataform); Application.Run; end.