Главная страница
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.47 MB
Время: 0.052 c
6-8563
Filat
2003-09-04 16:38
2003.11.03
Как сделать send message конкретному юзеру или всей лок. сети?


1-8387
wildbird
2003-10-22 06:16
2003.11.03
запуск с параметром


14-8637
Davinchi
2003-10-14 14:28
2003.11.03
Запуск приложения и получение его заголовка и класса


1-8396
Sandman25
2003-10-20 17:48
2003.11.03
Exe в 2 Mb - много или мало?


9-8246
com2003
2003-04-28 19:20
2003.11.03
Реализация камеры