повторная нажатие кнопки - [ "Начинающим" ] - Все о Delphi

24.03.2014, 21:37

M.A.D.M.A.N. M.A.D.M.A.N. вне форума

Sir Richard Abramson

Регистрация: 05.04.2008

Сообщения: 5,505

Версия Delphi: XE10

Репутация: выкл

Код:

procedure button1click(sender:tobject);label a;begin a:;if button1.caption='button1' then button1.caption:='button2' else if button1.caption='button2' then button1.caption:='button1' else goto a;end;

__________________
— Как тебя понимать?
— Понимать меня не обязательно. Обязательно меня любить и кормить вовремя.

На Delphi, увы, больше не программирую.
Рекомендуемая литература по программированию

« Предыдущая тема | Следующая тема »

Опции темы	Поиск в этой теме
Версия для печати Отправить на Email	Поиск в этой теме: Расширенный поиск
Опции просмотра
Линейный вид Комбинированный вид Древовидный вид

Ваши права в разделе
Вы не можете создавать темы Вы не можете отвечать на сообщения Вы не можете прикреплять файлы Вы не можете редактировать сообщения BB-коды Вкл. Смайлы Вкл. [IMG] код Вкл. HTML код Выкл.

Быстрый переход

Часовой пояс GMT +3, время: 13:22.

	Сайт	Форум	FAQ	Соглашения	Прочее
	Новости Исходники Компоненты Статьи Добавить исходник Поиск	Правила Поиск Сообщения за сегодня Пользователи Кто на форуме?	Delphi FAQ - 5000 статей DRKB - 4500 статей (ZIP-архив) Справочник функций и процедур Delphi Delphi Programming Guide Indy in Depth. Глубины Indy	Конфиденциальность Соглашение пользователя Правила обработки cookie	О сайте Donate Контакты