DirectX DrawPrimitive sprite move

[lordzero]

Hello

I'm trying move a sprite using custom vertex using D3DFVF_XYZRHW.

my code work to move sprite only when i set the position in OnCreate of my window...

dont have a way to move it in runtime?

this code dont work to change the position x ate runtime:



if key=VK_RIGHT then
begin
PosX := PosX + 1;
end;

if key=VK_LEFT then
begin
PosX := PosX - 1;
end;

{ if FAILED(
pVB.Lock(0, SizeOf(Vertices), pVertices, 0)) then
Exit;

CopyMemory(pVertices, @Vertices, SizeOf(Vertices));
pVB.Unlock;


my complete code is here:

http://www.lordzero.co.nr/tmp/DrawPrimitive.zip

suggestions are welcome.

Greets

[Mirage]

You just need to move the array filling code:

Vertices[0].X := -Scale + PosX;
...

to FormKeyDown.

[lordzero]

You just need to move the array filling code:

Vertices[0].X := -Scale + PosX;
...

to FormKeyDown.


yes guy.. thanks :) its working...

but after the code to move i put this code to work:


if FAILED(
pVB.Lock(0, SizeOf(Vertices), pVertices, 0)) then
Exit;

CopyMemory(pVertices, @Vertices, SizeOf(Vertices));
pVB.Unlock;