VPF::чтение .txt файла - Форум программистов

withNoName

Дата 14.11.2006, 00:43 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 6
Регистрация: 5.11.2006

Репутация: нет
Всего: нет

Помогите решить такую задачу:

имею txt файл с содержащий текст вида:

2006.09.21,11:34,1.2723,1.2723,1.2722,1.2722,2
2006.09.21,11:35,1.2723,1.2723,1.2722,1.2722,2
2006.09.21,11:36,1.2723,1.2723,1.2721,1.2721,5
2006.09.21,11:38,1.2720,1.2721,1.2720,1.2721,2
2006.09.21,11:41,1.2722,1.2722,1.2722,1.2722,1
2006.09.21,11:42,1.2721,1.2722,1.2721,1.2722,4

Запятая выступает в качестве разделителя. Нужно получить этот текст в виде таблицы для дальнейшего анализа.
Тоесть нужно иметь доступ отдельно к каждому значению которое находится между запятыми.
Подскажите как можно это реализовать?
Будет ли проще обработать не txt файл а xls ?

Voyager

Дата 14.11.2006, 01:01 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 532
Регистрация: 8.2.2005

Репутация: 2
Всего: 18

Загрузи файл в TStringlist и дальше обрабатывай каждую строчку.
Вот кусок из одной моей проги для примера:

Код


 sl:=TStringList.Create;
  sl.LoadFromFile(ExtractFilePath(paramstr(0))+'contacts.dat');
  for i:=0 to sl.Count-1 do
    begin
      s:=sl.Strings[i];
      if Pos(';',s)<>0 then
        begin
          with ListView1.Items.Add do
            begin
              Caption:=Copy(s,1,Pos(';',s)-1);
              SubItems.Add(Copy(s,Pos(';',s)+1,255));
            end;
        end;
    end;
  sl.Free;

Sunvas

Дата 14.11.2006, 16:29 (ссылка)

(нет голосов)

Загрузка ...

Соль и сахар

Профиль
Группа: Участник
Сообщений: 3388
Регистрация: 12.3.2006
Где: Тосно

Репутация: 28
Всего: 89

Есть компонентик в Делфи ListView. Он позволяет тебе создать таблицу такого вида.
А загрузка данных дело простое - читай каждую строку, ищи запятую и добавляй данные в ячейки ListView.

--------------------

Воспитывая детей по своему образу и подобию, родители почему-то надеются, что они будут лучше их.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »