12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152 |
- program CheckRide;
- {*
- This source code is provided under the MIT license:
- Copyright (C) 2011 by Reinier Olislagers
- Permission is hereby granted, free of charge, to any person obtaining a copy
- of this software and associated documentation files (the "Software"), to deal
- in the Software without restriction, including without limitation the rights
- to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
- copies of the Software, and to permit persons to whom the Software is
- furnished to do so, subject to the following conditions:
- The above copyright notice and this permission notice shall be included in
- all copies or substantial portions of the Software.
- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
- IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
- FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
- AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
- LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
- OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
- THE SOFTWARE.
- *}
- {$mode objfpc}{$H+}
- uses {$IFDEF UNIX} {$IFDEF UseCThreads}
- cthreads, {$ENDIF} {$ENDIF}
- Interfaces, // this includes the LCL widgetset
- Forms,
- Unit1,
- CheckRideUtil,
- aboutform,
- poormansresource;
- //Regular form resource stuff
- {$R CheckRide.res}
- // For our embedded config/template files, and executables:
- // not used as we use our own imitation resource manipulation ;)
- //{$R checkrideconfig.rc}
- begin
- RequireDerivedFormResource := True;
- Application.Initialize;
- Application.CreateForm(TCheckRideMain, CheckRideMain);
- Application.Run;
- end.
|