Hi atozix,

I also managed to use the DelphiX DXInput to get a working pause finally
but I am unsure about the isButton values??

procedure TForm1.pause;
begin
repeat
DXInput1.Update;
with DXDraw1.Surface.Canvas do
begin
Brush.Style := bsClear;Font.Color := clWhite;Font.Size := 12;
Textout(200,300,'THIS IS A PAUSE ROUTINE. ');
Release;
end;
DXDraw1.Flip;
until (isLeft in DXInput1.States) or (isButton1 in DXInput1.States);
userpause:= false;
end;
Im not to sure about that, i have'nt really used DelphiX for years, but im sure when i used it, it came with a demo showing how to use TDXInput?!
Dont you set the values of the isButtons in the TDXInput, hmm i could be thinking of a different Engine though :s

You could use the code i gave you earlier by ::
[pascal]
procedure TForm1.pause;
begin
repeat
DXInput1.Update;
with DXDraw1.Surface.Canvas do
begin
Brush.Style := bsClear;Font.Color := clWhite;Font.Size := 12;
Textout(200,300,'THIS IS A PAUSE ROUTINE. ');
Release;
end;
DXDraw1.Flip;
until (IsKeyDown(VK_LEFT)) or (IsKeyDown(VK_LBUTTON));
userpause:= false;
end;
[/pascal]

I guess it all depends on how and what you want done?!