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

кто скажет грамотный алгоритм   Найти похожие ветки 

← →
Grinder ©   (2004-02-12 18:44) [0]

Скажите мне.
Вот есть е меня 2 переменные TDateTime A и B. Есть ещё 2 булевы переменные Before и After.
Так вот как грамотнее выполнить слследующее?

Если after = true тогда проверяется только A с now, если before - то B с now, если after и before то A и B проверяются с now. Как такое реализовать грамотнее всего?
Может просто приведите пример кода.


← →
Verg ©   (2004-02-12 18:51) [1]

if after then
check(A, now);
if before then
check(B, now);


> Если after = true тогда проверяется только A с now


На СПИД?


← →
Владислав ©   (2004-02-12 18:53) [2]

Толи я туплю в конце трудового дня, толи лыжи не едут... А в чем, собственно, проблема то? Не знаете, как сравнить переменные типа TDateTime?


← →
Grinder ©   (2004-02-12 19:05) [3]

2 Verg это не совсем так.

Дело вот в чем.

У меня сейчас код есть.
if (comparetime(starttime,now)=-1) and (comparetime(endtime,now)=1) then
Result:=True;


Но тут сразу при совадении условий Result = true; А я хочу чтобы если after = true, то (comparetime(starttime,now)=-1) не проверяется, если before = true то (comparetime(endtime,now)=1) не проверяется, если оба равно труе, то вот этот код сохраняется.


← →
Владислав ©   (2004-02-12 19:27) [4]

if after then
begin
...
Exit
end;
if before then
begin
...
Exit
end;
if (comparetime(starttime,now)=-1) and (comparetime(endtime,now)=1) then
Result:=True;


← →
ЮЮ ©   (2004-02-13 04:46) [5]

> Grinder © (12.02.04 19:05) [3]
Так тебе это и предложили. А если уж разжевать то последнеего символа, то так:

if Before then
// это сравнение будет только при Before = true
Result := (comparetime(starttime, now)= - 1)
else
// сравнение не требуется
Result := true;
if After then
// дополнительное условие, работает только при After = true
Result := Result and (comparetime(endtime, now) = 1);



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

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



Память: 0.46 MB
Время: 0.026 c
4-80346
BKGG
2003-12-17 20:06
2004.02.25
Как с помощю API создать обработчик нажатия Button-а.


1-79828
Хомячок
2004-02-14 08:49
2004.02.25
Как использовать компонент FontDialog?


3-79627
3APA3A
2004-01-31 00:10
2004.02.25
Первый символ строки...


11-79686
=Sniper=
2003-06-07 23:50
2004.02.25
Не работает BorderStyle и BorderIcons


1-79848
Fom
2004-02-10 17:07
2004.02.25
Как закрыть ChildForm по кнопке которая на ней?




   Наверх