| ← Октябрь 2002 → | ||||||
|
2
|
3
|
5
|
||||
|---|---|---|---|---|---|---|
|
7
|
8
|
9
|
10
|
11
|
12
|
13
|
|
14
|
15
|
16
|
18
|
19
|
20
|
|
|
23
|
24
|
26
|
27
|
|||
|
28
|
29
|
|||||
За последние 60 дней ни разу не выходила
Сайт рассылки:
http://prog.rusfaq.ru/pascal
Открыта:
14-03-2002
Статистика
0 за неделю
RusFAQ.ru: Программирование на языке Pascal
| Информационный Канал Subscribe.Ru |
RusFAQ.ru: Программирование на языке Pascal
Выпуск № 048
от 17.10.2002, 14:50
| Администратор: Имя: Sensey URL: Информационный ресурс ICQ: 105679124 Украина, Харьков |
О рассылке: Задано вопросов: 82 Отправлено ответов: 216 Активность: 263.4 %
|
| Список экспертов, ответы которых опубликованы в данном выпуске |
| Byter Статус: Опытный Общий рейтинг: 130 [Подробней >>] |
Ayl Статус: Профессиональный Общий рейтинг: 118.02 [Подробней >>] |
Sensey Статус: Профессиональный Общий рейтинг: 125.1 URL: Страничка рассылки по Паскаля... Телефон: +38 (0572) 41-76-04 дом. [Подробней >>] |
| Артём Шегеда Статус: Профессиональный Общий рейтинг: 116.63 URL: Пристанище неодинокого программиста [Подробней >>] |
| Краткий перечень вопросов |
Вопрос № 79. Добрый день Господа Эксперты! Благодарю за предыдущую помощь, не поможете мне снова. Эта часть прог... (ответов: 4)
Вопросов: 1, ответов: 4
| Вопрос № 79 |
Добрый день Господа Эксперты!
Благодарю за предыдущую помощь, не поможете мне снова. Эта часть проги и при запуске опять выдается ошибка:
procedure TMyAppl.PrintKnigiList;
var
f:text;
P:PKnigi;
KL:PCol;
procedure PrintKnigi(P:PKnigi);far;
var
f:text;
begin
with P^ do
writeln(f,Avtor^+' '+Name^+' '+Janr^+' '+Izdat^+' '+God^);
end;
begin
{$I-}
assign(f,'knigi.txt');
reset(f);
KL^.ForEach(@PrintKnigi);
close(f);
{$I+}
end;
В строке "writeln(f,Avtor^+' '+Name^+' '+Janr^+' '+Izdat^+' '+God^);" выдается ошибка что файл не открыт на запись. Не подскажете как ее решить.
Вопрос отправлен: 14.10.2002, 14:47
Отправитель: Fess (fess_r@kuzbass.stack.ru)
[Следующий вопрос >>] [Список вопросов]
Отвечает Byter
Здравствуйте, Fess!
Сложно без полного исходника!
Я же не знаю,что у тебя там за объекты или записи.
Ответ отправлен: 15.10.2002, 16:16
Отправитель: Byter
Отвечает Ayl
Добрый день, Fess!
Правильно, не открыт. Надо вместо reset (f) написать либо rewrite (f) - тогда будет создан новый файл, либо append (f) - тогда записи будут добавлены в конец.
Ответ отправлен: 14.10.2002, 15:21
Отправитель: Ayl
Отвечает Sensey
Приветствую Вас, Fess!
:) Ну так напиши не reset(f), а rewrite(f) :)
Справку в turbo.tph читать надо...
Если надо дописывать в файл, тогда append(f)
Ответ отправлен: 14.10.2002, 15:32
Отправитель: Sensey
Отвечает Артём Шегеда
Приветствую Вас, Fess!
Ну, вообще-то, в таких случаях пишут так:
Приложение:
Ответ отправлен: 14.10.2002, 15:18
Отправитель: Артём Шегеда
|
Форма отправки вопроса |
Форма может работать некорректно в почтовых программах "Microsoft Outlook" и "Microsoft Outlook Express". В программе The Bat! подобные формы не работают вообще!
После нажатия на кнопку "Отправить", будет открыто второе окно. Заметьте, что в некоторых браузерах могут стоять запреты на открытие других окон, а также "чрезмерное" кэширование данных, при этом факт отправки Вашего вопроса стоит под сомнением.
Мы рекомендуем открывать рассылку в программе Internet Explorer 5.0+ или отправлять вопросы с сайта по адресу: http://rusfaq.ru/cgi-bin/Message.cgi.
© 2002 Команда RusFAQ.ru.
| Вопрос и дополнение |
Ваш вопрос:
Приложение (если необходимо):
Получить ответов:
| Выбор рассылки |
| Программисту Assembler (44) C / C++ (31) Perl (5) Delphi (21) Pascal (25) Basic / VBA (10) Java / JavaScript (10) PHP (10) MySQL / MSSQL (14) |
Пользователю Windows 95/98/Me (37) Windows NT/2000/XP (25) "Железо" (34) Поиск информации (14) |
Администратору Windows NT/2000/XP (14) Linux / Unix (15) |
Юристу Гражданское право (6) Семейное право (4) Трудовое право (3) КоАП (5) |
Отправить вопрос всем экспертам выбранной рассылки.
| © 2002 Россия, Москва. Авторское право: RusFAQ.ru |
| http://subscribe.ru/
E-mail: ask@subscribe.ru |
Отписаться
Убрать рекламу |
| В избранное | ||
