HiAsm

Ответов: 16884

Рейтинг: 1239

#1: 2007-09-01 18:46:10 ЛС | профиль | цитата

Вместо вот этого:
code_1875.txt
Оставляем только это:

function StrToTData(s: string):TData;
var
    t: byte;
    s1: string;
begin
  t:=data_Str; s1:=trim(s);
  dtString(result,s);
end;

и все отлично (вроде) работает

[size=-2]------ Добавлено в 18:46

Galkov писал(а):

Tad, тебе чего надо-то

Надо, чтобы, если в тексте например номер телефона 098359723 , элемент не искажал данные. (отбросит первый ноль и цифры изменит)

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

файлы: 1 code_1875.txt [728B] [416]