diff --git a/applications/tappytux/mod_tappywords.pas b/applications/tappytux/mod_tappywords.pas
index 0fb4d0945..0d712d139 100644
--- a/applications/tappytux/mod_tappywords.pas
+++ b/applications/tappytux/mod_tappywords.pas
@@ -132,9 +132,8 @@ begin
 
   if QuestionList < 0 then QuestionList := 0;
   gameQuestionList := TStringList.Create;
-  //gameQuestionList.LoadFromFile(vTappyTuxConfig.GetResourcesDir() + 'images'+PathDelim+'modules'+PathDelim+'tappywords'+PathDelim+'0.txt');
-  //gameQuestionList.LoadFromFile('C:/Users/User/Lazarus/Arquivos/Repositorio/applications/tappytux/images/modules/tappywords/0.txt');
-  gameQuestionList.LoadFromFile('C:/'+IntToStr(QuestionList)+'.txt');
+  gameQuestionList.LoadFromFile(vTappyTuxConfig.GetResourcesDir() + 'images'+PathDelim+'modules'+PathDelim+'tappywords'+PathDelim+'0.txt');
+  //gameQuestionList.LoadFromFile('C:/'+IntToStr(QuestionList)+'.txt');
 
   formTappyTuxGame.Answer.ReadOnly := false;
   formTappyTuxGame.GameOver.Visible := false;
diff --git a/applications/tappytux/tappydrawer.pas b/applications/tappytux/tappydrawer.pas
index 06290aa09..d9e55f24f 100644
--- a/applications/tappytux/tappydrawer.pas
+++ b/applications/tappytux/tappydrawer.pas
@@ -51,6 +51,7 @@ type
     QuestionText: String;
     QuestionBox: TCanvas;
     procedure DrawToIntfImg(AIntfImage: TLazIntfImage); override;
+    procedure DrawToCanvas(ACanvas: TCanvas); override;
     procedure ExecuteFinal; override;
   end;
 
@@ -148,7 +149,13 @@ begin
   TTappyTuxDrawer.DrawImageWithTransparentColor(AIntfImage,
    lPos.X, lPos.Y, colFuchsia, Bitmap);
   QuestionBox := TCanvas.Create;
-  QuestionBox.TextOut(lPos.X, lPos.Y, QuestionText);
+  //QuestionBox.TextOut(lPos.X, lPos.Y, QuestionText);
+end;
+
+procedure TFallingText.DrawToCanvas(ACanvas: TCanvas);
+begin
+  //ACanvas.Pixels[CurrentStep, CurrentStep] := clRed;
+  ACanvas.TextOut(StartPoint.X + 30, StartPoint.Y + 50, QuestionText);
 end;
 
 procedure TFallingText.ExecuteFinal;