Помощь - Поиск - Пользователи - Календарь
Полная версия: Телефонный справочник
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
Volf
Всем привет!!!
Задача состоит в следующем:
есть телефонный справочник, нужно сделать такую штучку:
чтобы в текстовом файле (spis1, ну и следовательно после сортировки в spis2) вводимая в базу информация формировалась никак у меня - каждое поле на отдельной строке, а все в одну строчку Телефон___ФИО___Улица___Дом!!!
volvo
Формируй при записи в файл spis1.txt строку так:
const delimiter = '|'; { <--- Или любой другой символ, НЕ используемый в строках }
procedure zapis;
begin
assign (f1,'a:\spis1.txt');
append (f1);
for i:=1 to num do
with a[ i ] do begin
writeln(f1,
number, delimiter,
fio, delimiter,
ulica, delimiter,
dom);
end;

close (f1);
end;
, то же самое - в newfile... А вот чтобы прочитать из файла строку, разделенную таким delimiter-ом, воспользуйся принципом, который я описывал здесь:

Заполнение полей записи из файла

Попробуй сделать сам, не получится - приходи, поможем...
Volf
Спасибо!
проблема то как раз в выводе, как записать в строку ослу понятно, а делая чтение из фала по аналогии приведенного примера выдает ошибки, и нихрена не выводит, хотя может я туплю...=(
volvo
Цитата
как записать в строку ослу понятно
Чего ж не записал? Когда решение перед глазами - все легко и просто? dry.gif
Цитата
хотя может я туплю...
Это уже зависит от того, КАК именно ты сделал "по аналогии"... Тот пример был абсолютно рабочим...
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.