Я недавно начал изучать MP, решил написать первое приложение, смысл- на экране картинка, нажимаешь 4 появляется другая, отпускаешь опять первая, так же и с 6 кой.что не так:
program NewProject;
begin
drawImage(loadImage('/kartinka1.png'), 0, 0);
repaint;
while getKeyClicked = KE_NONE do
begin end;
while getKeyPressed <> KE_KEY4 do
begin
drawImage(loadImage('/kartinka2.png'), 0, 0);
repaint;
while getKeyClicked = KE_NONE do
begin end;
end;
while getKeyPressed <> KE_KEY6 do
begin
drawImage(loadImage('/kartinka3.png'), 0, 0);
repaint;
while getKeyClicked = KE_NONE do
begin end;
end;
end.
|