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

← →
Михаил (2010-08-13 13:55) [0]

Помогите!
Вот текст:
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

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

← →
Медвежонок Пятачок © (2010-08-13 13:57) [1]

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

← →
George © (2010-08-13 13:59) [2]

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

← →
Amoeba_ (2010-08-13 14:02) [3]

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

← →
Andy BitOff © (2010-08-13 14:06) [4]

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

← →
Andy BitOff © (2010-08-13 14:07) [5]

> Amoeba_ (13.08.10 14:02) [3]

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

← →
12 © (2010-08-13 14:12) [6]

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
как дела то? Как МИРОВИК?:)

← →
Михаил (2010-08-13 14:20) [7]

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

зы 12, Что?

Amoeba_ (13.08.10 14:02) [3]

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

к 43-ей

← →
Михаил (2010-08-13 15:27) [9]

спасибо

> зы 12, Что?

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

[Error] Unit2.pas(43): Type of expression must be BOOLEAN Найти похожие ветки