DirectX DrawPrimitive sprite move

[Mirage]

You just need to move the array filling code:

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

to FormKeyDown.