Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

чтение данных из файла [D6, WinXP]


nat ©   (2005-07-07 11:22:00) 

Подскажите пожулуйста, как прочитать данные в Delphi из текстового файла .txt, если они записаны в виде двух столбцов

145 120
132 59
12  89
и т.д
Столбцы разделены tabom.


Sergeich   (2005-07-08 10:48:00) [1]

TStringList.CommaText + F1


Fay   (2005-07-07 14:22:00) [2]

2 Untermensch   (07.07.05 11:52) [2]
>> данная функция есть во многих языках, но почему то не вставлена в Delphi
Видимо, как раз потому, что
>> Её можно написать в 10 сточек за 10 мин

З.Ы.
Функции факториала тоже почему-то нет 8)


AbrosimovA   (2005-07-07 12:04:00) [3]

Например, так:

var List: TStringList;
   i: integer;
begin
List:=TStringList.Create;
List.LoadFromFile('mytext.txt');
for i:=0 to List.Count-1 do begin
 List.Strings[i]:=StringReplace(List.Strings[i],#9,'   ',[rfReplaceAll]);
end;
ListBox1.Items.Assign(List);
end;


Untermensch   (2005-07-07 11:52:00) [4]

TStringList, затем .LoadFromFile а затем функцией explode в цикле по .Count (данная функция есть во многих языках, но почему то не вставлена в Delphi). Её можно написать в 10 сточек за 10 мин. Она очень часто бывает нужна.

function explode(Separator, Source: string; MaxLength: integer): array of string;


Digitman   (2005-07-07 11:27:00) [5]


> nat   (07.07.05 11:22)  


в какой форме д.б. представлен результат ?


Наверх

Титульная страница Поиск, карта сайта Написать письмо