I was able to compile the example that comes with phoenix but when I try to use that as an example for a simplier program I get stuck.. with this it seems to freeze on my screen.. I am just trying to print text at a certain location.



Code:
program Fonts2;

{$APPTYPE CONSOLE}
{$IFDEF FPC}
{$mode objfpc}{$H+}
{$ENDIF}


uses
  ClASSES, SysUtils,

  dglOpenGL,

  phxBase,
  phxScreen,
  phxTypes,crt,
  phxFonts;

var Screen: TPHXScreen;
    Fonts : TPHXFontList;
    xxend : char;
begin
// Create the window
  Screen:= TPHXScreen.getInstance;

  // Open the window
  if not Screen.Open('Dexters Font Demo', -1, -1, 800, 600) then Exit;

  Fonts := TPHXFontList.Create;

  Fonts.LoadFont('Font1.phxfnt');
  Fonts.LoadFont('Font2.phxfnt');
  //repeat
   repeat
    //Timer.Update;
    // Clear the window
    Screen.Clear();

  Fonts[0].TextOut(4,4,'test');
  Fonts[0].TextOut(4,4,'test');
  //repeat
   //until (Screen.Visible = False);
  // xxend := readkey();
    until (Screen.Visible = False);
   Fonts.Free;
end.