Ok, I had a look at the example that ships with delphi x and got it to work:

Code:
procedure TPlayer.DoMove(MoveCount: Integer);
var
 MyX: Double; 
 MyY : Double;
begin
  if fMode = 0 then
  begin

  If moveLeft and
  (x>5) then
  X := X - 10;

  If moveright and
  &#40;&#40;X+Form1.DXImageList1.Items.Find&#40;'Player'&#41;.Width&#41;<Form1>5&#41; then
  Y &#58;= Y - 10;

  if Movedown and
  &#40;y<form1.DXDraw1.Height-65&#41;then
  Y&#58;= Y + 10;

  MyX &#58;= X; //Set Temporary variable
  MyY &#58;= y;

  If isButton1 in Form1.DXInput1.States Then
    begin
      if &#40;FTamaCount<300>=35&#41; then
      begin
        Inc&#40;FTamaCount&#41;;

      with TBullet.Create&#40;Form1.DXSpriteEngine1.Engine&#41; do
        begin
          Image &#58;= Form1.DXImageList1.Items.Find&#40;'Bullet'&#41;; 
          Form1.DXWaveList1.Items.Find&#40;'Fire'&#41;.Play&#40;False&#41;;
          X &#58;= MyX + 30; 
          Y &#58;= MyY; 
          Width &#58;= Image.Width;  
          Height &#58;= Image.Height;
        end;
        FOldTamaTime &#58;= FCounter;
     end;
end;
end;
FCounter &#58;= FCounter + MoveCount;
end;

But, I need to display the time in seconds, can it be done with the dxtimer?

Thanks :-)