Движение обьекта с помощью кнопок

@Star · Регистрация: 04.11.2008

Студворк — интернет-сервис помощи студентам

Подскажите пожалуйста, вот я разместил на своей форме 2 кнопки и картинку. Как сделать так, чтобы при нажатии 1 кнопки (влево) картинка двигалась влево, второй кнопки (вправо) вправо. Подскажите, а?

@Star · 05.11.2008, 20:24 **[ТС]**

Да оператор то я понял...

Добавлено через 16 минут 51 секунду
Я не такой как тебе кажется. Я программирую уже вовсю, но мне нужны новые знания, а за ними я полез сюда. Просто напиши готовый код условия ограничения Shape по форме и тема будет закрыта.

@Xentar · 06.11.2008, 00:01

Это программированием назвать трудно

Ты знаешь свойства объекта форма - координаты относительно экрана (левого верхеного угла)
Ты знаешь ширину и высоту формы.
Ты знаешь все свойсва своего объекта Shape.
Я дал тебе исчерпывающие подсказки - см. посты выше.
Ты даже знаешь как работает условный оператор (в чем я сомневаюсь, ибо ты мне прислал совсем нелепый скрин)
Вывод из всего вышеперечисленного => ты можешь сам составить это уравнение.

Добавлено через 4 минуты 48 секунд
Ладно - давай так... тебе всётаки 12, но хочется чтоб ты не тупо передирал код, а сам подумал.
Я буду задавать вопросы - ты отвечать.
Ответь мне на несколько вопросов:
1. В какой переменной находится значение ширины твоей формы ?
2. В какой переменной находится значение высоты твоей формы ?
3. В каких переменных находятся значения местоположения твоего объекта ?
4. Какую точку на твоем объекте отражают переменные местоположения объекта ?

@Star · 06.11.2008, 10:12 **[ТС]**

Вообще то у меня тетрадка для записи всех процедур есть и я туда все записываю что полезно. И твой код записал.

