Главная страница
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.038 c
2-1163458328
santey
2006-11-14 01:52
2006.12.03
ShowMessage


15-1163750633
Anatoly Podgoretsky
2006-11-17 11:03
2006.12.03
Новости APC


15-1163596447
novill
2006-11-15 16:14
2006.12.03
Кто-нибудь пользуется Castalia 4.2?


2-1163370410
c0rben
2006-11-13 01:26
2006.12.03
Сортировка по алфавиту


2-1163610135
Riply
2006-11-15 20:02
2006.12.03
Вопросы из разряда "Почему верблюд не ест вату ?"