Hi guys and girls, me again :-)

Can someone give me a suggestion on how to reset the fired count of my player's bullets without using a normal Delphi timer? When I add the line "player.fired := 0" in the DelphiX Timer it works but the bullets leave my player too fast, that's why I did it with the normal timer as it's slower.

Here's my code for bullet creation, bullet move and the timer's event handler. I also need to display the time in seconds, can this be done with DXTimer?

[pascal]
If isButton1 in Form1.DXInput1.States Then
begin
if Fired <= 3 then
begin
Inc(Fired);
with TBullet.Create(Form1.DXSpriteEngine1.Engine) do
begin
Image := Form1.DXImageList1.Items.Find('Bullet');
X := MyX + 30;
Y := MyY;
Width := Image.Width;
Height := Image.Height;
end;
end;
end;


procedure TBullet.DoMove(MoveCount: Integer);
begin
Y := Y - 25;
Collision;
if (Y < 0) Then
Dead;
end;


procedure TForm1.Timer1Timer(Sender: TObject);
begin
//Reset the Fired count so the player can fire 3 bullets again
Player.Fired := 0;
//Increase the time
Inc(Seconds);
end;[/pascal]

Thanks very much for your help