[przesuwanie] [delphi]

0

mam pytanie. jak przesuwac za pomoca myszki ekran? nie chodzi mi tui o ekran monitora tylko tajk jak jest w strategiach chyba wiecie...:-)--if label1.caption = www.programowanie.of.pl then you win!

0

Pewnie chodzi Ci o scrolling mapy. :-)

Umieść to w timerze

var
mapa:TBitmap;
x,y:integer;
begin
mapa:=Tbitmap.Create; //Jakoś tak
mapa.LoadFromFile('jakaśmapa.bmp');
image1.picture.draw(x,y,mapa);

A w OnKeyDown: ;-)

If key=VK_UP then Y:=y-10;
if key=VK_Down then y:=y+10;
itd... :-*

Jeżeli wszystko dobrze to powinno działać :-)
--Kto pyta nie błądzi ...

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