Вниз
Скачать: CL | DM;

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]

не против


← →
PVOzerski ©   (2004-10-13 15:38) [10]

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


← →
Val ©   (2004-10-13 18:52) [11]

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


← →
cyborg ©   (2004-10-13 18:55) [12]

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.021 c
1-1097652591
diabolik_krsk
2004-10-13 11:29
2004.10.31
Извлечение названия файла без расширения


1-1097766889
Beginner707
2004-10-14 19:14
2004.10.31
Paint on TPanel


14-1097262338
YurikGL
2004-10-08 23:05
2004.10.31
Уязвимость Microsoft Office и чем плоха свобода информации


1-1098092029
Aleksandr.
2004-10-18 13:33
2004.10.31
Что случается с длинной строкой?


1-1097589032
П7
2004-10-12 17:50
2004.10.31
Анимированне обои раб.стола




   Наверх