Электронные учебники по Turbo Pascal 7.0

[Yez]

Электронные учебники по Turbo Pascal 7.0, укажите в этой теме.

 

[Yez]

Просто напишите по каким вы учились ЭЛЕКТРОННЫМ Учебника или укажите сайты со множеством статей по Паскалю!!! Зарание СПАСИБО!!!

 

[Poseidon]

Я ведь уже давал ссылку. Там есть и по Delphi и по чистому Паскалю. Посмотри в этой теме.

 

[Yez]

Для: Poseidon
Может подскажешь хорошие статьи по: процедурам и функциям, модулям, ввод\вывод в файл???

 

[Poseidon]

<!--QuoteBegin-Yez+23:07:2005, 23:00 -->
<span class="vbquote">(Yez @ 23:07:2005, 23:00 )</span><!--QuoteEBegin-->хорошие статьи по: процедурам и функциям, модулям, ввод\вывод в файл???

[snapback]22486" rel="nofollow" target="_blank[/snapback]​

[/quote] Давай по-конкретнее, что надо?
Вот для начала:

function File0pen(const FileName: string; Mode: Word) : Integer; Открывает существующий FileName файл в режиме Mode Значение, возвращаемое в случае успеха, — дескриптор открытого файла. В противном случае — код ошибки DOS.

function FileCreate(const PileName: string): Integer; Создает файл с именем FileName. Возвращает то же, что и FileOpen.

function FileRead(Handle: Integer; var Buffer; Count: Longint): Longint; Считывает из файла с дескриптором Handle Count байт в буфер Buffer. Возвращает число реально прочитанных байт или -1 при ошибке.

function FileWrite(Handle: Integer; const Buffer); Записывает в файл с дескриптором Handle Count байт из буфера Buffer. Возвращает число реально записанных байт или -1 при ошибке.

function FileSeek(Handle: Integer; Offset: Longint; Origin: Integer): Longint; Позиционирует файл с дескриптором Handle в новое положение. При Origin = 1,2,3 положение смещается на Offset байт от начала файла, текущей позиции и конца файла соответственно. Возвращает новое положение или -1 при ошибке.

procedure FileClose(Handle:Integer) Закрывает файл с дескриптором Handle.

function FileAge(const FileName:String) Возвращает значения даты и времени создания файла или -1, если файл не существует.

function FileExists(const FileName:String):boolean; Возвращает True если файл FileName существует к найден.

function FindFirst(const Path: string; Attr: Integer; var SearchRec: TSearchRec): Integer; Ищет первый файл, удовлетворяющий маске поиска, заданной в Path и с атрибутами Attr. В случае успеха заполняет запись SearchRec (см. примеч. 3) и возвращает 0, иначе возвращает код ошибки DOS.

function FindNext(var SearchRec: TSearchRec): Integer; Продолжает процесс поиска файлов, удовлетворяющих маске поиска. Параметр SearchRec должен быть заполнен при помощи FindFirst. Возвращает 0, если очередной файл найден, или код ошибки DOS. Изменяет SearchRec.

procedure FindClose(var SearchRec: TSearchRec); Завершает процесс поиска файлов, удовлетворяющих маске поиска.

function FileQetDate(Handle: Integer) : Longint; Возвращает время создания файла с дескриптором Handle (в формате DOS) или -1, если дескриптор недействителен.

procedure FileSetDate(Handle: Integer Устанавливает время создания файла с дескриптором Handle (в формате DOS).

function FileGetAttr(const FileName: string): Integer; Возвращает атрибуты (см. примеч. 2) файла с именем FileName или код ошибки DOS, если файл не найден.

function FileSetAttrtconst FileName: string; Attr: Устанавливает атрибуты файла с именем FileName.

function DeleteFile(const FileName:String) Уничтожает файл с именем FileName и в случае успеха возвращает True.

function RenameFile(const OldName, NewName: string): Boolean; Переименовывает файл с именем OldName в NewName и возвращает True в случае успеха.

function ChangeFileExt(const FileName, Extension: string): string; Изменяет расширение в имени файла FileName на Extension и возвращает новое значение FileName. Имя файла не изменяется.

function ExtractFilePath(const FileName: string): string; Извлекает из строки с полным именем файла FileName часть, содержащую путь к нему.

function ExtractFileName(const FileName: string): string; Извлекает из строки с полным именем файла FileName часть, содержащую его имя и расширение.

function ExtractFileExt(const FileName: string): string; Извлекает из строки с полным именем файла FileName часть, содержащую его расширение.

function ExpandFileName(const FileName: string): string; Возвращает полное имя файла FileName, добавляя при необходимости путь к нему и переводя все символы в верхний регистр.

function FileSearch(const Name, DirList: string): strings- Производит поиск файла с именем Name в группе каталогов, заданных параметром DirList. Имена каталогов должны отделяться друг от друга точкой с запятой. Возвращает в случае успеха полное имя файла или пустую строку, если файл не найден.

function DiskFree(Drive: Byte): Longint; Возвращает количество в байтах свободного места на заданном диске. Значение параметра Drive: 0 — для текущего диска, 1 — для А, 2 — для В и т. д. Если параметр неверен, функция возвращает -1.

function DiskSize(Drive: Byte): Longint; Возвращает размер диска Drive в байтах. Параметр Drive означает то же, что и в DiskFree.

function FileDateToDateTime(FileDate: Longint): TDateTime; Преобразует дату и время в формате DOS в принятый в Delphi формат TDateTime.

function DateTimeToFileDate(DateTime: TDateTime): Longint; Преобразует дату и время из формата TDateTime в формат DOS.

 

[Yez]

Для: Poseidon
Мне надо дохотчивые статьи по этим темам в Турбо Паскале...

 

[????]

Для: Yez

Ссылка скрыта от гостей

- Иллюстрированный самоучитель по Турбо Паскалю (online)

_ftp://217.107.209.40/TurboPascal7_0_1.rar +
_ftp://217.107.209.40/TurboPascal7_0_2.rar +
_ftp://217.107.209.40/TurboPascal7_0_3.rar +
_ftp://217.107.209.40/TurboPascal7_0_4.rar = 472.080.904 Байт

Ссылка скрыта от гостей

- Русский help для Turbo/Borland паскаля 7.0 308K

Ссылка скрыта от гостей

- несколько руководств и справочников

_http://pro.apollo.lv/comanche/ebooks/Turbo_Pascal_-_Uchebnik_(S_A_Nemnugin).rar - Turbo Pascal. Учебник 30,3Мб

 

[Yez]

А может подскажите бумажные учебники (лучшие на ваш взгляд по ТП 7.0)

 

[Guest]

Подскажите,пожалуйста, где беспдатно скачать TurboPascal7 <_<

 

[Guest]

Пардон бесплатно <_< h34r:

 

[Guest_joy_*]

Пожа-а-а-луйста!!!!!!!!!!

 

[nml]

<!--QuoteBegin-Guest+20:09:2005, 21:55 -->
<span class="vbquote">(Guest @ 20:09:2005, 21:55 )</span><!--QuoteEBegin-->Подскажите,пожалуйста, где беспдатно скачать TurboPascal7 <_<

[snapback]24998" rel="nofollow" target="_blank[/snapback]​

[/quote]

Не знаю насчет скачать, но у меня где-то был компакт со старыми системами, кажется там он был. Посвисти днем в аську.

 

[senka]

PascalBook
Скачивайте с сайта jetpro.do.am
Включает в себя практикум по паскалю

 

[European]

Для: senka
Ты дату последнего сообщения видел?
Тема закрыта