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

Fixes an access violation on quit and implements support for multiple languages and for the all wordlists

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2151 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
sekelsenmat
2011-11-17 06:57:03 +00:00
parent 3bc96963bc
commit dcc85b95c3
8 changed files with 167 additions and 154 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
applications/tappytux/tappymodules.pas
View File

@@ -18,6 +18,7 @@ type
imgLevel2, imgLevel3: TJPEGImage;
imgPenguim : TBitmap;
ShortDescription, LongDescription: string;
ConfigCaption, ConfigItems: string;
constructor Create; virtual;
destructor Destroy; override;
procedure LoadImages; virtual;
@@ -127,7 +128,7 @@ begin
StartNewGame(formConfig.comboSound.ItemIndex,
formConfig.comboMusic.ItemIndex,
formConfig.comboLevel.ItemIndex,
formConfig.ltbWordlist.ItemIndex);
formConfig.listWordlist.ItemIndex);
end;
procedure TTappyModule.UpdateLevel(ALevel: Integer);