Вниз
Скачать: CL | DM;

Процедуры и функциии   Найти похожие ветки 

← →
Ivolg   (2004-07-10 08:53) [0]

Здрасти.!!!!!! Перичмслите пожайлуста все(большую часть) процедур и функций для работы с файлами! Спасибо!


← →
Глеб ©   (2004-07-10 09:00) [1]

procedure AssignFile(f: file; s: string) - связывает строку s с файловой переменной f.
procedure reset(f: file) - открывает файл f для чтения
procedure rewrite(f: file) - открывает файл f для записи.
procedure read(f: file; .........) - читает из файла f переменные............ (их может быть много)
Аналогично read - write, только пишет.

и т. д.


← →
Ivolg   (2004-07-10 09:22) [2]

А как мона осушествить такое:

Читать из файла указанное число байт и писать байты в другой файл


← →
Rem   (2004-07-10 09:58) [3]

File + F1


← →
Алхимик ©   (2004-07-10 10:02) [4]

AssignFile(f1,"файл1"); // связали переменную с файлом
AssignFile(f2,"файл2"); // -"-
reset(f1);   // открыли на чтение
rewrite(f2); // открыли на запись
for i := 0 to (сколько надо)-1 do begin
  read(f1,MyByte);  // прочитали
  write(f2,MyByte); // записали
end;
CloseFile(f1); // закрыли файл
CloseFile(f2); // -"-

+ указать типы переменых
+ проверять возможность открытия первого файла
 (не существует, заблокирован и т.д.)
+ проверять что в первом файле есть необходимое число байт


← →
Ivolg   (2004-07-10 20:23) [5]

Алхимик

Ошибка в 6 и 7 строке:
[Error] Unit1.pas(38): Undeclared identifier: "MyByte"


← →
KilkennyCat ©   (2004-07-10 20:30) [6]


> Ivolg   (10.07.04 20:23) [5]


нет, ошибка в ДНК.


← →
arcoant   (2004-07-10 22:29) [7]

2 KilkennyCat:
 ТОЧНО!!!


← →
Cardinal ©   (2004-07-10 23:31) [8]

>Ошибка в 6 и 7 строке:
>[Error] Unit1.pas(38): Undeclared identifier: "MyByte"

: ))))))))))


← →
Marser ©   (2004-07-11 01:25) [9]

Когда уже будут банить за идиотизм...


← →
KilkennyCat ©   (2004-07-11 01:32) [10]

А вообще-то, их и не так много. Глеб ©   (10.07.04 09:00) [1] перечислил практически все: открыть, закрыть, читать, писать. Есть пятая - перемещение по файлу. Возможно, удаление - шестая, хотя теоретически она основывается на записи вопросика... Ну, пусть будет. Итого: всего шесть. Остальные - побочные...


← →
Marser ©   (2004-07-11 01:37) [11]


> Остальные - побочные...

А АПИшные?


← →
KilkennyCat ©   (2004-07-11 01:42) [12]


> Marser ©   (11.07.04 01:37) [11]


а какая разница? Я имел ввиду глобальные :) Апишные то же
читаю, пишут, ищут... Хотя, если совсем глобально подойти, то все опять сводится к работе с ноликом и единичкой :))


← →
DrPass ©   (2004-07-11 01:49) [13]


> Когда уже будут банить за идиотизм...

Лучше ввести уголовную ответственность



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.021 c
4-1086968728
BalloonHint
2004-06-11 19:45
2004.07.25
Tray на Api


6-1085802948
Vizzor
2004-05-29 07:55
2004.07.25
Как можно проверить включен ли HTTP/FTP через сокеты?


1-1089304409
Ivolg
2004-07-08 20:33
2004.07.25
Размер


1-1089280005
Anisa
2004-07-08 13:46
2004.07.25
Delphi>Excel


1-1089382208
MadGhost
2004-07-09 18:10
2004.07.25
Как сделать PREVIEW у TPrinter???




   Наверх