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

Вниз

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

 
Igit ©   (2003-10-22 16:51) [0]

Есть ли?


 
Digitman ©   (2003-10-22 16:53) [1]

а как же ! см. метод TSomeStreamDescendant.LoadFromFile


 
Igit ©   (2003-10-22 17:20) [2]

В смысле с этим как?
var IStr:iStream;
как? или в PStream?


 
Igit ©   (2003-10-22 17:26) [3]

а то так не хочется CreateStreamOnHGlobal"ом


 
Digitman ©   (2003-10-22 17:29) [4]


> Igit


ты вообще-то о чем ?

я - о некоторых стандартных классах-наследниках класса TStream, стандартного для Делфи (ты же про Делфи спрашивал ?), которые имеют метод LoadFromFile, позволяющий загрузить поток содержимым указанного файла


 
Igit ©   (2003-10-22 17:32) [5]

о этом
http://www.rsdn.ru/article/qna/gdi/drawimg.xml


 
me   (2003-10-22 17:35) [6]

Посмотри класс TStreamAdapter


 
Igit ©   (2003-10-22 20:29) [7]

Пришлось через CreateStreamOnHGlobal:
var
IStr:iStream;
HMemo:HGLOBAL;
MemoStr:TMemoryStream;
Buf:Longint;
L:Largeint;
begin
MemoStr:=TMemoryStream.Create;
MemoStr.LoadFromFile("C:\test.jpg");
HMemo:=GlobalAlloc(GMEM_FIXED,MemoStr.Size);
if CreateStreamOnHGlobal(HMemo,True,IStr) = S_OK then
begin
IStr.write(MemoStr.Memory,MemoStr.Size,@Buf);
IStr.Seek(0,STREAM_SEEK_SET,L);
end;
end;



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

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

Наверх




Память: 0.48 MB
Время: 0.027 c
14-8627
Skier
2003-10-15 10:16
2003.11.03
Cловарь английский акронимов.


4-8740
Dexter
2003-08-30 14:03
2003.11.03
Меню в чужой програме. Как с ним работать?


14-8583
sniknik
2003-10-15 13:25
2003.11.03
Уфа это где, что? ;о))


1-8508
dolphin1
2003-10-23 17:12
2003.11.03
Минимиальный размер


1-8534
Инна
2003-10-23 10:56
2003.11.03
Ещё раз о создании компонента