[Mp3]

if Image1.Left<=10 then dx:=-dx;//or
if (Image1.Left+Image1.Width)>=Form1.Width then dx:=-dx;

if Image1.Top<=0 then dy:=-dy;//or

ты имел ввиду про это изменять 0???
я тут по 10 ставлю все равно не летит%)

[angvelem]

А зачем примеры смотреть, проще достать вопросами.

[Mp3]

так легче воспринимается =(
а пример, я вроде полностью себе перепечатал%)

[YVitaliy]

А таймер активирован? А Имаг на форме присутствует? А картинка в Имаг загружена? А интервал таймера хотя бы меньше секунды? А dx и dy инициализируются? А размеры имага не нулевые? И тд. и тп. Лучше скинь "неработающий" пример, а то никто не знает, че там у тебя такое!

[Mp3]

интервал таймера стоит *1* ладно думаю это мелочи...код же верен...щас буду разбираться....спасибо большое ребят
p.s. последний вопрос что за

procedure TForm6.FormMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
var l:single;

а именно TmouseButton и FormMouseDown это что и за что отвечают?

[angvelem]

1. Состояние кнопок мышки
2. Клик мышки по форме.

[YVitaliy]

Этот блок не важен - эт просто изменять направление движения шарика, на работоспособность не влияет. TMouseButton - Параметр, в котором передается, какая кнопка мыши была нажата - mbLeft, mbRight, mbMiddle - левая, правая и средняя соответственно (подробнее - смотри в справке):

Код:

if MouseButton = mbLeft then begin
showmessage('left button is pressed');
dx:=-dx;
...
end;

[Mp3]

огромное спасибо вам*осталось сделать ток чтобы он залетал* вы давно в делфи занимаетесь?

[YVitaliy]

Думаю, если посмотреть профиль, то можно понять, например, что angvelem занимается им как минимум, с даты регистрации на форуме А если еще посмотреть на возраст - то фраза "чувак" здесь очень некстати! А я тока 5 лет. Вот так.

[Mp3]

ой,извините извините,интересно а ему и вправду столько лет???
а ты ток в делфи или еще в чем пишешь?

[Mp3]

я никак не найду ошибку Т_т

[YVitaliy]

Еще пробовал на С++ (точнее заставляли ), но не понравилось . Пишу еще на Java ME (для телефонов). Насчет кода: А ты точно вызываешь эту

Form6: TForm6

из главной формы? Или смотришь на главную форму (которая не Form6), и ждешь, что имаг там появится?

[Mp3]

я вызываю form6 из project"а ,
нет я тыкаю через главную форму на форму 6 и жду когда шарик начнет летать,а он не летит(
а ты где учишься???*если не секрет*
а С++ это вроде пародия делфи если я не ошибаюсь.

[YVitaliy]

Не, уже не учусь! И программирование - не моя специальность, а хобби! Учить пришлось как профильный предмет и не более! Заинтересовался тока с 3-го курса! Просто всегда считал, что для программирования нужно хорошо знать математику (как потом и оказалось), вот и не учил. А попробовал - оказалось, что все просто! Нужно просто знать геометрию
Мне уже 24 года как-не-как!

[Mp3]

хм....я тоже почему то думаю что в программирование важнее математика,чем геометрия...