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

Вниз

TWebBrowser и TStream   Найти похожие ветки 

 
*Стажер*   (2006-10-09 18:40) [0]

Вот обнаружил:
Как загрузить потоковые(stream) данные в WebBrowser не прибегая к открытию файла

Function LoadFromStream(const AStream: TStream): HRESULT;
begin
 AStream.seek(0, 0);
 Result := (WebBrowser1.Document as
         IPersistStreamInit).Load(TStreamAdapter.Create(AStream));
end;

Пытался попробовать, но программа вылетает с EAccessViolation

var
 ST : TMemoryStream ;
begin
 ST := TMemoryStream.Create;
 ST.LoadFromFile("D:\TEMP\Рабочий стол\w.txt");
 LoadFromStream(ST);
 ST.Free;
Я если честно еще не работал с TStream, поэтому даже и не понятно где , что сделал неправильно.


 
ProgRAMmer Dimonych ©   (2006-10-09 18:45) [1]

А если убрать const перед стримом? Мало ли чего там StreamAdapter с ним делает?


 
*Стажер*   (2006-10-09 18:51) [2]


> ProgRAMmer Dimonych ©


> const

???


 
ProgRAMmer Dimonych ©   (2006-10-09 18:52) [3]

Function LoadFromStream(const AStream: TStream): HRESULT;
Эта процедура создаётся в этой программе?


 
*Стажер*   (2006-10-09 18:57) [4]


> Эта процедура создаётся в этой программе?

Да

Без const Delphi ругаться начинает
Declaration of "LoadFromStream" differs from previous declaration


 
Плохиш ©   (2006-10-09 18:57) [5]

Сначала надо сделать WebBrowser1.Navigate[2]("about:blank"), а уже потом работать со свойством Document.


 
*Стажер*   (2006-10-09 19:07) [6]

Спасибо большое, теперь все работает.



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

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

Наверх




Память: 0.47 MB
Время: 0.042 c
1-1158224202
_Mouse_
2006-09-14 12:56
2006.10.22
Проблемка с указателями


6-1148981930
alexa14
2006-05-30 13:38
2006.10.22
Проблема с ServerSocket


2-1160132776
andrey44
2006-10-06 15:06
2006.10.22
Flat Memory as Dynamic array


4-1149177664
DeStranger
2006-06-01 20:01
2006.10.22
Как заставить систему воспринимать USB порт как COM


2-1159894348
lesser
2006-10-03 20:52
2006.10.22
движение текста в режиме XOR