Przesuwanie o okresloną liczbę pikseli np. ScrollBoxa

0

Jaką procedurę napisać, aby przesunąć ScrollBox w dół o 5 pikseli naciśnięciem Klawisza w dół. Albo tak jak w Internet explorerze? Albo co zrobić aby przesunąć komponent TImage w dół o 5 pikseli? Za pomoc z góry dziękuję.

0

Jesli chodzi ci o Image1.Top := Image1.Top + 5; to ten topic nadaje sie do kosza a tobie polecam jakis kurs i poczytanie artykulow na stronie :) Jesli chodzilo ci o cos innego to pisz tak aby cie rozumiano :)

0

Mam na formatce mapę miasta (IMAGE) i 1 postać (IMAGE). Chcę, żeby mapa się przesuwała dając wrażenie poruszania się postaci. A postac jest zawsze na środku ekranu. Wykorzystuję komponenty Image.

0

Wiec w czym problem? W OnKeyPress Formy sprawdzasz co zostalo nacisniete, potem zaleznie od tego dodajesz lub odejmujesz cos do Top lub Left. A i KeyPreview := True;

0

procedure TForm5.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
If Key=38 {kod ASCII klawisza w dól} then
Begin
Form5.VertScrollBar.Position := -5;
Key := 0;
End;

If Key= 40 {kod ASCII klawisza w górę} then
Begin
Form5.VertScrollBar.Position := +5;
Key := 0;
End;

If Key= 37 {kod ASCII klawisza w lewo} then
Begin
Form5.HorzScrollBar.Position := -5;
Key := 0;
End;

If Key= 39 {kod ASCII klawisza w lewo} then
Begin
Form5.HorzScrollBar.Position := +5;
Key := 0;
End;

end;

Powyższe to listing mojego programu. Na formie jest komponent TImage, który pełni rolę tła, czyli miasto. Na tle są nowe komponenty Image: budynki i postacie. Postać jest zawsze na środku ekranu. Jaką procedurę wpisać aby wykryć zderzenie postaci z budynkiem? Jeżeli TImage2 zareaguje z TImage3, uniemożliw dalsze poruszanie się w stronę budynku (zatrzymaj postać)<- coś w tym stylu. A poza tym, z tym co już zrobiłem, też mam problem, bo mogę poruszyć każdym przyciskiem tylko RAZ, a pętla repeat oraz for nie działa.

0
Form5.VertScrollBar.Position := -5;

chyba raczej:

Form5.VertScrollBar.Position := Form5.VertScrollBar.Position -5;

i po co to?

Key := 0;
0

Jesli chesz, zeby jakis gostek, poprzez przesuwanie otoczenia, chodzil to chyba raczej odwrotnie - Gora: -5. Ale to tak na marginesie.

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