You've already forked lazarus-ccr
V 0.0.3
Licensing now ModifiedGPL git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5308 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
@ -1,54 +1,75 @@
|
||||
<?xml version="1.0"?>
|
||||
<CONFIG>
|
||||
<Package Version="4">
|
||||
<PathDelim Value="\"/>
|
||||
<Name Value="longtimerpackage"/>
|
||||
<Author Value="minesadorada@charcodelvalle.com"/>
|
||||
<CompilerOptions>
|
||||
<Version Value="11"/>
|
||||
<PathDelim Value="\"/>
|
||||
<SearchPaths>
|
||||
<UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
|
||||
</SearchPaths>
|
||||
<Other>
|
||||
<CompilerMessages>
|
||||
<MsgFileName Value=""/>
|
||||
</CompilerMessages>
|
||||
<CompilerPath Value="$(CompPath)"/>
|
||||
</Other>
|
||||
</CompilerOptions>
|
||||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
<CONFIG>
|
||||
<Package Version="4">
|
||||
<PathDelim Value="\"/>
|
||||
<Name Value="longtimerpackage"/>
|
||||
<Type Value="RunAndDesignTime"/>
|
||||
<Author Value="minesadorada@charcodelvalle.com"/>
|
||||
<CompilerOptions>
|
||||
<Version Value="11"/>
|
||||
<PathDelim Value="\"/>
|
||||
<SearchPaths>
|
||||
<UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
|
||||
</SearchPaths>
|
||||
</CompilerOptions>
|
||||
<Description Value="TLongTimer is a descendant of TIdleTimer that samples every 30minutes when idle.
|
||||
It is intended for TTrayIcon applications. DailyHour is a 24-hour clock (16 = 4pm) and MonthlyDate is best < 29 "/>
|
||||
<License Value="LGPL"/>
|
||||
<Version Release="2"/>
|
||||
<Files Count="2">
|
||||
<Item1>
|
||||
<Filename Value="ulongtimer.pas"/>
|
||||
<HasRegisterProc Value="True"/>
|
||||
<UnitName Value="uLongTimer"/>
|
||||
</Item1>
|
||||
<Item2>
|
||||
<Filename Value="aboutlongtimerunit.pas"/>
|
||||
<HasRegisterProc Value="True"/>
|
||||
<UnitName Value="AboutLongTimerunit"/>
|
||||
</Item2>
|
||||
</Files>
|
||||
<i18n>
|
||||
<EnableI18N Value="True"/>
|
||||
<OutDir Value="locale"/>
|
||||
<EnableI18NForLFM Value="True"/>
|
||||
</i18n>
|
||||
<Type Value="RunAndDesignTime"/>
|
||||
<RequiredPkgs Count="1">
|
||||
<Item1>
|
||||
<PackageName Value="IDEIntf"/>
|
||||
</Item1>
|
||||
</RequiredPkgs>
|
||||
<UsageOptions>
|
||||
<UnitPath Value="$(PkgOutDir)"/>
|
||||
</UsageOptions>
|
||||
<PublishOptions>
|
||||
<Version Value="2"/>
|
||||
</PublishOptions>
|
||||
</Package>
|
||||
</CONFIG>
|
||||
It is intended for TTrayIcon applications. DailyHour is a 24-hour clock (16 = 4pm) and MonthlyDate is best < 29 "/>
|
||||
<License Value="Copyright (C)2014 minesadorada@charcodelvalle.com
|
||||
Copyright (C)2014 minesadorada@charcodelvalle.com
|
||||
Modified GPL
|
||||
This library is free software; you can redistribute it and/or modify it
|
||||
under the terms of the GNU Library General Public License as published by
|
||||
the Free Software Foundation; either version 2 of the License, or (at your
|
||||
option) any later version with the following modification:
|
||||
|
||||
As a special exception, the copyright holders of this library give you
|
||||
permission to link this library with independent modules to produce an
|
||||
executable, regardless of the license terms of these independent modules,and
|
||||
to copy and distribute the resulting executable under terms of your choice,
|
||||
provided that you also meet, for each linked independent module, the terms
|
||||
and conditions of the license of that module. An independent module is a
|
||||
module which is not derived from or based on this library. If you modify
|
||||
this library, you may extend this exception to your version of the library,
|
||||
but you are not obligated to do so. If you do not wish to do so, delete this
|
||||
exception statement from your 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 Library General Public License
|
||||
for more details.
|
||||
|
||||
You should have received a copy of the GNU Library General Public License
|
||||
along with this library; if not, write to the Free Software Foundation,
|
||||
Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
||||
"/>
|
||||
<Version Release="3"/>
|
||||
<Files Count="2">
|
||||
<Item1>
|
||||
<Filename Value="ulongtimer.pas"/>
|
||||
<HasRegisterProc Value="True"/>
|
||||
<UnitName Value="uLongTimer"/>
|
||||
</Item1>
|
||||
<Item2>
|
||||
<Filename Value="aboutlongtimerunit.pas"/>
|
||||
<HasRegisterProc Value="True"/>
|
||||
<UnitName Value="AboutLongTimerunit"/>
|
||||
</Item2>
|
||||
</Files>
|
||||
<i18n>
|
||||
<EnableI18N Value="True"/>
|
||||
<OutDir Value="locale"/>
|
||||
<EnableI18NForLFM Value="True"/>
|
||||
</i18n>
|
||||
<RequiredPkgs Count="1">
|
||||
<Item1>
|
||||
<PackageName Value="IDEIntf"/>
|
||||
</Item1>
|
||||
</RequiredPkgs>
|
||||
<UsageOptions>
|
||||
<UnitPath Value="$(PkgOutDir)"/>
|
||||
</UsageOptions>
|
||||
<PublishOptions>
|
||||
<Version Value="2"/>
|
||||
</PublishOptions>
|
||||
</Package>
|
||||
</CONFIG>
|
||||
|
@ -9,11 +9,22 @@ unit uLongTimer;
|
||||
4. The underlying interval is 30 minutes (when idle)
|
||||
|
||||
Copyright (C)2014 minesadorada@charcodelvalle.com
|
||||
|
||||
Modified GPL
|
||||
This library is free software; you can redistribute it and/or modify it
|
||||
under the terms of the GNU Library General Public License as published by
|
||||
the Free Software Foundation; either version 2 of the License, or (at your
|
||||
option) any later version.
|
||||
option) any later version with the following modification:
|
||||
|
||||
As a special exception, the copyright holders of this library give you
|
||||
permission to link this library with independent modules to produce an
|
||||
executable, regardless of the license terms of these independent modules,and
|
||||
to copy and distribute the resulting executable under terms of your choice,
|
||||
provided that you also meet, for each linked independent module, the terms
|
||||
and conditions of the license of that module. An independent module is a
|
||||
module which is not derived from or based on this library. If you modify
|
||||
this library, you may extend this exception to your version of the library,
|
||||
but you are not obligated to do so. If you do not wish to do so, delete this
|
||||
exception statement from your 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
|
||||
@ -23,6 +34,7 @@ unit uLongTimer;
|
||||
You should have received a copy of the GNU Library General Public License
|
||||
along with this library; if not, write to the Free Software Foundation,
|
||||
Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
||||
|
||||
}
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
@ -103,7 +115,7 @@ implementation
|
||||
|
||||
const
|
||||
C_OneMinute = 60000;
|
||||
C_Version = '0.0.2';
|
||||
C_Version = '0.0.3';
|
||||
|
||||
(*
|
||||
V0.0.1: Initial commit
|
||||
@ -141,7 +153,7 @@ begin
|
||||
AboutBoxAuthorname := 'Gordon Bamber';
|
||||
// AboutBoxOrganisation (string)
|
||||
AboutBoxAuthorEmail := 'minesadorada@charcodelvalle.com';
|
||||
AboutBoxLicenseType := 'LGPL';// (string e.g. 'GPL', ModifiedGPL' etc
|
||||
AboutBoxLicenseType := 'MODIFIEDGPL';// (string e.g. 'GPL', ModifiedGPL' etc
|
||||
|
||||
fHourDone := False;
|
||||
fDayDone := False;
|
||||
@ -308,7 +320,7 @@ begin
|
||||
// Temporarily disable running timer?
|
||||
TimerEnabled := Enabled;
|
||||
Enabled := False;
|
||||
if (aHour >= 0) and (aHour <= 24) then
|
||||
if ((aHour >= 0) and (aHour <= 24)) then
|
||||
fHour := aHour;
|
||||
Enabled := TimerEnabled;
|
||||
end;
|
||||
@ -329,4 +341,4 @@ begin
|
||||
Enabled := TimerEnabled;
|
||||
end;
|
||||
|
||||
end.
|
||||
end.
|
||||
|
Reference in New Issue
Block a user