You've already forked lazarus-ccr
tappytux: Adds descriptions and translations to modules
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1933 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
44
applications/tappytux/mod_tappymath.pas
Normal file
44
applications/tappytux/mod_tappymath.pas
Normal file
@@ -0,0 +1,44 @@
|
||||
unit mod_tappymath;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Classes, SysUtils,
|
||||
tappymodules;
|
||||
|
||||
type
|
||||
|
||||
{ TTappyMath }
|
||||
|
||||
TTappyMath = class(TTappyModule)
|
||||
public
|
||||
constructor Create; override;
|
||||
procedure TranslateTextsToEnglish; override;
|
||||
procedure TranslateTextsToPortuguese; override;
|
||||
end;
|
||||
|
||||
implementation
|
||||
|
||||
{ TTappyWords }
|
||||
|
||||
constructor TTappyMath.Create;
|
||||
begin
|
||||
inherited Create;
|
||||
end;
|
||||
|
||||
procedure TTappyMath.TranslateTextsToEnglish;
|
||||
begin
|
||||
ShortDescription := 'TappyMath - A game to learn arithmetics';
|
||||
end;
|
||||
|
||||
procedure TTappyMath.TranslateTextsToPortuguese;
|
||||
begin
|
||||
ShortDescription := 'TappyMath - Um jogo para aprender aritmética';
|
||||
end;
|
||||
|
||||
initialization
|
||||
AddModule(TTappyMath.Create);
|
||||
end.
|
||||
|
Reference in New Issue
Block a user