Загрузка данных из файла в поток

← →
Pavel (2010-02-28 20:53) [0]

Возможно ли с поощью функции LoadFromFile загрузить не весь файл в поток, а только половину?

← →
Игорь Шевченко © (2010-02-28 21:07) [1]

Кроме LoadFromFile существует еще масса интересных функций. А у LoadFromFile есть исходный текст.

← →
Медвежонок Пятачок © (2010-02-28 21:07) [2]

если есть поток, то при чем здесь лоадфромфайл?
это единственный что ли его паблик метод?

← →
Anatoly Podgoretsky © (2010-02-28 21:32) [3]

Про какой поток речь?

← →
Baks (2010-02-28 21:39) [4]

Используй процыдуры BlockRead (для чтения) и BlockWrite (для записи).

var
FromF: file;
NumRead: Integer;
Buf: array[1..2048] of Char;
begin
AssignFile(FromF, OpenDialog1.FileName);
Reset(FromF, 1); { Record size = 1 }
try
while not eof(FromF) do
BlockRead(FromF, Buf, SizeOf(Buf), NumRead);
finally
CloseFile(FromF);
end;
end;

Так можно прочитать нужное кол-во данных.

← →
Pavel (2010-02-28 21:40) [5]

Есть файл "Text.txt", есть поток "st1: TStringStream". В поток st1 нужно загрузить не весь файл "Text.txt", а только половину.

← →
Медвежонок Пятачок © (2010-02-28 21:42) [6]

ну и грузи половину.

← →
Baks (2010-02-28 21:44) [7]

TStringStream

property Size: Longint;

Description

Read Size to determine how many bytes are used to store the value of DataString. Set Size to truncate the text or to increase the length of DataString. If Size is set to a value greater than the current length of the text, the content of the new bytes is undefined.

← →
Pavel (2010-02-28 21:50) [8]

Если не слжно скиньте примерчик, спасибо.

← →
Pavel (2010-02-28 21:55) [9]

Необходимо, прочитать первую половину файла, ее обработать, а затем прочитать вторую половину файла.

← →
Германн © (2010-03-01 00:16) [10]

> Необходимо, прочитать первую половину файла

Определение термина "половина файла" в студию.

← →
Плохиш © (2010-03-01 00:45) [11]

> Pavel (28.02.10 21:55) [9]
>
> Необходимо, прочитать первую половину файла, ее обработать,
> а затем прочитать вторую половину файла.

Не там ищешь тормоза, ищи в своём коде.

← →
Германн © (2010-03-01 01:00) [12]

> Плохиш © (01.03.10 00:45) [11]

Может это не поиск "тормозов", а учебная задача?

> Необходимо, прочитать первую половину файла, ее обработать,
> а затем прочитать вторую половину файла.

не возражаю

> не возражаю

я ща фтп по улице тяну, можно мне крепить его не через метр, а через полтора? а то стяжек не хватает.

> Германн (01.03.2010 00:16:10) [10]

Возьми с полки пирожок, их там два, возьми средний.

> я ща фтп по улице тяну, можно мне крепить его не через метр,
> а через полтора? а то стяжек не хватает

нельзя

> Игорь Шевченко (01.03.2010 12:38:16) [16]

Наоборот надо докупать, метр это слишком круто.

Загрузка данных из файла в поток Найти похожие ветки