Форум: "Начинающим";
Текущий архив: 2006.06.04;
Скачать: [xml.tar.bz2];
Вниз<> или = Найти похожие ветки
← →
Officeman (2006-05-17 09:04) [0]) задача: используя CheckBox1, сделать так:
if Checkbox1.Checked=true then Z:="<>" else Z:="=" ;
if A "Z" B then begin
.........
end else begin
........
end;
это реально ???? подскажите синтаксис.
← →
MBo © (2006-05-17 09:25) [1]if Checkbox1.Checked xor (A = B) then...
← →
WondeRu © (2006-05-17 09:32) [2]MBo © (17.05.06 9:25) [1]
if Checkbox1.Checked xor (A = B) then...
опередил :)
← →
ЮЮ © (2006-05-17 09:47) [3]а разве не лучше писать так, чтобы и читать можно было, не "ломая голову"?
if
Checkbox1.Checked and (A <> B) or
not Checkbox1.Checked and (A= B)
then begin
end
else begin
end;
← →
evvcom © (2006-05-17 09:47) [4]И в догонку
> if Checkbox1.Checked=true then
зачем сравнивать булево значение с булевой константой, получая булев результат? Достаточно писать простоif Checkbox1.Checked then
← →
TUser © (2006-05-17 09:49) [5]> а разве не лучше писать так, чтобы и читать можно было, не "ломая голову"?
[1] читабельнее, имхо. Если два значения различны, то ...
← →
evvcom © (2006-05-17 09:49) [6]
> чтобы и читать можно было, не "ломая голову"?
А это уже зависит от "булевой грамотности" читателя. Кому-то и МВо вариант понятен с лёту.
← →
MBo © (2006-05-17 10:02) [7]xor можно заменить <>, это, наверно, более читабельно...
← →
Officeman (2006-05-17 10:13) [8]при :
if
Checkbox1.Checked and (A <> B) or
not Checkbox1.Checked and (A= B)
then begin
end
else begin
end;
вы предлагаете писать один и тотже код для разных действий <> и = !
Во время работы программы, при установке Checkbox1.Checked нужно менять значёк с "<>", на "=" в равенстве.
if NumD<>strtoint(LV.Items[TekXoD].SubItems[x]) then begin
LVb.Items.item[0].SubItems[x]:=inttostr(strtoint(LVb.Items.item[0].SubItems[x])+1);
end else begin
....
....
....
← →
Officeman (2006-05-17 10:29) [9][8]... всё остальное прога додумает сама. дублировать один и тот же код неправильно.
← →
ЮЮ © (2006-05-17 10:44) [10]
> вы предлагаете писать один и тотже код для разных действий
> <> и = !
где ты это увидел? это полный аналог твоегоif Checkbox1.Checked=true then Z:="<>" else Z:="=" ;
if A "Z" B then begin
.........
end else begin
........
end;
← →
Officeman (2006-05-17 11:00) [11][8]... всё остальное прога додумает сама. дублировать один и тот же код неправильно.
← →
Officeman (2006-05-17 11:02) [12]2ЮЮ, ок. попробую
← →
Officeman (2006-05-17 11:12) [13]о. чёт я с тормозил. =) ЮЮ, спасибо.
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.06.04;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.044 c