![]() Главная страница Случайная страница Разделы сайта АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника |
Открытие файла
Append(F) ‑ открытие расширяемого файла. Аналогично типизированному файлу используются процедуры AssignFile(F; S), Reset(F), Rewrite(F), Reset(F) (п.1.8.2.1). Процедуры ввода‑ вывода Read(F, < список ввода>) ‑ читает из открытого файла F в указанные переменные из списка ввода. При вводе числовых значений все окружающие пробелы, символы табуляции и маркеры конца строк пропускаются, и выделенная подстрока преобразуется в тип принимаемого поля ввода, при нарушении формата возникает исключительная ситуация. Ввод логических переменных не предуcмотрен. ReadLn(F, < список ввода>) ‑ читает из открытого файла F в переменные из списка и переходит на начало следующей строки. Write(F; VI[, V2]...) ‑ записывает в файл одно или более значений V1, V2,.... Любой элемент списка может иметь форму: < выражение> [: < минимальная ширина поля> [: < ширина дробной части> ]]. Если размер выводимого значения больше минимальной ширины, то значение дополнится слева пробелами, если большую длину, то выводятся все символы без усечения. Если ширина поля не указана, то значения выводятся плотно без всяких разделителей. Writeln ‑ выполняет те же действия, что и Write, а затем добавляет к файлу маркер конца строки. Закрытие файла осуществляется процедурой CloseFile(F). Дополнительные процедуры AssignPrn(F) ‑ информация выводится на принтер. Файл открывается процедурой Rewrite. Eoln(F): Boolean - возвращает True при достижении конца строки файла. Flush(F) ‑ выталкивает буфер файла в файл F и очищает буфер. SeekEof(F): Boolean ‑ пропускает все пробелы, символы табуляции и маркеры конца строк и возвращает True при достижении конца файла. SeekEoln(F): Boolean ‑ возвращает True при достижении конца строки файла, пропуская пробелы и символы табуляции. Забиваем Сайты В ТОП КУВАЛДОЙ - Уникальные возможности от SeoHammer
Каждая ссылка анализируется по трем пакетам оценки: SEO, Трафик и SMM.
SeoHammer делает продвижение сайта прозрачным и простым занятием.
Ссылки, вечные ссылки, статьи, упоминания, пресс-релизы - используйте по максимуму потенциал SeoHammer для продвижения вашего сайта.
Что умеет делать SeoHammer
— Продвижение в один клик, интеллектуальный подбор запросов, покупка самых лучших ссылок с высокой степенью качества у лучших бирж ссылок. — Регулярная проверка качества ссылок по более чем 100 показателям и ежедневный пересчет показателей качества проекта. — Все известные форматы ссылок: арендные ссылки, вечные ссылки, публикации (упоминания, мнения, отзывы, статьи, пресс-релизы). — SeoHammer покажет, где рост или падение, а также запросы, на которые нужно обратить внимание. SeoHammer еще предоставляет технологию Буст, она ускоряет продвижение в десятки раз, а первые результаты появляются уже в течение первых 7 дней. Зарегистрироваться и Начать продвижение SetTextBuf(F; Var B[; N: integer]) ‑ связывает буфер ввода/вывода B размера N с текстовым файлом F. Пример ввода чисел из текстового файла ’Fact.txt’: Var F: TextFile; M: Array [1..100] Of Real; I: Integer; //переменные Begin AssignFile(F, ’Fact.txt’); Reset(F); I: =1; While Not Eof(F) and (I< =100) Do Begin Read(F, M[I]); I: =I+1; End; CloseFile(F);... End; //закрытие файла и окончание процедуры Печать текста Для вывода текстовой информации можно использовать стандартную процедуру AssignPrn (модуль Printers) (п. 1.8.2.3), которая связывает файловую переменную типа TextFile с текущим принтером. Пример вывода на печать текста «Иванов»: Procedure TForm1.Button1Click(Sender: TObject); Var Print: TextFile; Begin AssignPrn(Print); Rewrite(Print); Writeln(Print, 'Иванов'); System.CloseFile(Print); End;
|