Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.12.03;
Скачать: CL | DM;

Вниз

Текстовый файл   Найти похожие ветки 

 
lobach ©   (2006-11-17 17:58) [0]

Здравствуйте мастера!!!
У меня такая задачка:
Есть текстовый файл такой структуры:
дд.мм.гг чч:мм произвольный текст
дд.мм.гг чч:мм произвольный текст
дд.мм.гг чч:мм произвольный текст
то есть:
дата время данные
как мне отделить дату и время от данных?
Есть ли в delphi такие фишки, как разделители,
например:
дд.мм.гг чч:мм|||произвольный текст
чтоб ||| было разделителем?


 
clickmaker ©   (2006-11-17 18:01) [1]

P := Pos(#9, s);
D := Copy(s, 1, P); // то что до
DD := Copy(s, P+1, Length(s) - P); // то что после
примерно так.
в качестве разделителя здесь табуляция


 
Jeer ©   (2006-11-17 18:02) [2]


> такие фишки,


такие "фишки" есть в любом языке - что назначишь разделителем, то и будет.


 
lobach ©   (2006-11-17 20:52) [3]

Помогите с функцией readln. Мне надо прочитать строку из текстового файла f в строковую переменную str.
Пробовал так:
Readln(f, str);
выдаёт ошибку I/O 104
помогите.


 
Anatoly Podgoretsky ©   (2006-11-17 20:54) [4]

> lobach  (17.11.2006 20:52:03)  [3]

Здесь порядок, ошибка в другом месте.


 
lobach ©   (2006-11-17 20:58) [5]


> Anatoly Podgoretsky

Спасибо, разобрался:
reset(f);
readln(f, str);


 
grisme ©   (2006-11-17 21:08) [6]

вообще, начни с какой-нибудь книжицы такой не особо замудренной. иначе, блин, не дело imho :|


 
Kolan ©   (2006-11-17 21:36) [7]

> lobach ©  

Пользуй TStringList
Пример:
var
 Strings: TStrings;
begin
 Strings := TStringList.Create;
 try
   Strings.LoadFromFile("C:\t.txt");
   Copy(Strings[0], 1, 1);// Так обращаются
 finally
   Strings.Free;
 end;
end;



Страницы: 1 вся ветка

Текущий архив: 2006.12.03;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.068 c
4-1153131943
Balkon
2006-07-17 14:25
2006.12.03
Различное поведение различных СОМ портов при асинхронном доступе


6-1152017480
Интересующийся
2006-07-04 16:51
2006.12.03
Проблемы c TIdTCPServer и TIdTCPClient


4-1153379764
Misha Uskov
2006-07-20 11:16
2006.12.03
Описание сервиса


15-1163250973
Сало
2006-11-11 16:16
2006.12.03
Не прошло и 15 лет...


15-1163389624
Slider007
2006-11-13 06:47
2006.12.03
С днем рождения ! 12 ноября