Delphi - directX ruszanie obiektem

0

Jak zrobić żeby poruszać obiektem strzałkami.
Tworze go na mapie:
IsoMap[20,20].image :=5;
i chce żeby płynnie przechodził o ileś tam pixeli albo nie wiem.O jakąś wartość do przodu tyłu prawo lewo.

0

Mam wrażenie, że trochę zamąciłeś pytanie: czy rzeczywiście chodzi Ci o przesuwanie obrazka pod DirectX? Z kodu, który przytoczyłeś to nie wynika.
Bo chyba nie chodzi o trywialne:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
case Key of
  vk_left: Dec(x);
  vk_right: Inc(x);
  vk_up: Dec(y);
  vk_down: Inc(y);
  end;
IsoMap[x, y].image :=5;
end;
0

Ok thx.
A wiesz może jeszcze jak zrobić ze jak sie kliknie na daną grafike to zeby wykonać procedure?
Da sie tak w ogóle?
Mam
DXImageList1 a w nim kilka grafik.
Wstawiam na mape:
IsoMap[ 10, 18].image :=5;
i jak zrobić ze jak sie kliknie np showmessage.I czy da sie zrobić zeby sie zaznaczało.Np podświetlało itp jakoś.
A jak macie jakieś kursy to prosze was dajecie linki bo na znalazłem jeden dobry serwis o directX
unit1.pl ale tam mało tego jest i nie wiem z czego sie uczyć
Pozdro

1 użytkowników online, w tym zalogowanych: 0, gości: 1