Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.10.29;
Скачать: CL | DM;

Вниз

BlockRead   Найти похожие ветки 

 
Block   (2006-10-16 21:31) [0]

Как эти функции юзать, приведите плиз конкретный пример


 
Ketmar ©   (2006-10-16 21:38) [1]

BlockRead, F1, тычем в example. ы?


 
wl ©   (2006-10-16 21:39) [2]

в помощи есть


 
Loginov Dmitry ©   (2006-10-16 23:05) [3]

Block   (16.10.06 21:31)
Как эти функции юзать


Можно юзать не их, а объект TFileStream, являющийся удобной оберткой над этими фукциями.


 
Джо ©   (2006-10-17 03:35) [4]

> [3] Loginov Dmitry ©   (16.10.06 23:05)
> Можно юзать не их, а объект TFileStream, являющийся удобной
> оберткой над этими фукциями.

Вообще-то, он является оберткой над WriteFile/ReadFile из Win32 API.


> Block   (16.10.06 21:31)
> Как эти функции юзать, приведите плиз конкретный пример


var
 F: File;
 S: string;
 N: Integer;
 Bytes: array [0..2] of Byte;
begin
 S := "ABCDEFG";
 N := 123;
 Bytes[0] := 1;
 Bytes[1] := 2;
 Bytes[2] := 3;

 AssignFile (F,"d:\myfile.dat");
 Rewrite (F,1);
 try

   // Например, так
   BlockWrite (F,S[1],Length(S));

   // Или так
   BlockWrite (F,N,SizeOf(N));

   // Или, скажем, так
   BlockWrite (F,Bytes[0],Length(Bytes));

 finally
   CloseFile (F);
 end;
end;


 
Anatoly Podgoretsky ©   (2006-10-17 09:47) [5]


> а объект TFileStream, являющийся удобной оберткой над этими
> фукциями.

Это ни в коей мере не является оберткой, не выдумывай.


 
Block   (2006-10-17 11:57) [6]

Джо, пасиб, всё ясно



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

Текущий архив: 2006.10.29;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 2.429 c
2-1161006472
Ksan
2006-10-16 17:47
2006.10.29
Синтаксис


1-1158435217
TStas
2006-09-16 23:33
2006.10.29
Можно ли как-то программно записать файлы на CD?


15-1160293068
DelphiLamer
2006-10-08 11:37
2006.10.29
Пара вопросов


15-1159934091
eRoR_rrr
2006-10-04 07:54
2006.10.29
Оптимизация программы


2-1160719741
Alex_C
2006-10-13 10:09
2006.10.29
Почему мерцает TMemo