Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.03.05;
Скачать: CL | DM;

Вниз

сравнение   Найти похожие ветки 

 
Officeman   (2006-02-20 11:32) [0]

Вопрос.
данный код выполняется в цикле.
т.е. ждём изменения файла.

if MF2.Checked=true then begin
//определяем время изменения и переводим в тип-строка.
try
 Windows.FindClose(FindFirstFile("go.bas", FindData));
 NewTim:=TimeToStr(FileTimeToDateTime(FindData.ftLastWriteTime));
finally
 memo2.Lines.Add("NewTim: "+NewTim);
end;

//сравниваем новое и старое значение.  ????????????????????? ***
if NewTim<>OldTim then begin
OldTim:=NewTim;
memo2.Lines.Add("OldTim: "+OldTim);
...

***  пример. в memo2  выводит так:

NewTim: 10:58:52
OldTim: 10:58:52

почему. они не сравниваются как СТРОКИ,  проходят как НЕРАВНЫЕ. ???
хотя тип string


 
КаПиБаРа ©   (2006-02-20 11:43) [1]

Officeman   (20.02.06 11:32)
if NewTim<>OldTim then begin


if NewTim<>OldTim then begin
memo2.Lines.Add("OldTim: "+OldTim);
OldTim:=NewTim;


 
Ega23 ©   (2006-02-20 11:49) [2]


> if MF2.Checked=true then begin


Лишняя проверка. Достаточно if MF2.Checked then .....


 
DiamondShark ©   (2006-02-20 12:10) [3]


> почему. они не сравниваются как СТРОКИ,  проходят как НЕРАВНЫЕ.
>  ???

Потому что они-таки неравные.
Просто в мемо ты их выводишь когда старое значение уже потерял.

:)



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

Текущий архив: 2006.03.05;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.059 c
2-1140377663
Vit___
2006-02-19 22:34
2006.03.05
работа с edit


2-1139921825
Evgen1976
2006-02-14 15:57
2006.03.05
стандартный QuickReport в Делфи


4-1134461272
Solo
2005-12-13 11:07
2006.03.05
Контрольно-кассовые машины


1-1138610482
rolex
2006-01-30 11:41
2006.03.05
Как избавиться в ListView от мерцания при прокрутке?


1-1138637444
lsp
2006-01-30 19:10
2006.03.05
отображение даты, в ZeosDBO 6.5.0 под Делфи для PostgresSQL