При нажатии кнопки форма меняет цвет

cawwe · 18.12.2012, 21:19

добрый вечер! на языке Delphi 7 нужно написать программу, которая при нажатии кнопки меняет цвет формы

что у меня неправильно?

Код:

var
a:array[1..5] of integer;
i:integer;
begin
Form1.Color:=clRed;
for i:=1 to 5 do
a[1]:=clGreen;
a[2]:=clLime;
a[3]:=clYellow;
a[4]:=clAqua;
a[5]:=clBlue;
 
LABEL1.Caption:=IntToStr(a);

Ario · 18.12.2012, 21:40

Форма должна менять цвет рэндомно или в определенный?
Если так, то не вижу rnd в коде. Если цвет определен - то проще изначально уже прописать его номер в Label.Caption

AlexZir · 18.12.2012, 21:41

если коротко - всё!

в обработчике события OnClick пропишите команду установки цвета, этого будет достаточно.

cawwe · 18.12.2012, 21:44

Цитата:

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

Форма должна менять цвет рэндомно или в определенный?
Если так, то не вижу rnd в коде. Если цвет определен - то проще изначально уже прописать его номер в Label.Caption

определённый цвет должна менять.

cawwe · 18.12.2012, 21:55

Цитата:

Если цвет определен - то проще изначально уже прописать его номер в Label.Caption

а тогда какой код получается?

Ario · 18.12.2012, 21:59

Код:

a := {циферное значение цвета, типа 1412552};
LABEL1.Caption:=IntToStr(a);

Численное значение цвета я определял тутже в программе: кидал на форму ColorDialog (или как он называется), дальше:

Цитата:

If ColorDialog.Execute then Edit1.Text := IntToStr(ColorDialog.Color)

смысл такой

cawwe · 18.12.2012, 22:12

спасибо за помощь

18.12.2012, 21:19	#1 (permalink)
cawwe Новичок Регистрация: 18.12.2012 Сообщений: 4 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	При нажатии кнопки форма меняет цвет добрый вечер! на языке Delphi 7 нужно написать программу, которая при нажатии кнопки меняет цвет формы что у меня неправильно? Код: var a:array[1..5] of integer; i:integer; begin Form1.Color:=clRed; for i:=1 to 5 do a[1]:=clGreen; a[2]:=clLime; a[3]:=clYellow; a[4]:=clAqua; a[5]:=clBlue; LABEL1.Caption:=IntToStr(a);

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

18.12.2012, 21:19
Helpmaster Member Регистрация: 08.03.2016 Сообщений: 0	Тут вы можете ознакомиться с похожими темами Делфи. Цвет кнопки в форме Проблема - вентилятор процессора меняет обороты

18.12.2012, 21:40	#2 (permalink)
Ario Пещерный человек Регистрация: 15.10.2010 Сообщений: 2,304 Записей в дневнике: 16 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 5362	Форма должна менять цвет рэндомно или в определенный? Если так, то не вижу rnd в коде. Если цвет определен - то проще изначально уже прописать его номер в Label.Caption

18.12.2012, 21:41	#3 (permalink)
AlexZir support Регистрация: 19.08.2007 Адрес: Зея Сообщений: 15,797 Записей в дневнике: 71 Сказал(а) спасибо: 166 Поблагодарили 203 раз(а) в 86 сообщениях Репутация: 75760	если коротко - всё! в обработчике события OnClick пропишите команду установки цвета, этого будет достаточно.

Ads
Яндекс Member Регистрация: 31.10.2006 Сообщений: 40200 Записей в дневнике: 0 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 55070

18.12.2012, 22:12	#7 (permalink)
cawwe Новичок Регистрация: 18.12.2012 Сообщений: 4 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	спасибо за помощь