pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2130 8e941d3f-bd1b-0410-a28a-d453659cc2b4

Browse Source
This commit is contained in:
denniscuflat
2011-11-14 17:17:47 +00:00
parent b8c22454bf
commit 078d054f3e
6 changed files with 95 additions and 39 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
applications/tappytux/mod_tappymath.pas
View File

@@ -85,12 +85,14 @@ end;
procedure TTappyMath.TranslateTextsToEnglish;
begin
ShortDescription := 'TappyMath - A game to learn arithmetics';
ShortDescription := 'TappyMath';
LongDescription := 'A game to learn arithmetics';
end;
procedure TTappyMath.TranslateTextsToPortuguese;
begin
ShortDescription := 'TappyMath - Um jogo para aprender aritmética';
ShortDescription := 'TappyMath';
LongDescription := 'Um jogo para aprender aritmética';
end;
procedure TTappyMath.StartNewGame(SndFX: Integer; Music: Integer; Level: Integer; QuestionList: Integer);
@@ -154,7 +156,6 @@ end;
procedure TTappyMath.QuestionGenerator(qNumber : Integer);
begin
questionType[1] := random(3);
Case questionType[1] of