Форум: "Начинающим";
Текущий архив: 2006.10.29;
Скачать: [xml.tar.bz2];
Вниз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;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.042 c