Вот пример того, что я знаю условный оператор:
if ((CheckBox1.Checked)and(CheckBox.Checked )) then (ShowMessage ('Вы поставили все галочки!')

Добавлено через 6 минут 55 секунд
Короче, без твоих наставлений обойдусь. Скачаю библию Дельфи, почитаю, вон, все ее хвалят, значит очень хорошая книга!

И этот скрин я тебе прислал, для того, чтобы ты мне покзал, куда ставить фрагмент!

@Xentar · 06.11.2008, 10:34

Сообщение от Star

И этот скрин я тебе прислал, для того, чтобы ты мне покзал, куда ставить фрагмент!

Я тебе еще до этого скрина - написал структуру, которую тебе нужно прописать. Ты написал в принципе верно, НО ты условия не соизволил написать нормлаьно !!! Что и говорит о том, что ты не знаешь как расставлять условия в операторе If.
А то что ты мне привел пример из книги, не говорит о том что ты знаешь как их составлять

Так что нечего возмущаться.

@Star · 06.11.2008, 11:03 **[ТС]**

Я не из книги! И че ты вообще тут меня дразнишь! Я НЕ ТА-КОЙ КАК ТЕ-БЕ КА-ЖЕТ-СЯ! И я сказал что без твоих наставлений обойдусь!!! Знаешь, дразнишь меня, потому что мне 12!

Добавлено через 2 минуты 22 секунды
if (Xentax.Извинится) then (я его прощу)

@Xentar · 06.11.2008, 11:05

Я не дразню. Я просто констатирую факты. То что тебя это бесит, и то что тебе 12 - мне совершено побоку.

Я вообщето тебе помочь хочу - но ты сам ничего делать не хочешь.
Если не хочешь, то я тут тебе не помощник.
А вообще ответь на вопросы - проще понять станет.

@Star · 06.11.2008, 11:06 **[ТС]**

Знаешь, что Xentax, давай лучше помиримся. А то мне нужен наставник... Библию Дельфи я почитаю, но ты мне будешь подсказывать что делать. Я добавалю тебя в друзья!

@Xentar · 06.11.2008, 11:07

Сообщение от Star

Знаешь, что Xentax, давай лучше помиримся

А кто тут ссорился ?

@Star · 06.11.2008, 11:16 **[ТС]**

Да мы тут с тобой препирались...

Ну так что, давай? Ты добавишь меня в друзья, я тебя... И будешь мне подсказывать, если что...

Добавлено через 7 минут 13 секунд
У меня уже к тебе один вопросик есть... Как сделать так чтобы при щелчке на одну кнопку эта кнопка деактивизировалась, а другая кнопка, которая до этого была деактивизированной, активизировалась?

@Xentar · 06.11.2008, 11:20

Ты используешь стандартыне "Button" ?

@Star · 06.11.2008, 11:21 **[ТС]**

Хотя знаешь, я понял как при щелчке активизировать вторую кнопку!
Form1.Button2.Enabled:=True

@Xentar · 06.11.2008, 11:25

Видишь - не всё так сложно.

@Star · 06.11.2008, 11:47 **[ТС]**

Спасибо тебе Xentar за все! Только вот я пробовал в процедуре OnClick Button1 поставить

:
Form1.Button1.Enabled:=False
ничего не получилось

Добавлено через 1 минуту 43 секунды
Здесь наверное самая популярная тема, судя по количеству сообщений!

Добавлено через 2 минуты 22 секунды
Хм, знаешь, что, Xentar... У меня система ломалась рекордное количество для меня раз - 10! И я сам все чинил всегда...

@Xentar · 06.11.2008, 11:55

Сообщение от Star

ничего не получилось

А почему не получилось ??
Давай разбираться.

Code
1
2
3
4
5
procedure TForm1.Button1Click(Sender: TObject);
begin
Form1.Button1.Enabled:=false;
Form1.Button2.Enabled:=true;
end;

Сравни с тем что ты написал и пойми что не так.

Так же еще можно добавить и вот это

Code
1
2
3
4
5
procedure TForm1.Button2Click(Sender: TObject);
begin
Form1.Button2.Enabled:=false;
Form1.Button1.Enabled:=true;
end;

@Star · 06.11.2008, 13:22 **[ТС]**

Да я кажется точку с запятой после false забыл поставить!

Я тебя в друзья добавил. А у тебя еще есть друзья, или я первый?

Давай вместе игру сделаем! Просто хочу очень попробовать!

Добавлено через 1 час 24 минуты 37 секунд
У меня на форме три Trackbara и один Image.
Не подскажешь, Xentar как сделать так, чтобы при изменении положения ползунка изменялся цвет в имэйдж ну в режиме RGB.

@MAcK · 06.11.2008, 14:25

Color.FromArgb

@VATKA · 10.03.2010, 10:47

Подскажите пожалуйста как сделать так чтобы кнопка скакала по диагонали???????????

Новые блоги и статьи Все статьи Все блоги /
Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .	Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .	Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .	Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм anaschu 30.08.2026 Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .

@Star 3 / 3 / 0 Регистрация: 04.11.2008 Сообщений: 79

	Движение обьекта с помощью кнопок 05.11.2008, 10:16. Показов 22326. Ответов 56 Метки нет (Все метки) Подскажите пожалуйста, вот я разместил на своей форме 2 кнопки и картинку. Как сделать так, чтобы при нажатии 1 кнопки (влево) картинка двигалась влево, второй кнопки (вправо) вправо. Подскажите, а? 0

@Star 3 / 3 / 0 Регистрация: 04.11.2008 Сообщений: 79
	05.11.2008, 20:24 [ТС]
	Да оператор то я понял... Добавлено через 16 минут 51 секунду Я не такой как тебе кажется. Я программирую уже вовсю, но мне нужны новые знания, а за ними я полез сюда. Просто напиши готовый код условия ограничения Shape по форме и тема будет закрыта. 0

@Xentar Of Wolf and Man 999 / 198 / 5 Регистрация: 09.07.2008 Сообщений: 1,784
	06.11.2008, 00:01
	Это программированием назвать трудно Ты знаешь свойства объекта форма - координаты относительно экрана (левого верхеного угла) Ты знаешь ширину и высоту формы. Ты знаешь все свойсва своего объекта Shape. Я дал тебе исчерпывающие подсказки - см. посты выше. Ты даже знаешь как работает условный оператор (в чем я сомневаюсь, ибо ты мне прислал совсем нелепый скрин) Вывод из всего вышеперечисленного => ты можешь сам составить это уравнение. Добавлено через 4 минуты 48 секунд Ладно - давай так... тебе всётаки 12, но хочется чтоб ты не тупо передирал код, а сам подумал. Я буду задавать вопросы - ты отвечать. Ответь мне на несколько вопросов: 1. В какой переменной находится значение ширины твоей формы ? 2. В какой переменной находится значение высоты твоей формы ? 3. В каких переменных находятся значения местоположения твоего объекта ? 4. Какую точку на твоем объекте отражают переменные местоположения объекта ? 0

@Star 3 / 3 / 0 Регистрация: 04.11.2008 Сообщений: 79
	06.11.2008, 10:12 [ТС]
	Вообще то у меня тетрадка для записи всех процедур есть и я туда все записываю что полезно. И твой код записал. Вот пример того, что я знаю условный оператор: if ((CheckBox1.Checked)and(CheckBox.Checked )) then (ShowMessage ('Вы поставили все галочки!') Добавлено через 6 минут 55 секунд Короче, без твоих наставлений обойдусь. Скачаю библию Дельфи, почитаю, вон, все ее хвалят, значит очень хорошая книга! И этот скрин я тебе прислал, для того, чтобы ты мне покзал, куда ставить фрагмент! 0

@Star 3 / 3 / 0 Регистрация: 04.11.2008 Сообщений: 79
	06.11.2008, 11:03 [ТС]
	Я не из книги! И че ты вообще тут меня дразнишь! Я НЕ ТА-КОЙ КАК ТЕ-БЕ КА-ЖЕТ-СЯ! И я сказал что без твоих наставлений обойдусь!!! Знаешь, дразнишь меня, потому что мне 12! Добавлено через 2 минуты 22 секунды if (Xentax.Извинится) then (я его прощу) 0

@Xentar Of Wolf and Man 999 / 198 / 5 Регистрация: 09.07.2008 Сообщений: 1,784
	06.11.2008, 11:05
	Я не дразню. Я просто констатирую факты. То что тебя это бесит, и то что тебе 12 - мне совершено побоку. Я вообщето тебе помочь хочу - но ты сам ничего делать не хочешь. Если не хочешь, то я тут тебе не помощник. А вообще ответь на вопросы - проще понять станет. 0

@Star 3 / 3 / 0 Регистрация: 04.11.2008 Сообщений: 79
	06.11.2008, 11:06 [ТС]
	Знаешь, что Xentax, давай лучше помиримся. А то мне нужен наставник... Библию Дельфи я почитаю, но ты мне будешь подсказывать что делать. Я добавалю тебя в друзья! 0

@Star 3 / 3 / 0 Регистрация: 04.11.2008 Сообщений: 79
	06.11.2008, 11:16 [ТС]
	Да мы тут с тобой препирались... Ну так что, давай? Ты добавишь меня в друзья, я тебя... И будешь мне подсказывать, если что... Добавлено через 7 минут 13 секунд У меня уже к тебе один вопросик есть... Как сделать так чтобы при щелчке на одну кнопку эта кнопка деактивизировалась, а другая кнопка, которая до этого была деактивизированной, активизировалась? 0

@Xentar Of Wolf and Man 999 / 198 / 5 Регистрация: 09.07.2008 Сообщений: 1,784
	06.11.2008, 11:20
	Ты используешь стандартыне "Button" ? 0

@Star 3 / 3 / 0 Регистрация: 04.11.2008 Сообщений: 79
	06.11.2008, 11:21 [ТС]
	Хотя знаешь, я понял как при щелчке активизировать вторую кнопку! Form1.Button2.Enabled:=True 0

@MAcK Комбайнёр 1606 / 704 / 77 Регистрация: 27.05.2008 Сообщений: 2,535
	06.11.2008, 14:25
	Color.FromArgb 0

@Xentar Of Wolf and Man 999 / 198 / 5 Регистрация: 09.07.2008 Сообщений: 1,784
	06.11.2008, 11:25
	Видишь - не всё так сложно. 1

@Star 3 / 3 / 0 Регистрация: 04.11.2008 Сообщений: 79
	06.11.2008, 11:47 [ТС]
	Спасибо тебе Xentar за все! Только вот я пробовал в процедуре OnClick Button1 поставить : Form1.Button1.Enabled:=False ничего не получилось Добавлено через 1 минуту 43 секунды Здесь наверное самая популярная тема, судя по количеству сообщений! Добавлено через 2 минуты 22 секунды Хм, знаешь, что, Xentar... У меня система ломалась рекордное количество для меня раз - 10! И я сам все чинил всегда... 0

@Star 3 / 3 / 0 Регистрация: 04.11.2008 Сообщений: 79
	06.11.2008, 13:22 [ТС]
	Да я кажется точку с запятой после false забыл поставить! Я тебя в друзья добавил. А у тебя еще есть друзья, или я первый? Давай вместе игру сделаем! Просто хочу очень попробовать! Добавлено через 1 час 24 минуты 37 секунд У меня на форме три Trackbara и один Image. Не подскажешь, Xentar как сделать так, чтобы при изменении положения ползунка изменялся цвет в имэйдж ну в режиме RGB. 0

@VATKA 1 / 1 / 0 Регистрация: 15.03.2014 Сообщений: 2
	10.03.2010, 10:47
	Подскажите пожалуйста как сделать так чтобы кнопка скакала по диагонали??????????? 0