|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
23.11.2007, 10:59 | #1 |
Пользователь
Регистрация: 21.08.2007
Сообщений: 46
|
Работа с текстовым файлом
Есть текстовый файл Данные в строке разделены символом табуляции Нужно Обратиться к третьему полю Написала программу как в литературе Выдает ошибку в строке SL.Delimiter:=tab; // числа в строке рзделены Tab не определен идентификатор Delimiter
procedure TForm3.Button1Click(Sender: TObject); var SL: TStrings; x:integer; tab : char; begin SL := TStringList.Create; x:=0; try while x=0 do begin SL.LoadFromFile('Songs.txt'); // грузим строку из файла tab:=Chr(9); SL.Delimiter:=tab; // числа в строке рзделены Tab SL.DelimitedText:=SL.Text; // разбиваем строку на отдельные части Edit1.Text=SL[3]; Readln; // если достигнут конец строки в файле, то переход на следующую строку} showMessage('1'): end; end; |
23.11.2007, 11:08 | #2 |
Форумчанин
Регистрация: 04.03.2007
Сообщений: 615
|
и что за ошибка?
|
23.11.2007, 11:14 | #3 |
Пользователь
Регистрация: 21.08.2007
Сообщений: 46
|
не определен идентификатор Delimiter
|
23.11.2007, 11:16 | #4 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Так не пойдет
Ты должна загружать файл в другой список Сделай так SL,SStrDelim: TStrings; В SL грузи файл а в SStrDelim уже грузи каждую строку из SL, и дели ее CHR(9)
I'm learning to live...
|
23.11.2007, 11:32 | #5 |
Пользователь
Регистрация: 21.08.2007
Сообщений: 46
|
Так я даже откомпилировать не могу из-за этой ошибки
|
23.11.2007, 12:08 | #6 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Правильно вместо SL: TStrings; нужно SL: TStringList;
I'm learning to live...
|
23.11.2007, 12:16 | #7 |
*
Старожил
Регистрация: 22.11.2006
Сообщений: 9,201
|
|
23.11.2007, 12:19 | #8 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Ну это логично, но TString абстрактен и работать в дальнейшем с ним, ИМХО, неполучится...
Пардон, если ошибаюсь...
I'm learning to live...
|
23.11.2007, 12:29 | #9 |
Пользователь
Регистрация: 21.08.2007
Сообщений: 46
|
Исправила , но ошибка остается Undeclared identifier "Delimiter"
Undeclared identifier "Delimited Text" |
23.11.2007, 12:35 | #10 |
Форумчанин
Регистрация: 04.03.2007
Сообщений: 615
|
вот такой код прекрастно компилится
Код:
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Работа с текстовым файлом | GazimagomedovM | Помощь студентам | 12 | 17.07.2008 18:24 |
Работа с текстовым файлом | Vasya | Помощь студентам | 28 | 24.01.2008 01:15 |
Работа с текстовым файлом (delphi). Помогите доделать программу. | Snord | Помощь студентам | 1 | 14.12.2007 14:10 |
Работа с текстовым файлом! | Edimus | Общие вопросы C/C++ | 10 | 19.11.2007 10:31 |
Модуль, работа с текстовым файлом | Soul | Паскаль, Turbo Pascal, PascalABC.NET | 1 | 21.05.2007 20:30 |