Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

из строки systemtime [D7, WinXP]


Dmitry_177 ©   (2007-08-03 12:00:00) 

Подскажите пожалуйста как из строки получить systemtime?


Anatoly Podgoretsky   (2007-08-03 14:57:00) [1]


> идет жесткая привязка.. а дата может и так записана: '1.
> декабря.07'

А вот теперь попробуй это преобразовать по первому варианту.


Dmitry_177   (2007-08-03 12:58:00) [2]


> И захватит власть над всеми компьютерами во всех компаниях.
>  SkyNet эдакий!

:)))))))


DVM   (2007-08-03 12:56:00) [3]

И захватит власть над всеми компьютерами во всех компаниях. SkyNet эдакий!


Dib@zol   (2007-08-03 12:55:00) [4]

> хотелось обезопаситься..

+1! :)) А вдруг 1С осознает себя как личность и начнет гадить юзверям...


Dmitry_177   (2007-08-03 12:54:00) [5]

вообще будут браться из 1С (он как OLE сервер запущен будет).. там вроде как только так строка возвращается: "01.12.2007" но всеже хотелось обезопаситься..


DVM   (2007-08-03 12:29:00) [6]


> Dmitry_177   (03.08.07 12:23) [5]

Откуда будут браться даты столь разнообразно записанные? Может при вводе пользователя ограничить?


Dib@zol   (2007-08-03 12:26:00) [7]

Ну тогда можно отлавливать точки (или другие разделители), вводить массив имён месяцев, сравнивать по CharLowerBuff и прочая и прочая. Мне просто влом было всё это кодить...


Dmitry_177   (2007-08-03 12:23:00) [8]

мне больше этот: DateTimeToSystemTime(StrToDate('01.12.2007')) вариант нравится :)

как здесь:
var s : SYSTEMTIME;

s.WDay:=StrToInt(copy(str, 1, 2));
s.WMonth:=StrToInt(copy(str, 4, 2));
s.WYear:=StrToInt(copy(str, 8, 4));
ъ
идет жесткая привязка.. а дата может и так записана: '1.декабря.07'


clickmaker   (2007-08-03 12:09:00) [9]

DateTimeToSystemTime(StrToDate('01.12.2007'))


Dib@zol   (2007-08-03 12:09:00) [10]

var s : SYSTEMTIME;

s.WDay:=StrToInt(copy(str, 1, 2));
s.WMonth:=StrToInt(copy(str, 4, 2));
s.WYear:=StrToInt(copy(str, 8, 4));


Dmitry_177   (2007-08-03 12:05:00) [11]

в которой и есть дата, например: "01.12.2007" но мне надо это в systemtime перевести


DVM   (2007-08-03 12:02:00) [12]

из какой строки?


Наверх

Титульная страница Поиск, карта сайта Написать письмо