[Ildar-tsr]

Сообщение от cadil

Снова обращаюсь к тебе за помощью - не могу реализовать твое решение. Причина, на мой взляд, заключается в непечатном символе, который появляется после даты. Как его убрать? Посмотри скрин во вложении.

К сожалению не уверен на все сто поможет ли, но попробуй эту строку дополнить:

Код:

//если после даты стоит пробел, то поможет
//если сразу символ, то надо подумать как от него избавиться
date2:= copy(table1.Cell(j, 3).Range.Text,1,pos(' ',table1.Cell(j, 3).Range.Text)-1);