zaby imahe sie przesuwał po formie za pomoca strzałek np to
w onkeydown na formie wpisz:
aha wez ustaw image1 left - top w równej left np 100,110 zeby nie było 169 bo jak bedzie sie przesuwał co +2 Top to nie bedzie top=0 i ominie top=0 i nie bedzie działac ten sakres;
if (key=Vk_Top) then begin
if image1.Top0 then begin // rózne od 0 bedzie działac zawsze top+2 a gdy nie bedzie Image1.To=0
image1.Top:=Image1.Top+2;
end;
end;
albo tak tez moze byc:
if (key=Vk_Top) then begin
if image1.Top>0 then begin //wieksze od 0 top czyli wszystk. punkty rózne od 0 a 0 top to jest sciana -sakres chodzenia tego image po formie
image1.Top:=Image1.Top+2;
end;
end;
dla astepnych procedur Left,Right i Down dopisujesz tak samo
top=0 to jest zakres górny.
top=1000 zakes dolny.
if (key=Vk_down) then begin
if image1.Top1000 then begin // rózne od 1000 bedzie działac zawsze top-2 a gdy nie bedzie Image1.Top=1000
image1.Top:=Image1.Top-2;
end;
end;
tak samo dla Left i Right !!!
Pozdrawiam !!!