Помогите разобратся с DayOfTheWeek

← →
tj.nelson (2011-12-08 05:40) [0]

Здравствуйте.
Обьясните пожалуйста, почему у меня функция DayOfTheWeek
постоянно возвращает 6, даже когда я переставляю время в винде и перезагружаюсь... из за чего это может быть?
den: TDateTime; ... label6.Caption:=inttostr(DayOftheWeek(den));

Сижу на W7 и D7

← →
MBo © (2011-12-08 05:45) [1]

а den где инициализируется?

← →
tj.nelson (2011-12-08 06:04) [2]

den находится в глобальных переменных

← →
tj.nelson (2011-12-08 06:19) [3]

ну выскажите хоть предположения свои....

← →
MBo © (2011-12-08 06:54) [4]

Вопрос повторить или переформулировать?

← →
brother © (2011-12-08 07:18) [5]

> ну выскажите хоть предположения свои....

где ты написал den:= бла-бла?

← →
tj.nelson (2011-12-08 07:25) [6]

обьявил там где обьявляешь главную форму, т.е. в глобальном обьявлении переменных
написал что den:=0 в create
использую DayOftheWeek(den) в счетчике

← →
brother © (2011-12-08 07:30) [7]

> написал что den:=0

тк переменная больше не меняет своего значения ты имеешь:

> постоянно возвращает 6

> использую DayOftheWeek(den) в счетчике

где? ты листинг показывай?

← →
brother © (2011-12-08 07:31) [8]

и тут почитай в начале:
http://articles.org.ru/delphispr/DayOfTheWeek.php

← →
tj.nelson (2011-12-08 07:33) [9]

> и тут почитай в начале:

я уже перечитал на несколько раз..

все ребят спасибо...
дело оказалось том что я использовал DayOftheWeek(den) прям в счетчике.
Сейчас я сделал den:=DayOftheWeek(den) в create формы
а в счетчике использовал только переменную den которая уже и равна дню недели...

Еще раз спасибо...

← →
brother © (2011-12-08 07:40) [10]

> Сейчас я сделал den:=DayOftheWeek(den)

ерунду сделал имхо, чему равен второй ден?) у тебя получается двойная инициализация переменной...

← →
brother © (2011-12-08 07:44) [11]

из [8],
где у тебя переменная с типом TDateTime? ведь именно ее нужно отдавать в функцию DayOftheWeek, а den переменная тогда должна быть типом byte...

← →
tj.nelson (2011-12-08 08:19) [12]

> den переменная тогда должна быть типом byte

хорошо, учту..спасибо

> где у тебя переменная с типом TDateTime

даже когда я переставляю время в винде и перезагружаюсь

Да все просто.
В том участке вселенной, где ты сидишь, время остановилось.

> brother © (08.12.11 07:40) [10]
> > Сейчас я сделал den:=DayOftheWeek(den)
>
> ерунду сделал имхо, чему равен второй ден?) у тебя получается
> двойная инициализация переменной...

Хуже, теперь получается порушеная переменная, которая уже не содержит даты

← →
han_malign (2011-12-08 10:39) [16]

> которая уже не содержит даты

- ее там и не было...
var den: integer; begin den:= 7; while(...)do begin den:= (den-1+7) mod 7 + 1; ... end; end;
- восстанавливает заданную последовательность 6, 5, 4, 3, 2, 1, 7, 6, 5, 4, 3, 2, 1, 7, ...

> han_malign (08.12.2011 10:39:16) [16]

Тогда о каком еще DayOfTheWeek можно говорить

> Тогда о каком еще DayOfTheWeek можно говорить

так и я о чем...

Помогите разобратся с DayOfTheWeek Найти похожие ветки