diff --git a/applications/tappytux/gameconfigform.pas b/applications/tappytux/gameconfigform.pas index f4a73917c..f1f6dbcec 100644 --- a/applications/tappytux/gameconfigform.pas +++ b/applications/tappytux/gameconfigform.pas @@ -130,6 +130,8 @@ procedure TformConfig.FormCreate(Sender: TObject); var i: Integer; begin + //we access the formTappyTuxGame form for updating translations, but this form isn't created yet. + formTappyTuxGame := TformTappyTuxGame.Create(Application); TranslateUI(); // Initialize modules diff --git a/applications/tappytux/mod_tappywords.pas b/applications/tappytux/mod_tappywords.pas index b7eaeb172..db067998a 100644 --- a/applications/tappytux/mod_tappywords.pas +++ b/applications/tappytux/mod_tappywords.pas @@ -170,7 +170,8 @@ begin CreateQuestion; end; - startupSound.Play; + if Assigned(startupSound) then + startupSound.Play; end; procedure TTappyWords.CreateQuestion(); diff --git a/applications/tappytux/tappytux.lpr b/applications/tappytux/tappytux.lpr index d553d7c13..99e9b591a 100644 --- a/applications/tappytux/tappytux.lpr +++ b/applications/tappytux/tappytux.lpr @@ -16,7 +16,7 @@ begin RequireDerivedFormResource := True; Application.Initialize; Application.CreateForm(TformConfig, formConfig); - Application.CreateForm(TformTappyTuxGame, formTappyTuxGame); + //Application.CreateForm(TformTappyTuxGame, formTappyTuxGame); Application.Run; end. diff --git a/applications/tappytux/tappytux.res b/applications/tappytux/tappytux.res index 7c6cf3e4b..556537956 100644 Binary files a/applications/tappytux/tappytux.res and b/applications/tappytux/tappytux.res differ