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

Вниз

чтение данных из файла   Найти похожие ветки 

 
nat   (2005-07-07 11:22) [0]

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

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


 
Digitman ©   (2005-07-07 11:27) [1]


> nat   (07.07.05 11:22)  


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


 
Untermensch   (2005-07-07 11:52) [2]

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

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


 
AbrosimovA   (2005-07-07 12:04) [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;


 
Fay ©   (2005-07-07 14:22) [4]

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

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


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

TStringList.CommaText + F1



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

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

Наверх




Память: 0.47 MB
Время: 0.157 c
4-1117544497
lucifer
2005-05-31 17:01
2005.07.25
Копирование файлов


1-1120547296
Slaga
2005-07-05 11:08
2005.07.25
Можно ли экспортировать из dll - overload процедуры


1-1120819580
1+Random(9999)
2005-07-08 14:46
2005.07.25
Сокеты


14-1120201663
Андрей Жук
2005-07-01 11:07
2005.07.25
Что надо для создания проектов под .Net?


4-1117450284
toaster
2005-05-30 14:51
2005.07.25
Плоское окно & меню