Игра Ctrl+V

Хард тут?

 

http://rghost.ru/47036433/image.png

 

http://youhack.co/showthread.php?t=349714

 

Спойлер

var
index : Integer;
begin
index := random(4); //присваиваем переменной случайное значение от 0 до 3

//в зависимости от значения переменной, выбираем действие
case index of
0: Button1.Left := Button1.Left + Button1.Width; //двигаем кнопку вправо, на значение ширины кнопки
1: Button1.Left := Button1.Left - Button1.Width; //кнопка влево, на значение ширины
2: Button1.Top := Button1.Top + Button1.Height; //кнопка вниз, на значение высоты
3: Button1.Top := Button1.Top - Button1.Height; //кнопка вверх, на значение высоты
end; //case

{Если кнопка вышла за пределы формы, вернем ее в положение 0}
if Button1.Left < 0 then Button1.Left := 0;
if Button1.Top < 0 then Button1.Top := 0;

if (Button1.Left + Button1.Width) > Form1.Width then
Button1.Left := Form1.Width - Button1.Width;

if (Button1.Top + Button1.Height) > Form1.Height then
Button1.Top := Form1.Height - Button1.Height;

end;

 

http://youhack.co/showthread.php?t=349893

 

MorphVOX PRO

 

http://www.ex.ua/

 

demudenko94@ukr.net

 

mgrt.******/page-6.html

 

поиграть

 

http://vk.com/topic-54032102_28721637

 

КЕЙТ УИНСЛЕТ

 

193.219.39.199:3128