Показать сообщение отдельно
Старый 13.10.2011, 11:47   #6  
Fly is offline
Fly
Участник
Аватар для Fly
 
102 / 10 (1) +
Регистрация: 05.10.2007
Цитата:
Сообщение от InTacto Посмотреть сообщение
Fly, тут как раз нужно решить обратную задачу и формат здесь не поможет.

Shaitan-Babay, парсите эту строчку и используйте ф-цию DMY2DATE.
Да, Вы абсолютно правы, я неправильно понял задачу. Я немного покопался и вот как предлагаю решить задачу:

Код:
CurDateText := '2011/05/01';
CurDateText := CONVERTSTR(CurDateText,'/','-');
EVALUATE(CurDate,CurDateText,9);
MESSAGE(FORMAT(CurDate));
У Evaluate есть интересный последний параметр Number. Единственное возможное его значение - 9. Этот параметр говорит о том, что надо преобразовать из XMl формата в C/Side. Формат XML схож с приведенным вами, за исключением того, что вместо '/' используется '-'. Таким образом мы можем заменить во входящем тексте палки на тире функцией CONVERTSTR, а потом вызвать функцию EVALUATE с последним параметром равным 9.