С Новым годом! Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
4 / 4 / 1
Регистрация: 02.10.2015
Сообщений: 40
1

Как организовать цикл, завершающийся по нажатию кнопки

20.10.2015, 16:45. Показов 965. Ответов 16
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Есть задача выводить на экран многозначные числа. Нажимаем на 1, выводится 1, еще раз нажимаем 1, выводится 11. Как сделать, чтобы он выводил эту единицу, пока мы не нажмем число 2, и вместо 11 появится 2. Есть идея организовать через repeat until, но не знаю как
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
20.10.2015, 16:45
Ответы с готовыми решениями:

Цикл завершающийся после того, как переменная примет рандомно каждое значение из заданного промежутка
Доброго времени суток, господа. Требуется помощь, а именно не знаю как организовать цикл (скорее...

Организовать простейший одноступенчатый диалог по нажатию кнопки
Организовать простейший одноступенчатый диалог по нажатию кнопки , используя все знакомые...

Цикл по нажатию кнопки Arduino
Мне нужно, чтобы при нажатии кнопки запускался цикл, и только один раз. На данный момент функция...

Не останавливается цикл по нажатию кнопки на форме
у меня есть цикл в программе который запускается с кнопки на форме, и я хочу прервать этот цикл с...

16
5580 / 4430 / 1080
Регистрация: 29.08.2013
Сообщений: 27,712
Записей в блоге: 3
20.10.2015, 16:53 2
у вас паскаль или дельфи?
0
692 / 509 / 238
Регистрация: 02.10.2012
Сообщений: 1,741
20.10.2015, 16:53 3
зачем тут вообще цикл?куда выводить цифры будешь?
0
4 / 4 / 1
Регистрация: 02.10.2015
Сообщений: 40
20.10.2015, 16:56  [ТС] 4
Добавлено через 17 секунд
Цитата Сообщение от qwertehok Посмотреть сообщение
у вас паскаль или дельфи?
дельфи

Добавлено через 30 секунд
Цитата Сообщение от Immo Посмотреть сообщение
куда выводить цифры будешь?
В label
0
5580 / 4430 / 1080
Регистрация: 29.08.2013
Сообщений: 27,712
Записей в блоге: 3
20.10.2015, 16:56 5
Bugmenot1,
ну выводите в таймере свою единицу, пока не нажата двойка
0
4 / 4 / 1
Регистрация: 02.10.2015
Сообщений: 40
20.10.2015, 17:00  [ТС] 6
Цитата Сообщение от qwertehok Посмотреть сообщение
выводите в таймере
это нужно как то вывести в label
0
692 / 509 / 238
Регистрация: 02.10.2012
Сообщений: 1,741
20.10.2015, 17:05 7
у тебя 2 кнопки на форме, когда жмешь "1" в лейбл пишется 1, еще раз и 11 и так после каждого нажатия?или ты жмешь 1 и в цикле выводится 1,11,111,1111.....?
0
4 / 4 / 1
Регистрация: 02.10.2015
Сообщений: 40
20.10.2015, 17:07  [ТС] 8
Цитата Сообщение от Immo Посмотреть сообщение
когда жмешь "1" в лейбл пишется 1, еще раз и 11
еще раз "1", в лэйбл выводится 111
именно так. Чтобы лучше понять можно глянуть калькулятор в Windows, примерно так нужно организовать
0
5580 / 4430 / 1080
Регистрация: 29.08.2013
Сообщений: 27,712
Записей в блоге: 3
20.10.2015, 17:07 9
Bugmenot1,
на Onkeypress запускай таймер и выводи каждую секунду "1"
если нажата двоечка - выводи "2"

в чем вопрос?
код за тебя написать?
0
4 / 4 / 1
Регистрация: 02.10.2015
Сообщений: 40
20.10.2015, 17:11  [ТС] 10
Цитата Сообщение от qwertehok Посмотреть сообщение
на Onkeypress запускай таймер и выводи каждую секунду "1"
если нажата двоечка - выводи "2"
Вы меня не правильно поняли
Есть на панели кнопочка "1", когда я ее нажимаю, в лэйбл выводится "1", если еще раз нажму кнопку с единицей, в лэйбл выведется "11", еще раз нажму, выведется "111", и нужно так продолжать, пока я не нажму другую кнопку, например "2", тогда в лэйбл выведется "2", вместо "111"
0
5580 / 4430 / 1080
Регистрация: 29.08.2013
Сообщений: 27,712
Записей в блоге: 3
20.10.2015, 17:15 11
Bugmenot1,
это вы меня не поняли

Используйте ТАЙМЕР.
нажимайте кнопку - пишите button1click(self);

и все.
0
692 / 509 / 238
Регистрация: 02.10.2012
Сообщений: 1,741
20.10.2015, 17:26 12
Delphi
1
2
3
4
5
6
7
8
9
procedure TForm1.AddLetter(x: string);
begin
if pos(x,Label1.Caption)<>0 then
   label1.Caption:=label1.Caption+x
else begin
   label1.Caption:='';
   label1.Caption:=label1.Caption+x
 end;
end;
1
5580 / 4430 / 1080
Регистрация: 29.08.2013
Сообщений: 27,712
Записей в блоге: 3
20.10.2015, 17:31 13
ааааааааааааа, оно не само должно вводиться

Не по теме:

как то я все усложнил

1
4 / 4 / 1
Регистрация: 02.10.2015
Сообщений: 40
20.10.2015, 17:37  [ТС] 14
Immo,
То что нужно, спасибо!

Добавлено через 1 минуту
qwertehok,
а я сидел, курил мануалы, думал чего то не догоняю
0
5580 / 4430 / 1080
Регистрация: 29.08.2013
Сообщений: 27,712
Записей в блоге: 3
20.10.2015, 17:39 15
Bugmenot1, а ты сам не мог взять последний символ введенного текста и проанализировать?
0
4 / 4 / 1
Регистрация: 02.10.2015
Сообщений: 40
20.10.2015, 17:47  [ТС] 16
Цитата Сообщение от qwertehok Посмотреть сообщение
button1click(self);
из за этого у меня вообще весь дельфи повис и умер(
0
5580 / 4430 / 1080
Регистрация: 29.08.2013
Сообщений: 27,712
Записей в блоге: 3
20.10.2015, 17:49 17
Bugmenot1, ты не умеешь его готовить

это эмуляция нажатой кнопки
0
20.10.2015, 17:49
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
20.10.2015, 17:49
Помогаю со студенческими работами здесь

Цикл: Как грамотно организовать цикл с получением количества верных и неверных ответов?
Доброго времени суток, товарищи. Вот есть у меня два рандомно генерируемых числа, проверка...

Добавление текстбоксов по нажатию клавиши и удаление по нажатию другой кнопки
Всем доброго времени суток. Хотел попросить помощи в написании следующего кода. Кое что набросал,...

Разбить строку на слова по нажатию первой кнопки, отсортировать список слов по нажатию второй
Разбить строку, введённую в первую ячейку первого столбца активного листа, на слова, и вывести их в...

Нарисовать домик по нажатию кнопки, и звезду по нажатию на форме
Нарисовать домик по нажатию кнопки и звезду по нажатию на форме


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
17
Ответ Создать тему
Блоги программистов
Как перейти с Options API на Composition API в Vue.js
BasicMan 06.01.2025
Почему переход на Composition API актуален В мире современной веб-разработки фреймворк Vue. js продолжает эволюционировать, предлагая разработчикам все более совершенные инструменты для создания. . .
Архитектура современных процессоров
inter-admin 06.01.2025
Процессор (центральный процессор, ЦП) является основным вычислительным устройством компьютера, которое выполняет обработку данных и управляет работой всех остальных компонентов системы. Архитектура. . .
История создания реляционной модели баз данных, правила Кодда
Programming 06.01.2025
Предпосылки создания реляционной модели В конце 1960-х годов компьютерная индустрия столкнулась с серьезными проблемами в области управления данными. Существовавшие на тот момент модели данных -. . .
Полезные поделки на Arduino, которые можно сделать самому
raxper 06.01.2025
Arduino как платформа для творчества Arduino представляет собой удивительную платформу для технического творчества, которая открывает безграничные возможности для создания уникальных проектов. Эта. . .
Подборка решений задач на Python
IT_Exp 06.01.2025
Целью данной подборки является предоставление возможности ознакомиться с различными задачами и их решениями на Python, что может быть полезно как для начинающих, так и для опытных программистов. . . .
С чего начать программировать микроконтроллер­­ы
raxper 06.01.2025
Введение в мир микроконтроллеров Микроконтроллеры стали неотъемлемой частью современного мира, окружая нас повсюду: от простых бытовых приборов до сложных промышленных систем. Эти маленькие. . .
Из чего собрать игровой компьютер
inter-admin 06.01.2025
Сборка игрового компьютера требует особого внимания к выбору комплектующих и их совместимости. Правильно собранный игровой ПК не только обеспечивает комфортный геймплей в современных играх, но и. . .
Обновление сайта www.historian.b­y
Reglage 05.01.2025
Обещал подвести итоги 2024 года для сайта. Однако начну с того, что изменилось за неделю. Добавил краткий урок по последовательности действий при анализе вредоносных файлов и значительно улучшил урок. . .
Как использовать GraphQL в C# с HotChocolate
Programming 05.01.2025
GraphQL — это современный подход к разработке API, который позволяет клиентам запрашивать только те данные, которые им необходимы. Это делает взаимодействие с API более гибким и эффективным по. . .
Модель полного двоичного сумматора с помощью логических операций (python)
AlexSky-coder 04.01.2025
def binSum(x:list, y:list): s=^y] p=x and y for i in range(1,len(x)): s. append((x^y)^p) p=(x and y)or(p and (x or y)) return s x=list() y=list()
Это мы не проходили, это нам не задавали...(аси­­­­­­­­­­­­­­хро­н­н­ы­й счётчик с управляющим сигналом задержки).
Hrethgir 04.01.2025
Асинхронный счётчик на сумматорах (шестиразрядный по числу диодов на плате, но наверное разрядов будет больше - восемь или шестнадцать, а диоды на старшие), так как триггеры прошли тестирование и. . .
Руководство по созданию бота для Телеграм на Python
IT_Exp 04.01.2025
Боты для Телеграм представляют собой автоматизированные программы, которые выполняют различные задачи, взаимодействуя с пользователями через интерфейс мессенджера. В данной статье мы рассмотрим,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru