Тема: программа
Показать сообщение отдельно
  #2  
Старый 24.04.2014, 14:33
Аватар для poli-smen
poli-smen poli-smen вне форума
Профессионал
 
Регистрация: 06.08.2012
Адрес: Кривой Рог
Сообщения: 1,791
Версия Delphi: Delphi 7, XE2
Репутация: 4415
По умолчанию

Цитата:
Сообщение от azexp
в текстовом документе по идут цифры:
940394030
438893488
094343934

а для работы нужны только первые 6 цифр

в какую сторону смотреть чтоб сделать такое дело?
Функция Copy копирует из строки подстроку указанной длины из указанной позиции.
Например:
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
  s: String;
begin
  s := '940394030';
  s := Copy(s, 1, 6);
  ShowMessage(s);
end;
Покажет сообщение "940394" (т.е. первые 6 цифр из первоначальной строки)
Ответить с цитированием