Вниз
Скачать: 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.02 c
3-1096532944
Koala
2004-09-30 12:29
2004.10.31
вопрос по RxDBLookUpCombo


3-1096530936
aleks-ran
2004-09-30 11:55
2004.10.31
Транзакция и INSERT? D6, Paradox


3-1096537176
Pilot
2004-09-30 13:39
2004.10.31
Разработка сетевого ПО в Delphi


14-1097723617
BorisUK
2004-10-14 07:13
2004.10.31
Что это? Лохотронщики взялись за ebay или я чтото не понял...


3-1096586185
NikTrof
2004-10-01 03:16
2004.10.31
Сжатие баэы Access




   Наверх