![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как прочитать информацию из текстового файла
Алексей © (2003-05-15 07:41:00)и раскидать ее по ячейкам таблицы с целью построения диаграмм?
HelDet (2003-05-22 09:59:00) [1]Если записи в текстовом файле упорядочены, то можно можно воспользоваться стандартным компонентом (TTable). Записи должны быть либо фиксированной длины либо содержать разделители (пробел, точка, апостроф).
В TTable:
назначь DatabaseName псевдоним или каталог, содержащий .txt.
Далее TableType:=ttASCII
Этого достаточно, чтобы увидеть все доступные таблицы в списке TableName.
Если все поля в таблице появляются в 1 поле, следовательно BDE не может понять структуру разделения записей в файле.
Соловьев (2003-05-15 09:32:00) [2]есть в демках компонента для работы с текстовыми таблицами...я не пробовал, но может получиться.
АлексейК (2003-05-15 09:14:00) [3]var File:TextFile;
Path:String;
Str:String;
begin
Path:="путь до файла";
if FileExists(Path) then
begin
AssignFile(File, Path);
Reset(File);
while not EOF(File) do
begin
Readln(file, Str);//считваеш строку из файла
Анализируеш согласно формата записи и раскидываешь по ячейкам
end;
closefile(file);
end;
end;
Подобный пример есть в любой книжке.