Inkompatible Typen: String und procedure, untyped pointer or .

← →
Herzog (2004-10-13 12:11) [0]

Так всё замечательно работает:
if Label1.Caption = Label2.Caption then
MyExitWindows(EWX_POWEROFF or EWX_FORCE);

но как только я ставлю вместе xpCheckBox1.Checked := True, как указано в примере:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
ShowTime;
if Label1.Caption = Label2.Caption and
xpCheckBox1.Checked := True then
MyExitWindows(EWX_POWEROFF or EWX_FORCE);
end;

то появляется такая ошибка:

Inkompatible Typen: "String" und "procedure, untyped pointer or untyped parameter"

Что я делаю неправильно ?

← →
pasha_golub © (2004-10-13 12:14) [1]

Herzog (13.10.04 12:11)
Мдя, маразьм...

if Label1.Caption = Label2.Caption and
xpCheckBox1.Checked = True then

← →
Семен Сорокин © (2004-10-13 12:14) [2]

if (Label1.Caption = Label2.Caption) and xpCheckBox1.Checked then

← →
pasha_golub © (2004-10-13 12:14) [3]

Даже более того...

if Label1.Caption = Label2.Caption and xpCheckBox1.Checked then

← →
Mike Kouzmine © (2004-10-13 12:15) [4]

if (Label1.Caption = Label2.Caption) and
xpCheckBox1.Checked then

← →
pasha_golub © (2004-10-13 12:16) [5]

Семен Сорокин © (13.10.04 12:14) [2]
Блин, точно. Опять пропустил.

Зы Катерина в слове "еще" делала 5 ошибок - "истчо"

← →
Herzog (2004-10-13 12:29) [6]

Спасибо всем, правильно было так:

if (Label1.Caption = Label2.Caption) and
xpCheckBox1.Checked = True then

← →
Сайбель Алексей © (2004-10-13 12:40) [7]

Вообще-то, то что ты написал и:
if (Label1.Caption = Label2.Caption) and xpCheckBox1.Checked then
одно и тоже.

← →
Anatoly Podgoretsky © (2004-10-13 13:16) [8]

Herzog (13.10.04 12:29) [6]
Не хочешь ознакомиться с приоритетами операций в справке?

← →
Herzog (2004-10-13 13:57) [9]

не против

BTW, а почему у тебя компилятор на смеси английского с немецким изъясняется?

он еще не так от такого условия заговорить может :)

Дасист фантастиш :)

Inkompatible Typen: String und procedure, untyped pointer or . Найти похожие ветки