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

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

← →
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]

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


← →
Игорь Шевченко ©   (2010-03-01 03:18) [13]


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


не возражаю


← →
KilkennyCat ©   (2010-03-01 04:02) [14]


> не возражаю

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


← →
Anatoly Podgoretsky ©   (2010-03-01 09:31) [15]

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

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


← →
Игорь Шевченко ©   (2010-03-01 12:38) [16]


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


нельзя


← →
Anatoly Podgoretsky ©   (2010-03-01 12:53) [17]

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

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



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

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



Память: 0.48 MB
Время: 0.051 c
15-1268851235
NailMan
2010-03-17 21:40
2010.08.27
Кто пользовал электронные книги, нужно посоветоваться


2-1273938530
SIV5000
2010-05-15 19:48
2010.08.27
Окна


15-1269675632
Игорь
2010-03-27 10:40
2010.08.27
Джеки Чан в рекламе АВ Касперского


15-1267567565
Delphi5.01
2010-03-03 01:06
2010.08.27
Редакт. настр. прокси для Firefox и Opera (решение оплачивается)


15-1264052610
brother
2010-01-21 08:43
2010.08.27
Эпидемия ICQ - PiGGy.zip




   Наверх