| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

[Error] Unit2.pas(43): Type of expression must be BOOLEAN [D7, XP]

Михаил ©   (2010-08-13 13:55:00) 

Помогите!
Вот текст:

procedure TForm2.Button1Click(Sender: TObject);
var RandSeed: LongInt;
begin
randomize;
RandSeed:=random(2);
label1.Caption:=(IntToStr(RandSeed));

If label1.Caption:='1'
then
begin
Label2.caption:='1'
end;
end;

А вот  ошибка:
[Error] Unit2.pas(43): Type of expression must be BOOLEAN

Помогите исправить!

---

12   (2010-08-13 15:50:00) [1]

> зы 12, Что?

по стилю и мылу напомнил было..
значит, ошибся

---

Михаил   (2010-08-13 15:27:00) [2]

спасибо

---

Игорь Шевченко   (2010-08-13 14:48:00) [3]

Amoeba_   (13.08.10 14:02) [3]


> И к какой же конкретно строке кода относится эта ошибка?


к 43-ей

---

Михаил   (2010-08-13 14:20:00) [4]

Все прошло! Спасибо!

зы 12, Что?

---

12   (2010-08-13 14:12:00) [5]

procedure TForm2.Button1Click(Sender: TObject);
var
 RandSeed: LongInt;
begin
 randomize;
 RandSeed:=random(2);
 label1.Caption:=(IntToStr(RandSeed));
 If RandSeed=1 then
   Label2.caption:='1';
end;

ps
как дела то? Как МИРОВИК?:)

---

Andy BitOff   (2010-08-13 14:07:00) [6]

> Amoeba_   (13.08.10 14:02) [3]

Сорри, перепутал с автором ;)

---

Andy BitOff   (2010-08-13 14:06:00) [7]

Оператор сравнения у тебя только в одной строке

---

Amoeba_   (2010-08-13 14:02:00) [8]

И к какой же конкретно строке кода относится эта ошибка?

---

George   (2010-08-13 13:59:00) [9]

Оператор сравнения с оператором присваивания перепутали, вот

---

Медвежонок Пятачок   (2010-08-13 13:57:00) [10]

убери одно двоеточие

---

Наверх