[Delphi] mam probliemik :) mały problemik

0

a więc tak chciałbym zrobić tak, żeby jak sie naciśnie a to ruszał się obrazek, czyli chciałbym przechwycić naciśniecie klawicza a z resztą już sobie poradzę
mam marną ocene z polskiego więc prosze sie nieśmiać, a jak kto mi pomoże to ... będzie FAJNIE :-)

0

====> MOŻLIWOŚĆ I

musisz znać kody ASCI klawiszy

dla klawisza "a" (małego "a" :) ) to np zrób

OnKeyPress formy:
if Key=65 then //65 to właśnie małe "a"
begin
//poruszanie
end;

Jak chcesz poznać inne kody to zrób np w OnKeyDown formy
ShowMessage(IntToStr(Key));

====> MOŻLIWOŚĆ II
w OnKeyDown formy:
if Key='a' then
begin
//poruszanie
end;

0

Ja moge jeszcze tylko dopisac ze na stronie 4programmers jest maly programik napisany przez Pana Adama Boducha ktory wyswietla kod ASCII nacisnientych klawiszy. Bardzo uzyteczny.

pozdr,.
mic :-)

0

====> MOŻLIWOŚĆ I

musisz znać kody ASCI klawiszy

dla klawisza "a" (małego "a" :) ) to np zrób

OnKeyPress formy:
if Key=65 then //65 to właśnie małe "a"
begin
//poruszanie
end;

Jak chcesz poznać inne kody to zrób np w OnKeyDown formy
ShowMessage(IntToStr(Key));

====> MOŻLIWOŚĆ II
w OnKeyDown formy:
if Key='a' then
begin
//poruszanie
end;

niemoge skonpilować tego programu- robie coś źle??

0

====> MOŻLIWOŚĆ I

musisz znać kody ASCI klawiszy

dla klawisza "a" (małego "a" :) ) to np zrób

OnKeyPress formy:
if Key=65 then //65 to właśnie małe "a"
begin
//poruszanie
end;

Jak chcesz poznać inne kody to zrób np w OnKeyDown formy
ShowMessage(IntToStr(Key));

====> MOŻLIWOŚĆ II
w OnKeyDown formy:
if Key='a' then
begin
//poruszanie
end;

niemoge skonpilować tego programu- robie coś źle??

wez jednak zassaj ten programik, w kodzi enalezy podawac kod ASCII
np Enter ma też kod VK_Return

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